daoas/fulddaekning/GeoPoint.java

package dk.daoas.fulddaekning;

public class GeoPoint {
        
        public double latitude;
        public double longitude;
        
        public GeoPoint() { //Default
        }
        
        public GeoPoint(double lat, double lng) { //Default
                latitude=lat;
                longitude=lng;
        }

        //Denne er alt for upræcis
        @Deprecated     
        public static double beregnAfstand_old(GeoPoint point1, GeoPoint point2) {              
                //(62.8*sqrt(3.1*(Power(a.Latitude-x.Latitude,2)+Power(a.Longitude-x.Longitude,2)))) as Afstand,
                
                
                double pwrLat = Math.pow(point1.latitude  - point2.latitude, 2);
                double pwrLng = Math.pow(point1.longitude - point2.longitude, 2);
                
                return 62.8 * Math.sqrt( 3.1 * (pwrLat + pwrLng) );             
        }       

        public static float beregnAfstand(GeoPoint p1, GeoPoint p2) {
                float[] result = new float[1];
                
                computeDistanceAndBearing(p1.latitude, p1.longitude, p2.latitude, p2.longitude, result);

                return (result[0] / 1000.0f);
        }
        
        
        //Latitude (horizonal), longitude(vertical) so
        // 1 degree latitude is ~ 111320 meters, since the distance between the horizonal lines is always the same 
        // 1 degree longitude is ~111320 meters at equator but gets shorter as we get closer to the poles.
        // so 1 degree longitude is 64.5 km at denmarks southern point (gedser=54.55,11.95)
        // and is 59.4km at northern point (skagen = 57.75,10.65)
        
        public static double kmToLatitude(double km) {
                return km / 111.320 ;
        }
        
        public static double kmToLongitude( double km) {//denne er kun ca
                return km / 62.0;
        }


