private double mesafeHespla(Point from, Point to)
{
double rad = 6371; //Km cinsinden Dünyanın yarı çapı
double p1X = from.X / 180 * Math.PI;
double p1Y = from.Y / 180 * Math.PI;
double p2X = to.X / 180 * Math.PI;
double p2Y = to.Y / 180 * Math.PI;
return Math.Acos(Math.Sin(p1Y) * Math.Sin(p2Y) +
Math.Cos(p1Y) * Math.Cos(p2Y) * Math.Cos(p2X - p1X)) * rad;
}
16 Kasım 2011 Çarşamba
Kaydol:
Kayıt Yorumları (Atom)
0 yorum:
Yorum Gönder