################################################################################ # # S 4 5 B -> T C 3 2 # ################################################################################ # # Forward: # in: S45B_S45B, out: TC32_TD32 # # Inverse: # in: TC32_TC32, out: S45B_S45B # # Valid area: Bornholm and surroundings # ################################################################################ proj=horner urange=103000 vrange=119000 ellps=intl fwd_origin=47022.563745,51779.260103 inv_origin=878354.943082,6125305.175366 # tol=0.040 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 # ################################################################################ # # Forward: # in: TC32_TC32, out: UTM32_ED50_B (ED50 as realised on Bornholm) # Inverse: # reverse. # # Valid area: Bornholm and surroundings # ################################################################################ proj=horner range=119000 ellps=intl 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 = 0..3 -4.1357045890e-05,4.2106213519e-11,2.8525551629e-14, -1.9107771273e-18, # Poly EAST :: n-degree = 2 : e-degree = 0..2 3.3615590093e-10,2.4380247154e-14,-2.0241230315e-18, # Poly EAST :: n-degree = 3 : e-degree = 0..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 ################################################################################ # # G S B -> U T M 3 3 # ################################################################################ # # Forward: # in: GSB_GS_B, out: UTM33_ED50_B # # Inverse: # in: UTM33_ED50_B, out: GSB_GS_B # ################################################################################ proj=horner ellps=gs urange=31000 vrange=214000 range=300000 #u: 31000 -73000, 31000 -31000 #v: 34000 -23000, 44000 -19500 fwd_origin=493000.00,6107000.00 inv_origin=21000.00,18000.00 # tol=0.040 uneg=true # i.e. u = !(uneg) (u - origin) : (origin - u) deg=4 # static double Cu33gsb[] = utm33_ed50 -> gsb fwd_c= 17606.901573,21150.097571, 1.000528635e+00,9.507307614e-04, -1.828526053e-09,3.828207311e-11, 2.481016058e-15,1.683466885e-14, 1.795149378e-19,-9.161067528e-19 # static double Cgsbu33[] = gsb -> utm33_ed50 inv_c= 6107392.748060,493150.391692, 9.994721570e-01,9.503132652e-04, 1.815515582e-09,6.128234254e-11, -2.261322580e-15,1.524694510e-14, -1.745394113e-19,-9.146885316e-19