        //Kopieret fra android.location.Location
    private static void computeDistanceAndBearing(double lat1, double lon1,
        double lat2, double lon2, float[] results) {
        // Based on http://www.ngs.noaa.gov/PUBS_LIB/inverse.pdf
        // using the "Inverse Formula" (section 4)

        int MAXITERS = 20;
        // Convert lat/long to radians
        lat1 *= Math.PI / 180.0;
        lat2 *= Math.PI / 180.0;
        lon1 *= Math.PI / 180.0;
        lon2 *= Math.PI / 180.0;

        double a = 6378137.0; // WGS84 major axis
        double b = 6356752.3142; // WGS84 semi-major axis
        double f = (a - b) / a;
        double aSqMinusBSqOverBSq = (a * a - b * b) / (b * b);

        double L = lon2 - lon1;
        double A = 0.0;
        double U1 = Math.atan((1.0 - f) * Math.tan(lat1));
        double U2 = Math.atan((1.0 - f) * Math.tan(lat2));

        double cosU1 = Math.cos(U1);
        double cosU2 = Math.cos(U2);
        double sinU1 = Math.sin(U1);
        double sinU2 = Math.sin(U2);
        double cosU1cosU2 = cosU1 * cosU2;
        double sinU1sinU2 = sinU1 * sinU2;

        double sigma = 0.0;
        double deltaSigma = 0.0;
        double cosSqAlpha = 0.0;
        double cos2SM = 0.0;
        double cosSigma = 0.0;
        double sinSigma = 0.0;
        double cosLambda = 0.0;
        double sinLambda = 0.0;

        double lambda = L; // initial guess
        for (int iter = 0; iter < MAXITERS; iter++) {
            double lambdaOrig = lambda;
            cosLambda = Math.cos(lambda);
            sinLambda = Math.sin(lambda);
            double t1 = cosU2 * sinLambda;
            double t2 = cosU1 * sinU2 - sinU1 * cosU2 * cosLambda;
            double sinSqSigma = t1 * t1 + t2 * t2; // (14)
            sinSigma = Math.sqrt(sinSqSigma);
            cosSigma = sinU1sinU2 + cosU1cosU2 * cosLambda; // (15)
            sigma = Math.atan2(sinSigma, cosSigma); // (16)
            double sinAlpha = (sinSigma == 0) ? 0.0 :
                cosU1cosU2 * sinLambda / sinSigma; // (17)
            cosSqAlpha = 1.0 - sinAlpha * sinAlpha;
            cos2SM = (cosSqAlpha == 0) ? 0.0 :
                cosSigma - 2.0 * sinU1sinU2 / cosSqAlpha; // (18)

            double uSquared = cosSqAlpha * aSqMinusBSqOverBSq; // defn
            A = 1 + (uSquared / 16384.0) * // (3)
                (4096.0 + uSquared *
                 (-768 + uSquared * (320.0 - 175.0 * uSquared)));
            double B = (uSquared / 1024.0) * // (4)
                (256.0 + uSquared *
                 (-128.0 + uSquared * (74.0 - 47.0 * uSquared)));
            double C = (f / 16.0) *
                cosSqAlpha *
                (4.0 + f * (4.0 - 3.0 * cosSqAlpha)); // (10)
            double cos2SMSq = cos2SM * cos2SM;
            deltaSigma = B * sinSigma * // (6)
                (cos2SM + (B / 4.0) *
                 (cosSigma * (-1.0 + 2.0 * cos2SMSq) -
                  (B / 6.0) * cos2SM *
                  (-3.0 + 4.0 * sinSigma * sinSigma) *
                  (-3.0 + 4.0 * cos2SMSq)));

            lambda = L +
                (1.0 - C) * f * sinAlpha *
                (sigma + C * sinSigma *
                 (cos2SM + C * cosSigma *
                  (-1.0 + 2.0 * cos2SM * cos2SM))); // (11)

            double delta = (lambda - lambdaOrig) / lambda;
            if (Math.abs(delta) < 1.0e-12) {
                break;
            }
        }

        float distance = (float) (b * A * (sigma - deltaSigma));
        results[0] = distance;
        if (results.length > 1) {
            float initialBearing = (float) Math.atan2(cosU2 * sinLambda,
                cosU1 * sinU2 - sinU1 * cosU2 * cosLambda);
            initialBearing *= 180.0 / Math.PI;
            results[1] = initialBearing;
            if (results.length > 2) {
                float finalBearing = (float) Math.atan2(cosU1 * sinLambda,
                    -sinU1 * cosU2 + cosU1 * sinU2 * cosLambda);
                finalBearing *= 180.0 / Math.PI;
                results[2] = finalBearing;
            }
        }
    }

