Compute IO length.
use penf, only : byte_size
type(vector_R16P) :: pt
print*, pt%iolen()/byte_size(pt%x)
use penf, only : byte_size
type(vector_R16P) :: pt
print*, iolen_R16P(pt)/byte_size(pt%x)
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(vector_R16P), | intent(in) | :: | self | Vector. |
IO length.