eccodes/definitions/grib1/local.98.35.def

34 lines
1.0 KiB
Modula-2
Raw Normal View History

2020-01-28 14:32:34 +00:00
# (C) Copyright 2005- ECMWF.
# Elaboration of ocean model products
2013-03-25 12:04:10 +00:00
constant GRIBEXSection1Problem = 120 - section1Length ;
template mars_labeling "grib1/mars_labeling.def";
unsigned[1] yearOfReference = yearOfCentury : dump;
unsigned[1] monthOfReference = month : dump;
unsigned[1] dayOfReference = day : dump;
unsigned[1] hourOfReference = hour : dump;
unsigned[1] minuteOfReference = minute : dump;
unsigned[1] centuryOfReference = centuryOfReferenceTimeOfData : dump;
transient secondsOfReference = 0 ;
unsigned[1] numberOfForcasts=0 : dump;
unsigned[1] numberOfAnalysis=1 : dump;
if (numberOfForcasts) {
unsigned[3] forecastSteps[numberOfForcasts] : dump;
2013-03-25 12:04:10 +00:00
}
if (numberOfAnalysis) {
signed[3] analysisOffsets[numberOfAnalysis] : dump;
2013-03-25 12:04:10 +00:00
}
padto padding_local_35(offsetSection1 + 120);
meta dateOfReference g1date(centuryOfReference,yearOfReference,monthOfReference,dayOfReference) : dump;
meta timeOfReference time(hourOfReference,minuteOfReference,secondsOfReference) : dump;
if (indicatorOfTypeOfLevel==160) {
alias mars.levelist = level;
2013-03-25 12:04:10 +00:00
}