2024-01-22 20:00:19 +03:00
|
|
|
---
|
|
|
|
source: tests/golden_tests.rs
|
2024-05-15 01:25:46 +03:00
|
|
|
input_file: tests/golden_tests/encode_pattern_match/flatten_era_pat.bend
|
2024-01-22 20:00:19 +03:00
|
|
|
---
|
2024-05-18 15:01:20 +03:00
|
|
|
Scott
|
|
|
|
(Fn1) = λa λ* let (*, d) = a; let (e, *) = d; e
|
|
|
|
|
|
|
|
(Fn2) = λa let (*, c) = a; let (*, e) = c; let (f, *) = e; f
|
|
|
|
|
2024-05-29 10:15:13 +03:00
|
|
|
(Fn3) = λa let (b, c) = a; (switch b { 0: λ* λe let * = e; 0; _: λg λ* λi let * = i; (+ g 1); } c)
|
2024-05-18 15:01:20 +03:00
|
|
|
|
|
|
|
(main) = (Fn2 ((1, 2), (3, (4, (5, 6)))) 0)
|
|
|
|
|
|
|
|
NumScott
|
2024-03-14 21:47:13 +03:00
|
|
|
(Fn1) = λa λ* let (*, d) = a; let (e, *) = d; e
|
2024-02-07 18:19:07 +03:00
|
|
|
|
2024-03-14 21:47:13 +03:00
|
|
|
(Fn2) = λa let (*, c) = a; let (*, e) = c; let (f, *) = e; f
|
2024-02-07 18:19:07 +03:00
|
|
|
|
2024-05-29 10:15:13 +03:00
|
|
|
(Fn3) = λa let (b, c) = a; (switch b { 0: λ* λe let * = e; 0; _: λg λ* λi let * = i; (+ g 1); } c)
|
2024-02-07 18:19:07 +03:00
|
|
|
|
2024-02-09 20:08:25 +03:00
|
|
|
(main) = (Fn2 ((1, 2), (3, (4, (5, 6)))) 0)
|