函数用变量调用和用参数调用，输出的怎么不一样呀？

zhn158

1. sub distance {
   
2.         my ($lat1, $lon1, $lat2, $lon2) = @_;
   
3.         my $theta = deg2rad($lon1 - $lon2);
   
4.         my $beta  = deg2rad($lat2 - $lat1);
   
5.         my $dist = 2 * asin(sqrt((sin($beta/2))**2 + cos(deg2rad($lat1))*cos(deg2rad($lat2))*(sin($theta/2)**2))) * $earthRadius *1000;
   
6.         return ($dist);
   
7. }
   
8. $px = 119.1991594;
   
9. $py = 34.59840287;
   
10. $shtX = 119.19387;
    
11. $shtY = 34.60185;
    
12. 
    
13. 
    
14. print  distance($px, $py, $shtX,$shtY)," Miles\n";
    
15. print distance(34.59840287, 119.1991594, 34.60185, 119.19387) . " Miles\n";
    

复制代码

输出：

1. 617.851587548396 Miles
   
2. 618.190118611182 Miles
   

复制代码

误差还是蛮大的，应该不是精度的问题吧？
恳请哪位高手赐教！

zhn158

不好意思，参数顺序错了

yybmsrs

...