INTERFACE:
subroutine netcdf_err (ier, routine_name)DESCRIPTION:
If error detected in netCDF call, issue error message and abort.
ARGUMENTS:
implicit none #include <netcdf.inc> integer, intent(in) :: ier ! return code from netCDF call character(len=*), intent(in) :: routine_name ! calling routine nameREVISION HISTORY:
Created by Mariana Vertenstein