eccodes/definitions/metar/sea_state.def

6 lines
124 B
Modula-2

if ( substr(g,0,1) is "W" && substr(g,-2,1) is "S" ) {
rename(g,seaState);
group g : dump; non_alpha na;
}