eccodes/definitions/grib1/local.98.1.def

54 lines
1.6 KiB
Modula-2
Raw Permalink Normal View History

2020-01-28 14:32:34 +00:00
# (C) Copyright 2005- ECMWF.
# MARS labelling or ensemble forecast data
2013-03-25 12:04:10 +00:00
constant GRIBEXSection1Problem = 52 - section1Length ;
template mars_labeling "grib1/mars_labeling.def";
unsigned[1] perturbationNumber : dump;
alias number = perturbationNumber;
unsigned[1] numberOfForecastsInEnsemble : dump;
alias totalNumber=numberOfForecastsInEnsemble;
pad padding_local1_1(1);
#1->2
alias grib2LocalSectionPresent=present;
constant grib2LocalSectionNumber=1;
if (stepType is "instant" ) {
if (type is "em" || type is "es" ) {
alias productDefinitionTemplateNumber=epsStatisticsPoint;
} else {
if (numberOfForecastsInEnsemble!=0) {
if ((perturbationNumber/2)*2 == perturbationNumber) {
alias typeOfEnsembleForecast=two;
} else {
alias typeOfEnsembleForecast=three;
}
alias productDefinitionTemplateNumber=epsPoint;
} else {
alias productDefinitionTemplateNumber=zero;
}
}
2013-03-25 12:04:10 +00:00
} else {
if (type is "em" || type is "es" ) {
alias productDefinitionTemplateNumber=epsStatisticsContinous;
} else {
if (numberOfForecastsInEnsemble!=0) {
if ((perturbationNumber/2)*2 == perturbationNumber) {
alias typeOfEnsembleForecast=two;
} else {
alias typeOfEnsembleForecast=three;
}
2024-09-03 15:51:06 +00:00
alias productDefinitionTemplateNumber=epsContinuous;
} else {
alias productDefinitionTemplateNumber=eight;
}
2013-03-25 12:04:10 +00:00
}
}
# monthly mean
#if (timeRangeIndicator==113) {
#}