my $sradius = 0.2666 / $sRA; if ($upper_limb) { $altit -= $sradius; } #### my $sradius = 0.2666;