| [ < ] | [ > ] | [ << ] | [ Up ] | [ >> ] | [Top] | [Contents] | [Index] | [ ? ] |
function Conjugate (z: Complex): Complex; |
`Conjugate' computes the complex conjugate of the complex number `z'
`Conjugate' is an ISO-10206 Extended Pascal extension.
program ConjugateDemo;
var
z: Complex;
begin
z := Cmplx (2, 3); { z is 2 + i * 3 }
WriteLn ('z = ', Re (z) : 0 : 5, ' + i * ', Im (z) : 0 : 5);
z := Conjugate (z); { z conjugate is 2 - i * 3 }
WriteLn ('z conjugate = ', Re (z) : 0 : 5,' + i * ', Im (z) : 0 : 5)
end.
|
section 9.45 Cmplx, section 9.217 Re, section 9.111 Im, section 9.1 Abs