source: LMDZ6/branches/cirrus/tools/netcdf95/docs/Detailed_content/errors.md @ 5178

# Handling of errors

If you call a NetCDF95 procedure without the optional `ncerr`
argument, and some error occurs, then the NetCDF95 procedure will:

-   write to standard output all the information it has, including the
    string produced by `nf90_strerror`;
-   try to close the NetCDF file;
-   stop the program, with an exit status of 1.

For example, if some error occurs within a call to `nf95_inq_varid`,
`nf95_inq_varid` will write to standard output:

    nf95_inq_varid, name = < name of the variable you inquired about >:
    < string produced by nf90_strerror >

## `nf95_abort`

(additional procedure)

```
subroutine nf95_abort(message, ncerr, ncid, varid)
  character(len=*), intent(in):: message
  ! (should include name of calling procedure)

  integer, intent(in):: ncerr

  integer, intent(in), optional :: ncid
  ! This can be the file ncid or a group ncid. Provide this argument
  ! if you want nf95_abort to try to close the file.

  integer, intent(in), optional :: varid
```

This is a public procedure which is also used internally in NetCDF95.
`nf95_abort` prints a message and stops the program. `nf95_abort` may
also be useful after calling procedures of the Fortran 90 interface
that have not been implemented in NetCDF95.

You should include the name of the calling procedure in the `message`
argument. Provide the `ncid` argument if you want `nf95_abort` to try
to close the file. Provide `varid` if you want `nf95_abort` to print
it.