diff options
Diffstat (limited to 'dk_sdfe/dk_sdfe_DK_bornholm.pol')
| -rw-r--r-- | dk_sdfe/dk_sdfe_DK_bornholm.pol | 285 |
1 files changed, 285 insertions, 0 deletions
diff --git a/dk_sdfe/dk_sdfe_DK_bornholm.pol b/dk_sdfe/dk_sdfe_DK_bornholm.pol new file mode 100644 index 0000000..4ee916d --- /dev/null +++ b/dk_sdfe/dk_sdfe_DK_bornholm.pol @@ -0,0 +1,285 @@ +################################################################################ +# +# 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 +# +################################################################################ +<TC32_B> + +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 +# +################################################################################ + +<UTM32_ED50_B> +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 +# +################################################################################ +<GSB> + +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 |