problem_descriptor_records Derived Type

type, public :: problem_descriptor_records


Components

Type Visibility Attributes Name Initial
character(len=THARN_MAXSTR), public :: filename
integer, public :: numStrings
type(problem_descriptor_strings), public, pointer :: str(:)

Source Code

  type problem_descriptor_records
     character(THARN_MAXSTR) :: filename   ! filename of problem descriptor record
     integer :: numStrings                ! # of problem descriptor strings in record
     type(problem_descriptor_strings), pointer :: str(:)  ! problem descriptor strngs
  end type problem_descriptor_records