1################################################################################ 2# 3# S 4 5 B -> T C 3 2 4# 5################################################################################ 6# 7# Forward: 8# in: S45B_S45B, out: TC32_TD32 9# 10# Inverse: 11# in: TC32_TC32, out: S45B_S45B 12# 13# Valid area: Bornholm and surroundings 14# 15################################################################################ 16<TC32_B> 17 18proj=horner 19urange=103000 20vrange=119000 21ellps=intl 22 23fwd_origin=47022.563745,51779.260103 24inv_origin=878354.943082,6125305.175366 25# tol=0.040 26deg=6 27 28# static double C_ttb[] 29# tc32_ed50 -> s45b 30# m_lim_gen: 0.153 red = 0 OBS = 1074 31# m = 1.51 cm my_loss = +3 y_enp = +8.4 32# m = 1.53 cm mx_loss = +4 x_enp = +8.4 33 34# mht C_ttb er 35# fwd-inv ombyttet ifht original Poder/Engsager-kode 36# For at opnå at to fwd transform fører fra s45b->tc32->utm32 (->ETRS89) 37 38inv_v= 39# Poly NORTH :: e-degree = 0 : n-degree = 6 40 5.1779004699e+04,9.9508320295e-01,-2.9453823207e-10, 41 1.9995084102e-14,-1.4895751366e-18,-9.9734812211e-23, 42 1.1194218845e-26, 43# Poly NORTH :: e-degree = 1 : n-degree = 5 44 -8.4285679515e-02,-7.9623049286e-09,-3.7190046062e-14, 45 -2.3324127411e-18,-1.1150449763e-22,2.8703154270e-27, 46# Poly NORTH :: e-degree = 2 : n-degree = 4 47 8.7160434140e-10,-3.3634602927e-14,-5.5718245313e-18, 48 6.2611750909e-23,-2.1011243838e-26, 49# Poly NORTH :: e-degree = 3 : n-degree = 3 50 1.0905463989e-14,-4.3960034360e-18,3.6121595001e-22, 51 -1.3493066011e-27, 52# Poly NORTH :: e-degree = 4 : n-degree = 2 53 -1.3360171462e-18,1.0780850646e-22,4.5118286607e-26, 54# Poly NORTH :: e-degree = 5 : n-degree = 1 55 -1.3718883973e-22,1.6263920750e-26, 56# Poly NORTH :: e-degree = 6 : n-degree = 0 57 -5.1004217526e-27 58# tcy 6125305.175366 59 60inv_u= 61# Poly EAST :: n-degree = 0 : e-degree = 6 62 4.7022495967e+04,-9.9508282498e-01,3.2436283039e-09, 63 -2.6276394334e-15,8.6318533291e-18,-3.8327518550e-23, 64 -2.5704924282e-26, 65# Poly EAST :: n-degree = 1 : e-degree = 5 66 -8.4285975934e-02,5.7098765263e-10,-6.0863955939e-14, 67 2.3608788740e-18,6.8899581969e-24,-1.1429511179e-26, 68# Poly EAST :: n-degree = 2 : e-degree = 4 69 -4.6079778412e-09,1.5072604543e-14,5.4063862378e-18, 70 1.2591327827e-22,7.9336388691e-27, 71# Poly EAST :: n-degree = 3 : e-degree = 3 72 -2.9479268638e-14,1.7090049434e-18,2.8413337985e-22, 73 -3.3577391552e-27, 74# Poly EAST :: n-degree = 4 : e-degree = 2 75 3.0434879273e-18,-1.8081673510e-22,-2.3651419850e-26, 76# Poly EAST :: n-degree = 5 : e-degree = 1 77 9.2060044804e-23,3.7807953325e-27, 78# Poly EAST :: n-degree = 6 : e-degree = 0 79 -4.9415665221e-27 80# tcx 878354.943082 81 82# static double C_btt[] 83# s45b -> tc32_ed50 84# m_lim_gen: 0.154 red = 0 OBS = 1074 85# m = 1.50 cm my_loss = +3 y_enp = +8.5 86# m = 1.54 cm mx_loss = +4 x_enp = +8.3 87 88fwd_v= 89# Poly NORTH :: e-degree = 0 : n-degree = 6 90 6.1253054245e+06,9.9778251908e-01,-7.7346152025e-10, 91 -2.5359789369e-14,1.5614918228e-18,9.8091134295e-23, 92 -1.1092581145e-26, 93# Poly NORTH :: e-degree = 1 : n-degree = 5 94 -8.4514352088e-02,-7.9847579284e-09,-2.6865560962e-14, 95 -2.0731372756e-18,-1.3660341123e-22,1.1244836340e-26, 96# Poly NORTH :: e-degree = 2 : n-degree = 4 97 8.0551988135e-11,3.6661500679e-14,5.4247705403e-18, 98 8.4494604807e-23,1.3334858516e-26, 99# Poly NORTH :: e-degree = 3 : n-degree = 3 100 8.3889821184e-15,-4.8124202237e-18,2.9088188830e-22, 101 -2.0129874264e-26, 102# Poly NORTH :: e-degree = 4 : n-degree = 2 103 2.4716463766e-18,-2.1717177513e-22,-3.2828537638e-26, 104# Poly NORTH :: e-degree = 5 : n-degree = 1 105 -1.2080655753e-22,2.5050435391e-26, 106# Poly NORTH :: e-degree = 6 : n-degree = 0 107 1.1383483826e-27 108# tcy 51779.260103, 109 110fwd_u= 111# Poly EAST :: n-degree = 0 : e-degree = 6 112 8.7835485387e+05,-9.9778289691e-01,3.2537215213e-09, 113 6.9217640616e-15,8.6268883840e-18,4.6748156909e-23, 114 -2.6492402009e-26, 115# Poly EAST :: n-degree = 1 : e-degree = 5 116 -8.4514648771e-02,1.4399520180e-09,-6.0423329711e-14, 117 6.9816167332e-20,6.7729233542e-23,-5.3308251880e-27, 118# Poly EAST :: n-degree = 2 : e-degree = 4 119 -4.5697800099e-09,-1.5194038814e-14,5.1112653016e-18, 120 -2.0307532869e-22,1.0374125432e-26, 121# Poly EAST :: n-degree = 3 : e-degree = 3 122 -2.8983003841e-14,-1.6414425785e-18,1.7874983379e-22, 123 1.5492164174e-26, 124# Poly EAST :: n-degree = 4 : e-degree = 2 125 2.7919197366e-18,1.9218613279e-22,-2.1007264634e-26, 126# Poly EAST :: n-degree = 5 : e-degree = 1 127 1.0032412389e-22,-5.9007997846e-27, 128# Poly EAST :: n-degree = 6 : e-degree = 0 129 -4.4410970979e-27 130# tcx 47022.563745 131 132 133################################################################################ 134# 135# T C 3 2 -> U T M 3 2 136# 137################################################################################ 138# 139# Forward: 140# in: TC32_TC32, out: UTM32_ED50_B (ED50 as realised on Bornholm) 141# Inverse: 142# reverse. 143# 144# Valid area: Bornholm and surroundings 145# 146################################################################################ 147 148<UTM32_ED50_B> 149proj=horner 150range=119000 151ellps=intl 152 153fwd_origin=877605.269066,6125810.306769 154inv_origin=877605.760036,6125811.281773 155 156 157# tc32_ed50 -> utm32_ed50 : Bornholm 158 159deg=4 160 161# ttu_n and ttu_e are based on static double C_ttu_b[] 162# m_lim_gen: 0.086 red = 0 OBS = 852 163# m = 1.38 cm my_loss = +2 y_enp = +10.5 164# m = 1.44 cm mx_loss = +2 x_enp = +10.4 165# static double ttu_n[] 166 167fwd_v= 168# Poly NORTH :: e-degree = 0 : n-degree = 0..4 169 6.1258112678e+06,9.9999971567e-01,1.5372750011e-10, 170 5.9300860915e-15,2.2609497633e-19, 171# Poly NORTH :: e-degree = 1 : n-degree = 0..3 172 4.3188227445e-05,2.8225130416e-10,7.8740007114e-16, 173 -1.7453997279e-19, 174# Poly NORTH :: e-degree = 2 : n-degree = 0..2 175 1.6877465415e-10,-1.1234649773e-14,-1.7042333358e-18, 176# Poly NORTH :: e-degree = 3 : n-degree = 0..1 177 -7.9303467953e-15,-5.2906832535e-19, 178# Poly NORTH :: e-degree = 4 : n-degree = 0 179 3.9984284847e-19 180# tcy 6125810.306769 181 182# static double ttu_e[] 183fwd_u= 184# Poly EAST :: n-degree = 0 : e-degree = 0..4 185 8.7760574982e+05,9.9999752475e-01,2.8817299305e-10, 186 5.5641310680e-15,-1.5544700949e-18, 187# Poly EAST :: n-degree = 1 : e-degree = 0..3 188 -4.1357045890e-05,4.2106213519e-11,2.8525551629e-14, 189 -1.9107771273e-18, 190# Poly EAST :: n-degree = 2 : e-degree = 0..2 191 3.3615590093e-10,2.4380247154e-14,-2.0241230315e-18, 192# Poly EAST :: n-degree = 3 : e-degree = 0..1 193 1.2429019719e-15,5.3886155968e-19, 194# Poly EAST :: n-degree = 4 : e-degree = 0 195 -1.0167505000e-18 196# tcx 877605.760036 197 198# utt_n and utt_e are based on static double C_utt_b[] 199# utm32_ed50 -> tc32_ed50 : Bornholm 200# m_lim_gen: 0.086 red = 0 OBS = 852 201# m = 1.38 cm my_loss = +2 y_enp = +10.8 202# m = 1.44 cm mx_loss = +2 x_enp = +10.7 203# static double utt_n[] 204 205inv_v= 206# Poly NORTH :: e-degree = 0 : n-degree = 4 207 6.1258103208e+06,1.0000002826e+00,-1.5372762184e-10, 208 -5.9304261011e-15,-2.2612705361e-19, 209# Poly NORTH :: e-degree = 1 : n-degree = 3 210 -4.3188331419e-05,-2.8225549995e-10,-7.8529116371e-16, 211 1.7476576773e-19, 212# Poly NORTH :: e-degree = 2 : n-degree = 2 213 -1.6875687989e-10,1.1236475299e-14,1.7042518057e-18, 214# Poly NORTH :: e-degree = 3 : n-degree = 1 215 7.9300735257e-15,5.2881862699e-19, 216# Poly NORTH :: e-degree = 4 : n-degree = 0 217 -3.9990736798e-19 218# tcy 6125811.281773 219 220# static double utt_e[] 221inv_u= 222# Poly EAST :: n-degree = 0 : e-degree = 0..4 223 8.7760527928e+05,1.0000024735e+00,-2.8817540032e-10, 224 -5.5627059451e-15,1.5543637570e-18, 225# Poly EAST :: n-degree = 1 : e-degree = 0..3 226 4.1357152105e-05,-4.2114813612e-11,-2.8523713454e-14, 227 1.9109017837e-18, 228# Poly EAST :: n-degree = 2 : e-degree = 0..2 229 -3.3616407783e-10,-2.4382678126e-14,2.0245020199e-18, 230# Poly EAST :: n-degree = 3 : e-degree = 0..1 231 -1.2441377565e-15,-5.3885232238e-19, 232# Poly EAST :: n-degree = 4 : e-degree = 0 233 1.0167203661e-18 234# tcx 877605.760036 235 236 237################################################################################ 238# 239# G S B -> U T M 3 3 240# 241################################################################################ 242# 243# Forward: 244# in: GSB_GS_B, out: UTM33_ED50_B 245# 246# Inverse: 247# in: UTM33_ED50_B, out: GSB_GS_B 248# 249################################################################################ 250<GSB> 251 252proj=horner 253ellps=gs 254urange=31000 255vrange=214000 256range=300000 257#u: 31000 -73000, 31000 -31000 258#v: 34000 -23000, 44000 -19500 259 260fwd_origin=493000.00,6107000.00 261inv_origin=21000.00,18000.00 262# tol=0.040 263 264uneg=true 265# i.e. u = !(uneg) (u - origin) : (origin - u) 266 267deg=4 268 269# static double Cu33gsb[] = utm33_ed50 -> gsb 270fwd_c= 271 272 17606.901573,21150.097571, 273 1.000528635e+00,9.507307614e-04, 274 -1.828526053e-09,3.828207311e-11, 275 2.481016058e-15,1.683466885e-14, 276 1.795149378e-19,-9.161067528e-19 277 278# static double Cgsbu33[] = gsb -> utm33_ed50 279inv_c= 280 281 6107392.748060,493150.391692, 282 9.994721570e-01,9.503132652e-04, 283 1.815515582e-09,6.128234254e-11, 284 -2.261322580e-15,1.524694510e-14, 285 -1.745394113e-19,-9.146885316e-19 286