static void t_pcd ( int *  status )

static

Definition at line 1455 of file palTest.c.

References palPcd(), palUnpcd(), and vvd().

Referenced by main().

                                 {
  double disco, x, y;
  disco = 178.585;
  x = 0.0123;
  y = -0.00987;

  palPcd ( disco, &x, &y );
  vvd ( x, 0.01284630845735895, 1e-14, "palPcd", "x", status );
  vvd ( y, -0.01030837922553926, 1e-14, "palPcd", "y", status );

  palUnpcd ( disco, &x, &y );
  vvd ( x, 0.0123, 1e-14, "palUnpcd", "x", status );
  vvd ( y, -0.00987, 1e-14, "palUnpcd", "y,", status );

  /* Now negative disco round trip */
  disco = -0.3333333;
  x = 0.0123;
  y = -0.00987;
  palPcd ( disco, &x, &y );
  palUnpcd ( disco, &x, &y );
  vvd ( x, 0.0123, 1e-14, "palUnpcd", "x", status );
  vvd ( y, -0.00987, 1e-14, "palUnpcd", "y,", status );
}

Here is the call graph for this function:

Here is the caller graph for this function: