Array objects with reference counting.
Interfaces
-
private subroutine array_new_i1d(array, DATA, gift)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(out) |
|
|
:: |
array |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
DATA |
|
logical,
|
intent(in), |
optional |
|
:: |
gift |
|
-
private subroutine array_new_i1d_lb(array, DATA, lb)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(out) |
|
|
:: |
array |
|
integer,
|
intent(in), |
|
DIMENSION(:)
|
:: |
DATA |
|
integer,
|
intent(in) |
|
|
:: |
lb |
|
-
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|
-
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|
-
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|
-
private pure function array_exists_i1d(array) result(array_exists)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
logical
-
private function array_data_i1d(array) result(DATA)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
integer, DIMENSION(:), POINTER, CONTIGUOUS
-
private pure function array_size_i1d(array) result(the_size)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
integer
-
private pure function array_equality_i1(array1, array2) result(are_equal)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
array1 |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
array2 |
|
Return Value
logical
-
private pure function array_equality_i1d(array1, array2) result(are_equal)
Arguments
Return Value
logical
-
private pure function array_get_i1d(array, index1) result(value)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
integer,
|
intent(in) |
|
|
:: |
index1 |
|
Return Value
integer
-
private pure function array_get_i1(array, index1) result(value)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
integer,
|
intent(in), |
|
DIMENSION(:), POINTER
|
:: |
array |
|
integer,
|
intent(in) |
|
|
:: |
index1 |
|
Return Value
integer
Derived Types
Components
Type |
Visibility | Attributes |
|
Name |
| Initial | |
integer,
|
public, |
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
DATA |
=> |
Null() |
|
integer,
|
public |
|
:: |
refcount |
= |
0 |
|
Components
Type |
Visibility | Attributes |
|
Name |
| Initial | |
type(array_i1d_type),
|
public, |
POINTER
|
:: |
low |
=> |
Null() |
|
Functions
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
logical
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
integer, DIMENSION(:), POINTER, CONTIGUOUS
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
Return Value
integer
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
array1 |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
array2 |
|
Return Value
logical
Arguments
Return Value
logical
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(in) |
|
|
:: |
array |
|
integer,
|
intent(in) |
|
|
:: |
index1 |
|
Return Value
integer
private pure function array_get_i1(array, index1) result(value)
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
integer,
|
intent(in), |
|
DIMENSION(:), POINTER
|
:: |
array |
|
integer,
|
intent(in) |
|
|
:: |
index1 |
|
Return Value
integer
Subroutines
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(out) |
|
|
:: |
array |
|
integer,
|
|
|
DIMENSION(:), POINTER, CONTIGUOUS
|
:: |
DATA |
|
logical,
|
intent(in), |
optional |
|
:: |
gift |
|
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(out) |
|
|
:: |
array |
|
integer,
|
intent(in), |
|
DIMENSION(:)
|
:: |
DATA |
|
integer,
|
intent(in) |
|
|
:: |
lb |
|
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|
Arguments
Type |
Intent | Optional | Attributes |
|
Name |
|
type(array_i1d_obj),
|
intent(inout) |
|
|
:: |
array |
|