################################################################################ # # Horner polynomial evaluation demo data # ################################################################################ # # These are the polynomial coefficients used for transforming to and from # the Danish legacy system s45b "System 45 Bornholm" # ################################################################################ proj=pipeline step init=./s45b.pol:s45b_tc32 # step init=./s45b.pol:tc32_utm32 step proj=utm inv ellps=intl zone=32 step proj=cart ellps=intl step proj=helmert ellps=GRS80 x=-81.0703 y=-89.3603 z=-115.7526 rx=-484.88 ry=-24.36 rz=-413.21 s=-0.540645 step proj=cart inv ellps=GRS80 step proj=utm ellps=GRS80 zone=32 ################################################################################ # # S 4 5 B -> T C 3 2 # ################################################################################ proj=horner ellps=intl range=500000 fwd_origin=47022.563745,51779.260103 inv_origin=878354.943082,6125305.175366 deg=6 # static double C_ttb[] # tc32_ed50 -> s45b # m_lim_gen: 0.153 red = 0 OBS = 1074 # m = 1.51 cm my_loss = +3 y_enp = +8.4 # m = 1.53 cm mx_loss = +4 x_enp = +8.4 # mht C_ttb er # fwd-inv ombyttet ifht original Poder/Engsager-kode # For at opnå at to fwd transform fører fra s45b->tc32->utm32 (->ETRS89) inv_v=\ # Poly NORTH :: e-degree = 0 : n-degree = 6 5.1779004699e+04,\ 9.9508320295e-01,\ -2.9453823207e-10,\ 1.9995084102e-14,\ -1.4895751366e-18,\ -9.9734812211e-23,\ 1.1194218845e-26,\ # Poly NORTH :: e-degree = 1 : n-degree = 5 -8.4285679515e-02,\ -7.9623049286e-09,\ -3.7190046062e-14,\ -2.3324127411e-18,\ -1.1150449763e-22,\ 2.8703154270e-27,\ # Poly NORTH :: e-degree = 2 : n-degree = 4 8.7160434140e-10,\ -3.3634602927e-14,\ -5.5718245313e-18,\ 6.2611750909e-23,\ -2.1011243838e-26,\ # Poly NORTH :: e-degree = 3 : n-degree = 3 1.0905463989e-14,\ -4.3960034360e-18,\ 3.6121595001e-22,\ -1.3493066011e-27,\ # Poly NORTH :: e-degree = 4 : n-degree = 2 -1.3360171462e-18,\ 1.0780850646e-22,\ 4.5118286607e-26,\ # Poly NORTH :: e-degree = 5 : n-degree = 1 -1.3718883973e-22,\ 1.6263920750e-26,\ # Poly NORTH :: e-degree = 6 : n-degree = 0 -5.1004217526e-27 # tcy 6125305.175366 inv_u=\ # Poly EAST :: n-degree = 0 : e-degree = 6 4.7022495967e+04,\ -9.9508282498e-01,\ 3.2436283039e-09,\ -2.6276394334e-15,\ 8.6318533291e-18,\ -3.8327518550e-23,\ -2.5704924282e-26,\ # Poly EAST :: n-degree = 1 : e-degree = 5 -8.4285975934e-02,\ 5.7098765263e-10,\ -6.0863955939e-14,\ 2.3608788740e-18,\ 6.8899581969e-24,\ -1.1429511179e-26,\ # Poly EAST :: n-degree = 2 : e-degree = 4 -4.6079778412e-09,\ 1.5072604543e-14,\ 5.4063862378e-18,\ 1.2591327827e-22,\ 7.9336388691e-27,\ # Poly EAST :: n-degree = 3 : e-degree = 3 -2.9479268638e-14,\ 1.7090049434e-18,\ 2.8413337985e-22,\ -3.3577391552e-27,\ # Poly EAST :: n-degree = 4 : e-degree = 2 3.0434879273e-18,\ -1.8081673510e-22,\ -2.3651419850e-26,\ # Poly EAST :: n-degree = 5 : e-degree = 1 9.2060044804e-23,\ 3.7807953325e-27,\ # Poly EAST :: n-degree = 6 : e-degree = 0 -4.9415665221e-27 # tcx 878354.943082 # static double C_btt[] # s45b -> tc32_ed50 # m_lim_gen: 0.154 red = 0 OBS = 1074 # m = 1.50 cm my_loss = +3 y_enp = +8.5 # m = 1.54 cm mx_loss = +4 x_enp = +8.3 fwd_v=\ # Poly NORTH :: e-degree = 0 : n-degree = 6 6.1253054245e+06,\ 9.9778251908e-01,\ -7.7346152025e-10,\ -2.5359789369e-14,\ 1.5614918228e-18,\ 9.8091134295e-23,\ -1.1092581145e-26,\ # Poly NORTH :: e-degree = 1 : n-degree = 5 -8.4514352088e-02,\ -7.9847579284e-09,\ -2.6865560962e-14,\ -2.0731372756e-18,\ -1.3660341123e-22,\ 1.1244836340e-26,\ # Poly NORTH :: e-degree = 2 : n-degree = 4 8.0551988135e-11,\ 3.6661500679e-14,\ 5.4247705403e-18,\ 8.4494604807e-23,\ 1.3334858516e-26,\ # Poly NORTH :: e-degree = 3 : n-degree = 3 8.3889821184e-15,\ -4.8124202237e-18,\ 2.9088188830e-22,\ -2.0129874264e-26,\ # Poly NORTH :: e-degree = 4 : n-degree = 2 2.4716463766e-18,\ -2.1717177513e-22,\ -3.2828537638e-26,\ # Poly NORTH :: e-degree = 5 : n-degree = 1 -1.2080655753e-22,\ 2.5050435391e-26,\ # Poly NORTH :: e-degree = 6 : n-degree = 0 1.1383483826e-27 # tcy 51779.260103, fwd_u=\ # Poly EAST :: n-degree = 0 : e-degree = 6 8.7835485387e+05,\ -9.9778289691e-01,\ 3.2537215213e-09,\ 6.9217640616e-15,\ 8.6268883840e-18,\ 4.6748156909e-23,\ -2.6492402009e-26,\ # Poly EAST :: n-degree = 1 : e-degree = 5 -8.4514648771e-02,\ 1.4399520180e-09,\ -6.0423329711e-14,\ 6.9816167332e-20,\ 6.7729233542e-23,\ -5.3308251880e-27,\ # Poly EAST :: n-degree = 2 : e-degree = 4 -4.5697800099e-09,\ -1.5194038814e-14,\ 5.1112653016e-18,\ -2.0307532869e-22,\ 1.0374125432e-26,\ # Poly EAST :: n-degree = 3 : e-degree = 3 -2.8983003841e-14,\ -1.6414425785e-18,\ 1.7874983379e-22,\ 1.5492164174e-26,\ # Poly EAST :: n-degree = 4 : e-degree = 2 2.7919197366e-18,\ 1.9218613279e-22,\ -2.1007264634e-26,\ # Poly EAST :: n-degree = 5 : e-degree = 1 1.0032412389e-22,\ -5.9007997846e-27,\ # Poly EAST :: n-degree = 6 : e-degree = 0 -4.4410970979e-27 # tcx 47022.563745 ################################################################################ # # T C 3 2 -> U T M 3 2 # ################################################################################ proj=horner ellps=intl range=500000 fwd_origin=877605.269066,6125810.306769 inv_origin=877605.760036,6125811.281773 # tc32_ed50 -> utm32_ed50 : Bornholm deg=4 # ttu_n and ttu_e are based on static double C_ttu_b[] # m_lim_gen: 0.086 red = 0 OBS = 852 # m = 1.38 cm my_loss = +2 y_enp = +10.5 # m = 1.44 cm mx_loss = +2 x_enp = +10.4 # static double ttu_n[] fwd_v=\ # Poly NORTH :: e-degree = 0 : n-degree = 0..4 6.1258112678e+06,\ 9.9999971567e-01,\ 1.5372750011e-10,\ 5.9300860915e-15,\ 2.2609497633e-19,\ # Poly NORTH :: e-degree = 1 : n-degree = 0..3 4.3188227445e-05,\ 2.8225130416e-10,\ 7.8740007114e-16,\ -1.7453997279e-19,\ # Poly NORTH :: e-degree = 2 : n-degree = 0..2 1.6877465415e-10,\ -1.1234649773e-14,\ -1.7042333358e-18,\ # Poly NORTH :: e-degree = 3 : n-degree = 0..1 -7.9303467953e-15,\ -5.2906832535e-19,\ # Poly NORTH :: e-degree = 4 : n-degree = 0 3.9984284847e-19 # tcy 6125810.306769 # static double ttu_e[] fwd_u=\ # Poly EAST :: n-degree = 0 : e-degree = 0..4 8.7760574982e+05,\ 9.9999752475e-01,\ 2.8817299305e-10,\ 5.5641310680e-15,\ -1.5544700949e-18,\ # Poly EAST :: n-degree = 1 : e-degree = 3 -4.1357045890e-05,\ 4.2106213519e-11,\ 2.8525551629e-14,\ -1.9107771273e-18,\ # Poly EAST :: n-degree = 2 : e-degree = 2 3.3615590093e-10,\ 2.4380247154e-14,\ -2.0241230315e-18,\ # Poly EAST :: n-degree = 3 : e-degree = 1 1.2429019719e-15,\ 5.3886155968e-19,\ # Poly EAST :: n-degree = 4 : e-degree = 0 -1.0167505000e-18 # tcx 877605.760036 # utt_n and utt_e are based on static double C_utt_b[] # utm32_ed50 -> tc32_ed50 : Bornholm # m_lim_gen: 0.086 red = 0 OBS = 852 # m = 1.38 cm my_loss = +2 y_enp = +10.8 # m = 1.44 cm mx_loss = +2 x_enp = +10.7 # static double utt_n[] inv_v=\ # Poly NORTH :: e-degree = 0 : n-degree = 4 6.1258103208e+06,\ 1.0000002826e+00,\ -1.5372762184e-10,\ -5.9304261011e-15,\ -2.2612705361e-19,\ # Poly NORTH :: e-degree = 1 : n-degree = 3 -4.3188331419e-05,\ -2.8225549995e-10,\ -7.8529116371e-16,\ 1.7476576773e-19,\ # Poly NORTH :: e-degree = 2 : n-degree = 2 -1.6875687989e-10,\ 1.1236475299e-14,\ 1.7042518057e-18,\ # Poly NORTH :: e-degree = 3 : n-degree = 1 7.9300735257e-15,\ 5.2881862699e-19,\ # Poly NORTH :: e-degree = 4 : n-degree = 0 -3.9990736798e-19 # tcy 6125811.281773 # static double utt_e[] inv_u=\ # Poly EAST :: n-degree = 0 : e-degree = 0..4 8.7760527928e+05,\ 1.0000024735e+00,\ -2.8817540032e-10,\ -5.5627059451e-15,\ 1.5543637570e-18,\ # Poly EAST :: n-degree = 1 : e-degree = 0..3 4.1357152105e-05,\ -4.2114813612e-11,\ -2.8523713454e-14,\ 1.9109017837e-18,\ # Poly EAST :: n-degree = 2 : e-degree = 0..2 -3.3616407783e-10,\ -2.4382678126e-14,\ 2.0245020199e-18,\ # Poly EAST :: n-degree = 3 : e-degree = 0..1 -1.2441377565e-15,\ -5.3885232238e-19,\ # Poly EAST :: n-degree = 4 : e-degree = 0 1.0167203661e-18 # tcx 877605.760036 <>