VZ
Size: a a a
VZ
[
AU
[
к
do
x <- pure 42
when foo { x <- pure $ x + 1 }
when bar { x <- pure 7 }
when baz { x <- pure $ x * 10 }
print x
вангую 8 вариантовк
do
x <- pure 42
when foo { x <- pure $ x + 1 }
when bar { x <- pure 7 }
when baz { x <- pure $ x * 10 }
print x
вангую 8 вариантовк
do
x <- pure 42
when foo { x <- pure $ x + 1 }
when bar { x <- pure 7 }
when baz { x <- pure $ x * 10 }
print x
вангую 8 вариантовVZ
[
AU
AU
AU
YS
YS
YS
AU
G
[
G
:: [a] -> (a -> a -> a -> b) -> b
?