Arithmetic/Complex: Difference between revisions

</pre>

=={{header|Lang}}==

<syntaxhighlight lang="lang">

fp.cprint = ($z) -> fn.printf(%.3f%+.3fi%n, fn.creal($z), fn.cimag($z))

$a = fn.complex(1.5, 3)

$b = fn.complex(1.5, 1.5)

fn.print(a =\s)

fp.cprint($a)

fn.print(b =\s)

fp.cprint($b)

# Addition

fn.print(a + b =\s)

fp.cprint(fn.cadd($a, $b))

# Multiplication

fn.print(a * b =\s)

fp.cprint(fn.cmul($a, $b))

# Inversion

fn.print(1/a =\s)

fp.cprint(fn.cdiv(fn.complex(1, 0), $a))

# Negation

fn.print(-a =\s)

fp.cprint(fn.cinv($a))

# Conjugate

fn.print(conj(a) =\s)

fp.cprint(fn.conj($a))

</syntaxhighlight>

{{out}}

<pre>

a = 1.500+3.000i

b = 1.500+1.500i

a + b = 3.000+4.500i

a * b = -2.250+6.750i

1/a = 0.133-0.267i

-a = -1.500-3.000i

conj(a) = 1.500-3.000i