⍝ Ratio of operand timings:


⍝ To reduce the time taken to run this test, cf is modified so that
⍝ it finishes after the expressions have run for just 50 milliseconds.

    ⎕fx'1000' '50'∘subs¨⎕nr'cf'         ⍝ reduce no of iterations.

    1>{(+/⍵)÷⍴⍵} cf {+/⍵÷⍴⍵}  ⍳1000     ⍝ compare codings of mean.
1

Back to: code

Back to: Workspaces