This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
### Keybase proof | |
I hereby claim: | |
* I am jamesmacaulay on github. | |
* I am jamesmacaulay (https://keybase.io/jamesmacaulay) on keybase. | |
* I have a public key ASDnKw1JsZHofgcB89uvNLIux6FkTNSz64gv8aS99WWGXgo | |
To claim this, I am signing this object: |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
pub type V3 = [usize; 3]; | |
#[derive(Clone, Copy, Debug, PartialEq, Eq)] | |
pub struct PositionedVolume { | |
dimensions: V3, | |
position: V3, | |
} | |
// mutable stack of sub-containers, initialized with input container | |
// mutable vec of remaining items, initialized with all input items |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/bash | |
lastlast=$(last --time-format=iso -1 -R | head -1 | awk '{ print $3 "\n" $5 }' | xargs -n1 date +%s -d 2> /dev/null) | |
lastuserinputs=$(who -s | awk '{ print $2 }' | (cd /dev && xargs stat -c '%X')) | |
events=$lastlast$'\n'$lastuserinputs | |
sincelatestevent=$(echo "$events" | sort -rn | head -1 | awk '{ print '"$(date +%s)"'-$1 }') | |
uptime=$(cat /proc/uptime | sed -n 's/\([0-9]*\).*/\1/p') | |
durations=$sincelatestevent$'\n'$uptime | |
idletime=$(echo "$durations" | sort -n | head -1) | |
echo "$idletime" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module DQuery | |
import Record | |
namespace Json | |
data Json | |
= JsonString String | |
| JsonBool Bool | |
| JsonInt Int | |
| JsonObject (List (String, Json)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module Main exposing (main) | |
import Html exposing (Html, text) | |
import Json.Bidirectional as Json | |
import Json.Decode as Decode | |
import Json.Encode as Encode | |
import String | |
import Tuple | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
root = true | |
[*] | |
indent_style = space | |
indent_size = 2 | |
[*.elm] | |
indent_size = 4 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
module GraphQL.Query exposing (..) | |
import Json.Decode as Decode exposing (Decoder, (:=)) | |
import Array exposing (Array) | |
type SelectionSet | |
= SelectionSet (List Selection) | |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
-- paste into http://elm-lang.org/try and click "compile" | |
-- http://imgur.com/gallery/W6TwgZw | |
import Graphics.Collage exposing (..) | |
import Graphics.Element exposing (..) | |
import Text | |
import Color exposing (..) | |
import Time | |
import Signal |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ns explicit-state-transducers) | |
(defn take-with-explicit-state | |
"A stateless rewrite of the `c.c/take` transducer that requires its state to | |
be provided as part of each input" | |
[n] | |
(fn [rf] | |
(fn | |
([] (rf)) | |
([result] (rf result)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// Elm code from https://github.com/evancz/elm-architecture-tutorial#example-5-random-gif-viewer | |
// | |
// type Action | |
// = RequestMore | |
// | NewGif (Maybe String) | |
// | |
// | |
// update : Action -> Model -> (Model, Effects Action) | |
// update msg model = | |
// case msg of |
NewerOlder