on 492ae2f help sign in
23 lines 434 B history raw
1# `:ifat`, `?&`, "wutpam" `{$ifat p/wing q/twig r/twig}`
3If atom-then-else.
5If-then-else statement that tests whether `p` is an atom, producing `q` if true and `r` if false.
7Examples:
9 ~zod/try=> ?@(~ 1 2)
10 ! mint-vain
11 ! exit
12 ~zod/try=> ?@(%ha 1 2)
13 1
14 ~zod/try=> ?@("" 1 2)
15 1
16 ~zod/try=> ?@("a" 1 2)
17 2
18 ~zod/try=> ?@([1 1] 1 2)
19 ! mint-vain
20 ! exit
21 ~zod/try=> ?@(`*`[1 1] 1 2)
22 2