4,505
edits
No edit summary |
|||
Line 18: | Line 18: | ||
⍵*÷⍺ ⍝ result | ⍵*÷⍺ ⍝ result | ||
} | } | ||
</source> | ⍝ Dfn with conditional result | ||
root←{ | |||
⍺←2 ⍝ square root by default | |||
⍺=0:0 ⍝ zero if zeroth root | |||
⍵*÷⍺ ⍝ result | |||
}</source> | |||
== External links == | == External links == |