barak

#! /bin/sh

set -e

# Set these appropriately.  I had two, so I made a way to get either.  You probably only need one.
case "${1}" in
    d*)
	user="vpsa22638"
	password="A34ks52f"
	;;

barak

{-# LANGUAGE UnicodeSyntax #-}
{-# LANGUAGE ParallelListComp #-}
{-# LANGUAGE BangPatterns #-}

-- A suffix prime is a prime number all of whose suffixes are also
-- prime.  No zero digits allowed.  Here we find all, in a given base.

import Prelude.Unicode

import Data.List (intersperse, foldl')

barak

(ns newton-raphson.core)

;;utility function for list manipulation
(defn keep-list [expr]
  (if (and (coll? expr) (not (= 1 (count expr)))) (list expr) expr))


(defn to-list [expr]
  (cond (list? expr) expr
(coll? expr) (seq expr)

barak

#!/usr/bin/bash

# Check available version and upgrade zoom if possible.

set -f
set -u
set -e

if [ $# != 0 ]; then
    echo "Download and install zoom package. Abort if it does not supersede currently installed version."

barak

#! /bin/bash -f
set -e

k=1
s=1

function usage() {
    echo "find-gpu [K [SECS]]"
    echo " Prints the indices of the K (default: ${k}) least-used"
    echo " GPUs, as a comma-separated list. Symmetries broken"