sim-tdisidm.f90

Go to the documentation of this file.

! ** Do Not Modify! MODFLOW 6 system generated file. **
module simtdisinputmodule
  use constantsmodule, only: lenvarname
  use inputdefinitionmodule, only: inputparamdefinitiontype, &
                                   inputblockdefinitiontype
  private
  public sim_tdis_param_definitions
  public sim_tdis_aggregate_definitions
  public sim_tdis_block_definitions
  public simtdisparamfoundtype
  public sim_tdis_multi_package
  public sim_tdis_is_advanced
  public sim_tdis_subpackages
 
  type simtdisparamfoundtype
    logical :: time_units = .false.
    logical :: start_date_time = .false.
    logical :: ats_filerecord = .false.
    logical :: ats6 = .false.
    logical :: filein = .false.
    logical :: ats6_filename = .false.
    logical :: nper = .false.
    logical :: perlen = .false.
    logical :: nstp = .false.
    logical :: tsmult = .false.
  end type simtdisparamfoundtype
 
  logical :: sim_tdis_multi_package = .false.
  logical :: sim_tdis_is_advanced = .false.
 
  character(len=16), parameter :: &
    sim_tdis_subpackages(*) = &
    [ &
    '                ' &
    ]
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_time_units = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'TIME_UNITS', & ! tag name
    'TIME_UNITS', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'time unit', & ! longname
    .false., & ! required
    .false., & ! developmode
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_start_date_time = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'START_DATE_TIME', & ! tag name
    'START_DATE_TIME', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'starting date and time', & ! longname
    .false., & ! required
    .false., & ! developmode
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_ats_filerecord = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'ATS_FILERECORD', & ! tag name
    'ATS_FILERECORD', & ! fortran variable
    'RECORD ATS6 FILEIN ATS6_FILENAME', & ! type
    '', & ! shape
    '', & ! longname
    .false., & ! required
    .false., & ! developmode
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_ats6 = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'ATS6', & ! tag name
    'ATS6', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'ats keyword', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_filein = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'FILEIN', & ! tag name
    'FILEIN', & ! fortran variable
    'KEYWORD', & ! type
    '', & ! shape
    'file keyword', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_ats6_filename = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'OPTIONS', & ! block
    'ATS6_FILENAME', & ! tag name
    'ATS6_FILENAME', & ! fortran variable
    'STRING', & ! type
    '', & ! shape
    'file name of adaptive time series information', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .true., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_nper = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'DIMENSIONS', & ! block
    'NPER', & ! tag name
    'NPER', & ! fortran variable
    'INTEGER', & ! type
    '', & ! shape
    'number of stress periods', & ! longname
    .true., & ! required
    .false., & ! developmode
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_perlen = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'PERIODDATA', & ! block
    'PERLEN', & ! tag name
    'PERLEN', & ! fortran variable
    'DOUBLE', & ! type
    '', & ! shape
    'length of stress period', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_nstp = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'PERIODDATA', & ! block
    'NSTP', & ! tag name
    'NSTP', & ! fortran variable
    'INTEGER', & ! type
    '', & ! shape
    'number of time steps', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_tsmult = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'PERIODDATA', & ! block
    'TSMULT', & ! tag name
    'TSMULT', & ! fortran variable
    'DOUBLE', & ! type
    '', & ! shape
    'number of time steps', & ! longname
    .true., & ! required
    .false., & ! developmode
    .true., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    sim_tdis_param_definitions(*) = &
    [ &
    simtdis_time_units, &
    simtdis_start_date_time, &
    simtdis_ats_filerecord, &
    simtdis_ats6, &
    simtdis_filein, &
    simtdis_ats6_filename, &
    simtdis_nper, &
    simtdis_perlen, &
    simtdis_nstp, &
    simtdis_tsmult &
    ]
 
  type(inputparamdefinitiontype), parameter :: &
    simtdis_perioddata = inputparamdefinitiontype &
    ( &
    'SIM', & ! component
    'TDIS', & ! subcomponent
    'PERIODDATA', & ! block
    'PERIODDATA', & ! tag name
    'PERIODDATA', & ! fortran variable
    'RECARRAY PERLEN NSTP TSMULT', & ! type
    '', & ! shape
    'stress period time information', & ! longname
    .true., & ! required
    .false., & ! developmode
    .false., & ! multi-record
    .false., & ! preserve case
    .false., & ! layered
    .false. & ! timeseries
    )
 
  type(inputparamdefinitiontype), parameter :: &
    sim_tdis_aggregate_definitions(*) = &
    [ &
    simtdis_perioddata &
    ]
 
  type(inputblockdefinitiontype), parameter :: &
    sim_tdis_block_definitions(*) = &
    [ &
    inputblockdefinitiontype( &
    'OPTIONS', & ! blockname
    .false., & ! required
    .false., & ! aggregate
    .false. & ! block_variable
    ), &
    inputblockdefinitiontype( &
    'DIMENSIONS', & ! blockname
    .true., & ! required
    .false., & ! aggregate
    .false. & ! block_variable
    ), &
    inputblockdefinitiontype( &
    'PERIODDATA', & ! blockname
    .true., & ! required
    .true., & ! aggregate
    .false. & ! block_variable
    ) &
    ]
 
end module simtdisinputmodule