mirror of https://github.com/ecmwf/eccodes.git
13 lines
381 B
Modula-2
13 lines
381 B
Modula-2
|
# assert(local=1)
|
||
|
|
meta verificationDate g1verificationdate(dataDate, dataTime, endStep) : read_only;
|
||
|
|
meta monthlyVerificationDate g1monthlydate(verificationDate) : dump,no_copy;
|
||
|
|
alias mars.date = monthlyVerificationDate;
|
||
|
|
|
||
|
|
# class e4
|
||
|
|
# constant six = 6;
|
||
|
|
alias mars.step = startStep;
|
||
|
|
|
||
|
|
alias mars.instrument = instrumentType;
|
||
|
|
alias mars.ident = satelliteNumber;
|
||
|
|
|