alias presentWeather1Present=zero;
alias presentWeather2Present=zero;
alias presentWeather3Present=zero;
if (is_in_list(g,"metar/present_weather.list")) {
    rename(g,presentWeather1);
    group g : dump; non_alpha na;
		alias presentWeather1Present=one;
		if (is_in_list(g,"metar/present_weather.list")) {
				rename(g,presentWeather2);
				group g : dump; non_alpha na;
				alias presentWeather2Present=one;
		}
		if (is_in_list(g,"metar/present_weather.list")) {
				rename(g,presentWeather3);
				group g : dump; non_alpha na;
				alias presentWeather3Present=one;
		}
}
if (substr(g,0,1) is "-" || substr(g,0,1) is "+" || substr(g,0,2) is "FZ" || g is "//" ) {
    rename(g,wrongPresentWeather);
    group g : dump; non_alpha na;
}
if (! presentWeather1Present && is_in_list(g,"metar/present_weather.list")) {
    rename(g,presentWeather1);
    group g : dump; non_alpha na;
		alias presentWeather1Present=one;
}
if (!presentWeather2Present && is_in_list(g,"metar/present_weather.list")) {
				rename(g,presentWeather2);
				group g : dump; non_alpha na;
				alias presentWeather2Present=one;
}
if (!presentWeather3Present && is_in_list(g,"metar/present_weather.list")) {
				rename(g,presentWeather3);
				group g : dump; non_alpha na;
				alias presentWeather3Present=one;
}

