Special array types.
Symmetric array class.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| real(kind=rk), | public, | allocatable | :: | ap(:) |
vector with array values in packed storage format |
||
| integer, | public | :: | n |
number of rows or columns |
|||
| character(len=1), | public | :: | uplo | = | "u" |
flag to specify whether the (u)pper or (l)ower triangle is supplied |
| private pure function spmatrix_init (n) | Initialize |
| procedure, public, pass(self) :: multvec => spmatrix_multvec | |
| procedure, public, pass(self) :: get => spmatrix_get | |
| procedure, public, pass(self) :: set => spmatrix_set |