eccodes/definitions/grib1/local.98.3.def

19 lines
425 B
Modula-2
Raw Permalink Normal View History

2020-01-28 14:32:34 +00:00
# (C) Copyright 2005- ECMWF.
# Satellite image data
2013-03-25 12:04:10 +00:00
constant GRIBEXSection1Problem = 52 - section1Length ;
template mars_labeling "grib1/mars_labeling.def";
constant operStream = "oper";
alias mars.stream = operStream;
unsigned[1] band : dump;
alias mars.obstype = band;
meta marsIdent sprintf("%d",indicatorOfTypeOfLevel) : dump;
2013-03-25 12:04:10 +00:00
alias mars.ident = marsIdent;
unsigned[1] functionCode : dump;
2013-03-25 12:04:10 +00:00
pad padding_loc3_1(1);