aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2026-04-30 12:34:36 -04:00
parent 4bb20c9b71
commit cbaf4c4b64
12390 changed files with 318560 additions and 27248 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Task/Padovan-sequence/Uiua/padovan-sequence.uiua Normal file
View file

@ -0,0 +1,10 @@
R ← ⍥(˜⊂+◌⊸⊣₃) ⊙1_1_1 -3
F ← ⊂1⁅÷1.045356793252533⍥(⊸×1.324717957244746)⊙1-1
M ← map"ABC" {"B" "C" "AB"}
N ← ⇌∧(⊂⇌°□˜getM)⊙""
L ← ⍥(˜⊂⍜°□N⊸⊣)⊙{"A"}-1
&pR 20 # First 20 terms using recurrence relationship.
&p⨬("no match"|"match")≍⊃R F 64 # Show that formula matches up to 64 terms.
&p L 10 # First ten terms of the L-system.
&p⨬("no match"|"match")≍⊃(R|≡◇⧻L) 32 # Show that lengths match recurrence up to 32 terms.