Sudan function: Difference between revisions
Content added Content deleted
(Added Easylang) |
(added RPL) |
||
Line 1,796: | Line 1,796: | ||
|14||14||29||60||123||250||505||1016||2039||4086||8181||16372||32755||65522||131057||262128 |
|14||14||29||60||123||250||505||1016||2039||4086||8181||16372||32755||65522||131057||262128 |
||
|} |
|} |
||
=={{header|RPL}}== |
|||
{{works with|RPL|HP|48-R}} |
|||
« '''IF''' DUP2 2 GET AND '''THEN''' |
|||
DUP 2 GET 3 PICK ROT { 0 1 } - <span style="color:blue">SUDAN</span> |
|||
SWAP OVER + 2 →LIST SWAP 1 - SWAP <span style="color:blue">SUDAN</span> |
|||
'''ELSE''' ∑LIST SWAP DROP '''END''' |
|||
» '<span style="color:blue">SUDAN</span>' STO <span style="color:grey">''@ ( n { x y } ) → F<sub>n</sub>(x,y) )''</span> |
|||
{ { 0 { 0 0 } } { 1 { 1 1 } } { 1 { 3 3 } } { 2 { 1 1 } } { 2 { 2 1 } } { 3 { 1 1 } } } 1 « EVAL <span style="color:blue">SUDAN</span> » DOLIST |
|||
{{out}} |
|||
<pre> |
|||
1: { 0 3 35 8 27 10228 } |
|||
</pre> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |