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-02-01 16:33:20 -08:00
parent 5150844a7d
commit 4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Task/Display-a-linear-combination/Arturo/display-a-linear-combination.arturo
View file

@ -1,11 +1,12 @@
linearCombination: function [coeffs][
combo: new []
loop.with:'i coeffs 'x [
case [x]
when? [=0] []
when? [=1] -> 'combo ++ ~"e(|i+1|)"
when? [= neg 1] -> 'combo ++ ~"-e(|i+1|)"
else -> 'combo ++ ~"|x|*e(|i+1|)"
case x [
0 -> []
1 -> 'combo ++ ~"e(|i+1|)"
neg 1 -> 'combo ++ ~"-e(|i+1|)"
any -> 'combo ++ ~"|x|*e(|i+1|)"
]
]
join.with: " + " 'combo
replace 'combo {/\+ -/} "- "