Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer(kind=I4B), | public | :: | n | ||||
integer(kind=I4B), | public | :: | len | ||||
real(kind=SP), | public, | DIMENSION(:), POINTER | :: | val | |||
integer(kind=I4B), | public, | DIMENSION(:), POINTER | :: | irow | |||
integer(kind=I4B), | public, | DIMENSION(:), POINTER | :: | jcol |
TYPE sprs2_sp
INTEGER(I4B) :: n,len
REAL(SP), DIMENSION(:), POINTER :: val
INTEGER(I4B), DIMENSION(:), POINTER :: irow
INTEGER(I4B), DIMENSION(:), POINTER :: jcol
END TYPE sprs2_sp