Write an integer attribute to a variable
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ncid | |||
| integer, | intent(in) | :: | varid | |||
| character(len=*), | intent(in) | :: | name | |||
| integer, | intent(in) | :: | value | |||
| integer, | intent(out), | optional | :: | ierr |
Non-zero on failure when present; absent behaves as today
( |
subroutine nc_put_att_int(ncid, varid, name, value, ierr) !! Write an integer attribute to a variable integer, intent(in) :: ncid integer, intent(in) :: varid character(len=*), intent(in) :: name integer, intent(in) :: value integer, intent(out), optional :: ierr !! Non-zero on failure when present; absent behaves as today !! (`error stop`). call nc_check(nf90_put_att(ncid, varid, name, value), & "writing attribute "//trim(name), ierr) end subroutine nc_put_att_int