avh4

module Main exposing (..)

import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (..)
import Html.App


main =
    Html.App.beginnerProgram

avh4

Moved to https://github.com/ElmLive/polyptych/tree/ElmLive-2016-08-07

avh4

Moved to https://github.com/ElmLive/lights-out/tree/ElmLive-2016-07-31

avh4

module LightButton exposing (view)

import Html
import Html.Attributes
import Html.Events


colorForBool : Bool -> String
colorForBool bool =
    if bool then

avh4

module Main exposing (..)

import Html.App
import WordThing


-- WIRING


main : Program Never

avh4

module Main exposing (..)

import Html.App
import Html exposing (..)
import Html.Attributes exposing (..)
import Html.Events exposing (onClick, onInput)
import String


type alias Model =

avh4

import Control.Monad.Except (ExceptT, runExceptT)
import Data.Functor.Identity (Identity)

start :: ExceptT String IO String
start =
    return "start"


next1 :: String -> String

avh4

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
	<key>Ansi 0 Color</key>
	<dict>
		<key>Alpha Component</key>
		<real>1</real>
		<key>Blue Component</key>
		<real>0.0</real>

avh4

module FakeSet (Set, member, empty, union, remove, insert) where


type alias Set a =
  List a


member : a -> Set a -> Bool
member expected set =
  List.any ((==) expected) set

avh4

• cmd-shift-\ to reveal the current open file in the tree view