TYPE InternalVarsUsedType
  ! structure for internal data that user has selected to use in Erl.
  CHARACTER(len=MaxNameLength)            :: Name                 = '' ! Erl variable name
  CHARACTER(len=MaxNameLength)            :: InternalDataTypeName = '' ! general internal variable name, All uppercase
  CHARACTER(len=MaxNameLength)            :: UniqueIDName         = '' ! unique id for internal var, All uppercase
  LOGICAL                                 :: CheckedOkay          = .FALSE. ! set to true once matched to available internal var
  INTEGER                                 :: ErlVariableNum       = 0  ! points to global Erl variable, matches Name
  INTEGER                                 :: InternVarNum         = 0 ! points to index match in EMSInternalVarsAvailable structure
END TYPE InternalVarsUsedType