2019-04-17 14:58:24 +00:00
|
|
|
#!/bin/sh
|
2020-01-28 14:32:34 +00:00
|
|
|
# (C) Copyright 2005- ECMWF.
|
2019-04-17 14:58:24 +00:00
|
|
|
#
|
|
|
|
|
# This software is licensed under the terms of the Apache Licence Version 2.0
|
|
|
|
|
# which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
|
|
|
|
|
#
|
|
|
|
|
# In applying this licence, ECMWF does not waive the privileges and immunities granted to it by
|
|
|
|
|
# virtue of its status as an intergovernmental organisation nor does it submit to any jurisdiction.
|
|
|
|
|
#
|
|
|
|
|
|
2022-04-04 12:35:10 +00:00
|
|
|
. ./include.ctest.sh
|
2019-04-17 14:58:24 +00:00
|
|
|
|
2024-07-12 08:51:12 +00:00
|
|
|
if [ $HAVE_GEOGRAPHY -eq 0 ]; then
|
|
|
|
|
exit 0
|
|
|
|
|
fi
|
|
|
|
|
|
2024-01-18 16:36:51 +00:00
|
|
|
label="grib_nearest_multiple_c"
|
2019-04-17 14:58:24 +00:00
|
|
|
temp1=$label.temp1.$$
|
|
|
|
|
temp2=$label.temp2.$$
|
|
|
|
|
tempRef=$label.ref.$$
|
|
|
|
|
|
2023-08-23 13:17:27 +00:00
|
|
|
set +e
|
|
|
|
|
${examples_dir}/c_grib_nearest_multiple 2>/dev/null
|
|
|
|
|
status=$?
|
|
|
|
|
set -e
|
|
|
|
|
[ $status -eq 1 ]
|
|
|
|
|
|
2019-04-17 14:58:24 +00:00
|
|
|
cat > $temp1 <<EOF
|
|
|
|
|
1 30 -20
|
|
|
|
|
2 13 234
|
|
|
|
|
EOF
|
|
|
|
|
|
|
|
|
|
input_pts=$temp1
|
|
|
|
|
input_lsm=${data_dir}/reduced_gaussian_lsm.grib1
|
|
|
|
|
input_grb=${data_dir}/reduced_gaussian_pressure_level.grib1
|
|
|
|
|
|
2020-02-06 10:52:57 +00:00
|
|
|
cat $input_pts
|
2019-04-17 16:22:14 +00:00
|
|
|
${examples_dir}/c_grib_nearest_multiple $input_pts $input_lsm $input_grb > $temp2
|
2019-04-17 14:58:24 +00:00
|
|
|
|
|
|
|
|
cat > $tempRef <<EOF
|
|
|
|
|
1 29.30 340.31 0.00 289.87 1770
|
|
|
|
|
2 12.56 233.44 0.00 294.06 2500
|
|
|
|
|
EOF
|
|
|
|
|
|
|
|
|
|
diff $tempRef $temp2
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
rm -f $temp1 $temp2 $tempRef
|
