4,494
edits
m (Link to definition of "shy") |
m (Text replacement - "</source>" to "</syntaxhighlight>") |
||
Line 14: | Line 14: | ||
4 | 4 | ||
3 {⍵*÷⍺} 27 ⍝ ⍺th root | 3 {⍵*÷⍺} 27 ⍝ ⍺th root | ||
3</ | 3</syntaxhighlight> | ||
=== Default left arguments === | === Default left arguments === | ||
Assignment to <source lang=apl inline>⍺</ | Assignment to <source lang=apl inline>⍺</syntaxhighlight> is unusual in that the entire statement is only executed if the dfn is called monadically:<ref>[https://help.dyalog.com/latest/#Language/Defined%20Functions%20and%20Operators/DynamicFunctions/Default%20Left%20Argument.htm Default Left Argument] – Dyalog APL.</ref> | ||
<source lang=apl> | <source lang=apl> | ||
root←{ | root←{ | ||
⍺←2 ⍝ square root by default | ⍺←2 ⍝ square root by default | ||
⍵*÷⍺ ⍝ result | ⍵*÷⍺ ⍝ result | ||
}</ | }</syntaxhighlight> | ||
=== Guards === | === Guards === | ||
Guards provide dfns with support for basic flow control.<ref>[https://help.dyalog.com/latest/#Language/Defined%20Functions%20and%20Operators/DynamicFunctions/Guards.htm Guards] – Dyalog APL.</ref> This is a multiline dfn with a conditional result: | Guards provide dfns with support for basic flow control.<ref>[https://help.dyalog.com/latest/#Language/Defined%20Functions%20and%20Operators/DynamicFunctions/Guards.htm Guards] – Dyalog APL.</ref> This is a multiline dfn with a conditional result: | ||
Line 28: | Line 28: | ||
⍺=0:0 ⍝ return zero if zeroth root | ⍺=0:0 ⍝ return zero if zeroth root | ||
⍵*÷⍺ ⍝ result | ⍵*÷⍺ ⍝ result | ||
}</ | }</syntaxhighlight> | ||
=== Error-guards === | === Error-guards === | ||
Line 49: | Line 49: | ||
Gravity 1.99e30 5.97e24 0 ⍝ trigger division by zero | Gravity 1.99e30 5.97e24 0 ⍝ trigger division by zero | ||
N/A | N/A | ||
</ | </syntaxhighlight> | ||
=== Shy results === | === Shy results === | ||
[[Roger Hui]]'s <source lang=apl inline>assert</ | [[Roger Hui]]'s <source lang=apl inline>assert</syntaxhighlight> is a dfn that has become the de facto standard when it comes to test suites.<ref>Stefan Kruger. [https://www.dyalog.com/blog/2021/04/2020-problem-solving-competition-phase-ii-highlights/ 2020 Problem Solving Competition – Phase II highlights]. [[Dyalog Ltd.|Dyalog]] blog. April 30, 2021.</ref>. In it, Hui uses both a [[default left argument]] and a final assignment to make the dfn [[shy]]: | ||
<source lang=apl> | <source lang=apl> | ||
assert ← {⍺←'assertion failure' ⋄ 0∊⍵:⍺ ⎕signal 8 ⋄ shy←0}</ | assert ← {⍺←'assertion failure' ⋄ 0∊⍵:⍺ ⎕signal 8 ⋄ shy←0}</syntaxhighlight> | ||
== External links == | == External links == |