blob: 21d25b22705b487e7c14083e49f4af251c980f20 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
main is not found
------------ desugared source code
value
= _lhs
value
(_rhs
let
a
= primFix
\(b :: _) -> _lhs
fun
\(c :: _) -> case'Bool
(\(_ :: _) -> _)
(_rhs (b (fromInt 0)))
(_rhs 'a')
(fromInt 0 == c)
in ())
------------ core code
value :: ()
value = _rhs ()
------------ tooltips
simplerec02.lc 1:1-1:6
()
simplerec02.lc 1:21-1:24
Char
simplerec02.lc 1:21-2:26
Bool -> Char
simplerec02.lc 2:21-2:24
_e
simplerec02.lc 2:25-2:26
_b
simplerec02.lc 3:12-3:14
()
|