2023-12-12 16:28:09 +03:00
|
|
|
---
|
|
|
|
source: tests/golden_tests.rs
|
2024-05-15 01:25:46 +03:00
|
|
|
input_file: tests/golden_tests/encode_pattern_match/def_tups.bend
|
2023-12-12 16:28:09 +03:00
|
|
|
---
|
2024-05-18 15:01:20 +03:00
|
|
|
Scott
|
|
|
|
(go) = λa let (b, c) = a; let (d, e) = c; let (f, g) = e; let (h, i) = g; (+ (+ (+ (+ i h) f) d) b)
|
|
|
|
|
|
|
|
(main) = (go (1, (2, (3, (4, 5)))))
|
|
|
|
|
|
|
|
NumScott
|
2024-03-28 00:19:15 +03:00
|
|
|
(go) = λa let (b, c) = a; let (d, e) = c; let (f, g) = e; let (h, i) = g; (+ (+ (+ (+ i h) f) d) b)
|
2024-02-07 18:19:07 +03:00
|
|
|
|
2024-02-09 20:08:25 +03:00
|
|
|
(main) = (go (1, (2, (3, (4, 5)))))
|