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

Definition at line 1776 of file t_erfa_c.c.

References eraBp00(), and vvd().

Referenced by main().

1791 {
1792  double rb[3][3], rp[3][3], rbp[3][3];
1793 
1794 
1795  eraBp00(2400000.5, 50123.9999, rb, rp, rbp);
1796 
1797  vvd(rb[0][0], 0.9999999999999942498, 1e-12,
1798  "eraBp00", "rb11", status);
1799  vvd(rb[0][1], -0.7078279744199196626e-7, 1e-16,
1800  "eraBp00", "rb12", status);
1801  vvd(rb[0][2], 0.8056217146976134152e-7, 1e-16,
1802  "eraBp00", "rb13", status);
1803  vvd(rb[1][0], 0.7078279477857337206e-7, 1e-16,
1804  "eraBp00", "rb21", status);
1805  vvd(rb[1][1], 0.9999999999999969484, 1e-12,
1806  "eraBp00", "rb22", status);
1807  vvd(rb[1][2], 0.3306041454222136517e-7, 1e-16,
1808  "eraBp00", "rb23", status);
1809  vvd(rb[2][0], -0.8056217380986972157e-7, 1e-16,
1810  "eraBp00", "rb31", status);
1811  vvd(rb[2][1], -0.3306040883980552500e-7, 1e-16,
1812  "eraBp00", "rb32", status);
1813  vvd(rb[2][2], 0.9999999999999962084, 1e-12,
1814  "eraBp00", "rb33", status);
1815 
1816  vvd(rp[0][0], 0.9999995504864048241, 1e-12,
1817  "eraBp00", "rp11", status);
1818  vvd(rp[0][1], 0.8696113836207084411e-3, 1e-14,
1819  "eraBp00", "rp12", status);
1820  vvd(rp[0][2], 0.3778928813389333402e-3, 1e-14,
1821  "eraBp00", "rp13", status);
1822  vvd(rp[1][0], -0.8696113818227265968e-3, 1e-14,
1823  "eraBp00", "rp21", status);
1824  vvd(rp[1][1], 0.9999996218879365258, 1e-12,
1825  "eraBp00", "rp22", status);
1826  vvd(rp[1][2], -0.1690679263009242066e-6, 1e-14,
1827  "eraBp00", "rp23", status);
1828  vvd(rp[2][0], -0.3778928854764695214e-3, 1e-14,
1829  "eraBp00", "rp31", status);
1830  vvd(rp[2][1], -0.1595521004195286491e-6, 1e-14,
1831  "eraBp00", "rp32", status);
1832  vvd(rp[2][2], 0.9999999285984682756, 1e-12,
1833  "eraBp00", "rp33", status);
1834 
1835  vvd(rbp[0][0], 0.9999995505175087260, 1e-12,
1836  "eraBp00", "rbp11", status);
1837  vvd(rbp[0][1], 0.8695405883617884705e-3, 1e-14,
1838  "eraBp00", "rbp12", status);
1839  vvd(rbp[0][2], 0.3779734722239007105e-3, 1e-14,
1840  "eraBp00", "rbp13", status);
1841  vvd(rbp[1][0], -0.8695405990410863719e-3, 1e-14,
1842  "eraBp00", "rbp21", status);
1843  vvd(rbp[1][1], 0.9999996219494925900, 1e-12,
1844  "eraBp00", "rbp22", status);
1845  vvd(rbp[1][2], -0.1360775820404982209e-6, 1e-14,
1846  "eraBp00", "rbp23", status);
1847  vvd(rbp[2][0], -0.3779734476558184991e-3, 1e-14,
1848  "eraBp00", "rbp31", status);
1849  vvd(rbp[2][1], -0.1925857585832024058e-6, 1e-14,
1850  "eraBp00", "rbp32", status);
1851  vvd(rbp[2][2], 0.9999999285680153377, 1e-12,
1852  "eraBp00", "rbp33", status);
1853 }
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
Definition: t_erfa_c.c:58
void eraBp00(double date1, double date2, double rb[3][3], double rp[3][3], double rbp[3][3])
Definition: bp00.c:3

+ Here is the call graph for this function:

+ Here is the caller graph for this function: