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

Сравнить редакции

Не учитывать пробелы Редакция 7 → Редакция 8

/trunk/ModMETAR.pm
330,7 → 330,7
BKN => "переменная облачность",
FEW => "слабая облачность",
OVC => "сплошная облачность",
NSC => "незначительная облачность",
NSC => "нет существенной облачности",
NCD => "безоблачно",
);
 
1330,7 → 1330,7
$mph_gust = $mps_gust * 2.2369363;
}
} else {
warn "Mod::Geo::METAR Parser error: unknown windtype\n";
warn "Geo::ModMETAR Parser error: unknown windtype\n";
}
 
$self->{WIND_KTS} = $kts_speed;
1434,7 → 1434,17
$self->{VISIBILITY_RUS} = "$1 м непрямой видимости";
} else {
$self->{VISIBILITY} = $vis . " meters";
$self->{VISIBILITY_RUS} = $vis . " м";
if ($vis<1000) {
$self->{VISIBILITY_RUS} = $vis . " м";
} else {
$vis = $vis/1000;
if (abs($vis-int($vis))>=0.5) {
$vis = int($vis)+1;
} else {
$vis = int($vis);
}
$self->{VISIBILITY_RUS} = $vis . " км";
}
}
}