mirror of
https://github.com/HigherOrderCO/Bend.git
synced 2024-09-11 11:56:54 +03:00
17 lines
140 B
Plaintext
17 lines
140 B
Plaintext
if 0 t f = f
|
|
if 1 t f = t
|
|
|
|
if2 n t f = switch n {
|
|
0: f
|
|
_: t
|
|
_: f
|
|
}
|
|
|
|
if3 n t f = switch n {
|
|
0: f
|
|
_: t
|
|
1: t
|
|
}
|
|
|
|
main = (if2 1 2 3)
|