public static LBCoord reversLambert(ellipsoid ellip, XYCoord _xyc, double _log1, double _log2, double _log0, double _lat0, ref string result) { Ellipsoid _ellip = new Ellipsoid(ellip); double e = _ellip.e1; result += "e:" + e.ToString() + " a:" + _ellip.a.ToString() + "\n"; result += "-------------------------------------\n"; double log1 = _log1 * Math.PI / 180.0; double log2 = _log2 * Math.PI / 180.0; double log0 = _log0 * Math.PI / 180.0; double lat0 = _lat0 * Math.PI / 180.0; double E = _xyc.X; double N = _xyc.Y; result += "l1:" + log1.ToString() + "\n"; result += "l2:" + log2.ToString() + "\n"; result += "log0:" + log0.ToString() + "\n"; result += "lat0:" + lat0.ToString() + "\n"; result += "E:" + E.ToString() + "\n"; result += "N:" + N.ToString() + "\n"; result += "-----------------------\n"; double m1 = Math.Cos(log1) / Math.Sqrt(1 - e * e * Math.Sin(log1) * Math.Sin(log1)); double m2 = Math.Cos(log2) / Math.Sqrt(1 - e * e * Math.Sin(log2) * Math.Sin(log2)); result += "m1:" + m1.ToString() + "\n"; result += "m1:" + m2.ToString() + "\n"; double t1 = Lam_gett(log1, e); double t2 = Lam_gett(log2, e); double tF = Lam_gett(log0, e); result += "t1:" + t1.ToString() + "\n"; result += "t2:" + t2.ToString() + "\n"; result += "tF:" + tF.ToString() + "\n"; double n = Math.Log(m1 / m2, Math.E) / Math.Log(t1 / t2, Math.E); double F = m1 / (n * Math.Pow(t1, n)); double rF = _ellip.a * (F * Math.Pow(tF, n)); result += "n:" + n.ToString() + "\n"; result += "F:" + F.ToString() + "\n"; result += "rF:" + rF.ToString() + "\n"; double EF = 0; double NF = 0.0; double tht = Math.Atan((E - EF) / (rF - (N - NF))); double r = Math.Sqrt((E - EF) * (E - EF) + (rF - (N - NF)) * (rF - (N - NF))); if (n < 0) { r = -r; } double t = Math.Pow(r / (_ellip.a * F), 1 / n); result += "tht:" + tht.ToString() + "\n"; result += "r:" + r.ToString() + "\n"; result += "t:" + t.ToString() + "\n"; double log = Math.PI / 2 - 2 * Math.Atan(t); double prelog = log + 1; while (log != prelog) { prelog = log; log = Math.PI / 2 - 2 * Math.Atan(t * Math.Pow((1 - e * Math.Sin(log)) / (1 + e * Math.Sin(log)), e / 2)); } double lat = tht / n + lat0; return(new LBCoord(lat / Math.PI * 180, log / Math.PI * 180)); }
public static LBCoord reVersAlbers(ellipsoid ellip, XYCoord _xyc, double _log1, double _log2, double _log0, double _lat0, ref string result) { Ellipsoid _ellip = new Ellipsoid(ellip); double e = _ellip.e1; result += "e:" + e.ToString() + " a:" + _ellip.a.ToString() + "\n"; result += "-------------------------------------\n"; double l1 = _log1 * Math.PI / 180.0; double l2 = _log2 * Math.PI / 180.0; double l0 = _log0 * Math.PI / 180.0; double lmt0 = _lat0 * Math.PI / 180.0; double E = _xyc.X; double N = _xyc.Y; result += "l1:" + l1.ToString() + "\n"; result += "l2:" + l2.ToString() + "\n"; result += "l0:" + l0.ToString() + "\n"; result += "lmt0:" + lmt0.ToString() + "\n"; result += "E:" + E.ToString() + "\n"; result += "N:" + N.ToString() + "\n"; result += "-----------------------\n"; double alpha1 = getalpha(_ellip, l1); double alpha2 = getalpha(_ellip, l2); double alpha0 = getalpha(_ellip, l0); double m1 = Math.Cos(l1) / Math.Sqrt(1 - e * e * Math.Sin(l1) * Math.Sin(l1)); double m2 = Math.Cos(l2) / Math.Sqrt(1 - e * e * Math.Sin(l2) * Math.Sin(l2)); result += "m1:" + m1.ToString() + "\nm2:" + m2.ToString() + "\n"; double n = (m1 * m1 - m2 * m2) / (alpha2 - alpha1); double c = (m1 * m1 * alpha2 - m2 * m2 * alpha1) / (alpha2 - alpha1); result += "n:" + n.ToString() + "\nc:" + c.ToString() + "\n"; double rol0 = (_ellip.a * Math.Sqrt(c - n * alpha0)) / n; double tht = Math.Atan(E / (rol0 - N)); double rol = Math.Sqrt(E * E + (rol0 - N) * (rol0 - N)); double alpha = (c - rol * rol * n * n / (_ellip.a * _ellip.a)) / n; //λO + (θ / n) ?' + (e2/3 + 31e4/180 + 517e6/5040) . sin 2?'] + [(23e4/360 + 251e6/3780) . sin 4?'] //+ [(761e6/45360) . sin 6?'] result += "rol0:" + rol0.ToString() + "\nrol:" + rol.ToString() + "\n"; double beta = Math.Asin(alpha / (1 - (1 - e * e) / (2 * e) * Math.Log((1 - e) / (1 + e), Math.E))); double lmt = (lmt0 + (tht / n)) / Math.PI * 180.0; double l = beta + (e * e / 3 + 31 * Math.Pow(e, 4) / 180 + 517 * Math.Pow(e, 6) / 5040) * Math.Sin(2 * beta) + (23 * Math.Pow(e, 4) / 360 + 251 * Math.Pow(e, 6) / 3780) * Math.Sin(4 * beta) + 761 * Math.Pow(e, 6) / 45360 * Math.Sin(6 * beta); return(new LBCoord(lmt, (l / Math.PI * 180.0))); }
public static XYCoord lambert(ellipsoid ellip, LBCoord _lbc, double _log1, double _log2, double _log0, double _lat0, ref string result) { Ellipsoid _ellip = new Ellipsoid(ellip); double e = _ellip.e1; //result+="ellipsoid.Clarke1866\n"; result += "e:" + e.ToString() + " a:" + _ellip.a.ToString() + "\n"; result += "-------------------------------------\n"; double log1 = _log1 * Math.PI / 180.0; double log2 = _log2 * Math.PI / 180.0; result += "log1:" + log1.ToString() + "\n"; result += "log1:" + log2.ToString() + "\n"; double log0 = _log0 * Math.PI / 180.0; double lat0 = _lat0 * Math.PI / 180.0; result += "log0:" + log0.ToString() + "\n"; result += "lat0:" + lat0.ToString() + "\n"; double log = _lbc.lon * Math.PI / 180.0; double lat = _lbc.lat * Math.PI / 180.0; result += "log:" + log.ToString() + "\n"; result += "lat:" + lat.ToString() + "\n"; //double jiao=Math.Asin(e*Math.Sin(l)); result += "-------------------------------------\n"; double m1 = Math.Cos(log1) / Math.Sqrt(1 - e * e * Math.Sin(log1) * Math.Sin(log1)); double m2 = Math.Cos(log2) / Math.Sqrt(1 - e * e * Math.Sin(log2) * Math.Sin(log2)); result += "m1:" + m1.ToString() + "\n"; result += "m1:" + m2.ToString() + "\n"; double t1 = Lam_gett(log1, e); double t2 = Lam_gett(log2, e); double tF = Lam_gett(log0, e); double t = Lam_gett(log, e); result += "t1:" + t1.ToString() + "\n"; result += "t2:" + t2.ToString() + "\n"; result += "tF:" + tF.ToString() + "\n"; result += "t:" + t.ToString() + "\n"; double n = Math.Log(m1 / m2, Math.E) / Math.Log(t1 / t2, Math.E); double F = m1 / (n * Math.Pow(t1, n)); double r = _ellip.a * F * Math.Pow(t, n); double rF = _ellip.a * (F * Math.Pow(tF, n)); double tht = n * (lat - lat0); result += "a:" + _ellip.a.ToString() + "\n"; result += "n:" + n.ToString() + "\n"; result += "F:" + F.ToString() + "\n"; result += "r:" + r.ToString() + "\n"; result += "rF:" + rF.ToString() + "\n"; result += "tht:" + tht.ToString() + "\n"; return(new XYCoord(r * Math.Sin(tht), rF - r * Math.Cos(tht))); }
public static XYCoord albers(ellipsoid ellip, LBCoord _lbc, double _log1, double _log2, double _log0, double _lat0, ref string result) { Ellipsoid _ellip = new Ellipsoid(ellip); double e = _ellip.e1; result += "e:" + e.ToString() + " a:" + _ellip.a.ToString() + "\n"; result += "-------------------------------------\n"; double l1 = _log1 * Math.PI / 180.0; double l2 = _log2 * Math.PI / 180.0; double l0 = _log0 * Math.PI / 180.0; double lmt0 = _lat0 * Math.PI / 180.0; double l = _lbc.lon * Math.PI / 180.0; double lmt = _lbc.lat * Math.PI / 180.0; result += "l1:" + l1.ToString() + "\n"; result += "l2:" + l2.ToString() + "\n"; result += "l0:" + l0.ToString() + "\n"; result += "lmt0:" + lmt0.ToString() + "\n"; result += "l:" + l.ToString() + "\n"; result += "lmt:" + lmt.ToString() + "\n"; result += "-----------------------\n"; double alpha0 = getalpha(_ellip, l0); double alpha1 = getalpha(_ellip, l1); double alpha2 = getalpha(_ellip, l2); double alpha = getalpha(_ellip, l); result += "alpha0:" + alpha0.ToString() + "\n"; result += "alpha1:" + alpha1.ToString() + "\n"; result += "alpha2:" + alpha2.ToString() + "\n"; result += "alpha:" + alpha.ToString() + "\n"; double m1 = Math.Cos(l1) / Math.Pow(1 - e * e * Math.Sin(l1) * Math.Sin(l1), 0.5); double m2 = Math.Cos(l2) / Math.Pow(1 - e * e * Math.Sin(l2) * Math.Sin(l2), 0.5); result += "m1:" + m1.ToString() + "\n"; result += "m2:" + m2.ToString() + "\n"; double n = (m1 * m1 - m2 * m2) / (alpha2 - alpha1); //double c=_ellip.a*_ellip.a*(m1*m1+n*alpha1); double c = (m1 * m1 * alpha2 - m2 * m2 * alpha1) / (alpha2 - alpha1); result += "n:" + n.ToString() + "\n"; result += "c:" + c.ToString() + "\n"; double tht = n * (lmt - lmt0); double rol = (_ellip.a * Math.Sqrt(c - n * alpha)) / n; double rol0 = (_ellip.a * Math.Sqrt(c - n * alpha0)) / n; result += "tht:" + tht.ToString() + "\n"; result += "rol:" + rol.ToString() + "\n"; result += "rol0:" + rol0.ToString() + "\n"; double E = rol * Math.Sin(tht); double N = rol0 - (rol * Math.Cos(tht)); XYCoord xyc; xyc.X = E; xyc.Y = N; return(xyc); }