algal

//  Zipping.swift
// known-good: Swift 4.2
// Alexis Gallagher

import Foundation

public extension URL {

  /// Creates a zip archive of the file or folder represented by this URL and returns a references to the zipped file
  ///

algal

# sourcing this file will define a bash functions that 
# tries to run subsequent calls to emacs with 24 bit color.
#
# It sets TERM=xterm-emacs-leg if 
# - we've created a user-local terminfo record for xterm-emacs-leg, and
# - we're using iTerm2 or something has set COLORTERM=truecolor
# 
# This will cause emacs to use 24 bit color only when it will work,
# inside or outside of tmux. I haven't found a way to auto-detect Blink.sh yet.
#

algal

// known-good: Swift 4.2, macOS
import Foundation
import ModelIO

private func LogDebug(_ s:Any) -> Void { print(s) }
private func LogInfo(_ s:Any) -> Void { print(s) }
private func LogError(_ s:Any) -> Void { print(s) }

struct POINT3D {
  var x:Float

algal

import Foundation

// Swift 2.0

// poor man's parsers for (TSV) tab-separated value files
// for something more full-featured, the best avenue is CHCSVParser

/**
Reads a multiline, tab-separated String and returns an Array<NSictionary>, taking column names from the first line or an explicit parameter
*/

algal

# This uses scikit learn internals, since the sk public API requires you to pass
# in an estimator and sometimes you just want to pass in the some data you'd
# use to calculate a raw CM

def plot_cm(y_true,y_pred,labels):
    from sklearn.metrics._plot.confusion_matrix import ConfusionMatrixDisplay

    sample_weight = None
    normalize = None
    include_values = True

algal

import Darwin

/**
 Returns a lazy sequence that returns a String for every line of `file`.
 
 Example 1:
 // print all lines from a file
 let file = fopen(NSBundle.mainBundle().pathForResource("Cartfile", ofType: nil)!,"r")
 for line in lineGenerator(file) { print(line,separator: "", terminator: "") }
 fclose(file)

algal

import Foundation
import AVFoundation
import ImageIO
import MobileCoreServices

import BespokeCore

struct FrameInfo {
  var frame:CGImage
  var frameDuration:TimeInterval

algal

/// An `OutputStreamType` which uses GCD to write to a file
class FileOutputStream : OutputStreamType
{
  private let filepath:NSURL
  private let channel:dispatch_io_t!
  
  /**
   Initializes output stream to write to `filename` in the user's Documents directory.
   */

algal

import UIKit

// known-good: Xcode 8.2.1

/**
 
 UIImageView subclass which works with Auto Layout to try 
 to maintain the same aspect ratio as the image it displays.
 
 This is unlike the usual behavior of UIImageView, where the 

algal

:;exec emacs --no-init-file --no-site-lisp -script "$0" -- "$@" # -*- mode:emacs-lisp -*-
(defun main ()
  (require 'cl-lib)
  (let ((script-name (nth 2 command-line-args))
        (args (cdr command-line-args-left)))
    ;; assert: ARGS now is a possibly empty list of command line args to the script

    ;; check for valid arguments here
    (when (not args)
      (princ (format "usage: %s PATH_TO_FILE" script-name))