1port module Main exposing (..) 2 3import List 4import Maybe exposing (withDefault) 5import Json.Encode as Je 6 7 8type Thing 9 = One 10 | Two Int 11 12 13type Param a 14 = Cons a 15 | Other a 16 17 18type alias Num = 19 Int 20 21 22port outward : String -> Cmd a 23 24 25port inward : (b -> a) -> Sub a 26 27 28foo : Int -> Int 29foo a = 30 a + 1 31 32 33bar = 34 let 35 bas = 36 1 37 in 38 bas 39