test_function_record Derived Type

type, public :: test_function_record


Components

Type Visibility Attributes Name Initial
character(len=THARN_MAXSTR), public :: string
integer, public :: prank
real(kind=ESMF_KIND_R8), public, pointer :: param(:)

Source Code

  type test_function_record   
     character(THARN_MAXSTR) ::string 
     integer :: prank                            ! rank of parameters 
      real(ESMF_KIND_R8), pointer :: param(:)     ! test function parameters
  end type test_function_record