eccodes/definitions/mars/grib.msmm.fcmax.def

21 lines
491 B
Modula-2
Raw Permalink Normal View History

2013-03-25 12:04:10 +00:00
# assert(16);
alias mars.fcmonth = marsForecastMonth;
unalias mars.step;
alias mars.number = perturbationNumber;
alias mars.origin = centre;
alias mars.method = methodNumber;
2024-09-10 17:14:35 +00:00
if (class is "od" || class is "me" || class is "en" || class is "c3") {
alias mars.system = systemNumber;
}
2018-01-29 14:03:57 +00:00
# See ECC-624
if (centre == 80 && subCentre == 98 && (class is "c3" || class is "ci")) {
2018-01-29 14:03:57 +00:00
constant cnmc_cmcc = 'cmcc';
alias mars.origin = cnmc_cmcc;
}
if (class is "ci") { unalias mars.method; }