/* This program shows how the complex routines can be used. */

#include "defs.h"

int main()
{
  Complex  z, w = {1.0, 2.0};               /* w = 1 + 2 i               */

  z = Double2Complex(2.0, 4.0);             /* z = 2 + 4 i               */
  PrintC(Add(z, w));                        /* z + w, i.e. 3 + 6 i       */

  z = Muls(3.0, Adds(-1.0, Divs(1.0, w)));  /* 3 * (-1 + 1 / (1 + 2 i))  */
  PrintC(z);

  PrintC(Div(w, Mul(z, Mul(z, z))));        /* w / z^3                   */

  return 0;
}