Anonymous user
Formal power series: Difference between revisions
m
→{{header|Perl 6}}: delete extra newlines
m (→{{header|Perl 6}}: Make coeffs a method in the base class.) |
m (→{{header|Perl 6}}: delete extra newlines) |
||
Line 1,096:
=={{header|Perl 6}}==
<lang perl6>class DerFPS { ... }
class IntFPS { ... }
Line 1,180 ⟶ 1,179:
say 'sin(x) ≈ ', $sin.pretty(10);
say 'cos(x) ≈ ', $cos.pretty(10);
say 'tan(x) ≈ ', $tan.pretty(10);</lang>
{{out}}
<pre>sin(x) ≈ 0 + 1/1∙x¹ - 1/6∙x³ + 1/120∙x⁵ - 1/5040∙x⁷ + 1/362880∙x⁹▼
▲sin(x) ≈ 0 + 1/1∙x¹ - 1/6∙x³ + 1/120∙x⁵ - 1/5040∙x⁷ + 1/362880∙x⁹
cos(x) ≈ 1 - 1/2∙x² + 1/24∙x⁴ - 1/720∙x⁶ + 1/40320∙x⁸ - 1/3628800∙x¹⁰
tan(x) ≈ 0/1 + 1/1∙x¹ + 1/3∙x³ + 2/15∙x⁵ + 17/315∙x⁷ + 62/2835∙x⁹</pre>
=={{header|PicoLisp}}==
|