Advertisement
Guest User

Untitled

a guest
Sep 21st, 2017
65
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.43 KB | None | 0 0
  1. function Median($lat1, $long1, $lat2, $long2)
  2. {
  3. $Bx = cos(deg2rad($lat2)) * cos(deg2rad($long2-$long1));
  4. $By = cos(deg2rad($lat2)) * sin(deg2rad($long2-$long1));
  5. $lat3 = atan2(sin(deg2rad($lat1))+ sin(deg2rad($lat2)), sqrt( (cos(deg2rad($lat1))+$Bx)*(cos(deg2rad($lat1))+$Bx) + $By* $By) );
  6. $long3 = deg2rad($long1) + atan2($By, cos(deg2rad($lat1)) + $Bx);
  7.  
  8. return $long3*(180/PI()) . "," . $lat3*(180/PI()) ;
  9. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement