1792 double rb[3][3], rp[3][3], rbp[3][3];
1795 eraBp00(2400000.5, 50123.9999, rb, rp, rbp);
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);
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);
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);
static void vvd(double val, double valok, double dval, const char *func, const char *test, int *status)
void eraBp00(double date1, double date2, double rb[3][3], double rp[3][3], double rbp[3][3])