chf-namidm.f90

Go to the documentation of this file.

! ** Do Not Modify! MODFLOW 6 system generated file. **
module chfnaminputmodule
  use constantsmodule, only: lenvarname
  use inputdefinitionmodule, only: inputparamdefinitiontype, &
                                   inputblockdefinitiontype
  private
  public chf_nam_param_definitions
  public chf_nam_aggregate_definitions
  public chf_nam_block_definitions
  public chfnamparamfoundtype
  public chf_nam_multi_package
  public chf_nam_subpackages
 
  type chfnamparamfoundtype
    logical :: list = .false.
    logical :: print_input = .false.
    logical :: print_flows = .false.
    logical :: save_flows = .false.
    logical :: newtonoptions = .false.
    logical :: newton = .false.
    logical :: under_relaxation = .false.
    logical :: ftype = .false.
    logical :: fname = .false.
    logical :: pname = .false.
  end type chfnamparamfoundtype
 
  logical :: chf_nam_multi_package = .false.
 
  character(len=16), parameter :: &
    chf_nam_subpackages(*) = &
    [ &
    '                ' &
    ]
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_list = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'LIST', & ! tag name
    'LIST', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'name of listing file', & ! longname
    .false., & ! required
    .false., & ! multi-record
    .true., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_print_input = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'PRINT_INPUT', & ! tag name
    'PRINT_INPUT', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'print input to listing file', & ! longname
    .false., & ! required
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_print_flows = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'PRINT_FLOWS', & ! tag name
    'PRINT_FLOWS', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'print calculated flows to listing file', & ! longname
    .false., & ! required
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_save_flows = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'SAVE_FLOWS', & ! tag name
    'SAVE_FLOWS', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'save flows for all packages to budget file', & ! longname
    .false., & ! required
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_newtonoptions = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'NEWTONOPTIONS', & ! tag name
    'NEWTONOPTIONS', & ! fortran variable
    'RECORD NEWTON UNDER_RELAXATION', & ! type
    '', & ! shape
    'newton keyword and options', & ! longname
    .false., & ! required
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_newton = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'NEWTON', & ! tag name
    'NEWTON', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'keyword to activate Newton-Raphson formulation', & ! longname
    .true., & ! required
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_under_relaxation = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'OPTIONS', & ! block
    'UNDER_RELAXATION', & ! tag name
    'UNDER_RELAXATION', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'keyword to activate Newton-Raphson UNDER_RELAXATION option', & ! longname
    .false., & ! required
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_ftype = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'PACKAGES', & ! block
    'FTYPE', & ! tag name
    'FTYPE', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'package type', & ! longname
    .true., & ! required
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_fname = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'PACKAGES', & ! block
    'FNAME', & ! tag name
    'FNAME', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'file name', & ! longname
    .true., & ! required
    .true., & ! multi-record
    .true., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_pname = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'PACKAGES', & ! block
    'PNAME', & ! tag name
    'PNAME', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'user name for package', & ! longname
    .false., & ! required
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chf_nam_param_definitions(*) = &
    [ &
    chfnam_list, &
    chfnam_print_input, &
    chfnam_print_flows, &
    chfnam_save_flows, &
    chfnam_newtonoptions, &
    chfnam_newton, &
    chfnam_under_relaxation, &
    chfnam_ftype, &
    chfnam_fname, &
    chfnam_pname &
    ]
 
  type(inputparamdefinitiontype), parameter :: &
    chfnam_packages = inputparamdefinitiontype &
    ( &
    'CHF', & ! component
    'NAM', & ! subcomponent
    'PACKAGES', & ! block
    'PACKAGES', & ! tag name
    'PACKAGES', & ! fortran variable
    'RECARRAY FTYPE FNAME PNAME', & ! type
    '', & ! shape
    'package list', & ! longname
    .true., & ! required
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    chf_nam_aggregate_definitions(*) = &
    [ &
    chfnam_packages &
    ]
 
  type(inputblockdefinitiontype), parameter :: &
    chf_nam_block_definitions(*) = &
    [ &
    inputblockdefinitiontype( &
    'OPTIONS', & ! blockname
    .false., & ! required
    .false., & ! aggregate
    .false. & ! block_variable
    ), &
    inputblockdefinitiontype( &
    'PACKAGES', & ! blockname
    .true., & ! required
    .true., & ! aggregate
    .false. & ! block_variable
    ) &
    ]
 
end module chfnaminputmodule