mirror of https://github.com/ecmwf/eccodes.git
17 lines
403 B
Modula-2
17 lines
403 B
Modula-2
# assert(local=1)
|
|
# NOTE: verificationDate based on startStep
|
|
|
|
meta verificationDate g1verificationdate(dataDate, dataTime, startStep) : read_only;
|
|
alias mars.date = verificationDate;
|
|
alias mars.step = startStep;
|
|
|
|
# Only ERA15 has time and step
|
|
if(class != 3) {
|
|
unalias mars.time;
|
|
unalias mars.step;
|
|
}
|
|
|
|
alias mars.instrument = instrumentType;
|
|
alias mars.ident = satelliteNumber;
|
|
|