Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | value | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | values(:) | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | values(:,:) | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | values(:,:,:) | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | values(:,:,:,:) | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(*), | intent(in) | :: | values(:,:,:,:,:) | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(inout) | :: | this | |||
integer, | intent(out), | optional | :: | rc |
equals()
- returns true if-and-only-if a and b
are the same type, kind, shape, and have the same values.
Only intrinsic data types are supported.
Ugly nested SELECT TYPE is unfortunately necessary.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | a | ||
type(UnlimitedEntity), | intent(in), | target | :: | b |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in) | :: | this | |||
integer, | intent(out), | optional | :: | rc |
Simple accessor
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in) | :: | this | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | this | ||
integer, | intent(out), | optional | :: | rc |
get string or scalar
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | this | ||
integer, | intent(out), | optional | :: | rc |
get 1d , need get_shape to get back to original array
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | this | ||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | this | ||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in) | :: | a | |||
type(UnlimitedEntity), | intent(in) | :: | b |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in) | :: | a | |||
type(UnlimitedEntity), | intent(in) | :: | b |
equals()
- returns true if-and-only-if a and b
are the same type, kind, shape, and have the same values.
Only intrinsic data types are supported.
Ugly nested SELECT TYPE is unfortunately necessary.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | a | ||
type(UnlimitedEntity), | intent(in), | target | :: | b |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(in), | target | :: | this | ||
integer, | intent(inout), | allocatable | :: | buffer(:) | ||
integer, | intent(out), | optional | :: | rc |
Set string or scalar
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(UnlimitedEntity), | intent(inout) | :: | this | |||
class(*), | intent(in) | :: | value | |||
integer, | intent(out), | optional | :: | rc |
type :: UnlimitedEntity private integer, allocatable :: shape(:) class (*), allocatable :: value class (*), allocatable :: values(:) logical :: valid = .false. !! just to avoid warning for empty constructor contains procedure :: get_shape procedure :: get_rank procedure :: get_value procedure :: get_values generic :: operator(==) => equal generic :: operator(/=) => not_equal procedure :: equal procedure :: not_equal procedure :: set procedure :: serialize procedure :: get_string procedure :: is_empty procedure :: destroy end type UnlimitedEntity