git.iko.soy/rowtype-yoga/purescript-native
on 136cd21 help sign in
rowtype-yoga/purescript-native/examples/passing/TypeDecl.ps
12 lines 248 B history raw
1id :: forall a. (a) -> a
2id = \x -> x
4k :: String -> Number -> String
5k = \x -> \y -> x
7iterate :: forall a. Number -> (a -> a) -> a -> a
8iterate = \n -> \f -> \a -> do
9 var result = a
10 for i <- 0 until n:
11 result = f result
12 return result