⍝ 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 {+/⍵÷⍴⍵} 0.5+⍳1000 ⍝ compare codings of mean.
1
⍝∇ cf subs
Back to: code
Back to: Workspaces