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