jessitron

module Main (..) where

import ElmTest
import Check exposing (Evidence, Claim, that, is, for)
import Check.Test
import Check.Producer as Producer
import List
import Signal exposing (Signal)
import Console exposing (IO)
import Task

jessitron

module CarrotPotato where

import StartApp
import Task exposing (Task)
import Signal exposing (Signal, Address)
import Effects exposing (Effects, Never)
import Html exposing (Html)

--
-- StartApp boilerplate

jessitron

module EffectsTest where

import Html exposing (..)
import Html.Events exposing (onClick)

import StartApp exposing (App)
import Task exposing (Task)
import Effects exposing (Effects, Never)

jessitron

module Failure where

import InnerComponent

--- ACTION
type InnerAction = InnerComponent.Action -- oops, meant type alias

type Action = Passthru InnerAction

-- MODEL

jessitron

module Box (Model, init, Action, update, view) where

import Html exposing (..)
import Html.Attributes exposing (style)
import Html.Events exposing (onClick)


-- MODEL
type alias Model = ()

jessitron

You're sitting there and
all the sudden something comes to you and everything stops
You look down at no point in particular
but then the music is thrumming in your ears and 
you see these colors come at the edge of your vision
red and yellow and blue, focusing in on them
If you can't stop it because you don't want to lose it
and you know that there's something there
Your vision blurs a bit and it becomes
this blackness in front of you

jessitron

== Summum Bonum, by Robert Browning ==
All the breath and the bloom of the year
In the bag of one bee
All the wonder and wealth of the mine
In the heart of one gem
In the core of one pearl all the shade
And the shine of the sea
Breath and bloom, shade and shine, wonder, wealth,
And how far above them
Truth that's brighter than gem

jessitron

Letter to a Young Haskell Enthusiast, by Gershom Bazerman.

Condensed from: http://comonad.com/reader/2014/letter-to-a-young-haskell-enthusiast/

The following letter is about tendencies that come with the flush of excitement of learning any new thing. It is written specifically, because if we don't talk specifics, the generalities make no sense. It is a letter full of things I want to remember.

You’ve entered the world of strongly typed functional programming, and it is great. You want to share the great things you’ve learned, and you want to slay all the false statements in the world.

jessitron

# Letter to a Young Haskell Enthusiast, by Gershom Bazerman.
Condensed from: http://comonad.com/reader/2014/letter-to-a-young-haskell-enthusiast/

The following letter is about tendencies that come with the flush of excitement of learning any new thing. 
It is written specifically, because if we don't talk specifics, the generalities make no sense. 
It is a letter full of things I want to remember.

You’ve entered the world of strongly typed functional programming, and it is great. 
You want to share the great things you’ve learned, and you want to slay all the false statements in the world.

jessitron

(defn addCustomer [sale, cust] (assoc sale :customer cust))
(defn addItems [sale, items] (assoc sale :items items))
(defn complete [sale, num] (println "Sale" num ": selling" (:items sale) "to" (:customer sale)))

(def sale { :store "Downtown" })

(-> sale
  (addCustomer "Fred")
  (addItems ["carrot", "eggs"])
  (complete 100)