2021-02-15 17:29:20 +00:00
|
|
|
# (C) Copyright 2005- ECMWF.
|
|
|
|
|
|
|
|
codetable[1] typeOfWavelengthInterval ('4.91.table',masterDir,localDir) : dump;
|
|
|
|
alias typeOfIntervalForFirstAndSecondWavelength=typeOfWavelengthInterval;
|
|
|
|
|
|
|
|
# Wavelengths in metres
|
|
|
|
signed[1] scaleFactorOfFirstWavelength : dump;
|
|
|
|
signed[4] scaledValueOfFirstWavelength : dump;
|
|
|
|
signed[1] scaleFactorOfSecondWavelength = missing(): can_be_missing,dump;
|
|
|
|
signed[4] scaledValueOfSecondWavelength = missing(): can_be_missing,dump;
|
2024-02-15 12:18:36 +00:00
|
|
|
|
|
|
|
meta firstWavelength from_scale_factor_scaled_value(scaleFactorOfFirstWavelength, scaledValueOfFirstWavelength);
|
|
|
|
meta secondWavelength from_scale_factor_scaled_value(scaleFactorOfSecondWavelength, scaledValueOfSecondWavelength);
|
|
|
|
alias firstWavelengthInMetres = firstWavelength;
|
|
|
|
alias secondWavelengthInMetres = secondWavelength;
|
|
|
|
|
2024-02-19 13:34:02 +00:00
|
|
|
constant billion = 1000000000 : hidden;
|
2024-02-29 16:52:47 +00:00
|
|
|
meta firstWavelengthInNanometres multdouble(firstWavelength, billion) : read_only;
|
|
|
|
meta secondWavelengthInNanometres multdouble(secondWavelength, billion) : read_only;
|