From ee6a747f1802da45a4e8a434f0b03b356a3a81c2 Mon Sep 17 00:00:00 2001 From: Shahram Najm Date: Thu, 8 Dec 2022 15:06:58 +0000 Subject: [PATCH] Examples: Cleanup --- examples/F90/grib_copy_namespace.f90 | 2 +- examples/F90/grib_copy_namespace.sh | 6 ++++-- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/examples/F90/grib_copy_namespace.f90 b/examples/F90/grib_copy_namespace.f90 index 043ba1d62..33a1e06f9 100644 --- a/examples/F90/grib_copy_namespace.f90 +++ b/examples/F90/grib_copy_namespace.f90 @@ -18,7 +18,7 @@ program copy_namespace call codes_open_file(file1, '../../data/reduced_latlon_surface.grib2', 'r') call codes_open_file(file2, '../../data/regular_latlon_surface.grib1', 'r') - call codes_open_file(file3, 'out.grib_copy_namespace.grib', 'w') + call codes_open_file(file3, 'temp.grib_copy_namespace_test_f.grib', 'w') call codes_grib_new_from_file(file1, igrib1) call codes_grib_new_from_file(file2, igrib2) diff --git a/examples/F90/grib_copy_namespace.sh b/examples/F90/grib_copy_namespace.sh index 715e34e34..3c7b1ec4d 100755 --- a/examples/F90/grib_copy_namespace.sh +++ b/examples/F90/grib_copy_namespace.sh @@ -16,8 +16,10 @@ INPUT=../../data/regular_latlon_surface.grib1 res=`${tools_dir}/grib_get -p Ni,Nj $INPUT` [ "$res" = "16 31" ] -#The input and output BUFR files are hardcoded in the f90 example!!! -OUTPUT=out.grib_copy_namespace.grib +# Note: The input and output GRIB files are hardcoded in the example! +# The output is a clone of the regular lat/lon but then +# we copy the reduced lat/lon geography namespace to the output +OUTPUT=temp.$label.grib ${examples_dir}/eccodes_f_grib_copy_namespace res=`${tools_dir}/grib_get -p Ni,Nj $OUTPUT`