Palindromic Expression for Phi: Difference between revisions
Jump to navigation
Jump to search
(Created page with "Some find that APL expressions can have a poetic beauty. Phil Last submitted the following variable-free recursive dfn to compute the limit of a converging function, equiv...") |
m (Text replacement - "</source>" to "</syntaxhighlight>") |
||
| Line 1: | Line 1: | ||
Some find that APL expressions can have a poetic beauty. Phil Last submitted the following variable-free recursive [[dfn]] to compute the limit of a converging function, equivalent to the derived monadic operator <source lang=apl inline>⍣≡</ | Some find that APL expressions can have a poetic beauty. Phil Last submitted the following variable-free recursive [[dfn]] to compute the limit of a converging function, equivalent to the derived monadic operator <source lang=apl inline>⍣≡</syntaxhighlight>:<ref>Dyalog. [https://dfns.dyalog.com/n_limit.htm Function power limit (fixpoint)]. [[Dfns workspace]]. 2019-02-07.</ref> | ||
<source lang=apl> | <source lang=apl> | ||
limit←{ ⍝ Function power limit (fixpoint). | limit←{ ⍝ Function power limit (fixpoint). | ||
| Line 7: | Line 7: | ||
}⍺⍺ ⍵ ⍝ 'new' value. | }⍺⍺ ⍵ ⍝ 'new' value. | ||
} | } | ||
</ | </syntaxhighlight> | ||
[[John Scholes]] noted that it was close to being a [[wikipedia:palindrome|palindrome]], so he inlined it and he amended it with dummy code to make its invocation for finding the [[wikipedia:golden ratio|golden ratio]] even closer to palindromic: | [[John Scholes]] noted that it was close to being a [[wikipedia:palindrome|palindrome]], so he inlined it and he amended it with dummy code to make its invocation for finding the [[wikipedia:golden ratio|golden ratio]] even closer to palindromic: | ||
<source lang=apl> | <source lang=apl> | ||
1{1+÷⍵}{⍵ ⍺⍺{⍺≡⍵:⍵ ⋄ ⍵ ⍺⍺ ∇∇ ⍺⍺ ⍵ ⋄ ⍵:⍵≡⍺}⍺⍺ ⍵}{⍵÷+1}1 | 1{1+÷⍵}{⍵ ⍺⍺{⍺≡⍵:⍵ ⋄ ⍵ ⍺⍺ ∇∇ ⍺⍺ ⍵ ⋄ ⍵:⍵≡⍺}⍺⍺ ⍵}{⍵÷+1}1 | ||
1.618033989 | 1.618033989 | ||
</ | </syntaxhighlight> | ||
Scholes then published a minute-long video with musical accompaniment where he types the expression in a symmetric fashion, culminating with the execution.<ref>DFunctionista. [https://www.youtube.com/watch?v=X3bv4Iu1aEg Palindromic Expression for Phi in APL]. YouTube. 2009-02-13.</ref> | Scholes then published a minute-long video with musical accompaniment where he types the expression in a symmetric fashion, culminating with the execution.<ref>DFunctionista. [https://www.youtube.com/watch?v=X3bv4Iu1aEg Palindromic Expression for Phi in APL]. YouTube. 2009-02-13.</ref> | ||
== References == | == References == | ||
<references /> | <references /> | ||
[[Category:Examples]][[Category:Dyalog APL examples]] | [[Category:Examples]][[Category:Dyalog APL examples]] | ||
Revision as of 21:14, 10 September 2022
Some find that APL expressions can have a poetic beauty. Phil Last submitted the following variable-free recursive dfn to compute the limit of a converging function, equivalent to the derived monadic operator <source lang=apl inline>⍣≡</syntaxhighlight>:[1] <source lang=apl> limit←{ ⍝ Function power limit (fixpoint).
⍵ ⍺⍺{ ⍝ 'old' value:
⍺≡⍵:⍵ ⍝ old matches new: finished.
⍵ ∇ ⍺⍺ ⍵ ⍝ otherwise: try new value.
}⍺⍺ ⍵ ⍝ 'new' value.
} </syntaxhighlight> John Scholes noted that it was close to being a palindrome, so he inlined it and he amended it with dummy code to make its invocation for finding the golden ratio even closer to palindromic: <source lang=apl>
1{1+÷⍵}{⍵ ⍺⍺{⍺≡⍵:⍵ ⋄ ⍵ ⍺⍺ ∇∇ ⍺⍺ ⍵ ⋄ ⍵:⍵≡⍺}⍺⍺ ⍵}{⍵÷+1}1
1.618033989 </syntaxhighlight> Scholes then published a minute-long video with musical accompaniment where he types the expression in a symmetric fashion, culminating with the execution.[2]
References
- ↑ Dyalog. Function power limit (fixpoint). Dfns workspace. 2019-02-07.
- ↑ DFunctionista. Palindromic Expression for Phi in APL. YouTube. 2009-02-13.