mirror of https://github.com/ecmwf/eccodes.git
ECC-1319: clean up
This commit is contained in:
parent
3237fdf6c2
commit
94fcfcff1d
|
@ -16,7 +16,7 @@ temp=temp.$label.grib
|
|||
|
||||
sample_grib2=$ECCODES_SAMPLES_PATH/GRIB2.tmpl
|
||||
|
||||
lev_types="
|
||||
typeOfLevels="
|
||||
surface
|
||||
tropopause
|
||||
nominalTop
|
||||
|
@ -48,19 +48,19 @@ seaIceLayer"
|
|||
ok_levtypes="hhl ml o2d pl pt pv sfc sol"
|
||||
check_levtype()
|
||||
{
|
||||
_arg=$1
|
||||
result=1
|
||||
for n in $ok_levtypes; do
|
||||
if [ "$_arg" = "$n" ]; then result=0; break; fi
|
||||
done
|
||||
return $result
|
||||
_arg=$1
|
||||
result=1
|
||||
for n in $ok_levtypes; do
|
||||
if [ "$_arg" = "$n" ]; then result=0; break; fi
|
||||
done
|
||||
return $result
|
||||
}
|
||||
|
||||
|
||||
for lt in $lev_types; do
|
||||
${tools_dir}/grib_set -s tablesVersion=27,typeOfLevel=$lt $sample_grib2 $temp
|
||||
ltype=`${tools_dir}/grib_get -p mars.levtype $temp`
|
||||
check_levtype $ltype
|
||||
for a_typeOfLevel in $typeOfLevels; do
|
||||
${tools_dir}/grib_set -s tablesVersion=27,typeOfLevel=$a_typeOfLevel $sample_grib2 $temp
|
||||
levtype=`${tools_dir}/grib_get -p mars.levtype $temp`
|
||||
check_levtype $levtype
|
||||
done
|
||||
|
||||
|
||||
|
|
Loading…
Reference in New Issue