Skip to content
Snippets Groups Projects
Commit c1381c1b authored by Tim Michaels's avatar Tim Michaels
Browse files

Fatal error if GFS de-GRIB invoked without support

No de-GRIB is possible if the executable was not compiled with de-GRIB
support.
parent 51fae215
No related branches found
No related tags found
No related merge requests found
Pipeline #38154 passed
......@@ -571,6 +571,10 @@ module GFS_HDF_MOD
! --- close files
call grib_close(grib_id_1)
call grib_close(grib_id_2)
#else
print *, 'ERROR: this executable was compiled without de-GRIB support,'
print *, ' and so cannot ingest GRIB-format files.'
stop 1
#endif /* end:DEGRIB */
else
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment