Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function Median($lat1, $long1, $lat2, $long2)
- {
- $Bx = cos(deg2rad($lat2)) * cos(deg2rad($long2-$long1));
- $By = cos(deg2rad($lat2)) * sin(deg2rad($long2-$long1));
- $lat3 = atan2(sin(deg2rad($lat1))+ sin(deg2rad($lat2)), sqrt( (cos(deg2rad($lat1))+$Bx)*(cos(deg2rad($lat1))+$Bx) + $By* $By) );
- $long3 = deg2rad($long1) + atan2($By, cos(deg2rad($lat1)) + $Bx);
- return $long3*(180/PI()) . "," . $lat3*(180/PI()) ;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement