ah45

# configure the Ruby Gems environment
export RUBYOPT=rubygems
export GEM_HOME="$HOME/.gem"
export GEM_PATH="$HOME/.gem"
export PATH="$HOME/.gem/bin:$PATH"
source ~/bin/ohmygems

ah45

#cloud-config

coreos:
  etcd:
    # generate a new token for each unique cluster from https://discovery.etcd.io/new
    # WARNING: replace each time you 'vagrant destroy'
    discovery: https://discovery.etcd.io/new
    addr: $public_ipv4:4001
    peer-addr: $public_ipv4:7001
  fleet:

ah45

(ns active-directory.guid.util
  (:require [clojure.string :as str]
            [clojure.data.codec.base64 :as b64]))

(defn decode
  "Decodes a Base64 encoded string into a sequence of bytes"
  [b64s]
  (b64/decode (.getBytes b64s)))

(defn byte->hex

ah45

(ns nested-map-zipper
  (:require [clojure.zip :as zip]
            [clojure.data :refer [diff]]))

(defmacro recur-if
  ([expr]
   `(recur-if ~expr nil))
  ([expr else]
   `(let [temp# ~expr]
      (if temp# (recur temp#) ~else))))

ah45

(defmacro defmethods
  "A convenience over writing lots of short `defmethod` statements that
  use the same arguments:

       (defmulti mm (fn [o x y] o))
       (defmethods mm [_ x y]
         '+ (+ x y)
         '- (- x y)
         '* (* x y)
         '/ (/ x y))

ah45

(ns thoth.transit-xhr
  (:require [cljs-time.format :as tf]
            [cognitect.transit :as tr]
            [com.cognitect.transit.types :as trt]
            [goog.events :as events])
  (:import [goog.net XhrIo]))

(def http-methods
  "The HTTP request codes we support Transit payloads in."
  {:get "GET"

ah45

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim i As Integer
  Dim p As Integer
  
  For i = 1 To Worksheets.Count
    If (Worksheets(i).Name <> "Data") Then
      For p = 1 To Worksheets(i).PivotTables.Count
        Worksheets(i).PivotTables(p).PivotCache.Refresh
      Next p
    End If

ah45

(ns railway-oriented-programming
  "An adaptation of [Railway Oriented Programming](rop) using the
  [Cats](cats) library in Clojure.

  [rop]: http://fsharpforfunandprofit.com/posts/recipe-part2/
  [cats]: https://github.com/funcool/cats"
  (:require [cats.builtin]
            [cats.core :as cats]
            [cats.monad.either :as either]))

ah45

Following on from a meeting with Simon, Ed, and Bryan. It seems like we’re trying to answer two questions:

• Where are we overloaded?
• What aren't we using? (That we should look to find or fit work to.)

Different contexts:

• Managing current load
• Always starts with released shop orders.

ah45

F# SPA Live Development

Pieces of the puzzle:

• F#
• Fable
• Webpack
• Suave / Freya / the .NET web framework of your choice