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

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

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

/trunk/ModMETAR.pm
886,10 → 886,11
{
push(@{$self->{sky}},$tok);
push(@{$self->{SKY}}, "Sky Clear");
push(@{$self->{SKY_RUS}}, "Ясно");
push(@{$self->{SKY_RUS}}, "ясно");
push(@{$self->{SKY_RAW}},$tok);
push(@{$self->{weather}},$tok);
push(@{$self->{WEATHER}},"No significant weather");
push(@{$self->{WEATHER_RUS}},"без существенных изменений");
$self->{visibility} = '9999';
$parsestate = $expect_temperature;
next;
903,7 → 904,7
{
push(@{$self->{sky}},$tok);
push(@{$self->{SKY}}, "Sky Clear");
push(@{$self->{SKY_RUS}}, "Ясно");
push(@{$self->{SKY_RUS}}, "ясно");
push(@{$self->{SKY_RAW}},$tok);
print "[$tok] is a sky condition.\n" if $self->{debug};
$parsestate = $expect_clouds;
1439,8 → 1440,8
##
{
my $windspeed = $self->{WIND_MS}*3.6;
$self->{TEMP_WC} = 13.12 + 0.6215*$self->{TEMP_C} - 11.37*($windspeed**0.16) + 0.3965*$self->{TEMP_C}*($windspeed**0.16);
my $windspeed = $self->{WIND_MS}*3.6;
$self->{TEMP_WC} = 13.12 + 0.6215*$self->{TEMP_C} - 11.37*($windspeed**0.16) + 0.3965*$self->{TEMP_C}*($windspeed**0.16);
}
 
##
1894,7 → 1895,7
 
Test suite is small and incomplete. Needs work yet.
 
Older versions of this module were installed as "METAR" instaed of
Older versions of original module were installed as "METAR" instaed of
"Geo::METAR"
 
=head1 BUGS