recv_error Subroutine
public subroutine recv_error(err)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(w90_error_type), | intent(out), | allocatable | :: | err |
Source Code
subroutine recv_error(err) type(w90_error_type), allocatable, intent(out) :: err allocate (err) err%code = code_remote end subroutine recv_error