static void t_evp ( int *  status )

static

Definition at line 1178 of file palTest.c.

References palEpv(), palEvp(), and vvec().

Referenced by main().

                                 {
   double dvb[3],dpb[3],dvh[3],dph[3];
   double vbex[3] = { 1.6957348127008098514e-07,
                     -9.1093446116039685966e-08,
                     -3.9528532243991863036e-08 };
   double pbex[3] = {-0.49771075259730546136,
                     -0.80273812396332311359,
                     -0.34851593942866060383  };
   double vhex[3] = { 1.6964379181455713805e-07,
                     -9.1147224045727438391e-08,
                     -3.9553158272334222497e-08 };
   double phex[3] = { -0.50169124421419830639,
                      -0.80650980174901798492,
                      -0.34997162028527262212 };

   double vbex2[3] = {
     -0.0109187426811683,
     -0.0124652546173285,
     -0.0054047731809662
   };
   double pbex2[3] = {
     -0.7714104440491060,
     +0.5598412061824225,
     +0.2425996277722475
   };
   double vhex2[3] = {
     -0.0109189182414732,
     -0.0124718726844084,
     -0.0054075694180650
   };
   double phex2[3] = {
     -0.7757238809297653,
     +0.5598052241363390,
     +0.2426998466481708
   };

   palEvp( 2010.0, 2012.0, dvb, dpb, dvh, dph );

   vvec( 3, dvb, vbex, "palEvp", status );
   vvec( 3, dpb, pbex, "palEvp", status );
   vvec( 3, dvh, vhex, "palEvp", status );
   vvec( 3, dph, phex, "palEvp", status );

   palEpv ( 53411.52501161, dph, dvh, dpb, dvb );

   vvec( 3, dvb, vbex2, "palEpv", status );
   vvec( 3, dpb, pbex2, "palEpv", status );
   vvec( 3, dvh, vhex2, "palEpv", status );
   vvec( 3, dph, phex2, "palEpv", status );

}

Here is the call graph for this function:

Here is the caller graph for this function: