diff options
Diffstat (limited to 'testsuite/tests/arityanal/f13.hs')
| -rw-r--r-- | testsuite/tests/arityanal/f13.hs | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/testsuite/tests/arityanal/f13.hs b/testsuite/tests/arityanal/f13.hs index 1b7a779c37..5ab7823b0d 100644 --- a/testsuite/tests/arityanal/f13.hs +++ b/testsuite/tests/arityanal/f13.hs @@ -1,8 +1,8 @@ -module F13 where
-
-f13 x y = let f13f = if (x>0) then \z -> z x y
- else \z -> y
- f13h = let v = f13f 5
- in \w -> w + v
- in \u -> f13h u
-
+module F13 where + +f13 x y = let f13f = if (x>0) then \z -> z x y + else \z -> y + f13h = let v = f13f 5 + in \w -> w + v + in \u -> f13h u + |