Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | m | = | -1 | ||
integer, | public | :: | n | = | -1 | ||
integer, | public | :: | k | = | -1 | ||
integer, | public | :: | max_m | = | -1 | ||
integer, | public | :: | max_n | = | -1 | ||
integer, | public | :: | max_k | = | -1 | ||
logical, | public | :: | defined_mnk | = | .FALSE. |
TYPE stack_descriptor_type INTEGER :: m = -1, n = -1, k = -1, max_m = -1, max_n = -1, max_k = -1 LOGICAL :: defined_mnk = .FALSE. END TYPE stack_descriptor_type