mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-09-11 11:56:54 +03:00
6 lines
120 B
Plaintext
6 lines
120 B
Plaintext
type Pair = (Pair fst snd)
|
|
|
|
fst_fst (Pair/Pair (Pair/Pair fst) *) = fst
|
|
|
|
main = (fst_fst (Pair/Pair (Pair/Pair 1 2) 3))
|