    /**
     * Computes the approximate distance in meters between two
     * locations, and optionally the initial and final bearings of the
     * shortest path between them.  Distance and bearing are defined using the
     * WGS84 ellipsoid.
     *
     * <p> The computed distance is stored in results[0].  If results has length
     * 2 or greater, the initial bearing is stored in results[1]. If results has
     * length 3 or greater, the final bearing is stored in results[2].
     *
     * @param startLatitude the starting latitude
     * @param startLongitude the starting longitude
     * @param endLatitude the ending latitude
     * @param endLongitude the ending longitude
     * @param results an array of floats to hold the results
     *
     * @throws IllegalArgumentException if results is null or has length < 1
     */
    public static void distanceBetween(double startLatitude, double startLongitude,
        double endLatitude, double endLongitude, float[] results) {
        if (results == null || results.length < 1) {
            throw new IllegalArgumentException("results is null or has length < 1");
        }
        computeDistanceAndBearing(startLatitude, startLongitude,
            endLatitude, endLongitude, results);
    }

}
1	package dk.daoas.fulddaekning;
2
3	public class GeoPoint {
4
5	public double latitude;
6	public double longitude;
7
8	public GeoPoint() { //Default
9	}
10
11	public GeoPoint(double lat, double lng) { //Default
12	latitude=lat;
13	longitude=lng;
14	}
15
16	//Denne er alt for upræcis
17	@Deprecated
18	public static double beregnAfstand_old(GeoPoint point1, GeoPoint point2) {
19	//(62.8sqrt(3.1(Power(a.Latitude-x.Latitude,2)+Power(a.Longitude-x.Longitude,2)))) as Afstand,
20
21
22	double pwrLat = Math.pow(point1.latitude - point2.latitude, 2);
23	double pwrLng = Math.pow(point1.longitude - point2.longitude, 2);
24
25	return 62.8 * Math.sqrt( 3.1 * (pwrLat + pwrLng) );
26	}
27
28	public static float beregnAfstand(GeoPoint p1, GeoPoint p2) {
29	float[] result = new float[1];
30
31	computeDistanceAndBearing(p1.latitude, p1.longitude, p2.latitude, p2.longitude, result);
32
33	return (result[0] / 1000.0f);
34	}
35
36
37	//Latitude (horizonal), longitude(vertical) so
38	// 1 degree latitude is ~ 111320 meters, since the distance between the horizonal lines is always the same
39	// 1 degree longitude is ~111320 meters at equator but gets shorter as we get closer to the poles.
40	// so 1 degree longitude is 64.5 km at denmarks southern point (gedser=54.55,11.95)
41	// and is 59.4km at northern point (skagen = 57.75,10.65)
42
43	public static double kmToLatitude(double km) {
44	return km / 111.320 ;
45	}
46
47	public static double kmToLongitude( double km) {//denne er kun ca
48	return km / 62.0;
49	}
50
51
52
53	//Kopieret fra android.location.Location
54	private static void computeDistanceAndBearing(double lat1, double lon1,
55	double lat2, double lon2, float[] results) {
56	// Based on http://www.ngs.noaa.gov/PUBS_LIB/inverse.pdf
57	// using the "Inverse Formula" (section 4)
58
59	int MAXITERS = 20;
60	// Convert lat/long to radians
61	lat1 *= Math.PI / 180.0;
62	lat2 *= Math.PI / 180.0;
63	lon1 *= Math.PI / 180.0;
64	lon2 *= Math.PI / 180.0;
65
66	double a = 6378137.0; // WGS84 major axis
67	double b = 6356752.3142; // WGS84 semi-major axis
68	double f = (a - b) / a;
69	double aSqMinusBSqOverBSq = (a * a - b * b) / (b * b);
70
71	double L = lon2 - lon1;
72	double A = 0.0;
73	double U1 = Math.atan((1.0 - f) * Math.tan(lat1));
74	double U2 = Math.atan((1.0 - f) * Math.tan(lat2));
75
76	double cosU1 = Math.cos(U1);
77	double cosU2 = Math.cos(U2);
78	double sinU1 = Math.sin(U1);
79	double sinU2 = Math.sin(U2);
80	double cosU1cosU2 = cosU1 * cosU2;
81	double sinU1sinU2 = sinU1 * sinU2;
82
83	double sigma = 0.0;
84	double deltaSigma = 0.0;
85	double cosSqAlpha = 0.0;
86	double cos2SM = 0.0;
87	double cosSigma = 0.0;
88	double sinSigma = 0.0;
89	double cosLambda = 0.0;
90	double sinLambda = 0.0;
91
92	double lambda = L; // initial guess
93	for (int iter = 0; iter < MAXITERS; iter++) {
94	double lambdaOrig = lambda;
95	cosLambda = Math.cos(lambda);
96	sinLambda = Math.sin(lambda);
97	double t1 = cosU2 * sinLambda;
98	double t2 = cosU1 * sinU2 - sinU1 * cosU2 * cosLambda;
99	double sinSqSigma = t1 * t1 + t2 * t2; // (14)
100	sinSigma = Math.sqrt(sinSqSigma);
101	cosSigma = sinU1sinU2 + cosU1cosU2 * cosLambda; // (15)
102	sigma = Math.atan2(sinSigma, cosSigma); // (16)
103	double sinAlpha = (sinSigma == 0) ? 0.0 :
104	cosU1cosU2 * sinLambda / sinSigma; // (17)
105	cosSqAlpha = 1.0 - sinAlpha * sinAlpha;
106	cos2SM = (cosSqAlpha == 0) ? 0.0 :
107	cosSigma - 2.0 * sinU1sinU2 / cosSqAlpha; // (18)
108
109	double uSquared = cosSqAlpha * aSqMinusBSqOverBSq; // defn
110	A = 1 + (uSquared / 16384.0) * // (3)
111	(4096.0 + uSquared *
112	(-768 + uSquared * (320.0 - 175.0 * uSquared)));
113	double B = (uSquared / 1024.0) * // (4)
114	(256.0 + uSquared *
115	(-128.0 + uSquared * (74.0 - 47.0 * uSquared)));
116	double C = (f / 16.0) *
117	cosSqAlpha *
118	(4.0 + f * (4.0 - 3.0 * cosSqAlpha)); // (10)
119	double cos2SMSq = cos2SM * cos2SM;
120	deltaSigma = B * sinSigma * // (6)
121	(cos2SM + (B / 4.0) *
122	(cosSigma * (-1.0 + 2.0 * cos2SMSq) -
123	(B / 6.0) * cos2SM *
124	(-3.0 + 4.0 * sinSigma * sinSigma) *
125	(-3.0 + 4.0 * cos2SMSq)));
126
127	lambda = L +
128	(1.0 - C) * f * sinAlpha *
129	(sigma + C * sinSigma *
130	(cos2SM + C * cosSigma *
131	(-1.0 + 2.0 * cos2SM * cos2SM))); // (11)
132
133	double delta = (lambda - lambdaOrig) / lambda;
134	if (Math.abs(delta) < 1.0e-12) {
135	break;
136	}
137	}
138
139	float distance = (float) (b * A * (sigma - deltaSigma));
140	results[0] = distance;
141	if (results.length > 1) {
142	float initialBearing = (float) Math.atan2(cosU2 * sinLambda,
143	cosU1 * sinU2 - sinU1 * cosU2 * cosLambda);
144	initialBearing *= 180.0 / Math.PI;
145	results[1] = initialBearing;
146	if (results.length > 2) {
147	float finalBearing = (float) Math.atan2(cosU1 * sinLambda,
148	-sinU1 * cosU2 + cosU1 * sinU2 * cosLambda);
149	finalBearing *= 180.0 / Math.PI;
150	results[2] = finalBearing;
151	}
152	}
153	}
154
155	/**
156	* Computes the approximate distance in meters between two
157	* locations, and optionally the initial and final bearings of the
158	* shortest path between them. Distance and bearing are defined using the
159	* WGS84 ellipsoid.
160	*
161	* <p> The computed distance is stored in results[0]. If results has length
162	* 2 or greater, the initial bearing is stored in results[1]. If results has
163	* length 3 or greater, the final bearing is stored in results[2].
164	*
165	* @param startLatitude the starting latitude
166	* @param startLongitude the starting longitude
167	* @param endLatitude the ending latitude
168	* @param endLongitude the ending longitude
169	* @param results an array of floats to hold the results
170	*
171	* @throws IllegalArgumentException if results is null or has length < 1
172	*/
173	public static void distanceBetween(double startLatitude, double startLongitude,
174	double endLatitude, double endLongitude, float[] results) {
175	if (results == null \|\| results.length < 1) {
176	throw new IllegalArgumentException("results is null or has length < 1");
177	}
178	computeDistanceAndBearing(startLatitude, startLongitude,
179	endLatitude, endLongitude, results);
180	}
181
182	}