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

Definition at line 4755 of file t_erfa_c.c.

References eraNum06a(), and vvd().

Referenced by main().

4770 {
4771  double rmatn[3][3];
4772 
4773  eraNum06a(2400000.5, 53736, rmatn);
4774 
4775  vvd(rmatn[0][0], 0.9999999999536227668, 1e-12,
4776  "eraNum06a", "11", status);
4777  vvd(rmatn[0][1], 0.8836241998111535233e-5, 1e-12,
4778  "eraNum06a", "12", status);
4779  vvd(rmatn[0][2], 0.3830834608415287707e-5, 1e-12,
4780  "eraNum06a", "13", status);
4781 
4782  vvd(rmatn[1][0], -0.8836086334870740138e-5, 1e-12,
4783  "eraNum06a", "21", status);
4784  vvd(rmatn[1][1], 0.9999999991354657474, 1e-12,
4785  "eraNum06a", "22", status);
4786  vvd(rmatn[1][2], -0.4063240188248455065e-4, 1e-12,
4787  "eraNum06a", "23", status);
4788 
4789  vvd(rmatn[2][0], -0.3831193642839398128e-5, 1e-12,
4790  "eraNum06a", "31", status);
4791  vvd(rmatn[2][1], 0.4063236803101479770e-4, 1e-12,
4792  "eraNum06a", "32", status);
4793  vvd(rmatn[2][2], 0.9999999991671663114, 1e-12,
4794  "eraNum06a", "33", status);
4795 
4796 }
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
void eraNum06a(double date1, double date2, double rmatn[3][3])
Definition: num06a.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: