git.iko.soy/rowtype-yoga/purescript-native
on 667eeef help sign in
rowtype-yoga/purescript-native/examples/TypeDecl.ps
17 lines 266 B history raw
1id :: (a) -> a
3id = \x -> x
5k :: (String) -> (Number) -> String
7k = \x -> \y -> x
9iterate :: (Number) -> ((a) -> a) -> (a) -> a
11iterate = \n -> \f -> \a -> {
12 var result = a;
13 for (var i = 0; i < n; i = i + 1) {
14 result = f(result);
15 }
16 return result;