FACT++  1.0
static void t_starpm ( int *  status)
static

Definition at line 8018 of file t_erfa_c.c.

References eraStarpm(), viv(), and vvd().

Referenced by main().

8033 {
8034  double ra1, dec1, pmr1, pmd1, px1, rv1;
8035  double ra2, dec2, pmr2, pmd2, px2, rv2;
8036  int j;
8037 
8038 
8039  ra1 = 0.01686756;
8040  dec1 = -1.093989828;
8041  pmr1 = -1.78323516e-5;
8042  pmd1 = 2.336024047e-6;
8043  px1 = 0.74723;
8044  rv1 = -21.6;
8045 
8046  j = eraStarpm(ra1, dec1, pmr1, pmd1, px1, rv1,
8047  2400000.5, 50083.0, 2400000.5, 53736.0,
8048  &ra2, &dec2, &pmr2, &pmd2, &px2, &rv2);
8049 
8050  vvd(ra2, 0.01668919069414242368, 1e-13,
8051  "eraStarpm", "ra", status);
8052  vvd(dec2, -1.093966454217127879, 1e-13,
8053  "eraStarpm", "dec", status);
8054  vvd(pmr2, -0.1783662682155932702e-4, 1e-17,
8055  "eraStarpm", "pmr", status);
8056  vvd(pmd2, 0.2338092915987603664e-5, 1e-17,
8057  "eraStarpm", "pmd", status);
8058  vvd(px2, 0.7473533835323493644, 1e-13,
8059  "eraStarpm", "px", status);
8060  vvd(rv2, -21.59905170476860786, 1e-11,
8061  "eraStarpm", "rv", status);
8062 
8063  viv(j, 0, "eraStarpm", "j", status);
8064 
8065 }
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
int eraStarpm(double ra1, double dec1, double pmr1, double pmd1, double px1, double rv1, double ep1a, double ep1b, double ep2a, double ep2b, double *ra2, double *dec2, double *pmr2, double *pmd2, double *px2, double *rv2)
Definition: starpm.c:3
static void viv(int ival, int ivalok, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:24

+ Here is the call graph for this function:

+ Here is the caller graph for this function: