| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_mnc_init.F |
107 |
FIZHI_MNC_INIT |
dn(i)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR) |
|
./pkg/fizhi/fizhi_mnc_init.F |
120 |
FIZHI_MNC_INIT |
dn(ndim)(1:1) = 'X' |
|
./pkg/fizhi/fizhi_mnc_init.F |
127 |
FIZHI_MNC_INIT |
dn(ndim)(1:3) = 'Xp1' |
|
./pkg/fizhi/fizhi_mnc_init.F |
138 |
FIZHI_MNC_INIT |
dn(ndim)(1:1) = 'Y' |
|
./pkg/fizhi/fizhi_mnc_init.F |
145 |
FIZHI_MNC_INIT |
dn(ndim)(1:3) = 'Yp1' |
|
./pkg/fizhi/fizhi_mnc_init.F |
156 |
FIZHI_MNC_INIT |
dn(ndim)(1:3) = 'Xwh' |
|
./pkg/fizhi/fizhi_mnc_init.F |
164 |
FIZHI_MNC_INIT |
dn(ndim)(1:3) = 'Ywh' |
|
./pkg/fizhi/fizhi_mnc_init.F |
175 |
FIZHI_MNC_INIT |
dn(ndim)(1:5) = 'Zphys' |
|
./pkg/fizhi/fizhi_mnc_init.F |
182 |
FIZHI_MNC_INIT |
dn(ndim)(1:7) = 'Zphysm1' |
|
./pkg/fizhi/fizhi_mnc_init.F |
192 |
FIZHI_MNC_INIT |
dn(ndim)(1:1) = 'T' |
|
./pkg/fizhi/fizhi_mnc_init.F |
201 |
FIZHI_MNC_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
216 |
FIZHI_MNC_INIT |
dn(1)(1:10) = 'X ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
220 |
FIZHI_MNC_INIT |
dn(2)(1:10) = 'Y ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
224 |
FIZHI_MNC_INIT |
dn(3)(1:10) = 'VegType ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
229 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_veg', ndim, dim, dn,ib,ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
242 |
FIZHI_MNC_INIT |
dn(1)(1:10) = 'chips ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
246 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_chip', ndim, dim, dn,ib,ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
267 |
FIZHI_MNC_INIT |
dn(1)(1:10) = 'chips ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
271 |
FIZHI_MNC_INIT |
dn(2)(1:10) = 'Zph ' |
|
./pkg/fizhi/fizhi_mnc_init.F |
275 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_chiplev',ndim,dim,dn,ib,ie,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
41 |
FIZHI_MNC_INIT |
character*(MNC_MAX_CHAR) dn(CW_MAX_LOC) |
|
./pkg/land/land_mnc_init.F |
124 |
LAND_MNC_INIT |
dn(i)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR) |
|
./pkg/land/land_mnc_init.F |
137 |
LAND_MNC_INIT |
dn(ndim)(1:1) = 'X' |
|
./pkg/land/land_mnc_init.F |
144 |
LAND_MNC_INIT |
dn(ndim)(1:3) = 'Xp1' |
|
./pkg/land/land_mnc_init.F |
155 |
LAND_MNC_INIT |
dn(ndim)(1:1) = 'Y' |
|
./pkg/land/land_mnc_init.F |
162 |
LAND_MNC_INIT |
dn(ndim)(1:3) = 'Yp1' |
|
./pkg/land/land_mnc_init.F |
173 |
LAND_MNC_INIT |
dn(ndim)(1:3) = 'Xwh' |
|
./pkg/land/land_mnc_init.F |
181 |
LAND_MNC_INIT |
dn(ndim)(1:3) = 'Ywh' |
|
./pkg/land/land_mnc_init.F |
192 |
LAND_MNC_INIT |
dn(ndim)(1:5) = 'Zland' |
|
./pkg/land/land_mnc_init.F |
202 |
LAND_MNC_INIT |
dn(ndim)(1:1) = 'T' |
|
./pkg/land/land_mnc_init.F |
211 |
LAND_MNC_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/land/land_mnc_init.F |
60 |
LAND_MNC_INIT |
character*(MNC_MAX_CHAR) dn(CW_MAX_LOC) |
|
./pkg/mnc/mnc_cw_init.F |
120 |
MNC_CW_INIT |
dn(i)(1:MNC_MAX_CHAR)=mnc_blank_name(1:MNC_MAX_CHAR) |
|
./pkg/mnc/mnc_cw_init.F |
133 |
MNC_CW_INIT |
dn(ndim)(1:1) = 'X' |
|
./pkg/mnc/mnc_cw_init.F |
140 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Xp1' |
|
./pkg/mnc/mnc_cw_init.F |
151 |
MNC_CW_INIT |
dn(ndim)(1:1) = 'Y' |
|
./pkg/mnc/mnc_cw_init.F |
158 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Yp1' |
|
./pkg/mnc/mnc_cw_init.F |
169 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Xwh' |
|
./pkg/mnc/mnc_cw_init.F |
177 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Ywh' |
|
./pkg/mnc/mnc_cw_init.F |
188 |
MNC_CW_INIT |
dn(ndim)(1:1) = 'Z' |
|
./pkg/mnc/mnc_cw_init.F |
195 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Zp1' |
|
./pkg/mnc/mnc_cw_init.F |
202 |
MNC_CW_INIT |
dn(ndim)(1:2) = 'Zl' |
|
./pkg/mnc/mnc_cw_init.F |
209 |
MNC_CW_INIT |
dn(ndim)(1:2) = 'Zu' |
|
./pkg/mnc/mnc_cw_init.F |
216 |
MNC_CW_INIT |
dn(ndim)(1:3) = 'Zm1' |
|
./pkg/mnc/mnc_cw_init.F |
225 |
MNC_CW_INIT |
dn(ndim)(1:1) = 'T' |
|
./pkg/mnc/mnc_cw_init.F |
239 |
MNC_CW_INIT |
& ' | ', (dn(i)(1:4), i=1,5) |
|
./pkg/mnc/mnc_cw_init.F |
243 |
MNC_CW_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/mnc/mnc_cw_init.F |
56 |
MNC_CW_INIT |
character*(MNC_MAX_CHAR) dn(CW_MAX_LOC) |
|
./pkg/regrid/regrid_mnc_init.F |
38 |
REGRID_MNC_INIT |
character*(MNC_MAX_CHAR) dn(CW_MAX_LOC) |
|
./pkg/aim_v23/aim_mnc_init.F |
150 |
AIM_MNC_INIT |
dn(i)(j:j) = ' ' |
|
./pkg/aim_v23/aim_mnc_init.F |
158 |
AIM_MNC_INIT |
dn(ndim)(1:1) = 'X' |
|
./pkg/aim_v23/aim_mnc_init.F |
163 |
AIM_MNC_INIT |
dn(ndim)(1:1) = 'Y' |
|
./pkg/aim_v23/aim_mnc_init.F |
168 |
AIM_MNC_INIT |
dn(ndim)(1:1) = 'T' |
|
./pkg/aim_v23/aim_mnc_init.F |
172 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_GNAME('AIM_xyt', ndim, dim,dn,ib,ie, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
174 |
AIM_MNC_INIT |
dn(ndim)(1:4) = 'Zaim' |
|
./pkg/aim_v23/aim_mnc_init.F |
179 |
AIM_MNC_INIT |
dn(ndim)(1:1) = 'T' |
|
./pkg/aim_v23/aim_mnc_init.F |
183 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_GNAME('AIM_xyzt', ndim, dim,dn,ib,ie, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
36 |
AIM_MNC_INIT |
CHARACTER*(MNC_MAX_CHAR) dn(CW_MAX_LOC) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
113 |
DIAGNOSTICS_MNC_SET |
WRITE(dn(1),'(a,i6.6)') 'Zmd', nLevOutp |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
119 |
DIAGNOSTICS_MNC_SET |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
152 |
DIAGNOSTICS_MNC_SET |
WRITE(dn(1),'(3a,i6.6)') 'Z',ctmp(i:i),'d',nlevels(listId) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
153 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_GNAME(dn(1), 1, dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
154 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_VNAME(dn(1), dn(1), 0,0, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
168 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
175 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
182 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
188 |
DIAGNOSTICS_MNC_SET |
& CALL MNC_CW_VATTR_MISSING(dn(1), 0, |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
190 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_RS_W('D',diag_mnc_bn,0,0, dn(1), ztmp, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
191 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_VNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
192 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_GNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
264 |
DIAGNOSTICS_MNC_OUT |
CHARACTER*(NLEN) dn(CW_DIMS) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
280 |
DIAGNOSTICS_MNC_OUT |
dn(ii) = ' ' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
303 |
DIAGNOSTICS_MNC_OUT |
dn(1)(1:2) = 'X' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
305 |
DIAGNOSTICS_MNC_OUT |
dn(2)(1:2) = 'Y' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
308 |
DIAGNOSTICS_MNC_OUT |
dn(1)(1:3) = 'Xp1' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
310 |
DIAGNOSTICS_MNC_OUT |
dn(2)(1:2) = 'Y' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
313 |
DIAGNOSTICS_MNC_OUT |
dn(1)(1:2) = 'X' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
315 |
DIAGNOSTICS_MNC_OUT |
dn(2)(1:3) = 'Yp1' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
318 |
DIAGNOSTICS_MNC_OUT |
dn(1)(1:3) = 'Xp1' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
320 |
DIAGNOSTICS_MNC_OUT |
dn(2)(1:3) = 'Yp1' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
325 |
DIAGNOSTICS_MNC_OUT |
WRITE(dn(3),'(a,i6.6)') 'Zd', nLevOutp |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
328 |
DIAGNOSTICS_MNC_OUT |
WRITE(dn(3),'(a,i6.6)') 'Zmd', nLevOutp |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
332 |
DIAGNOSTICS_MNC_OUT |
WRITE(dn(3),'(a,i6.6)') 'Zld', nLevOutp |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
336 |
DIAGNOSTICS_MNC_OUT |
WRITE(dn(3),'(a,i6.6)') 'Zud', nLevOutp |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
343 |
DIAGNOSTICS_MNC_OUT |
dn(4)(1:1) = 'T' |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
349 |
DIAGNOSTICS_MNC_OUT |
& dim, dn, ib, ie, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
67 |
DIAGNOSTICS_MNC_SET |
CHARACTER*(NLEN) dn(CW_DIMS) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
108 |
DIAGNOSTICS_READ_PICKUP |
dn(ii)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
111 |
DIAGNOSTICS_READ_PICKUP |
dn(1)(1:2) = 'Nd' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
115 |
DIAGNOSTICS_READ_PICKUP |
dn(2)(1:1) = 'T' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
120 |
DIAGNOSTICS_READ_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
52 |
DIAGNOSTICS_READ_PICKUP |
CHARACTER*(NLEN) dn(CW_DIMS) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
77 |
DIAGNOSTICS_READ_PICKUP |
dn(ii)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
80 |
DIAGNOSTICS_READ_PICKUP |
dn(1)(1:3) = 'Xp1' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
84 |
DIAGNOSTICS_READ_PICKUP |
dn(2)(1:3) = 'Yp1' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
88 |
DIAGNOSTICS_READ_PICKUP |
dn(3)(1:2) = 'Zd' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
92 |
DIAGNOSTICS_READ_PICKUP |
dn(4)(1:1) = 'T' |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
97 |
DIAGNOSTICS_READ_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
107 |
DIAGNOSTICS_WRITE_PICKUP |
dn(ii)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
110 |
DIAGNOSTICS_WRITE_PICKUP |
dn(1)(1:3) = 'Xp1' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
114 |
DIAGNOSTICS_WRITE_PICKUP |
dn(2)(1:3) = 'Yp1' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
118 |
DIAGNOSTICS_WRITE_PICKUP |
dn(3)(1:2) = 'Nd' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
122 |
DIAGNOSTICS_WRITE_PICKUP |
dn(4)(1:1) = 'T' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
128 |
DIAGNOSTICS_WRITE_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
143 |
DIAGNOSTICS_WRITE_PICKUP |
dn(ii)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
146 |
DIAGNOSTICS_WRITE_PICKUP |
dn(1)(1:2) = 'Nd' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
150 |
DIAGNOSTICS_WRITE_PICKUP |
dn(2)(1:1) = 'T' |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
156 |
DIAGNOSTICS_WRITE_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
63 |
DIAGNOSTICS_WRITE_PICKUP |
CHARACTER*(NLEN) dn(CW_DIMS) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
121 |
DIAGSTATS_MNC_OUT |
dn(1)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
122 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a,i6.6)') 'Zmd', kdiag(ndId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
128 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
144 |
DIAGSTATS_MNC_OUT |
dn(1)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
145 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(3a,i6.6)') 'Z',ctmp(i:i),'d',nlevels(listId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
146 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_GNAME(dn(1), 1, dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
147 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_VNAME(dn(1), dn(1), 0,0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
161 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagstats_mnc_out.F |
168 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagstats_mnc_out.F |
175 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_VATTR_TEXT(dn(1),'description', |
|
./pkg/diagnostics/diagstats_mnc_out.F |
179 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_RS_W('D',diag_mnc_bn,1,1, dn(1), ztmp, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
180 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_VNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
181 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_GNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
187 |
DIAGSTATS_MNC_OUT |
dn(ii)(1:NLEN) = dn_blnk(1:NLEN) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
191 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a,i6.6)') 'Zd', kdiag(ndId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
194 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a,i6.6)') 'Zmd', kdiag(ndId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
198 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a,i6.6)') 'Zld', kdiag(ndId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
202 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a,i6.6)') 'Zud', kdiag(ndId) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
211 |
DIAGSTATS_MNC_OUT |
dn(2)(1:6) = 'region' |
|
./pkg/diagnostics/diagstats_mnc_out.F |
215 |
DIAGSTATS_MNC_OUT |
dn(3)(1:1) = 'T' |
|
./pkg/diagnostics/diagstats_mnc_out.F |
230 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
232 |
DIAGSTATS_MNC_OUT |
WRITE(dn(1),'(a3)') 'Zd0' |
|
./pkg/diagnostics/diagstats_mnc_out.F |
236 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
66 |
DIAGSTATS_MNC_OUT |
CHARACTER*(NLEN) dn(CW_DIMS) |