gwt-disuidm.f90 File Reference

Go to the source code of this file.

Data Types
type	gwtdisuinputmodule::gwtdisuparamfoundtype

Modules
module	gwtdisuinputmodule

Variables
logical, public	gwtdisuinputmodule::gwt_disu_multi_package = .false.
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_length_units = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'LENGTH_UNITS', 'LENGTH_UNITS', 'STRING', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_nogrb = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'NOGRB', 'NOGRB', 'KEYWORD', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_xorigin = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'XORIGIN', 'XORIGIN', 'DOUBLE', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_yorigin = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'YORIGIN', 'YORIGIN', 'DOUBLE', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_angrot = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'ANGROT', 'ANGROT', 'DOUBLE', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_voffsettol = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'VERTICAL_OFFSET_TOLERANCE', 'VOFFSETTOL', 'DOUBLE', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_export_ascii = InputParamDefinitionType ( 'GWT', 'DISU', 'OPTIONS', 'EXPORT_ARRAY_ASCII', 'EXPORT_ASCII', 'KEYWORD', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_nodes = InputParamDefinitionType ( 'GWT', 'DISU', 'DIMENSIONS', 'NODES', 'NODES', 'INTEGER', '', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_nja = InputParamDefinitionType ( 'GWT', 'DISU', 'DIMENSIONS', 'NJA', 'NJA', 'INTEGER', '', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_nvert = InputParamDefinitionType ( 'GWT', 'DISU', 'DIMENSIONS', 'NVERT', 'NVERT', 'INTEGER', '', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_top = InputParamDefinitionType ( 'GWT', 'DISU', 'GRIDDATA', 'TOP', 'TOP', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_bot = InputParamDefinitionType ( 'GWT', 'DISU', 'GRIDDATA', 'BOT', 'BOT', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_area = InputParamDefinitionType ( 'GWT', 'DISU', 'GRIDDATA', 'AREA', 'AREA', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_idomain = InputParamDefinitionType ( 'GWT', 'DISU', 'GRIDDATA', 'IDOMAIN', 'IDOMAIN', 'INTEGER1D', 'NODES', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_iac = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'IAC', 'IAC', 'INTEGER1D', 'NODES', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_ja = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'JA', 'JA', 'INTEGER1D', 'NJA', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_ihc = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'IHC', 'IHC', 'INTEGER1D', 'NJA', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_cl12 = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'CL12', 'CL12', 'DOUBLE1D', 'NJA', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_hwva = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'HWVA', 'HWVA', 'DOUBLE1D', 'NJA', .true., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_angldegx = InputParamDefinitionType ( 'GWT', 'DISU', 'CONNECTIONDATA', 'ANGLDEGX', 'ANGLDEGX', 'DOUBLE1D', 'NJA', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_iv = InputParamDefinitionType ( 'GWT', 'DISU', 'VERTICES', 'IV', 'IV', 'INTEGER', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_xv = InputParamDefinitionType ( 'GWT', 'DISU', 'VERTICES', 'XV', 'XV', 'DOUBLE', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_yv = InputParamDefinitionType ( 'GWT', 'DISU', 'VERTICES', 'YV', 'YV', 'DOUBLE', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_icell2d = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'ICELL2D', 'ICELL2D', 'INTEGER', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_xc = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'XC', 'XC', 'DOUBLE', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_yc = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'YC', 'YC', 'DOUBLE', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_ncvert = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'NCVERT', 'NCVERT', 'INTEGER', '', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_icvert = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'ICVERT', 'ICVERT', 'INTEGER1D', 'NCVERT', .true., .true., .false., .false., .false. )
type(inputparamdefinitiontype), dimension(*), parameter, public	gwtdisuinputmodule::gwt_disu_param_definitions = [ gwtdisu_length_units, gwtdisu_nogrb, gwtdisu_xorigin, gwtdisu_yorigin, gwtdisu_angrot, gwtdisu_voffsettol, gwtdisu_export_ascii, gwtdisu_nodes, gwtdisu_nja, gwtdisu_nvert, gwtdisu_top, gwtdisu_bot, gwtdisu_area, gwtdisu_idomain, gwtdisu_iac, gwtdisu_ja, gwtdisu_ihc, gwtdisu_cl12, gwtdisu_hwva, gwtdisu_angldegx, gwtdisu_iv, gwtdisu_xv, gwtdisu_yv, gwtdisu_icell2d, gwtdisu_xc, gwtdisu_yc, gwtdisu_ncvert, gwtdisu_icvert ]
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_vertices = InputParamDefinitionType ( 'GWT', 'DISU', 'VERTICES', 'VERTICES', 'VERTICES', 'RECARRAY IV XV YV', 'NVERT', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), parameter	gwtdisuinputmodule::gwtdisu_cell2d = InputParamDefinitionType ( 'GWT', 'DISU', 'CELL2D', 'CELL2D', 'CELL2D', 'RECARRAY ICELL2D XC YC NCVERT ICVERT', 'NODES', .false., .false., .false., .false., .false. )
type(inputparamdefinitiontype), dimension(*), parameter, public	gwtdisuinputmodule::gwt_disu_aggregate_definitions = [ gwtdisu_vertices, gwtdisu_cell2d ]
type(inputblockdefinitiontype), dimension(*), parameter, public	gwtdisuinputmodule::gwt_disu_block_definitions = [ InputBlockDefinitionType( 'OPTIONS', .false., .false., .false. ), InputBlockDefinitionType( 'DIMENSIONS', .true., .false., .false. ), InputBlockDefinitionType( 'GRIDDATA', .true., .false., .false. ), InputBlockDefinitionType( 'CONNECTIONDATA', .true., .false., .false. ), InputBlockDefinitionType( 'VERTICES', .false., .true., .false. ), InputBlockDefinitionType( 'CELL2D', .false., .true., .false. ) ]