mirror of https://github.com/ecmwf/eccodes.git
12 lines
327 B
Modula-2
12 lines
327 B
Modula-2
if (g is "//" || g is "///" || g is "////" || g is "/////"
|
|
|| g is "//////" || g is "/////////") {
|
|
rename(g,missingField1);
|
|
group g : dump; non_alpha na;
|
|
}
|
|
if (g is "//" || g is "///" || g is "////" || g is "/////"
|
|
|| g is "//////" || g is "/////////") {
|
|
rename(g,missingField2);
|
|
group g : dump; non_alpha na;
|
|
}
|
|
|