15 logical :: length_units = .false.
16 logical :: nogrb = .false.
17 logical :: grb_filerecord = .false.
18 logical :: grb6 = .false.
19 logical :: fileout = .false.
20 logical :: grb6_filename = .false.
21 logical :: xorigin = .false.
22 logical :: yorigin = .false.
23 logical :: angrot = .false.
24 logical :: export_ascii = .false.
25 logical :: crs = .false.
26 logical :: nodes = .false.
27 logical :: nvert = .false.
28 logical :: bottom = .false.
29 logical :: idomain = .false.
30 logical :: iv = .false.
31 logical :: xv = .false.
32 logical :: yv = .false.
33 logical :: icell2d = .false.
34 logical :: xc = .false.
35 logical :: yc = .false.
36 logical :: ncvert = .false.
37 logical :: icvert = .false.
42 character(len=16),
parameter :: &
58 'model length units', &
77 'do not write binary grid file', &
94 'RECORD GRB6 FILEOUT GRB6_FILENAME', &
153 'file name of GRB information', &
172 'x-position of the model grid origin', &
191 'y-position of the model grid origin', &
225 'EXPORT_ARRAY_ASCII', &
229 'export array variables to layered ascii files.', &
248 'CRS user input string', &
267 'number of cells per layer', &
286 'number of columns', &
305 'model bottom elevation', &
324 'idomain existence array', &
362 'x-coordinate for vertex', &
381 'y-coordinate for vertex', &
419 'x-coordinate for cell center', &
438 'y-coordinate for cell center', &
457 'number of cell vertices', &
476 'array of vertex numbers', &
521 'RECARRAY IV XV YV', &
540 'RECARRAY ICELL2D XC YC NCVERT ICVERT', &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name