Skip to main content
added 5 characters in body
Source Link
sinedcm
  • 420
  • 3
  • 5

In Q (27 characters)

In Q (18 characters)

f:{$[0=x;1;(*/)9h$1+til x]}

f:{(*/)9h$1+til x}

Computes in less than one millisecond

q)\t f 125.

0

q)\t f 125
0

In Q (27 characters)

f:{$[0=x;1;(*/)9h$1+til x]}

Computes in less than one millisecond

q)\t f 125

0

In Q (18 characters)

f:{(*/)9h$1+til x}

Computes in less than one millisecond.

q)\t f 125
0
Source Link
sinedcm
  • 420
  • 3
  • 5

In Q (27 characters)

f:{$[0=x;1;(*/)9h$1+til x]}

Computes in less than one millisecond

q)\t f 125

0