MODULE Derived_TypesΒΆ

Module Derived_Types exports derived data types for sparse real and complex matrices of kind stnd and extd. These two kind types are defined in module Select_Parameters.

The available derived data types are defined as follow:

!
! DERIVED DATA TYPES FOR SPARSE MATRICES WITH KIND stnd AND extd
! ==============================================================
!
type sprs2_stnd
    integer(i4b) :: n, len
    real(stnd),   dimension(:), pointer :: val
    integer(i4b), dimension(:), pointer :: irow
    integer(i4b), dimension(:), pointer :: jcol
end type sprs2_stnd
!
type sprs2_extd
    integer(i4b) :: n, len
    real(extd),   dimension(:), pointer :: val
    integer(i4b), dimension(:), pointer :: irow
    integer(i4b), dimension(:), pointer :: jcol
end type sprs2_extd
!
type sprs2_stndc
    integer(i4b) :: n, len
    complex(stnd), dimension(:), pointer :: val
    integer(i4b),  dimension(:), pointer :: irow
    integer(i4b),  dimension(:), pointer :: jcol
end type sprs2_stndc
!
type sprs2_extdc
    integer(i4b) :: n, len
    complex(extd), dimension(:), pointer :: val
    integer(i4b),  dimension(:), pointer :: irow
    integer(i4b),  dimension(:), pointer :: jcol
end type sprs2_extdc
Flag Counter