11 lines
176 B
Text
11 lines
176 B
Text
|
( ( plus
|
||
|
|
= a b
|
||
|
|
. !arg:%?a ?b
|
||
|
|
& !b:
|
||
|
|
& '(.!arg+$a)
|
||
|
|
| !a+!b
|
||
|
|
)
|
||
|
|
& out$("1+2, not partial:" plus$(1 2))
|
||
|
|
& out$("1+2, partial:" (plus$1)$2)
|
||
|
|
);
|