/usr/share/eccodes/definitions/metar/rvr2.def is in libeccodes-data 2.6.0-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 | if (substr(g,0,1) is "R" && ( substr(g,3,1) is "/" || substr(g,3,2) is "C/"
|| substr(g,3,2) is "L/" || substr(g,3,2) is "R/") ) {
rename(g,RVR2);
group g : dump; non_alpha na;
if (substr(RVR2,3,1) is "/") {
runwayDesignatorRVR2=to_string(RVR2,1,2);
if (substr(RVR2,4,1) is "P" || substr(RVR2,4,1) is "M") {
extremeValuesRVR2=to_string(RVR2,4,1);
RVR2_1=to_string(RVR2,5);
} else {
RVR2_1=to_string(RVR2,4);
}
} else {
runwayDesignatorRVR2=to_string(RVR2,1,3);
meanValueRVR2=to_string(RVR2,5,4);
if (substr(RVR2,5,1) is "P" || substr(RVR2,5,1) is "M") {
ExtremeValuesRVR2=to_string(RVR,5,1);
RVR2_1=to_string(RVR2,6);
} else {
RVR2_1=to_string(RVR2,5);
}
}
if (length(RVR2_1)==4 || length(RVR2_1)==5) {
meanRVR2=to_string(RVR2_1,0,4);
} else {
if (substr(RVR2_1,4,1) is "V") {
oneMinuteMeanMinimumRVR2=to_string(RVR2_1,0,4);
if (substr(RVR2_1,5,1) is "P" || substr(RVR2_1,5,1) is "M") {
ExtremeValuesInMaximumRVR2=to_string(RVR_1,5,1);
oneMinuteMeanMaximumRVR2=to_string(RVR2_1,6,4);
} else {
oneMinuteMeanMaximumRVR2=to_string(RVR2_1,5,4);
}
}
}
if (substr(RVR2,-1,1) is "U" ) { constant pastTendencyRVR2="UPWARD"; }
if (substr(RVR2,-1,1) is "D" ) { constant pastTendencyRVR2="DOWNWARD"; }
if (substr(RVR2,-1,1) is "N" ) { constant pastTendencyRVR2="NO_CHANGE"; }
}
|