chrisbuttery

module Main exposing (..)

import Html exposing (..)
import Html.Events exposing (..)
import Html.App as App
import Task
import Process
import Time

chrisbuttery

module Main exposing (..)

import Html exposing (Html, button, div, text)

import Html.App
import Widget
import Ports

-- MODEL

chrisbuttery

Keybase proof

I hereby claim:

• I am chrisbuttery on github.
• I am chrisbuttery (https://keybase.io/chrisbuttery) on keybase.
• I have a public key ASBkVZkZ0a3Mww6WQEqB1QFM7xrR5sNAHIaTebBDiggjRwo

To claim this, I am signing this object:

chrisbuttery

Use these rapid keyboard shortcuts to control the GitHub Atom text editor on Mac OSX.

Key to the Keys

• ⌘ : Command key
• ⌃ : Control key
• ⌫ : Delete key
• ← : Left arrow key
• → : Right arrow key
• ↑ : Up arrow key

chrisbuttery

var numTiers = 100,
    triangle, 
    start, 
    stop;

/**
*
* First version uses recursion
*
*/

chrisbuttery

const choo = require('choo')
const app = choo()

function init (send) {
  send('start')
}

function decrement (state) {
  if (state.count === 0) {
    // implode

chrisbuttery

import Html exposing (..)
import Html.App as Html
import Html.Attributes exposing (..)
import Html.Events exposing (onInput)
import String


type alias Model =
  { topic : String }
  

chrisbuttery

import Html exposing (..)
import List

split : Int -> List a -> List (List a)
split i list =
  case List.take i list of
    [] -> []
    
    listHead -> 
      -- [1,2] (listHead)

chrisbuttery

import Html exposing (..)
import Html.App as Html
import Html.Events exposing (..)
import Random exposing (Generator)
import List

users =
  [ {name = "one", username = "@one"}
    , {name = "two", username = "@two"}
    , {name = "three", username = "@three"}

chrisbuttery

import List
import Random

without : Int -> [a] -> [a]
without i arr = 
  let before = take i arr
      after = drop (i+1) arr
  in
    before ++ after