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 :: voffsettol = .false.
25 logical :: export_ascii = .false.
26 logical :: crs = .false.
27 logical :: nodes = .false.
28 logical :: nja = .false.
29 logical :: nvert = .false.
30 logical :: top = .false.
31 logical :: bot = .false.
32 logical :: area = .false.
33 logical :: idomain = .false.
34 logical :: iac = .false.
35 logical :: ja = .false.
36 logical :: ihc = .false.
37 logical :: cl12 = .false.
38 logical :: hwva = .false.
39 logical :: angldegx = .false.
40 logical :: iv = .false.
41 logical :: xv = .false.
42 logical :: yv = .false.
43 logical :: icell2d = .false.
44 logical :: xc = .false.
45 logical :: yc = .false.
46 logical :: ncvert = .false.
47 logical :: icvert = .false.
52 character(len=16),
parameter :: &
68 'model length units', &
86 'do not write binary grid file', &
102 'RECORD GRB6 FILEOUT GRB6_FILENAME', &
158 'file name of GRB information', &
176 'x-position origin of the model grid coordinate system', &
194 'y-position origin of the model grid coordinate system', &
226 'VERTICAL_OFFSET_TOLERANCE', &
230 'vertical length dimension for top and bottom checking', &
244 'EXPORT_ARRAY_ASCII', &
248 'export array variables to layered ascii files.', &
266 'CRS user input string', &
284 'number of layers', &
302 'number of columns', &
320 'number of vertices', &
338 'cell top elevation', &
356 'cell bottom elevation', &
374 'cell surface area', &
392 'idomain existence array', &
410 'number of cell connections', &
428 'grid connectivity', &
464 'connection lengths', &
482 'connection lengths', &
500 'angle of face normal to connection', &
536 'x-coordinate for vertex', &
554 'y-coordinate for vertex', &
590 'x-coordinate for cell center', &
608 'y-coordinate for cell center', &
626 'number of cell vertices', &
644 'array of vertex numbers', &
698 'RECARRAY IV XV YV', &
716 'RECARRAY ICELL2D XC YC NCVERT ICVERT', &
This module contains simulation constants.
integer(i4b), parameter lenvarname
maximum length of a variable name