Arithmetic/Complex: Difference between revisions
Perl 5: Various improvements. Perl 6: Added.
m (Fixed lang tags.) |
Underscore (talk | contribs) (Perl 5: Various improvements. Perl 6: Added.) |
||
Line 1,074:
=={{header|Perl}}==
The <code>Math::Complex</code> module
<lang perl>
my $b = 3.14159 + 1.25*i;▼
print "$_\n" foreach $a + $b, $a * $b, 1 / $a, -$a;</lang>
$a = 1 + 1*i;▼
▲$b = 3.14159 + 1.25*i;
=={{header|Perl 6}}==
{{works with|Rakudo|#22 "Thousand Oaks"}}
<lang perl6>my $a = 1 + 1i;
.say for $a + $b, $a * $b, 1 / $a, -$a;</lang>
=={{header|Pop11}}==
|