Example #1
0
function pleac_Using_Complex_Numbers()
{
    // PHP offers no native support for complex numbers. However, a 'Math_Complex' class
    // is available for download from PEAR: [http://pear.php.net/package/Math_Complex].
    // Note the following 'include' directives are required:
    //
    //   include_once('Math/Complex.php');
    //   include_once('Math/TrigOp.php');
    //   include_once('Math/ComplexOp.php');
    $a = new Math_Complex(3, 5);
    $b = new Math_Complex(2, -2);
    $c = Math_ComplexOp::mult($a, $b);
    echo $c->toString() . "\n";
    // ----------------------------
    $d = new Math_Complex(3, 4);
    $r = Math_ComplexOp::sqrt($d);
    echo $r->toString() . "\n";
}
Example #2
0
 /**
  * Calculates the inverse cosine of a complex number: z = acos(c1)
  *
  * @param Math_Complex $c1
  * @return Math_Complex A valid Math_Complex number on success
  * @throws InvalidArgumentException
  */
 public static function acos(Math_Complex $c1)
 {
     if (!Math_ComplexOp::isComplex($c1)) {
         throw new InvalidArgumentException('argument is not a Math_Complex object');
     }
     $t = Math_ComplexOp::mult($c1, $c1);
     $v = Math_ComplexOp::sub(new Math_Complex(1, 0), $t);
     $t = Math_ComplexOp::sqrt($v);
     $v = new Math_Complex($c1->getReal() - $t->getIm(), $c1->getIm() + $t->getReal());
     $z = Math_ComplexOp::log($v);
     return new Math_Complex($z->getIm(), -1 * $z->getReal());
 }
 function testMult()
 {
     /*{{{*/
     $tmp = Math_ComplexOp::mult($this->cnum1, $this->cnum2);
     $this->assertEquals('1.0853981634 + 0.0287611019615i', $tmp->toString());
 }
if (!Math_ComplexOp::areEqual($a, $b)) {
    echo "a != b\n";
}
$z = Math_ComplexOp::add($a, $b);
echo "add(a, b) = " . $z->toString() . "\n";
$z = Math_ComplexOp::sub($a, $b);
echo "sub(a,b) = a - b = " . $z->toString() . "\n";
$t = Math_ComplexOp::sub($b, $a);
echo "b - a: " . $t->toString() . "\n";
$t = Math_ComplexOp::sub($b, Math_ComplexOp::conjugate($a));
echo "b - a': " . $t->toString() . "\n";
$v = Math_ComplexOp::conjugate($b);
$t = Math_ComplexOp::sub($v, $a);
echo "b' - a: " . $t->toString() . "\n";
$v = Math_ComplexOp::conjugate($b);
$t = Math_ComplexOp::sub($v, Math_ComplexOp::conjugate($a));
echo "b' - a': " . $t->toString() . "\n";
$z = Math_ComplexOp::mult($a, $b);
echo "mult(a, b) = " . $z->toString() . "\n";
$z = Math_ComplexOp::div($a, $b);
echo "div(a, b) = " . $z->toString() . "\n";
$z = Math_ComplexOp::pow($a, $b);
echo "pow(a, b) = " . $z->toString() . "\n";
$z = Math_ComplexOp::logBase($a, $b);
echo "logBase(a, b) = " . $z->toString() . "\n";
$z = Math_ComplexOp::multReal($a, M_PI);
echo "multReal(a, M_PI) = " . $z->toString() . "\n";
$z = Math_ComplexOp::multIm($a, $im);
echo "multIm(a, i) = " . $z->toString() . "\n";
$z = Math_ComplexOp::powReal($a, M_E);
echo "powReal(a, M_E) = " . $z->toString() . "\n";