⍝ Select operator:

    1 0 0 0 + case - case × case ÷ 10       ⍝ +10
10
    0 1 0 0 + case - case × case ÷ 10       ⍝ -10
¯10
    0 0 1 0 + case - case × case ÷ 10       ⍝ ×10
1
    0 0 0 1 + case - case × case ÷ 10       ⍝ ÷10
0.1
    0 0 0 0 + case - case × case ÷ 10       ⍝  10 (no case selected).
10

⍝∇ case

Back to: code

Back to: Workspaces