|
logical, public | gwe_disu_multi_package = .false. |
|
type(inputparamdefinitiontype), parameter | gwedisu_length_units = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'LENGTH_UNITS', 'LENGTH_UNITS', 'STRING', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_nogrb = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'NOGRB', 'NOGRB', 'KEYWORD', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_xorigin = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'XORIGIN', 'XORIGIN', 'DOUBLE', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_yorigin = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'YORIGIN', 'YORIGIN', 'DOUBLE', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_angrot = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'ANGROT', 'ANGROT', 'DOUBLE', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_voffsettol = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'VERTICAL_OFFSET_TOLERANCE', 'VOFFSETTOL', 'DOUBLE', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_export_ascii = InputParamDefinitionType ( 'GWE', 'DISU', 'OPTIONS', 'EXPORT_ARRAY_ASCII', 'EXPORT_ASCII', 'KEYWORD', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_nodes = InputParamDefinitionType ( 'GWE', 'DISU', 'DIMENSIONS', 'NODES', 'NODES', 'INTEGER', '', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_nja = InputParamDefinitionType ( 'GWE', 'DISU', 'DIMENSIONS', 'NJA', 'NJA', 'INTEGER', '', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_nvert = InputParamDefinitionType ( 'GWE', 'DISU', 'DIMENSIONS', 'NVERT', 'NVERT', 'INTEGER', '', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_top = InputParamDefinitionType ( 'GWE', 'DISU', 'GRIDDATA', 'TOP', 'TOP', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_bot = InputParamDefinitionType ( 'GWE', 'DISU', 'GRIDDATA', 'BOT', 'BOT', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_area = InputParamDefinitionType ( 'GWE', 'DISU', 'GRIDDATA', 'AREA', 'AREA', 'DOUBLE1D', 'NODES', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_idomain = InputParamDefinitionType ( 'GWE', 'DISU', 'GRIDDATA', 'IDOMAIN', 'IDOMAIN', 'INTEGER1D', 'NODES', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_iac = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'IAC', 'IAC', 'INTEGER1D', 'NODES', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_ja = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'JA', 'JA', 'INTEGER1D', 'NJA', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_ihc = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'IHC', 'IHC', 'INTEGER1D', 'NJA', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_cl12 = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'CL12', 'CL12', 'DOUBLE1D', 'NJA', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_hwva = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'HWVA', 'HWVA', 'DOUBLE1D', 'NJA', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_angldegx = InputParamDefinitionType ( 'GWE', 'DISU', 'CONNECTIONDATA', 'ANGLDEGX', 'ANGLDEGX', 'DOUBLE1D', 'NJA', .false., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_iv = InputParamDefinitionType ( 'GWE', 'DISU', 'VERTICES', 'IV', 'IV', 'INTEGER', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_xv = InputParamDefinitionType ( 'GWE', 'DISU', 'VERTICES', 'XV', 'XV', 'DOUBLE', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_yv = InputParamDefinitionType ( 'GWE', 'DISU', 'VERTICES', 'YV', 'YV', 'DOUBLE', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_icell2d = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'ICELL2D', 'ICELL2D', 'INTEGER', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_xc = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'XC', 'XC', 'DOUBLE', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_yc = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'YC', 'YC', 'DOUBLE', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_ncvert = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'NCVERT', 'NCVERT', 'INTEGER', '', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_icvert = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'ICVERT', 'ICVERT', 'INTEGER1D', 'NCVERT', .true., .true., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), dimension(*), parameter, public | gwe_disu_param_definitions = [ gwedisu_length_units, gwedisu_nogrb, gwedisu_xorigin, gwedisu_yorigin, gwedisu_angrot, gwedisu_voffsettol, gwedisu_export_ascii, gwedisu_nodes, gwedisu_nja, gwedisu_nvert, gwedisu_top, gwedisu_bot, gwedisu_area, gwedisu_idomain, gwedisu_iac, gwedisu_ja, gwedisu_ihc, gwedisu_cl12, gwedisu_hwva, gwedisu_angldegx, gwedisu_iv, gwedisu_xv, gwedisu_yv, gwedisu_icell2d, gwedisu_xc, gwedisu_yc, gwedisu_ncvert, gwedisu_icvert ] |
|
type(inputparamdefinitiontype), parameter | gwedisu_vertices = InputParamDefinitionType ( 'GWE', 'DISU', 'VERTICES', 'VERTICES', 'VERTICES', 'RECARRAY IV XV YV', 'NVERT', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), parameter | gwedisu_cell2d = InputParamDefinitionType ( 'GWE', 'DISU', 'CELL2D', 'CELL2D', 'CELL2D', 'RECARRAY ICELL2D XC YC NCVERT ICVERT', 'NODES', .true., .false., .false., .false., .false. ) |
|
type(inputparamdefinitiontype), dimension(*), parameter, public | gwe_disu_aggregate_definitions = [ gwedisu_vertices, gwedisu_cell2d ] |
|
type(inputblockdefinitiontype), dimension(*), parameter, public | gwe_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', .true., .true., .false. ), InputBlockDefinitionType( 'CELL2D', .true., .true., .false. ) ] |
|