Хранилища Subversion geo-modmetar

Редакция

Редакция 9 | Редакция 11 | К новейшей редакции | Весь файл | Не учитывать пробелы | Содержимое файла | Авторство | Последнее изменение | Открыть журнал | RSS

Редакция 9 Редакция 10
Строка 923... Строка 923...
923
923
924
            if ($2 ne "")
924
            if ($2 ne "")
925
            {
925
            {
926
                my $agl = int($2)*100;
926
                my $agl = int($2)*100;
927
                $engl .= " at $agl" . "ft";
927
                $engl .= " at $agl" . "ft";
928
                $rusl .= " на высоте " . $agl*0.3048 . " м";
928
                $rusl .= " на высоте " . int(($agl*0.3048)/100)*10 . " м";
929
            }
929
            }
930
930
931
            push(@{$self->{SKY}}, $engl);
931
            push(@{$self->{SKY}}, $engl);
932
            push(@{$self->{SKY_RUS}}, $rusl);
932
            push(@{$self->{SKY_RUS}}, $rusl);
933
            push(@{$self->{SKY_RAW}}, $rawl);
933
            push(@{$self->{SKY_RAW}}, $rawl);