mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-08-15 14:50:42 +03:00
14 lines
404 B
Plaintext
14 lines
404 B
Plaintext
---
|
|
source: tests/golden_tests.rs
|
|
input_file: tests/golden_tests/simplify_matches/nested_0ary.bend
|
|
---
|
|
(Unpack) = λa λb (match b { list/Cons c d: λe (match d { list/Cons f g: λh λi (h (list/Cons i (list/Cons f g))); list/Nil: λj λk k; } e c); list/Nil: λl list/Nil; } a)
|
|
|
|
(list/Cons) = λa λb λc (c list/Cons/tag a b)
|
|
|
|
(list/Nil) = λa (a list/Nil/tag)
|
|
|
|
(list/Cons/tag) = 0
|
|
|
|
(list/Nil/tag) = 1
|