Fortran 90 User-Defined Type

A Fortran 90 user-defined type is similar to a C structure. TotalView displays a user-defined type as type(name), which is the same syntax used in Fortran 90 to create a user-defined type. For example, here is a code fragment that defines a variable matrix1 of type(sparse):

TYPE WHOPPER
    LOGICAL, DIMENSION(ISIZE) :: FLAGS
    DOUBLE PRECISION, DIMENSION(ISIZE) :: DPSA
    DOUBLE PRECISION, DIMENSION(:), POINTER :: DPPA
END TYPE WHOPPER
 
TYPE(WHOPPER), DIMENSION(:), ALLOCATABLE :: TYP2

TotalView displays this code as shown in the following figure.

Fortran 90 User Defined Type