Execution¶
Conditional execution¶
Case structure¶
$[c0;t0;f]
$[c0;t0;c1;t1;f]
$[c0;t0;c1;t1;c2;t2;f]
$[c0;t0;c1;t1;c2;t2;c3;t3;f]
Et cetera.
In the first case, if c0 is nonzero, the result is t0; otherwise f.
In all cases, the result is the t corresponding to the first non-zero c.
If all the c are zero the result is f.
FIXME Example of dictionary as case structure. Also Case operator.
Choose x or y depending on flag g¶
q)x:"abcdef"
q)y:"xyz"
q)g:0
q)$[g;x;y]
"xyz"
q)g:1
q)$[g;x;y]
"abcdef"
Or.
q)(y;x)0
"xyz"
q)(y;x)1
"abcdef"
The first expression avoids forming the list (x;y).
Reverse on condition y¶
q)x:1 2 3 4 5
q)0 reverse/x
1 2 3 4 5
q)1 reverse/x
5 4 3 2 1
Or.
q)x:til 5
q)y:0
q)$[y;reverse x;x]
0 1 2 3 4
q)y:1
q)$[y;reverse x;x]
4 3 2 1 0
Conditional change of sign¶
q)x:5 -3 20 9 -10
q)y:1 0 1 0 1
q)@[x;where y;neg]
-5 -3 -20 9 10
q)
q)x*1 -1 y
-5 -3 -20 9 10
q)x*-1 xexp y
-5 -3 -20 9 10f
Efficient execution of f x where x has repeated values¶
q)x:1 2 3 2 3 2 1
q)show u:distinct x
1 2 3
q)u?x
0 1 2 1 2 1 0
q)f:{10*x}
q)f u
10 20 30
q)(f u)[0 1 2 1 2 1 0]
10 20 30 20 30 20 10
q)(f u)[(u:distinct x)?x]
10 20 30 20 30 20 10
q).Q.fu[f;x]
10 20 30 20 30 20 10
Error to stop execution¶
q)'`stop
'stop
[0] '`stop
^
Executing text¶
Execute rows of character matrix¶
q)x1:4
q)x2:9
q)show x:2 5#"y1:x1y2:x2"
"y1:x1"
"y2:x2"
q)parse each x
: `y1 `x1
: `y2 `x2
q)('[eval;parse])each x
4 9
q)(y1;y2)
4 9
Sum numbers in character matrix¶
q)show x:string til 5
,"0"
,"1"
,"2"
,"3"
,"4"
q)sum parse " " sv x
10