examples/TypeDecl.ps · rowtype-yoga/purescript-native

git.iko.soy/rowtype-yoga/purescript-native

on dd540b4 help sign in

14 lines 295 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 -> {

9 var result = a;

10 for (var i = 0; i < n; i = i + 1) {

11 result = f(result);

12 }

13 return result;

14 }