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 |