1# Copyright 2005-2018 ECMWF. 2# 3# This software is licensed under the terms of the Apache Licence Version 2.0 4# which can be obtained at http://www.apache.org/licenses/LICENSE-2.0. 5# 6# In applying this licence, ECMWF does not waive the privileges and immunities granted to it by 7# virtue of its status as an intergovernmental organisation nor does it submit to any jurisdiction. 8# 9 10# START 1/local.98.17 ---------------------------------------------------------------------- 11# LOCAL 98 17 12# 13# localDefinitionTemplate_017 14# --------------------------- 15# 16# Description Octet Code Ksec1 Count 17# ----------- ----- ---- ----- ----- 18#localDefinitionNumber 41 I1 37 - 19#class 42 I1 38 - 20#type 43 I1 39 - 21#stream 44 I2 40 - 22#experimentVersionNumber 46 A4 41 - 23#zeroes 50 PAD 42 2 24#dateOfSSTFieldUsed 52 D3 44 - 25#typeOfSSTFieldUsed 55 I1 45 - 26#countOfICEFieldsUsed 56 I1 46 - 27#iceFieldDate+Satellite 57 LIST 47 countOfICEFieldsUsed 28#dateOfIceFieldUsed - D3 - - 29#satelliteNumber - I1 - - 30#ENDLIST - ENDLIST - iceFieldDate+Satellite 31#paddingToMultipleOf40Bytes 57 PADMULT - 40 32# 33 34 35template mars_labeling "grib1/mars_labeling.def"; 36 37# zeroes 38#pad padding_loc17_1(2); 39 40unsigned[1] perturbationNumber : dump; 41alias number = perturbationNumber; 42 43unsigned[1] numberOfForecastsInEnsemble : dump; 44 45# Need a proper date (sst_date) 46unsigned[3] dateOfSSTFieldUsed : dump ; 47 48unsigned[1] typeOfSSTFieldUsed : dump ; 49 50unsigned[1] countOfICEFieldsUsed : dump ; 51 52position offsetICEFieldsUsed; 53ICEFieldsUsed list(countOfICEFieldsUsed) 54{ 55 unsigned[3] dateOfIceFieldUsed : dump ; 56# d3date dateOfIceFieldUsed ; 57 unsigned[1] satelliteNumber : dump ; 58} 59 60# paddingToMultipleOf40Bytes 61padtomultiple padding_loc17_2(offsetICEFieldsUsed,40); 62position offsetAfterPadding; 63 64constant GRIBEXSection1Problem = ( offsetAfterPadding - offsetICEFieldsUsed ) % 40; 65 66# END 1/local.98.17 ---------------------------------------------------------------------- 67