Select Code to Download

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

    my $sradius = 0.2666;