justinmimbs

module Main exposing (..)

import Html exposing (Html)
import Html.Attributes
import Html.Events
import Json.Decode as Decode exposing (Decoder)


{-
   (Chrome only)

justinmimbs

module Main exposing (..)

import Html exposing (Html)
import Html.Events
import Html.Lazy


{-
   Click the text three times.

justinmimbs

Failure in the waiting

Null

I call it my billion-dollar mistake. It was the invention of the null reference in 1965.

—Tony Hoare

Exceptions

justinmimbs

import Html exposing (Html, div, h1, br, button, text)
import Html.App as App
import Html.Events exposing (onClick)
import Html.Attributes exposing (style)
import VirtualDom as Dom
import String


main =
  App.beginnerProgram

justinmimbs

import Data.List
import Data.Ratio
import Data.Maybe
import qualified Data.Map as Map

internalAngle :: Integer -> Rational
internalAngle sides = ((sides - 2) * 180) % sides

rotate1 :: [a] -> [a]
rotate1 list = last list : init list