Read a full 2D array
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncid | |||
| integer, | intent(in) | :: | varid | |||
| real(kind=wp), | intent(inout) | :: | data(:,:) | |||
| integer, | intent(out), | optional | :: | ierr |
Non-zero on failure when present; absent behaves as today
( |
subroutine nc_get_var_2d(ncid, varid, data, ierr) !! Read a full 2D array integer, intent(in) :: ncid integer, intent(in) :: varid real(wp), intent(inout) :: data(:, :) integer, intent(out), optional :: ierr !! Non-zero on failure when present; absent behaves as today !! (`error stop`). call nc_check(nf90_get_var(ncid, varid, data), "reading 2D variable", ierr) end subroutine nc_get_var_2d