File |
Line number |
Procedure |
Code |
./pkg/exf/exf_ad_dump.F |
104 |
EXF_AD_DUMP |
& adatemp, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
107 |
EXF_AD_DUMP |
& adaqh, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
10 |
EXF_AD_DUMP |
SUBROUTINE EXF_AD_DUMP( myTime, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
110 |
EXF_AD_DUMP |
& adlwflux, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
113 |
EXF_AD_DUMP |
& adprecip, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
118 |
EXF_AD_DUMP |
& adrunoff, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
124 |
EXF_AD_DUMP |
& aduwind, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
127 |
EXF_AD_DUMP |
& advwind, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
133 |
EXF_AD_DUMP |
& adswdown, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
136 |
EXF_AD_DUMP |
& adlwdown, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
48 |
EXF_AD_DUMP |
INTEGER myIter |
./pkg/exf/exf_ad_dump.F |
78 |
EXF_AD_DUMP |
WRITE(suff,'(I10.10)') myIter |
./pkg/exf/exf_ad_dump.F |
80 |
EXF_AD_DUMP |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
90 |
EXF_AD_DUMP |
& adhflux, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
93 |
EXF_AD_DUMP |
& adsflux, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
96 |
EXF_AD_DUMP |
& adustress, 1, myIter, myThid ) |
./pkg/exf/exf_ad_dump.F |
99 |
EXF_AD_DUMP |
& advstress, 1, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
100 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_aqh, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
102 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_precip, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
106 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_uwind, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
108 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_vwind, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
112 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_swdown, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
116 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_climsst, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
11 |
G_EXF_ADJOINT_SNAPSHOTS |
& iwhen, myTime, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
120 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_climsss, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
46 |
G_EXF_ADJOINT_SNAPSHOTS |
INTEGER myIter |
./pkg/exf/exf_adjoint_snapshots__g.F |
73 |
G_EXF_ADJOINT_SNAPSHOTS |
WRITE(suff,'(I10.10)') myIter |
./pkg/exf/exf_adjoint_snapshots__g.F |
75 |
G_EXF_ADJOINT_SNAPSHOTS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
86 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_ustress, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
88 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_vstress, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
90 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_hflux, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
92 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_sflux, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
98 |
G_EXF_ADJOINT_SNAPSHOTS |
& suff, g_atemp, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
109 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adustress, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
111 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, advstress, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
113 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adhflux, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
115 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adsflux, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
121 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adatemp, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
123 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adaqh, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
125 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adprecip, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
129 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adrunoff, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
134 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, aduwind, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
136 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, advwind, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
141 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adswdown, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
143 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adlwdown, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
147 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adclimsst, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
14 |
ADEXF_ADJOINT_SNAPSHOTS |
& iwhen, myTime, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
151 |
ADEXF_ADJOINT_SNAPSHOTS |
& suff, adclimsss, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
156 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJtaux.',suff, adfu, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
157 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJtauy.',suff, adfv, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
158 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJqnet.',suff, adqnet, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
159 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJempr.',suff, adempmr, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
161 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL WRITE_FLD_XY_RS ( 'ADJqsw.',suff, adqsw, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
171 |
ADEXF_ADJOINT_SNAPSHOTS |
& adustress, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
173 |
ADEXF_ADJOINT_SNAPSHOTS |
& advstress, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
175 |
ADEXF_ADJOINT_SNAPSHOTS |
& adhflux, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
177 |
ADEXF_ADJOINT_SNAPSHOTS |
& adsflux, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
183 |
ADEXF_ADJOINT_SNAPSHOTS |
& adatemp, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
185 |
ADEXF_ADJOINT_SNAPSHOTS |
& adaqh, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
187 |
ADEXF_ADJOINT_SNAPSHOTS |
& adprecip, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
191 |
ADEXF_ADJOINT_SNAPSHOTS |
& adrunoff, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
196 |
ADEXF_ADJOINT_SNAPSHOTS |
& aduwind, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
198 |
ADEXF_ADJOINT_SNAPSHOTS |
& advwind, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
203 |
ADEXF_ADJOINT_SNAPSHOTS |
& adswdown, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
205 |
ADEXF_ADJOINT_SNAPSHOTS |
& adlwdown, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
209 |
ADEXF_ADJOINT_SNAPSHOTS |
& adclimsst, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
213 |
ADEXF_ADJOINT_SNAPSHOTS |
& adclimsss, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
219 |
ADEXF_ADJOINT_SNAPSHOTS |
& adfu, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
221 |
ADEXF_ADJOINT_SNAPSHOTS |
& adfv, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
223 |
ADEXF_ADJOINT_SNAPSHOTS |
& adqnet, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
225 |
ADEXF_ADJOINT_SNAPSHOTS |
& adempmr, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
228 |
ADEXF_ADJOINT_SNAPSHOTS |
& adqsw, dumpAdRecEx, myIter, myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
243 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL MNC_CW_I_W_S('I','adexf',0,0,'iter',myIter,myThid) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
299 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL ADEXF_MONITOR ( iwhen, myTime, myIter, myThid ) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
57 |
ADEXF_ADJOINT_SNAPSHOTS |
integer myIter |
./pkg/exf/exf_adjoint_snapshots_ad.F |
84 |
ADEXF_ADJOINT_SNAPSHOTS |
WRITE(suff,'(I10.10)') myIter |
./pkg/exf/exf_adjoint_snapshots_ad.F |
86 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/exf/exf_bulkformulae.F |
12 |
EXF_BULKFORMULAE |
SUBROUTINE EXF_BULKFORMULAE( myTime, myIter, myThid ) |
./pkg/exf/exf_bulkformulae.F |
166 |
EXF_BULKFORMULAE |
INTEGER myIter |
./pkg/exf/exf_check_range.F |
104 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, vwind(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
115 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, wspeed(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
127 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, atemp(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
137 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, aqh(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
147 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, precip(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
158 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, snowprecip(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
170 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, swflux(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
182 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, runoff(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
200 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, runoff(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
26 |
EXF_CHECK_RANGE |
INTEGER myIter, myThid |
./pkg/exf/exf_check_range.F |
58 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, hflux(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
67 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, sflux(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
6 |
EXF_CHECK_RANGE |
SUBROUTINE EXF_CHECK_RANGE( myTime, myIter, myThid ) |
./pkg/exf/exf_check_range.F |
76 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, ustress(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
85 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, vstress(i,j,bi,bj) |
./pkg/exf/exf_check_range.F |
95 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, uwind(i,j,bi,bj) |
./pkg/exf/exf_diagnostics_fill.F |
26 |
EXF_DIAGNOSTICS_FILL |
INTEGER myIter |
./pkg/exf/exf_diagnostics_fill.F |
7 |
EXF_DIAGNOSTICS_FILL |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
109 |
EXF_GETCLIM |
& wsst, myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
125 |
EXF_GETCLIM |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
137 |
EXF_GETCLIM |
& wsss, myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
13 |
EXF_GETCLIM |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
163 |
EXF_GETCLIM |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getclim.F |
191 |
EXF_GETCLIM |
IF ( myIter .EQ. niter0 ) THEN |
./pkg/exf/exf_getclim.F |
64 |
EXF_GETCLIM |
INTEGER myIter |
./pkg/exf/exf_getclim.F |
85 |
EXF_GETCLIM |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffieldrec.F |
14 |
EXF_GETFFIELDREC |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffieldrec.F |
158 |
EXF_GETFFIELDREC |
CALL CAL_GETDATE( myIter, myTime, mydate, myThid ) |
./pkg/exf/exf_getffieldrec.F |
214 |
EXF_GETFFIELDREC |
first = ( myIter.EQ.nIter0 ) |
./pkg/exf/exf_getffieldrec.F |
231 |
EXF_GETFFIELDREC |
first = ( myIter .EQ.nIter0 ) |
./pkg/exf/exf_getffieldrec.F |
239 |
EXF_GETFFIELDREC |
& '" @ Iter=', myIter, ' , myTime=', myTime |
./pkg/exf/exf_getffieldrec.F |
51 |
EXF_GETFFIELDREC |
INTEGER myIter, myThid |
./pkg/exf/exf_getffields.F |
121 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
12 |
EXF_GETFFIELDS |
SUBROUTINE EXF_GETFFIELDS( myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
142 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
184 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
197 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
212 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
234 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
249 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
262 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
277 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
291 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
305 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
320 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
349 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
365 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
378 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
395 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
411 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
427 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
442 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
457 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
473 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
504 |
EXF_GETFFIELDS |
& watemp, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
512 |
EXF_GETFFIELDS |
& waqh, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
520 |
EXF_GETFFIELDS |
& wprecip, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
528 |
EXF_GETFFIELDS |
& wswdown, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
536 |
EXF_GETFFIELDS |
& wlwdown, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
546 |
EXF_GETFFIELDS |
& wswflux, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
554 |
EXF_GETFFIELDS |
& wswflux, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
55 |
EXF_GETFFIELDS |
INTEGER myIter |
./pkg/exf/exf_getffields.F |
562 |
EXF_GETFFIELDS |
& wevap, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
572 |
EXF_GETFFIELDS |
& wsnowprecip, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
582 |
EXF_GETFFIELDS |
& wapressure, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
593 |
EXF_GETFFIELDS |
& wuwind, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
601 |
EXF_GETFFIELDS |
& wvwind, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
611 |
EXF_GETFFIELDS |
& wuwind, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
617 |
EXF_GETFFIELDS |
& wvwind, myTime, myIter, myThid ) |
./pkg/exf/exf_getffields.F |
95 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
139 |
EXF_GETFORCING |
INTEGER myIter |
./pkg/exf/exf_getforcing.F |
150 |
EXF_GETFORCING |
CALL EXF_GETCLIM( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
161 |
EXF_GETFORCING |
CALL EXF_GETFFIELDS( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
170 |
EXF_GETFORCING |
CALL EXF_ADJOINT_SNAPSHOTS( 2, myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
176 |
EXF_GETFORCING |
CALL EXF_RADIATION( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
187 |
EXF_GETFORCING |
CALL EXF_WIND( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
199 |
EXF_GETFORCING |
CALL EXF_BULKFORMULAE( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
260 |
EXF_GETFORCING |
CALL EXF_GETSURFACEFLUXES( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
263 |
EXF_GETFORCING |
& ( myIter.EQ.nIter0 .OR. exf_debugLev.GE.debLevC ) ) THEN |
./pkg/exf/exf_getforcing.F |
264 |
EXF_GETFORCING |
CALL EXF_CHECK_RANGE( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
269 |
EXF_GETFORCING |
CALL EXF_ADJOINT_SNAPSHOTS( 1, myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
293 |
EXF_GETFORCING |
CALL EXF_DIAGNOSTICS_FILL( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
296 |
EXF_GETFORCING |
CALL EXF_MONITOR( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
299 |
EXF_GETFORCING |
CALL EXF_MAPFIELDS( myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
304 |
EXF_GETFORCING |
& CALL EXF_ADJOINT_SNAPSHOTS( 3, myTime, myIter, myThid ) |
./pkg/exf/exf_getforcing.F |
98 |
EXF_GETFORCING |
SUBROUTINE EXF_GETFORCING( myTime, myIter, myThid ) |
./pkg/exf/exf_interp.F |
20 |
EXF_INTERP |
I nxIn, nyIn, method, myIter, myThid ) |
./pkg/exf/exf_interp.F |
315 |
EXF_INTERP |
& .OR. ( exf_debugLev.GE.debLevB .AND. myIter.LE.nIter0 ) |
./pkg/exf/exf_interp.F |
69 |
EXF_INTERP |
INTEGER method, myIter, myThid |
./pkg/exf/exf_interp_uv.F |
21 |
EXF_INTERP_UV |
I methodU, methodV, myIter, myThid ) |
./pkg/exf/exf_interp_uv.F |
338 |
EXF_INTERP_UV |
& .OR. ( exf_debugLev.GE.debLevB .AND. myIter.LE.nIter0 ) |
./pkg/exf/exf_interp_uv.F |
77 |
EXF_INTERP_UV |
INTEGER methodU, methodV, myIter, myThid |
./pkg/exf/exf_mapfields.F |
13 |
EXF_MAPFIELDS |
SUBROUTINE EXF_MAPFIELDS( myTime, myIter, myThid ) |
./pkg/exf/exf_mapfields.F |
77 |
EXF_MAPFIELDS |
INTEGER myIter |
./pkg/exf/exf_monitor.F |
108 |
EXF_MONITOR |
CALL MON_OUT_I ('_tsnumber', myIter,mon_string_none,myThid) |
./pkg/exf/exf_monitor.F |
12 |
EXF_MONITOR |
I myTime, myIter, myThid ) |
./pkg/exf/exf_monitor.F |
38 |
EXF_MONITOR |
INTEGER myIter |
./pkg/exf/exf_monitor_ad.F |
107 |
ADEXF_MONITOR |
CALL MON_OUT_I ('_tsnumber', myIter,mon_string_none,myThid) |
./pkg/exf/exf_monitor_ad.F |
15 |
ADEXF_MONITOR |
I iwhen, myTime, myIter, myThid ) |
./pkg/exf/exf_monitor_ad.F |
43 |
ADEXF_MONITOR |
INTEGER myIter |
./pkg/exf/exf_radiation.F |
142 |
EXF_RADIATION |
CALL EXF_ZENITHANGLE(myTime, myIter, myThid) |
./pkg/exf/exf_radiation.F |
41 |
EXF_RADIATION |
INTEGER myIter |
./pkg/exf/exf_radiation.F |
9 |
EXF_RADIATION |
SUBROUTINE EXF_RADIATION( myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
135 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
151 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
157 |
EXF_SET_FLD |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/exf/exf_set_fld.F |
172 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
177 |
EXF_SET_FLD |
& 'field "', fldName, '", it=', myIter, |
./pkg/exf/exf_set_fld.F |
199 |
EXF_SET_FLD |
I fld_nlon, fld_nlat, interp_method, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
19 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
203 |
EXF_SET_FLD |
& fld1, count0, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
213 |
EXF_SET_FLD |
& CALL WRITE_REC_XY_RL( out_file, fld1, 1, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
214 |
EXF_SET_FLD |
CALL WRITE_REC_XY_RL( out_file,fld1,count0,myIter,myThid ) |
./pkg/exf/exf_set_fld.F |
231 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
236 |
EXF_SET_FLD |
& 'field "', fldName, '", it=', myIter, |
./pkg/exf/exf_set_fld.F |
258 |
EXF_SET_FLD |
I fld_nlon, fld_nlat, interp_method, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
262 |
EXF_SET_FLD |
& fld1, count1, myIter, myThid ) |
./pkg/exf/exf_set_fld.F |
271 |
EXF_SET_FLD |
CALL WRITE_REC_XY_RL( out_file,fld1,count1,myIter,myThid ) |
./pkg/exf/exf_set_fld.F |
92 |
EXF_SET_FLD |
INTEGER myIter |
./pkg/exf/exf_set_gen.F |
21 |
EXF_SET_GEN |
& myTime, myIter, myThid ) |
./pkg/exf/exf_set_gen.F |
47 |
EXF_SET_GEN |
INTEGER myIter |
./pkg/exf/exf_set_gen.F |
81 |
EXF_SET_GEN |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
129 |
EXF_SET_OBCS_YZ |
I myTime, myIter, myThid) |
./pkg/exf/exf_set_obcs.F |
166 |
EXF_SET_OBCS_YZ |
INTEGER myIter |
./pkg/exf/exf_set_obcs.F |
187 |
EXF_SET_OBCS_YZ |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
191 |
EXF_SET_OBCS_YZ |
& obcs_yz_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
202 |
EXF_SET_OBCS_YZ |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
206 |
EXF_SET_OBCS_YZ |
& obcs_yz_1, count1, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
20 |
EXF_SET_OBCS_XZ |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
236 |
EXF_SET_OBCS_X |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
273 |
EXF_SET_OBCS_X |
INTEGER myIter |
./pkg/exf/exf_set_obcs.F |
295 |
EXF_SET_OBCS_X |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
298 |
EXF_SET_OBCS_X |
& obcs_x_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
308 |
EXF_SET_OBCS_X |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
311 |
EXF_SET_OBCS_X |
& obcs_x_1, count1, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
338 |
EXF_SET_OBCS_Y |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
374 |
EXF_SET_OBCS_Y |
INTEGER myIter |
./pkg/exf/exf_set_obcs.F |
396 |
EXF_SET_OBCS_Y |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
399 |
EXF_SET_OBCS_Y |
& obcs_y_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
409 |
EXF_SET_OBCS_Y |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
412 |
EXF_SET_OBCS_Y |
& obcs_y_1, count1, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
59 |
EXF_SET_OBCS_XZ |
INTEGER myIter |
./pkg/exf/exf_set_obcs.F |
80 |
EXF_SET_OBCS_XZ |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
84 |
EXF_SET_OBCS_XZ |
& obcs_xz_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
95 |
EXF_SET_OBCS_XZ |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
99 |
EXF_SET_OBCS_XZ |
& obcs_xz_1, count1, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
100 |
EXF_SET_UV |
INTEGER myIter |
./pkg/exf/exf_set_uv.F |
157 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
173 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
178 |
EXF_SET_UV |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/exf/exf_set_uv.F |
195 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
200 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
204 |
EXF_SET_UV |
& 'fields "', uVecName, '" & "', vVecName, '", it=', myIter |
./pkg/exf/exf_set_uv.F |
232 |
EXF_SET_UV |
I u_interp_method, v_interp_method, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
245 |
EXF_SET_UV |
I myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
256 |
EXF_SET_UV |
I myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
25 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
267 |
EXF_SET_UV |
& CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
268 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,count0,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
272 |
EXF_SET_UV |
& CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
273 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,count0,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
360 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
365 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
369 |
EXF_SET_UV |
& 'fields "', uVecName, '" & "', vVecName, '", it=', myIter |
./pkg/exf/exf_set_uv.F |
397 |
EXF_SET_UV |
I u_interp_method, v_interp_method, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
410 |
EXF_SET_UV |
I myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
421 |
EXF_SET_UV |
I myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
431 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_uVecFile,tmp_u,count1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
434 |
EXF_SET_UV |
CALL WRITE_REC_XY_RL(out_vVecFile,tmp_v,count1,myIter,myThid) |
./pkg/exf/exf_set_uv.F |
541 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_set_uv.F |
552 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
./pkg/exf/exf_wind.F |
12 |
EXF_WIND |
SUBROUTINE EXF_WIND( myTime, myIter, myThid ) |
./pkg/exf/exf_wind.F |
50 |
EXF_WIND |
INTEGER myIter |
./pkg/exf/exf_zenithangle.F |
10 |
EXF_ZENITHANGLE |
I myTime, myIter, myThid ) |
./pkg/exf/exf_zenithangle.F |
37 |
EXF_ZENITHANGLE |
INTEGER myIter |
./pkg/exf/exf_zenithangle.F |
75 |
EXF_ZENITHANGLE |
CALL CAL_GETDATE( myIter, myTime, mydate, myThid ) |
./pkg/fizhi/do_fizhi.F |
34 |
DO_FIZHI |
INTEGER myIter,myid,im1,im2,jm1,jm2,idim1,idim2,jdim1,jdim2 |
./pkg/fizhi/do_fizhi.F |
4 |
DO_FIZHI |
SUBROUTINE DO_FIZHI(myIter,myid, |
./pkg/fizhi/fizhi_read_pickup.F |
102 |
FIZHI_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_fizhi.',myIter |
./pkg/fizhi/fizhi_read_pickup.F |
35 |
FIZHI_READ_PICKUP |
INTEGER myIter |
./pkg/fizhi/fizhi_read_pickup.F |
50 |
FIZHI_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_fizhi.',myIter |
./pkg/fizhi/fizhi_read_pickup.F |
56 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,uphy, 1,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
57 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,vphy, 2,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
58 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,thphy, 3,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
59 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,sphy, 4,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
60 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldtot_lw, 5,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
61 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldras_lw, 6,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
62 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldlsp_lw, 7,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
63 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,lwlz, 8,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
64 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldtot_sw, 9,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
65 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldras_sw,10,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
66 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,cldlsp_sw,11,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
67 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,swlz, 12,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
68 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,qliqavelw,13,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
69 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,qliqavesw,14,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
70 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,fccavelw, 15,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
71 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,fccavesw, 16,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
72 |
FIZHI_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,Nrphys,temp, 17,myIter,myThid ) |
./pkg/fizhi/fizhi_read_pickup.F |
9 |
FIZHI_READ_PICKUP |
SUBROUTINE FIZHI_READ_PICKUP( myIter, myThid ) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
39 |
FIZHI_WRITE_VEGTILES |
INTEGER myIter |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
76 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_I_W_S('I',bnam,0,0,'iter',myIter,myThid) |
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
9 |
FIZHI_WRITE_VEGTILES |
SUBROUTINE FIZHI_WRITE_VEGTILES(fn,pickupflg,myTime,myIter,myThid) |
./pkg/fizhi/fizhi_tendency_apply.F |
121 |
FIZHI_TENDENCY_APPLY_V |
INTEGER myIter |
./pkg/fizhi/fizhi_tendency_apply.F |
174 |
FIZHI_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_tendency_apply.F |
203 |
FIZHI_TENDENCY_APPLY_T |
INTEGER myIter |
./pkg/fizhi/fizhi_tendency_apply.F |
283 |
FIZHI_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_tendency_apply.F |
312 |
FIZHI_TENDENCY_APPLY_S |
INTEGER myIter |
./pkg/fizhi/fizhi_tendency_apply.F |
38 |
FIZHI_TENDENCY_APPLY_U |
INTEGER myIter |
./pkg/fizhi/fizhi_tendency_apply.F |
8 |
FIZHI_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_tendency_apply.F |
91 |
FIZHI_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_update_time.F |
20 |
FIZHI_UPDATE_TIME |
integer myIter, myThid |
./pkg/fizhi/fizhi_update_time.F |
5 |
FIZHI_UPDATE_TIME |
subroutine FIZHI_UPDATE_TIME (myIter,myThid,deltat) |
./pkg/fizhi/fizhi_wrapper.F |
260 |
FIZHI_WRAPPER |
turbStart(bi,bj) = turbStart(bi,bj) .AND. ( myIter.EQ.nIter0 ) |
./pkg/fizhi/fizhi_wrapper.F |
262 |
FIZHI_WRAPPER |
call DO_FIZHI(myIter,myThid, |
./pkg/fizhi/fizhi_wrapper.F |
37 |
FIZHI_WRAPPER |
INTEGER myIter, myThid |
./pkg/fizhi/fizhi_wrapper.F |
5 |
FIZHI_WRAPPER |
SUBROUTINE FIZHI_WRAPPER (myTime, myIter, myThid) |
./pkg/fizhi/fizhi_write_datetime.F |
19 |
FIZHI_WRITE_DATETIME |
integer myIter, myThid |
./pkg/fizhi/fizhi_write_datetime.F |
9 |
FIZHI_WRITE_DATETIME |
SUBROUTINE FIZHI_WRITE_DATETIME( myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_write_pickup.F |
112 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,temp,17,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
38 |
FIZHI_WRITE_PICKUP |
INTEGER myIter |
./pkg/fizhi/fizhi_write_pickup.F |
73 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,uphy, 1,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
74 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,vphy, 2,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
75 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,thphy, 3,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
76 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,sphy, 4,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
78 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldtot_lw, 5,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
79 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldras_lw, 6,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
80 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldlsp_lw, 7,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
81 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,lwlz, 8,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
82 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldtot_sw, 9,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
83 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldras_sw,10,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
84 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,cldlsp_sw,11,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
85 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,swlz, 12,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
86 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,qliqavelw,13,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
87 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,qliqavesw,14,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
88 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,fccavelw, 15,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
89 |
FIZHI_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,prec,Nrphys,fccavesw, 16,myIter,myThid) |
./pkg/fizhi/fizhi_write_pickup.F |
8 |
FIZHI_WRITE_PICKUP |
SUBROUTINE FIZHI_WRITE_PICKUP( suff, myTime, myIter, myThid ) |
./pkg/fizhi/fizhi_write_state.F |
37 |
FIZHI_WRITE_STATE |
INTEGER myIter |
./pkg/fizhi/fizhi_write_state.F |
59 |
FIZHI_WRITE_STATE |
WRITE( fn, '(A,I10.10)' ) 'fizhi_U.', myIter |
./pkg/fizhi/fizhi_write_state.F |
60 |
FIZHI_WRITE_STATE |
CALL WRITE_REC_3D_RL( fn,prec, Nrphys, uphy, 1, myIter,myThid ) |
./pkg/fizhi/fizhi_write_state.F |
61 |
FIZHI_WRITE_STATE |
WRITE( fn, '(A,I10.10)' ) 'fizhi_V.', myIter |
./pkg/fizhi/fizhi_write_state.F |
62 |
FIZHI_WRITE_STATE |
CALL WRITE_REC_3D_RL( fn,prec, Nrphys, vphy, 1, myIter,myThid ) |
./pkg/fizhi/fizhi_write_state.F |
63 |
FIZHI_WRITE_STATE |
WRITE( fn, '(A,I10.10)' ) 'fizhi_T.', myIter |
./pkg/fizhi/fizhi_write_state.F |
64 |
FIZHI_WRITE_STATE |
CALL WRITE_REC_3D_RL( fn,prec, Nrphys, thphy, 1, myIter,myThid ) |
./pkg/fizhi/fizhi_write_state.F |
65 |
FIZHI_WRITE_STATE |
WRITE( fn, '(A,I10.10)' ) 'fizhi_S.', myIter |
./pkg/fizhi/fizhi_write_state.F |
66 |
FIZHI_WRITE_STATE |
CALL WRITE_REC_3D_RL( fn,prec, Nrphys, sphy, 1, myIter,myThid ) |
./pkg/fizhi/fizhi_write_state.F |
8 |
FIZHI_WRITE_STATE |
SUBROUTINE FIZHI_WRITE_STATE( myTime, myIter, myThid ) |
./pkg/fizhi/step_fizhi_corr.F |
35 |
STEP_FIZHI_CORR |
integer myIter, myThid |
./pkg/fizhi/step_fizhi_corr.F |
5 |
STEP_FIZHI_CORR |
subroutine STEP_FIZHI_CORR (myTime, myIter, myThid, dt) |
./pkg/fizhi/step_fizhi_fg.F |
24 |
STEP_FIZHI_FG |
integer myIter, myThid |
./pkg/fizhi/step_fizhi_fg.F |
5 |
STEP_FIZHI_FG |
subroutine STEP_FIZHI_FG (myTime, myIter, myThid, dt) |
./pkg/fizhi/update_chemistry_exports.F |
26 |
UPDATE_CHEMISTRY_EXPORTS |
integer myIter, myThid |
./pkg/fizhi/update_chemistry_exports.F |
5 |
UPDATE_CHEMISTRY_EXPORTS |
subroutine UPDATE_CHEMISTRY_EXPORTS (myTime, myIter, myThid) |
./pkg/fizhi/update_earth_exports.F |
17 |
UPDATE_EARTH_EXPORTS |
SUBROUTINE UPDATE_EARTH_EXPORTS (myTime, myIter, myThid) |
./pkg/fizhi/update_earth_exports.F |
42 |
UPDATE_EARTH_EXPORTS |
INTEGER myIter, myThid |
./pkg/fizhi/update_ocean_exports.F |
25 |
UPDATE_OCEAN_EXPORTS |
integer myIter, myThid |
./pkg/fizhi/update_ocean_exports.F |
5 |
UPDATE_OCEAN_EXPORTS |
subroutine UPDATE_OCEAN_EXPORTS (myTime, myIter, myThid) |
./pkg/flt/flt_down.F |
27 |
FLT_DOWN |
INTEGER myIter, myThid |
./pkg/flt/flt_down.F |
7 |
FLT_DOWN |
I myTime, myIter, myThid ) |
./pkg/flt/flt_exch2.F |
356 |
FLT_EXCH2 |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 0x', myIter |
./pkg/flt/flt_exch2.F |
364 |
FLT_EXCH2 |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH2: 1x', myIter |
./pkg/flt/flt_exch2.F |
375 |
FLT_EXCH2 |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH2: 2x', myIter |
./pkg/flt/flt_exch2.F |
37 |
FLT_EXCH2 |
INTEGER myIter, myThid |
./pkg/flt/flt_exch2.F |
8 |
FLT_EXCH2 |
I myTime, myIter, myThid ) |
./pkg/flt/flt_exchg.F |
212 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 0x', myIter |
./pkg/flt/flt_exchg.F |
219 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 1x', myIter |
./pkg/flt/flt_exchg.F |
226 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 2x', myIter |
./pkg/flt/flt_exchg.F |
30 |
FLT_EXCHG |
INTEGER myIter, myThid |
./pkg/flt/flt_exchg.F |
454 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 0y', myIter |
./pkg/flt/flt_exchg.F |
461 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 1y', myIter |
./pkg/flt/flt_exchg.F |
468 |
FLT_EXCHG |
WRITE(errorMessageUnit,'(A,I8)') 'FLT_EXCH: 2y', myIter |
./pkg/flt/flt_exchg.F |
8 |
FLT_EXCHG |
I myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
113 |
FLT_MAIN |
CALL FLT_RUNGA2( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
119 |
FLT_MAIN |
CALL FLT_RUNGA4( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
131 |
FLT_MAIN |
CALL FLT_EXCH2( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
133 |
FLT_MAIN |
CALL FLT_EXCHG( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
145 |
FLT_MAIN |
CALL FLT_UP( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
154 |
FLT_MAIN |
CALL FLT_DOWN( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
167 |
FLT_MAIN |
CALL FLT_TRAJ( myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
58 |
FLT_MAIN |
I myTime, myIter, myThid ) |
./pkg/flt/flt_main.F |
93 |
FLT_MAIN |
INTEGER myIter, myThid |
./pkg/flt/flt_runga2.F |
35 |
FLT_RUNGA2 |
INTEGER myIter, myThid |
./pkg/flt/flt_runga2.F |
8 |
FLT_RUNGA2 |
I myTime, myIter, myThid ) |
./pkg/flt/flt_runga4.F |
35 |
FLT_RUNGA4 |
INTEGER myIter, myThid |
./pkg/flt/flt_runga4.F |
8 |
FLT_RUNGA4 |
I myTime, myIter, myThid ) |
./pkg/flt/flt_traj.F |
11 |
FLT_TRAJ |
I myTime, myIter, myThid ) |
./pkg/flt/flt_traj.F |
229 |
FLT_TRAJ |
& bi, bj, -1, myIter, myThid ) |
./pkg/flt/flt_traj.F |
237 |
FLT_TRAJ |
I bi, bj, irecord, myIter, myThid ) |
./pkg/flt/flt_traj.F |
40 |
FLT_TRAJ |
INTEGER myIter, myThid |
./pkg/flt/flt_traj.F |
86 |
FLT_TRAJ |
IF ( myIter.EQ.nIter0 .OR. flt_selectTrajOutp.LE.0 ) RETURN |
./pkg/flt/flt_up.F |
11 |
FLT_UP |
I myTime, myIter, myThid ) |
./pkg/flt/flt_up.F |
227 |
FLT_UP |
& bi, bj, -1, myIter, myThid ) |
./pkg/flt/flt_up.F |
235 |
FLT_UP |
& bi, bj, irecord, myIter, myThid ) |
./pkg/flt/flt_up.F |
38 |
FLT_UP |
INTEGER myIter, myThid |
./pkg/flt/flt_up.F |
80 |
FLT_UP |
IF ( myIter.EQ.nIter0 ) RETURN |
./pkg/flt/flt_write_pickup.F |
34 |
FLT_WRITE_PICKUP |
INTEGER myIter, myThid |
./pkg/flt/flt_write_pickup.F |
65 |
FLT_WRITE_PICKUP |
tmp(2) = myIter |
./pkg/flt/flt_write_pickup.F |
77 |
FLT_WRITE_PICKUP |
& bi,bj,-1, myIter, myThid ) |
./pkg/flt/flt_write_pickup.F |
8 |
FLT_WRITE_PICKUP |
I suff, myTime, myIter, myThid ) |
./pkg/flt/flt_write_pickup.F |
96 |
FLT_WRITE_PICKUP |
& bi,bj,irecord, myIter, myThid ) |
./pkg/frazil/frazil_calc_rhs.F |
11 |
FRAZIL_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/frazil/frazil_calc_rhs.F |
34 |
FRAZIL_CALC_RHS |
INTEGER myIter |
./pkg/frazil/frazil_tendency_apply.F |
16 |
FRAZIL_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
./pkg/frazil/frazil_tendency_apply.F |
46 |
FRAZIL_TENDENCY_APPLY_T |
INTEGER myIter |
./pkg/gchem/gchem_add_tendency.F |
13 |
GCHEM_ADD_TENDENCY |
I iTr, myTime, myIter, myThid ) |
./pkg/gchem/gchem_add_tendency.F |
43 |
GCHEM_ADD_TENDENCY |
INTEGER myIter, myThid |
./pkg/gchem/gchem_calc_tendency.F |
111 |
GCHEM_CALC_TENDENCY |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_calc_tendency.F |
118 |
GCHEM_CALC_TENDENCY |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_calc_tendency.F |
11 |
GCHEM_CALC_TENDENCY |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_calc_tendency.F |
47 |
GCHEM_CALC_TENDENCY |
INTEGER myIter, myThid |
./pkg/gchem/gchem_fields_load.F |
11 |
GCHEM_FIELDS_LOAD |
I myTime, myIter, myThid) |
./pkg/gchem/gchem_fields_load.F |
25 |
GCHEM_FIELDS_LOAD |
INTEGER myIter |
./pkg/gchem/gchem_fields_load.F |
38 |
GCHEM_FIELDS_LOAD |
CALL DIC_FIELDS_LOAD (myIter,myTime,myThid) |
./pkg/gchem/gchem_fields_load.F |
44 |
GCHEM_FIELDS_LOAD |
CALL BLING_FIELDS_LOAD (myIter,myTime,myThid) |
./pkg/gchem/gchem_fields_load.F |
50 |
GCHEM_FIELDS_LOAD |
CALL CFC_FIELDS_LOAD( myTime, myIter, myThid ) |
./pkg/gchem/gchem_fields_load.F |
56 |
GCHEM_FIELDS_LOAD |
CALl DARWIN_FIELDS_LOAD(myIter,myTime,myThid) |
./pkg/gchem/gchem_forcing_sep.F |
132 |
GCHEM_FORCING_SEP |
CALL DARWIN_CONS( myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
162 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
171 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
178 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
18 |
GCHEM_FORCING_SEP |
SUBROUTINE GCHEM_FORCING_SEP( myTime, myIter, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
202 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
216 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
219 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
222 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
225 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
235 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
262 |
GCHEM_FORCING_SEP |
CALL DARWIN_CONS( myIter, myTime, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
264 |
GCHEM_FORCING_SEP |
CALL DIC_ATMOS( 1, myTime, myIter, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
278 |
GCHEM_FORCING_SEP |
CALL DIC_ATMOS( myTime, myIter, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
280 |
GCHEM_FORCING_SEP |
CALL DIC_STORE_FLUXCO2( myTime, myIter, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
283 |
GCHEM_FORCING_SEP |
CALL DIC_COST( myTime, myIter, myThid ) |
./pkg/gchem/gchem_forcing_sep.F |
52 |
GCHEM_FORCING_SEP |
INTEGER myIter, myThid |
./pkg/gchem/gchem_output.F |
10 |
GCHEM_OUTPUT |
SUBROUTINE GCHEM_OUTPUT( myTime, myIter, myThid ) |
./pkg/gchem/gchem_output.F |
27 |
GCHEM_OUTPUT |
INTEGER myIter |
./pkg/gchem/gchem_output.F |
38 |
GCHEM_OUTPUT |
IF ( myIter.NE.nIter0 ) |
./pkg/gchem/gchem_output.F |
39 |
GCHEM_OUTPUT |
& CALL DIC_BIOTIC_DIAGS( myTime, myIter, myThid ) |
./pkg/gchem/gchem_output.F |
46 |
GCHEM_OUTPUT |
CALL DARWIN_DIAGS( myTime, myIter, myThid ) |
./pkg/gchem/gchem_output.F |
48 |
GCHEM_OUTPUT |
CALL DIC_DIAGS( myTime, myIter, myThid ) |
./pkg/gchem/gchem_write_pickup.F |
14 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_write_pickup.F |
37 |
GCHEM_WRITE_PICKUP |
INTEGER myIter |
./pkg/gchem/gchem_write_pickup.F |
47 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_write_pickup.F |
54 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_write_pickup.F |
61 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/gchem/gchem_write_pickup.F |
64 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_advection.F |
19 |
GAD_ADVECTION |
I bi,bj, myTime,myIter,myThid) |
./pkg/generic_advdiff/gad_advection.F |
822 |
GAD_ADVECTION |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
./pkg/generic_advdiff/gad_advection.F |
82 |
GAD_ADVECTION |
INTEGER myIter |
./pkg/generic_advdiff/gad_calc_rhs.F |
112 |
GAD_CALC_RHS |
INTEGER myIter, myThid |
./pkg/generic_advdiff/gad_calc_rhs.F |
21 |
GAD_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
668 |
GAD_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
673 |
GAD_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
680 |
GAD_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_calc_rhs.F |
792 |
GAD_CALC_RHS |
& .AND. k.EQ.2 .AND. myIter.EQ.1+nIter0 |
./pkg/generic_advdiff/gad_diagnostics_state.F |
11 |
GAD_DIAGNOSTICS_STATE |
SUBROUTINE GAD_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_diagnostics_state.F |
30 |
GAD_DIAGNOSTICS_STATE |
INTEGER myIter |
./pkg/generic_advdiff/gad_implicit_r.F |
14 |
GAD_IMPLICIT_R |
I bi, bj, myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_implicit_r.F |
53 |
GAD_IMPLICIT_R |
INTEGER myIter, myThid |
./pkg/generic_advdiff/gad_read_pickup.F |
103 |
GAD_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/generic_advdiff/gad_read_pickup.F |
11 |
GAD_READ_PICKUP |
SUBROUTINE GAD_READ_PICKUP( myIter, myThid ) |
./pkg/generic_advdiff/gad_read_pickup.F |
127 |
GAD_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_somS.', myIter |
./pkg/generic_advdiff/gad_read_pickup.F |
129 |
GAD_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_read_pickup.F |
154 |
GAD_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/generic_advdiff/gad_read_pickup.F |
30 |
GAD_READ_PICKUP |
INTEGER myIter |
./pkg/generic_advdiff/gad_read_pickup.F |
76 |
GAD_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_somT.', myIter |
./pkg/generic_advdiff/gad_read_pickup.F |
78 |
GAD_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_som_advect.F |
17 |
GAD_SOM_ADVECT |
I bi,bj, myTime,myIter,myThid) |
./pkg/generic_advdiff/gad_som_advect.F |
439 |
GAD_SOM_ADVECT |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
./pkg/generic_advdiff/gad_som_advect.F |
61 |
GAD_SOM_ADVECT |
INTEGER myIter |
./pkg/generic_advdiff/gad_write_pickup.F |
103 |
GAD_WRITE_PICKUP |
I iRec, myIter, myThid ) |
./pkg/generic_advdiff/gad_write_pickup.F |
11 |
GAD_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/generic_advdiff/gad_write_pickup.F |
34 |
GAD_WRITE_PICKUP |
INTEGER myIter |
./pkg/generic_advdiff/gad_write_pickup.F |
86 |
GAD_WRITE_PICKUP |
I iRec, myIter, myThid ) |
./pkg/generic_advdiff/salt_fill.F |
13 |
SALT_FILL |
I flag,myTime,myIter,myThid) |
./pkg/generic_advdiff/salt_fill.F |
51 |
SALT_FILL |
INTEGER myIter |
./pkg/ggl90/ggl90_calc.F |
11 |
GGL90_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_calc.F |
209 |
GGL90_CALC |
& bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_calc.F |
52 |
GGL90_CALC |
INTEGER myIter |
./pkg/ggl90/ggl90_idemix.F |
10 |
GGL90_IDEMIX |
I bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_idemix.F |
53 |
GGL90_IDEMIX |
INTEGER myIter |
./pkg/ggl90/ggl90_output.F |
110 |
GGL90_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/ggl90/ggl90_output.F |
142 |
GGL90_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/ggl90/ggl90_output.F |
162 |
GGL90_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/ggl90/ggl90_output.F |
164 |
GGL90_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
167 |
GGL90_OUTPUT |
& GGL90viscArUtave, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
169 |
GGL90_OUTPUT |
& GGL90viscArVtave, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
171 |
GGL90_OUTPUT |
& GGL90diffKrTave, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
173 |
GGL90_OUTPUT |
& GGL90TKETave, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
56 |
GGL90_OUTPUT |
INTEGER myIter |
./pkg/ggl90/ggl90_output.F |
85 |
GGL90_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/ggl90/ggl90_output.F |
87 |
GGL90_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
89 |
GGL90_OUTPUT |
IF ( myIter.NE.nIter0 ) THEN |
./pkg/ggl90/ggl90_output.F |
91 |
GGL90_OUTPUT |
& GGL90viscArU, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
93 |
GGL90_OUTPUT |
& GGL90viscArV, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
95 |
GGL90_OUTPUT |
& GGL90diffKr, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
98 |
GGL90_OUTPUT |
& GGL90TKE, myIter, myThid ) |
./pkg/ggl90/ggl90_output.F |
9 |
GGL90_OUTPUT |
SUBROUTINE GGL90_OUTPUT( myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_read_pickup.F |
29 |
GGL90_READ_PICKUP |
INTEGER myIter |
./pkg/ggl90/ggl90_read_pickup.F |
44 |
GGL90_READ_PICKUP |
WRITE(suff,'(I10.10)') myIter |
./pkg/ggl90/ggl90_read_pickup.F |
46 |
GGL90_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/ggl90/ggl90_read_pickup.F |
57 |
GGL90_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, GGL90TKE, 1, myIter, myThid ) |
./pkg/ggl90/ggl90_read_pickup.F |
63 |
GGL90_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, IDEMIX_E, 2, myIter, myThid ) |
./pkg/ggl90/ggl90_read_pickup.F |
9 |
GGL90_READ_PICKUP |
SUBROUTINE GGL90_READ_PICKUP( myIter, myThid ) |
./pkg/ggl90/ggl90_write_pickup.F |
10 |
GGL90_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/ggl90/ggl90_write_pickup.F |
37 |
GGL90_WRITE_PICKUP |
INTEGER myIter |
./pkg/ggl90/ggl90_write_pickup.F |
52 |
GGL90_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, GGL90TKE, 1, myIter, myThid ) |
./pkg/ggl90/ggl90_write_pickup.F |
56 |
GGL90_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, IDEMIX_E, 2, myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
1117 |
GMREDI_CALC_TENSOR_DUMMY |
I bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
1141 |
GMREDI_CALC_TENSOR_DUMMY |
INTEGER myIter |
./pkg/gmredi/gmredi_calc_tensor.F |
21 |
GMREDI_CALC_TENSOR |
I bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
430 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
629 |
GMREDI_CALC_TENSOR |
I myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
67 |
GMREDI_CALC_TENSOR |
INTEGER myIter |
./pkg/gmredi/gmredi_calc_tensor.F |
709 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_calc_tensor.F |
924 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_diagnostics_impl.F |
10 |
GMREDI_DIAGNOSTICS_IMPL |
I myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_diagnostics_impl.F |
30 |
GMREDI_DIAGNOSTICS_IMPL |
INTEGER myIter |
./pkg/gmredi/gmredi_do_exch.F |
10 |
GMREDI_DO_EXCH |
I myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_do_exch.F |
33 |
GMREDI_DO_EXCH |
INTEGER myIter |
./pkg/gmredi/gmredi_output.F |
10 |
GMREDI_OUTPUT |
SUBROUTINE GMREDI_OUTPUT( myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_output.F |
142 |
GMREDI_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/gmredi/gmredi_output.F |
144 |
GMREDI_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_output.F |
146 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL('GM_Kwx-T.',suff,GM_Kwx_T,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
147 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL('GM_Kwy-T.',suff,GM_Kwy_T,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
148 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL('GM_Kwz-T.',suff,GM_Kwz_T,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
152 |
GMREDI_OUTPUT |
& myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
157 |
GMREDI_OUTPUT |
& myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
159 |
GMREDI_OUTPUT |
& myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
174 |
GMREDI_OUTPUT |
CALL MNC_CW_I_W_S('I','gm_tave',0,0,'iter',myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
37 |
GMREDI_OUTPUT |
INTEGER myIter |
./pkg/gmredi/gmredi_output.F |
66 |
GMREDI_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/gmredi/gmredi_output.F |
68 |
GMREDI_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_output.F |
71 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL( 'GM_Kux.',suff,Kux,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
72 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL( 'GM_Kvy.',suff,Kvy,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
76 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL( 'GM_Kuz.',suff,Kuz,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
77 |
GMREDI_OUTPUT |
CALL WRITE_FLD_XYZ_RL( 'GM_Kvz.',suff,Kvz,myIter,myThid) |
./pkg/gmredi/gmredi_output.F |
92 |
GMREDI_OUTPUT |
CALL MNC_CW_I_W_S('I','gm_inst',0,0,'iter',myIter,myThid) |
./pkg/gmredi/gmredi_read_pickup.F |
11 |
GMREDI_READ_PICKUP |
SUBROUTINE GMREDI_READ_PICKUP( myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
141 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
159 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
178 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
199 |
GMREDI_READ_PICKUP |
& nm, fp, 1, myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
210 |
GMREDI_READ_PICKUP |
I myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
26 |
GMREDI_READ_PICKUP |
INTEGER myIter |
./pkg/gmredi/gmredi_read_pickup.F |
60 |
GMREDI_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_gmredi.', myIter |
./pkg/gmredi/gmredi_read_pickup.F |
62 |
GMREDI_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/gmredi/gmredi_read_pickup.F |
73 |
GMREDI_READ_PICKUP |
I Nr, myIter, myThid ) |
./pkg/gmredi/gmredi_residual_flow.F |
11 |
GMREDI_RESIDUAL_FLOW |
I bi, bj, myIter, myThid ) |
./pkg/gmredi/gmredi_residual_flow.F |
37 |
GMREDI_RESIDUAL_FLOW |
INTEGER bi, bj, myIter, myThid |
./pkg/gmredi/gmredi_slope_limit.F |
19 |
GMREDI_SLOPE_LIMIT |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_slope_limit.F |
97 |
GMREDI_SLOPE_LIMIT |
INTEGER myIter |
./pkg/gmredi/gmredi_write_pickup.F |
112 |
GMREDI_WRITE_PICKUP |
& vec, -m, myIter, myThid ) |
./pkg/gmredi/gmredi_write_pickup.F |
11 |
GMREDI_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
./pkg/gmredi/gmredi_write_pickup.F |
132 |
GMREDI_WRITE_PICKUP |
& vec, -m, myIter, myThid ) |
./pkg/gmredi/gmredi_write_pickup.F |
145 |
GMREDI_WRITE_PICKUP |
& Rdef, nm, myIter, myThid ) |
./pkg/gmredi/gmredi_write_pickup.F |
174 |
GMREDI_WRITE_PICKUP |
& nm, myIter, myThid ) |
./pkg/gmredi/gmredi_write_pickup.F |
32 |
GMREDI_WRITE_PICKUP |
INTEGER myIter |
./pkg/gmredi/gmredi_write_pickup.F |
93 |
GMREDI_WRITE_PICKUP |
& vec, -m, myIter, myThid ) |
./pkg/gmredi/submeso_calc_psi.F |
13 |
SUBMESO_CALC_PSI |
I myIter, myThid ) |
./pkg/gmredi/submeso_calc_psi.F |
190 |
SUBMESO_CALC_PSI |
& bi,bj,1,myIter,myThid ) |
./pkg/gmredi/submeso_calc_psi.F |
192 |
SUBMESO_CALC_PSI |
& bi,bj,1,myIter,myThid ) |
./pkg/gmredi/submeso_calc_psi.F |
231 |
SUBMESO_CALC_PSI |
& bi,bj,1,myIter,myThid ) |
./pkg/gmredi/submeso_calc_psi.F |
42 |
SUBMESO_CALC_PSI |
INTEGER myIter |
./model/src/adams_bashforth2.F |
13 |
ADAMS_BASHFORTH2 |
I startAB, myIter, myThid ) |
./model/src/adams_bashforth2.F |
52 |
ADAMS_BASHFORTH2 |
INTEGER myIter, myThid |
./model/src/adams_bashforth2.F |
64 |
ADAMS_BASHFORTH2 |
IF ( myIter.EQ.nIter0 .AND. startAB.EQ.0 ) THEN |
./pkg/grdchk/grdchk_main.F |
286 |
GRDCHK_MAIN |
myIter = nIter0 |
./pkg/grdchk/grdchk_main.F |
299 |
GRDCHK_MAIN |
CALL G_THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/grdchk/grdchk_main.F |
331 |
GRDCHK_MAIN |
myIter = nIter0 |
./pkg/grdchk/grdchk_main.F |
333 |
GRDCHK_MAIN |
CALL OPENAD_THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/grdchk/grdchk_main.F |
335 |
GRDCHK_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/grdchk/grdchk_main.F |
370 |
GRDCHK_MAIN |
myIter = nIter0 |
./pkg/grdchk/grdchk_main.F |
372 |
GRDCHK_MAIN |
CALL OPENAD_THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/grdchk/grdchk_main.F |
374 |
GRDCHK_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/grdchk/grdchk_main.F |
98 |
GRDCHK_MAIN |
INTEGER myIter |
./model/src/adams_bashforth3.F |
13 |
ADAMS_BASHFORTH3 |
I startAB, myIter, myThid ) |
./model/src/adams_bashforth3.F |
70 |
ADAMS_BASHFORTH3 |
INTEGER myIter, myThid |
./model/src/adams_bashforth3.F |
83 |
ADAMS_BASHFORTH3 |
m1 = 1 + MOD(myIter+1,2) |
./model/src/adams_bashforth3.F |
84 |
ADAMS_BASHFORTH3 |
m2 = 1 + MOD( myIter ,2) |
./model/src/adams_bashforth3.F |
87 |
ADAMS_BASHFORTH3 |
IF ( myIter.EQ.nIter0 .AND. startAB.EQ.0 ) THEN |
./model/src/adams_bashforth3.F |
91 |
ADAMS_BASHFORTH3 |
ELSEIF ( (myIter.EQ.nIter0 .AND. startAB.EQ.1) |
./model/src/adams_bashforth3.F |
92 |
ADAMS_BASHFORTH3 |
& .OR. (myIter.EQ.1+nIter0 .AND. startAB.EQ.0) ) THEN |
./pkg/icefront/icefront_tendency_apply.F |
17 |
ICEFRONT_TENDENCY_APPLY_T |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/icefront/icefront_tendency_apply.F |
41 |
ICEFRONT_TENDENCY_APPLY_T |
INTEGER myIter |
./pkg/icefront/icefront_tendency_apply.F |
69 |
ICEFRONT_TENDENCY_APPLY_S |
I k, bi, bj, myTime, myIter, myThid ) |
./pkg/icefront/icefront_tendency_apply.F |
93 |
ICEFRONT_TENDENCY_APPLY_S |
INTEGER myIter |
./pkg/icefront/icefront_thermodynamics.F |
10 |
ICEFRONT_THERMODYNAMICS |
I myTime, myIter, myThid ) |
./pkg/icefront/icefront_thermodynamics.F |
40 |
ICEFRONT_THERMODYNAMICS |
INTEGER myIter |
./pkg/kl10/kl10_calc.F |
11 |
KL10_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./pkg/kl10/kl10_calc.F |
54 |
KL10_CALC |
INTEGER myIter |
./model/src/apply_forcing.F |
112 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
119 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
126 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
168 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
176 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
186 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
195 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
211 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
21 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
245 |
APPLY_FORCING_V |
INTEGER myIter |
./model/src/apply_forcing.F |
302 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
309 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
316 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
358 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
366 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
375 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
384 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
400 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
435 |
APPLY_FORCING_T |
INTEGER myIter |
./model/src/apply_forcing.F |
496 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
503 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
510 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
55 |
APPLY_FORCING_U |
INTEGER myIter |
./model/src/apply_forcing.F |
704 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
712 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
719 |
APPLY_FORCING_T |
I k, bi, bj, myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
727 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
735 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
744 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
752 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
760 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
776 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
811 |
APPLY_FORCING_S |
INTEGER myIter |
./model/src/apply_forcing.F |
861 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
868 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
875 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
944 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
951 |
APPLY_FORCING_S |
I k, bi, bj, myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
959 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
967 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
976 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
984 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./model/src/apply_forcing.F |
992 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
./pkg/kl10/kl10_output.F |
107 |
KL10_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/kl10/kl10_output.F |
133 |
KL10_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/kl10/kl10_output.F |
149 |
KL10_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/kl10/kl10_output.F |
151 |
KL10_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/kl10/kl10_output.F |
154 |
KL10_OUTPUT |
& KLviscArTave, myIter, myThid ) |
./pkg/kl10/kl10_output.F |
156 |
KL10_OUTPUT |
& KLdiffKrTave, myIter, myThid ) |
./pkg/kl10/kl10_output.F |
175 |
KL10_OUTPUT |
IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN |
./pkg/kl10/kl10_output.F |
56 |
KL10_OUTPUT |
INTEGER myIter |
./pkg/kl10/kl10_output.F |
81 |
KL10_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/kl10/kl10_output.F |
88 |
KL10_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/kl10/kl10_output.F |
90 |
KL10_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/kl10/kl10_output.F |
93 |
KL10_OUTPUT |
& myIter,myThid) |
./pkg/kl10/kl10_output.F |
95 |
KL10_OUTPUT |
& myIter,myThid) |
./pkg/kl10/kl10_output.F |
9 |
KL10_OUTPUT |
SUBROUTINE KL10_OUTPUT( myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
138 |
KPP_CALC |
INTEGER myIter |
./pkg/kpp/kpp_calc.F |
17 |
KPP_CALC |
I bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
564 |
KPP_CALC |
I , bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
635 |
KPP_CALC |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
663 |
KPP_CALC |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
689 |
KPP_CALC_DUMMY |
I bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_calc.F |
716 |
KPP_CALC_DUMMY |
INTEGER myIter |
./pkg/kpp/kpp_output.F |
113 |
KPP_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/kpp/kpp_output.F |
126 |
KPP_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/kpp/kpp_output.F |
136 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
138 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
140 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
142 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
144 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
14 |
KPP_OUTPUT |
SUBROUTINE KPP_OUTPUT( myTime, myIter, myThid ) |
./pkg/kpp/kpp_output.F |
156 |
KPP_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/kpp/kpp_output.F |
158 |
KPP_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/kpp/kpp_output.F |
161 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
163 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
165 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
167 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
169 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
183 |
KPP_OUTPUT |
CALL MNC_CW_I_W_S('I','kpp_state',0,0,'iter',myIter,myThid) |
./pkg/kpp/kpp_output.F |
206 |
KPP_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/kpp/kpp_output.F |
259 |
KPP_OUTPUT |
IF ( myIter .NE. nIter0 ) THEN |
./pkg/kpp/kpp_output.F |
266 |
KPP_OUTPUT |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_output.F |
294 |
KPP_OUTPUT |
& kpp_drctrecTave,myIter,myThid) |
./pkg/kpp/kpp_output.F |
296 |
KPP_OUTPUT |
& kpp_drctrecTave,myIter,myThid) |
./pkg/kpp/kpp_output.F |
298 |
KPP_OUTPUT |
& kpp_drctrecTave,myIter,myThid) |
./pkg/kpp/kpp_output.F |
300 |
KPP_OUTPUT |
& kpp_drctrecTave,myIter,myThid) |
./pkg/kpp/kpp_output.F |
302 |
KPP_OUTPUT |
& kpp_drctrecTave,myIter,myThid) |
./pkg/kpp/kpp_output.F |
314 |
KPP_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/kpp/kpp_output.F |
316 |
KPP_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/kpp/kpp_output.F |
319 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
321 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
323 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
325 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
327 |
KPP_OUTPUT |
& myIter,myThid) |
./pkg/kpp/kpp_output.F |
341 |
KPP_OUTPUT |
CALL MNC_CW_I_W_S('I','kpp_timeave',0,0,'iter',myIter,myThid) |
./pkg/kpp/kpp_output.F |
376 |
KPP_OUTPUT |
IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN |
./pkg/kpp/kpp_output.F |
68 |
KPP_OUTPUT |
INTEGER myIter |
./pkg/kpp/kpp_routines.F |
219 |
KPPMIX |
I , bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
307 |
BLDEPTH |
I , bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
359 |
BLDEPTH |
integer myIter |
./pkg/kpp/kpp_routines.F |
469 |
BLDEPTH |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
46 |
KPPMIX |
I , bi, bj, myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
499 |
BLDEPTH |
I myTime, myIter, myThid) |
./pkg/kpp/kpp_routines.F |
639 |
BLDEPTH |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
662 |
BLDEPTH |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
762 |
BLDEPTH |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
785 |
BLDEPTH |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_routines.F |
98 |
KPPMIX |
integer myIter |
./pkg/kpp/kpp_transport_ptr.F |
13 |
KPP_TRANSPORT_PTR |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_transport_ptr.F |
68 |
KPP_TRANSPORT_PTR |
INTEGER myIter |
./pkg/kpp/kpp_transport_s.F |
15 |
KPP_TRANSPORT_S |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_transport_s.F |
56 |
KPP_TRANSPORT_S |
INTEGER myIter |
./pkg/kpp/kpp_transport_t.F |
12 |
KPP_TRANSPORT_T |
I myTime, myIter, myThid ) |
./pkg/kpp/kpp_transport_t.F |
54 |
KPP_TRANSPORT_T |
INTEGER myIter |
./pkg/land/land_albedo.F |
12 |
LAND_ALBEDO |
I bi,bj, myTime, myIter, myThid ) |
./pkg/land/land_albedo.F |
45 |
LAND_ALBEDO |
INTEGER bi, bj, myIter, myThid |
./pkg/land/land_diagnostics_state.F |
10 |
LAND_DIAGNOSTICS_STATE |
I myTime, myIter, myThid ) |
./pkg/land/land_diagnostics_state.F |
37 |
LAND_DIAGNOSTICS_STATE |
INTEGER myIter, myThid |
./pkg/land/land_do_diags.F |
10 |
LAND_DO_DIAGS |
I land_frc, bi,bj, myTime, myIter, myThid ) |
./pkg/land/land_do_diags.F |
43 |
LAND_DO_DIAGS |
INTEGER bi, bj, myIter, myThid |
./pkg/land/land_impl_temp.F |
13 |
LAND_IMPL_TEMP |
I bi, bj, myTime, myIter, myThid) |
./pkg/land/land_impl_temp.F |
196 |
LAND_IMPL_TEMP |
& i,j,bi,bj,myIter |
./pkg/land/land_impl_temp.F |
249 |
LAND_IMPL_TEMP |
& i,j,bi,bj,myIter |
./pkg/land/land_impl_temp.F |
51 |
LAND_IMPL_TEMP |
INTEGER bi, bj, myIter, myThid |
./pkg/land/land_monitor.F |
104 |
LAND_MONITOR |
& 'I',mon_fname,1,1,'T', myIter, myThid) |
./pkg/land/land_monitor.F |
156 |
LAND_MONITOR |
IF ( myIter.EQ.1+nIter0 ) THEN |
./pkg/land/land_monitor.F |
33 |
LAND_MONITOR |
INTEGER myIter |
./pkg/land/land_monitor.F |
82 |
LAND_MONITOR |
& .OR. myIter.EQ.nIter0 ) THEN |
./pkg/land/land_monitor.F |
9 |
LAND_MONITOR |
SUBROUTINE LAND_MONITOR( land_frc, myTime, myIter, myThid ) |
./pkg/land/land_output.F |
100 |
LAND_OUTPUT |
IF ( myIter.NE.nIter0 ) THEN |
./pkg/land/land_output.F |
103 |
LAND_OUTPUT |
& 'land_RunOff.', suff, land_runOff, myIter, myThid ) |
./pkg/land/land_output.F |
105 |
LAND_OUTPUT |
& 'land_enRnOf.', suff, land_enRnOf, myIter, myThid ) |
./pkg/land/land_output.F |
107 |
LAND_OUTPUT |
& 'land_HeatFx.', suff, land_HeatFlx, myIter, myThid ) |
./pkg/land/land_output.F |
109 |
LAND_OUTPUT |
& 'land_frWaFx.', suff, land_Pr_m_Ev, myIter, myThid ) |
./pkg/land/land_output.F |
111 |
LAND_OUTPUT |
& 'land_EnWaFx.', suff, land_EnWFlux, myIter, myThid ) |
./pkg/land/land_output.F |
129 |
LAND_OUTPUT |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
./pkg/land/land_output.F |
168 |
LAND_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/land/land_output.F |
214 |
LAND_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/land/land_output.F |
216 |
LAND_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/land/land_output.F |
220 |
LAND_OUTPUT |
& land_grTtave, 1, myIter, myThid ) |
./pkg/land/land_output.F |
222 |
LAND_OUTPUT |
& land_entave, 2, myIter, myThid ) |
./pkg/land/land_output.F |
224 |
LAND_OUTPUT |
& land_grWtave, 3, myIter, myThid ) |
./pkg/land/land_output.F |
226 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_sTtave, k+1, myIter, myThid ) |
./pkg/land/land_output.F |
227 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_hStave, k+2, myIter, myThid ) |
./pkg/land/land_output.F |
228 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_sAtave, k+3, myIter, myThid ) |
./pkg/land/land_output.F |
229 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_ROftave, k+4, myIter, myThid ) |
./pkg/land/land_output.F |
230 |
LAND_OUTPUT |
CALL WRITE_REC_XY_RL( fn, land_eROtave, k+5, myIter, myThid ) |
./pkg/land/land_output.F |
245 |
LAND_OUTPUT |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
./pkg/land/land_output.F |
271 |
LAND_OUTPUT |
& '// Land Time-average written, t-step', myIter |
./pkg/land/land_output.F |
40 |
LAND_OUTPUT |
INTEGER myIter |
./pkg/land/land_output.F |
62 |
LAND_OUTPUT |
CALL LAND_MONITOR( aim_landFr, myTime, myIter, myThid ) |
./pkg/land/land_output.F |
80 |
LAND_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/land/land_output.F |
82 |
LAND_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/land/land_output.F |
87 |
LAND_OUTPUT |
& land_groundT, myIter, myThid ) |
./pkg/land/land_output.F |
89 |
LAND_OUTPUT |
& land_enthalp, myIter, myThid ) |
./pkg/land/land_output.F |
91 |
LAND_OUTPUT |
& land_groundW, myIter, myThid ) |
./pkg/land/land_output.F |
94 |
LAND_OUTPUT |
& 'land_skinT.', suff, land_skinT, myIter, myThid ) |
./pkg/land/land_output.F |
96 |
LAND_OUTPUT |
& 'land_hSnow.', suff, land_hSnow, myIter, myThid ) |
./pkg/land/land_output.F |
98 |
LAND_OUTPUT |
& 'land_snAge.', suff, land_snowAge, myIter, myThid ) |
./pkg/land/land_output.F |
9 |
LAND_OUTPUT |
SUBROUTINE LAND_OUTPUT( myTime, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
31 |
LAND_READ_PICKUP |
INTEGER myIter |
./pkg/land/land_read_pickup.F |
50 |
LAND_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_land.',myIter |
./pkg/land/land_read_pickup.F |
52 |
LAND_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
60 |
LAND_READ_PICKUP |
& land_groundT, 1, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
62 |
LAND_READ_PICKUP |
& land_groundW, 2, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
68 |
LAND_READ_PICKUP |
& land_enthalp, 1, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
70 |
LAND_READ_PICKUP |
& land_groundW, 2, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
73 |
LAND_READ_PICKUP |
& land_skinT, k+1, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
75 |
LAND_READ_PICKUP |
& land_hSnow, k+2, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
77 |
LAND_READ_PICKUP |
& land_snowAge,k+3, myIter, myThid ) |
./pkg/land/land_read_pickup.F |
92 |
LAND_READ_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, -1, myThid) |
./pkg/land/land_read_pickup.F |
9 |
LAND_READ_PICKUP |
SUBROUTINE LAND_READ_PICKUP( myIter, myThid ) |
./pkg/land/land_stepfwd.F |
10 |
LAND_STEPFWD |
I land_frc, bi, bj, myTime, myIter, myThid) |
./pkg/land/land_stepfwd.F |
38 |
LAND_STEPFWD |
INTEGER bi, bj, myIter, myThid |
./pkg/land/land_write_pickup.F |
101 |
LAND_WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
./pkg/land/land_write_pickup.F |
10 |
LAND_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
39 |
LAND_WRITE_PICKUP |
INTEGER myIter |
./pkg/land/land_write_pickup.F |
67 |
LAND_WRITE_PICKUP |
& land_enthalp, 1, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
69 |
LAND_WRITE_PICKUP |
& land_groundW, 2, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
72 |
LAND_WRITE_PICKUP |
& land_skinT, k+1, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
74 |
LAND_WRITE_PICKUP |
& land_hSnow, k+2, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
76 |
LAND_WRITE_PICKUP |
& land_snowAge,k+3, myIter, myThid ) |
./pkg/land/land_write_pickup.F |
94 |
LAND_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
./model/src/calc_grad_phi_fv.F |
13 |
CALC_GRAD_PHI_FV |
I myTime, myIter, myThid) |
./model/src/calc_grad_phi_fv.F |
55 |
CALC_GRAD_PHI_FV |
INTEGER myIter, myThid |
./pkg/layers/layers_calc.F |
116 |
LAYERS_CALC |
IF ( myIter.EQ.nIter0 ) RETURN |
./pkg/layers/layers_calc.F |
14 |
LAYERS_CALC |
I myTime, myIter, myThid ) |
./pkg/layers/layers_calc.F |
233 |
LAYERS_CALC |
WRITE(suff,'(I2.2,A1,I10.10)') iLa, '.', myIter |
./pkg/layers/layers_calc.F |
235 |
LAYERS_CALC |
CALL RW_GET_SUFFIX( sufx, myTime, myIter, myThid ) |
./pkg/layers/layers_calc.F |
240 |
LAYERS_CALC |
& layers_UH, myIter, myThid ) |
./pkg/layers/layers_calc.F |
243 |
LAYERS_CALC |
& layers_Hw, myIter, myThid ) |
./pkg/layers/layers_calc.F |
248 |
LAYERS_CALC |
& layers_VH, myIter, myThid ) |
./pkg/layers/layers_calc.F |
251 |
LAYERS_CALC |
& layers_Hs, myIter, myThid ) |
./pkg/layers/layers_calc.F |
257 |
LAYERS_CALC |
& prho, myIter, myThid ) |
./pkg/layers/layers_calc.F |
263 |
LAYERS_CALC |
& layers_tottend, myIter, myThid ) |
./pkg/layers/layers_calc.F |
266 |
LAYERS_CALC |
& layers_sw, myIter, myThid ) |
./pkg/layers/layers_calc.F |
269 |
LAYERS_CALC |
& layers_surfflux, myIter, myThid ) |
./pkg/layers/layers_calc.F |
271 |
LAYERS_CALC |
& layers_dfx, myIter, myThid ) |
./pkg/layers/layers_calc.F |
273 |
LAYERS_CALC |
& layers_dfy, myIter, myThid ) |
./pkg/layers/layers_calc.F |
275 |
LAYERS_CALC |
& layers_dfr, myIter, myThid ) |
./pkg/layers/layers_calc.F |
277 |
LAYERS_CALC |
& layers_afx, myIter, myThid ) |
./pkg/layers/layers_calc.F |
279 |
LAYERS_CALC |
& layers_afy, myIter, myThid ) |
./pkg/layers/layers_calc.F |
281 |
LAYERS_CALC |
& layers_afr, myIter, myThid ) |
./pkg/layers/layers_calc.F |
41 |
LAYERS_CALC |
INTEGER myIter |
./pkg/layers/layers_output.F |
10 |
LAYERS_OUTPUT |
SUBROUTINE LAYERS_OUTPUT( myTime, myIter, myThid ) |
./pkg/layers/layers_output.F |
122 |
LAYERS_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/layers/layers_output.F |
124 |
LAYERS_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/layers/layers_output.F |
128 |
LAYERS_OUTPUT |
& layers_UH_T, myIter, myThid ) |
./pkg/layers/layers_output.F |
131 |
LAYERS_OUTPUT |
& layers_Hw_T, myIter, myThid ) |
./pkg/layers/layers_output.F |
136 |
LAYERS_OUTPUT |
& layers_VH_T, myIter, myThid ) |
./pkg/layers/layers_output.F |
139 |
LAYERS_OUTPUT |
& layers_Hs_T, myIter, myThid ) |
./pkg/layers/layers_output.F |
146 |
LAYERS_OUTPUT |
& prho_tave, myIter, myThid ) |
./pkg/layers/layers_output.F |
37 |
LAYERS_OUTPUT |
INTEGER myIter |
./pkg/layers/layers_output.F |
60 |
LAYERS_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./model/src/calc_grad_phi_hyd.F |
14 |
CALC_GRAD_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/calc_grad_phi_hyd.F |
53 |
CALC_GRAD_PHI_HYD |
INTEGER myIter, myThid |
./pkg/layers/layers_wsurf_tr.F |
11 |
LAYERS_WSURF_TR |
I myTime, myIter, myThid ) |
./pkg/layers/layers_wsurf_tr.F |
42 |
LAYERS_WSURF_TR |
INTEGER myIter |
./pkg/longstep/longstep_average.F |
123 |
LONGSTEP_AVERAGE |
IF ( MOD(myIter, LS_nIter) .EQ. LS_nIter-1 ) THEN |
./pkg/longstep/longstep_average.F |
224 |
LONGSTEP_AVERAGE |
ELSEIF ( MOD(myIter, LS_nIter) .EQ. 0 ) THEN |
./pkg/longstep/longstep_average.F |
45 |
LONGSTEP_AVERAGE |
INTEGER myIter |
./pkg/longstep/longstep_average.F |
54 |
LONGSTEP_AVERAGE |
IF ( MOD(myIter, LS_nIter) .EQ. 0 ) THEN |
./pkg/longstep/longstep_average.F |
9 |
LONGSTEP_AVERAGE |
SUBROUTINE LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
./pkg/longstep/longstep_correction_step.F |
10 |
LONGSTEP_CORRECTION_STEP |
SUBROUTINE LONGSTEP_CORRECTION_STEP(myTime, myIter, myThid) |
./pkg/longstep/longstep_correction_step.F |
34 |
LONGSTEP_CORRECTION_STEP |
INTEGER myIter |
./pkg/longstep/longstep_forcing_surf.F |
12 |
LONGSTEP_FORCING_SURF |
I myTime,myIter,myThid ) |
./pkg/longstep/longstep_forcing_surf.F |
40 |
LONGSTEP_FORCING_SURF |
INTEGER myIter |
./pkg/longstep/longstep_thermodynamics.F |
15 |
LONGSTEP_THERMODYNAMICS |
SUBROUTINE LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
./pkg/longstep/longstep_thermodynamics.F |
200 |
LONGSTEP_THERMODYNAMICS |
I myTime,myIter,myThid ) |
./pkg/longstep/longstep_thermodynamics.F |
218 |
LONGSTEP_THERMODYNAMICS |
I bi, bj, myIter, myThid ) |
./pkg/longstep/longstep_thermodynamics.F |
234 |
LONGSTEP_THERMODYNAMICS |
I myTime, myIter, myThid ) |
./pkg/longstep/longstep_thermodynamics.F |
70 |
LONGSTEP_THERMODYNAMICS |
INTEGER myIter |
./pkg/matrix/matrix_output.F |
11 |
MATRIX_OUTPUT |
I myTime, myIter, myThid ) |
./pkg/matrix/matrix_output.F |
28 |
MATRIX_OUTPUT |
INTEGER myIter |
./pkg/matrix/matrix_output.F |
35 |
MATRIX_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/matrix/matrix_output.F |
40 |
MATRIX_OUTPUT |
CALL MATRIX_WRITE_TENDENCY( myTime, myIter, myThid ) |
./pkg/matrix/matrix_store_tendency.F |
19 |
MATRIX_STORE_TENDENCY_EXP |
I myTime, myIter, myThid ) |
./pkg/matrix/matrix_store_tendency.F |
42 |
MATRIX_STORE_TENDENCY_EXP |
INTEGER myIter |
./pkg/matrix/matrix_store_tendency.F |
75 |
MATRIX_STORE_TENDENCY_IMP |
I bi, bj, myTime, myIter, myThid ) |
./pkg/matrix/matrix_store_tendency.F |
95 |
MATRIX_STORE_TENDENCY_IMP |
INTEGER myIter |
./pkg/matrix/matrix_write_tendency.F |
10 |
MATRIX_WRITE_TENDENCY |
SUBROUTINE MATRIX_WRITE_TENDENCY( myTime, myIter, myThid ) |
./pkg/matrix/matrix_write_tendency.F |
126 |
MATRIX_WRITE_TENDENCY |
& MATRIX(1-OLx,1-OLy,1,1,1,iTracer,2),iRec,myIter,myThid) |
./pkg/matrix/matrix_write_tendency.F |
21 |
MATRIX_WRITE_TENDENCY |
INTEGER myIter |
./pkg/matrix/matrix_write_tendency.F |
67 |
MATRIX_WRITE_TENDENCY |
& MATRIX(1-OLx,1-OLy,1,1,1,iTracer,1),iRec,myIter,myThid) |
./model/src/calc_gw.F |
18 |
CALC_GW |
I myTime, myIter, myThid ) |
./model/src/calc_gw.F |
666 |
CALC_GW |
I nHydStartAB, myIter, myThid ) |
./model/src/calc_gw.F |
673 |
CALC_GW |
I nHydStartAB, myIter, myThid ) |
./model/src/calc_gw.F |
73 |
CALC_GW |
INTEGER myIter |
./pkg/mdsio/mdsio_gl.F |
1214 |
MDSWRITEFIELD_2D_GL |
I myIter, |
./pkg/mdsio/mdsio_gl.F |
1270 |
MDSWRITEFIELD_2D_GL |
integer myIter |
./pkg/mdsio/mdsio_gl.F |
1446 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_gl.F |
1564 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_gl.F |
427 |
MDSWRITEFIELD_3D_GL |
I myIter, |
./pkg/mdsio/mdsio_gl.F |
482 |
MDSWRITEFIELD_3D_GL |
integer myIter |
./pkg/mdsio/mdsio_gl.F |
657 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_gl.F |
775 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_gl_slice.F |
503 |
MDSWRITEFIELD_XZ_GL |
I myIter, |
./pkg/mdsio/mdsio_gl_slice.F |
558 |
MDSWRITEFIELD_XZ_GL |
integer myIter |
./pkg/mdsio/mdsio_gl_slice.F |
718 |
MDSWRITEFIELD_XZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_gl_slice.F |
744 |
MDSWRITEFIELD_YZ_GL |
I myIter, |
./pkg/mdsio/mdsio_gl_slice.F |
799 |
MDSWRITEFIELD_YZ_GL |
integer myIter |
./pkg/mdsio/mdsio_gl_slice.F |
959 |
MDSWRITEFIELD_YZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./model/src/calc_ivdc.F |
11 |
CALC_IVDC |
I myTime,myIter, myThid ) |
./model/src/calc_ivdc.F |
38 |
CALC_IVDC |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_field.F |
157 |
MDSWRITEFIELD |
I myIter, |
./pkg/mdsio/mdsio_rw_field.F |
192 |
MDSWRITEFIELD |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_field.F |
204 |
MDSWRITEFIELD |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_field.F |
209 |
MDSWRITEFIELD |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_field.F |
229 |
MDSWRITEFIELD_LOC |
I myIter, |
./pkg/mdsio/mdsio_rw_field.F |
264 |
MDSWRITEFIELD_LOC |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_field.F |
276 |
MDSWRITEFIELD_LOC |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_field.F |
281 |
MDSWRITEFIELD_LOC |
I irecord, myIter, myThid ) |
./model/src/calc_oce_mxlayer.F |
12 |
CALC_OCE_MXLAYER |
I bi, bj, myTime, myIter, myThid ) |
./model/src/calc_oce_mxlayer.F |
44 |
CALC_OCE_MXLAYER |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_slice.F |
289 |
MDSWRITEFIELDXZ |
I myIter, |
./pkg/mdsio/mdsio_rw_slice.F |
323 |
MDSWRITEFIELDXZ |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_slice.F |
335 |
MDSWRITEFIELDXZ |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
340 |
MDSWRITEFIELDXZ |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
360 |
MDSWRITEFIELDYZ |
I myIter, |
./pkg/mdsio/mdsio_rw_slice.F |
394 |
MDSWRITEFIELDYZ |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_slice.F |
406 |
MDSWRITEFIELDYZ |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
411 |
MDSWRITEFIELDYZ |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
431 |
MDSWRITEFIELDXZ_LOC |
I myIter, |
./pkg/mdsio/mdsio_rw_slice.F |
465 |
MDSWRITEFIELDXZ_LOC |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_slice.F |
477 |
MDSWRITEFIELDXZ_LOC |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
482 |
MDSWRITEFIELDXZ_LOC |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
502 |
MDSWRITEFIELDYZ_LOC |
I myIter, |
./pkg/mdsio/mdsio_rw_slice.F |
536 |
MDSWRITEFIELDYZ_LOC |
INTEGER myIter |
./pkg/mdsio/mdsio_rw_slice.F |
548 |
MDSWRITEFIELDYZ_LOC |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_rw_slice.F |
553 |
MDSWRITEFIELDYZ_LOC |
I irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_wr_metafiles.F |
142 |
MDS_WR_METAFILES |
I nTimRec, timList, misVal, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_wr_metafiles.F |
211 |
MDS_WR_METAFILES |
I nTimRec, timList, misVal, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_wr_metafiles.F |
21 |
MDS_WR_METAFILES |
I myIter, |
./pkg/mdsio/mdsio_wr_metafiles.F |
86 |
MDS_WR_METAFILES |
INTEGER myIter |
./pkg/mdsio/mdsio_write_field.F |
104 |
MDS_WRITE_FIELD |
INTEGER myIter |
./pkg/mdsio/mdsio_write_field.F |
18 |
MDS_WRITE_FIELD |
I myIter, |
./pkg/mdsio/mdsio_write_field.F |
194 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: file="', fName(1:IL), '" , iter=', myIter |
./pkg/mdsio/mdsio_write_field.F |
210 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: file="', fName(1:IL), '" , iter=', myIter |
./pkg/mdsio/mdsio_write_field.F |
227 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: file="', fName(1:IL), '" , iter=', myIter |
./pkg/mdsio/mdsio_write_field.F |
258 |
MDS_WRITE_FIELD |
& ' MDS_WRITE_FIELD: it,rec,kS,kL,kH=', myIter, jrecord, |
./pkg/mdsio/mdsio_write_field.F |
554 |
MDS_WRITE_FIELD |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_write_field.F |
600 |
MDS_WRITE_FIELD |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./model/src/calc_phi_hyd.F |
156 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
./model/src/calc_phi_hyd.F |
18 |
CALC_PHI_HYD |
I myTime, myIter, myThid ) |
./model/src/calc_phi_hyd.F |
318 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
./model/src/calc_phi_hyd.F |
436 |
CALC_PHI_HYD |
IF ( implicitIntGravWave .OR. myIter.LT.0 ) THEN |
./model/src/calc_phi_hyd.F |
629 |
CALC_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/calc_phi_hyd.F |
644 |
CALC_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/calc_phi_hyd.F |
664 |
CALC_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/calc_phi_hyd.F |
671 |
CALC_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/calc_phi_hyd.F |
76 |
CALC_PHI_HYD |
INTEGER myIter, myThid |
./pkg/mdsio/mdsio_write_meta.F |
169 |
MDS_WRITE_META |
IF ( myIter.GE.0 ) |
./pkg/mdsio/mdsio_write_meta.F |
170 |
MDS_WRITE_META |
& WRITE(mUnit,'(1X,A,I10,A)') 'timeStepNumber = [ ',myIter,' ];' |
./pkg/mdsio/mdsio_write_meta.F |
18 |
MDS_WRITE_META |
I nrecords, myIter, myThid ) |
./pkg/mdsio/mdsio_write_meta.F |
68 |
MDS_WRITE_META |
INTEGER myIter |
./pkg/mdsio/mdsio_write_section.F |
25 |
MDS_WRITE_SEC_XZ |
I myIter, |
./pkg/mdsio/mdsio_write_section.F |
279 |
MDS_WRITE_SEC_YZ |
I myIter, |
./pkg/mdsio/mdsio_write_section.F |
334 |
MDS_WRITE_SEC_YZ |
INTEGER myIter |
./pkg/mdsio/mdsio_write_section.F |
80 |
MDS_WRITE_SEC_XZ |
INTEGER myIter |
./pkg/mdsio/mdsio_write_tape.F |
18 |
MDS_WRITE_TAPE |
I myIter, |
./pkg/mdsio/mdsio_write_tape.F |
213 |
MDS_WRITE_TAPE |
I 0, dummyRL, oneRL, iRec, myIter, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
310 |
MDS_WRITE_TAPE |
I 0, dummyRL, oneRL, iRec, myIter, myThid ) |
./pkg/mdsio/mdsio_write_tape.F |
57 |
MDS_WRITE_TAPE |
INTEGER myIter |
./pkg/mdsio/mdsio_writelocal.F |
167 |
MDS_WRITELOCAL |
& 'MDS_WRITELOCAL (it=', myIter, ' ; bi,bj=', biArg,bjArg, |
./pkg/mdsio/mdsio_writelocal.F |
181 |
MDS_WRITELOCAL |
& ' MDS_WRITELOCAL: file="', fName(1:IL), '" , iter=', myIter |
./pkg/mdsio/mdsio_writelocal.F |
18 |
MDS_WRITELOCAL |
I myIter, |
./pkg/mdsio/mdsio_writelocal.F |
197 |
MDS_WRITELOCAL |
& ' MDS_WRITELOCAL: file="', fName(1:IL), '" , iter=', myIter |
./pkg/mdsio/mdsio_writelocal.F |
405 |
MDS_WRITELOCAL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
436 |
MDS_WRITELOCAL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_writelocal.F |
97 |
MDS_WRITELOCAL |
INTEGER myIter |
./pkg/mdsio/mdsio_writevec_loc.F |
18 |
MDS_WRITEVEC_LOC |
I myIter, |
./pkg/mdsio/mdsio_writevec_loc.F |
246 |
MDS_WRITEVEC_LOC |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
./pkg/mdsio/mdsio_writevec_loc.F |
70 |
MDS_WRITEVEC_LOC |
INTEGER myIter |
./model/src/calc_r_star.F |
14 |
CALC_R_STAR |
I myTime, myIter, myThid ) |
./model/src/calc_r_star.F |
176 |
CALC_R_STAR |
I myTime, myIter, myThid ) |
./model/src/calc_r_star.F |
234 |
CALC_R_STAR |
& ' pts : bi,bj,Thid,Iter=',bi,bj,myThid,myIter |
./model/src/calc_r_star.F |
238 |
CALC_R_STAR |
& ' pts : bi,bj,Thid,Iter=',bi,bj,myThid,myIter |
./model/src/calc_r_star.F |
242 |
CALC_R_STAR |
& ' pts : bi,bj,Thid,Iter=',bi,bj,myThid,myIter |
./model/src/calc_r_star.F |
253 |
CALC_R_STAR |
& ' pts : bi,bj,Thid,Iter=',bi,bj,myThid,myIter |
./model/src/calc_r_star.F |
40 |
CALC_R_STAR |
INTEGER myIter |
./model/src/calc_surf_dr.F |
11 |
CALC_SURF_DR |
I myTime, myIter, myThid ) |
./model/src/calc_surf_dr.F |
131 |
CALC_SURF_DR |
& ' i,j,k,bi,bj,Thid,Iter=',i,j,ks,bi,bj,myThid,myIter |
./model/src/calc_surf_dr.F |
193 |
CALC_SURF_DR |
I myTime, myIter, myThid ) |
./model/src/calc_surf_dr.F |
209 |
CALC_SURF_DR |
& ' SURF_ADJUSTMENT: Iter=', myIter, |
./model/src/calc_surf_dr.F |
38 |
CALC_SURF_DR |
INTEGER myIter |
./model/src/calc_surf_dr.F |
95 |
CALC_SURF_DR |
& ' i,j,k,bi,bj,Thid,Iter=',i,j,ks,bi,bj,myThid,myIter |
./model/src/calc_surf_dr.F |
99 |
CALC_SURF_DR |
& ' i,j,k,bi,bj,Thid,Iter=',i,j,ks,bi,bj,myThid,myIter |
./pkg/mnc/mnc_update_time.F |
12 |
MNC_UPDATE_TIME |
I myTime, myIter, myThid ) |
./pkg/mnc/mnc_update_time.F |
28 |
MNC_UPDATE_TIME |
INTEGER myIter |
./pkg/mnc/mnc_update_time.F |
44 |
MNC_UPDATE_TIME |
CALL MNC_CW_CITER_SETG( 1, 1, -1, myIter , myThid ) |
./pkg/mnc/mnc_update_time.F |
56 |
MNC_UPDATE_TIME |
CALL MNC_CW_CITER_SETG( 1, 1, myIter, -1 , myThid ) |
./model/src/calc_wsurf_tr.F |
10 |
CALC_WSURF_TR |
I myTime, myIter, myThid ) |
./model/src/calc_wsurf_tr.F |
41 |
CALC_WSURF_TR |
INTEGER myIter |
./pkg/mom_common/mom_u_botdrag_impl.F |
16 |
MOM_U_BOTDRAG_IMPL |
I bi, bj, myIter, myThid ) |
./pkg/mom_common/mom_u_botdrag_impl.F |
46 |
MOM_U_BOTDRAG_IMPL |
INTEGER myIter, myThid |
./pkg/mom_common/mom_u_implicit_r.F |
11 |
MOM_U_IMPLICIT_R |
I bi, bj, myTime, myIter, myThid ) |
./pkg/mom_common/mom_u_implicit_r.F |
137 |
MOM_U_IMPLICIT_R |
I bi, bj, myIter, myThid ) |
./pkg/mom_common/mom_u_implicit_r.F |
35 |
MOM_U_IMPLICIT_R |
INTEGER myIter, myThid |
./pkg/mom_common/mom_v_botdrag_impl.F |
16 |
MOM_V_BOTDRAG_IMPL |
I bi, bj, myIter, myThid ) |
./pkg/mom_common/mom_v_botdrag_impl.F |
46 |
MOM_V_BOTDRAG_IMPL |
INTEGER myIter, myThid |
./pkg/mom_common/mom_v_implicit_r.F |
11 |
MOM_V_IMPLICIT_R |
I bi, bj, myTime, myIter, myThid ) |
./pkg/mom_common/mom_v_implicit_r.F |
137 |
MOM_V_IMPLICIT_R |
I bi, bj, myIter, myThid ) |
./pkg/mom_common/mom_v_implicit_r.F |
35 |
MOM_V_IMPLICIT_R |
INTEGER myIter, myThid |
./pkg/mom_fluxform/mom_calc_rtrans.F |
12 |
MOM_CALC_RTRANS |
I myTime, myIter, myThid) |
./pkg/mom_fluxform/mom_calc_rtrans.F |
47 |
MOM_CALC_RTRANS |
INTEGER k, bi, bj, myIter, myThid |
./pkg/mom_fluxform/mom_fluxform.F |
340 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
359 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
375 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
384 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
46 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_fluxform.F |
97 |
MOM_FLUXFORM |
INTEGER myIter |
./pkg/mom_fluxform/mom_uv_boundary.F |
14 |
MOM_UV_BOUNDARY |
I myTime, myIter, myThid ) |
./pkg/mom_fluxform/mom_uv_boundary.F |
42 |
MOM_UV_BOUNDARY |
INTEGER myIter |
./pkg/mom_vecinv/mom_vecinv.F |
177 |
MOM_VECINV |
CALL MNC_CW_I_W_S('I','mom_vi',0,0,'iter',myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
18 |
MOM_VECINV |
I myTime, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
631 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('fV','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
632 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('fU','I10',1,vCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
727 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('zV','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
728 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('zU','I10',1,vCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
792 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('KEx','I10',1,uCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
793 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('KEy','I10',1,vCf,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
84 |
MOM_VECINV |
INTEGER myIter |
./pkg/mom_vecinv/mom_vecinv.F |
853 |
MOM_VECINV |
& .AND. k.EQ.4 .AND. myIter.EQ.nIter0 |
./pkg/mom_vecinv/mom_vecinv.F |
864 |
MOM_VECINV |
& bi,bj,k, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
866 |
MOM_VECINV |
& bi,bj,k, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
868 |
MOM_VECINV |
& bi,bj,k, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
870 |
MOM_VECINV |
& bi,bj,k, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
873 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('W3','I10',1,omega3, bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
874 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('Z3','I10',1,vort3BC,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
875 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('KE','I10',1,KE, bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
876 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('D', 'I10',1,hDiv, bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
877 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('Dt','I10',1,tension,bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
879 |
MOM_VECINV |
& bi,bj,k, myIter, myThid ) |
./pkg/mom_vecinv/mom_vecinv.F |
880 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('Du','I10',1,guDiss, bi,bj,k,myIter,myThid) |
./pkg/mom_vecinv/mom_vecinv.F |
881 |
MOM_VECINV |
CALL WRITE_LOCAL_RL('Dv','I10',1,gvDiss, bi,bj,k,myIter,myThid) |
./model/src/cg3d.F |
20 |
CG3D |
I myIter, myThid ) |
./model/src/cg3d.F |
244 |
CG3D |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
./model/src/cg3d.F |
519 |
CG3D |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
./model/src/cg3d.F |
74 |
CG3D |
INTEGER myIter |
./model/src/cg3d_ex0.F |
20 |
CG3D_EX0 |
I myIter, myThid ) |
./model/src/cg3d_ex0.F |
239 |
CG3D_EX0 |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
./model/src/cg3d_ex0.F |
502 |
CG3D_EX0 |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
./model/src/cg3d_ex0.F |
66 |
CG3D_EX0 |
INTEGER myIter |
./pkg/monitor/mon_calc_advcfl.F |
131 |
MON_CALC_ADVCFL_GLOB |
I maxCFL, myIter, myThid ) |
./pkg/monitor/mon_calc_advcfl.F |
149 |
MON_CALC_ADVCFL_GLOB |
INTEGER myIter |
./pkg/monitor/mon_calc_advcfl.F |
20 |
MON_CALC_ADVCFL_TILE |
I myIter, myThid ) |
./pkg/monitor/mon_calc_advcfl.F |
50 |
MON_CALC_ADVCFL_TILE |
INTEGER myIter, myThid |
./pkg/monitor/mon_ke.F |
12 |
MON_KE |
I myIter, myThid ) |
./pkg/monitor/mon_ke.F |
176 |
MON_KE |
m1 = 1 + mod(myIter+1,2) |
./pkg/monitor/mon_ke.F |
177 |
MON_KE |
m2 = 1 + mod( myIter ,2) |
./pkg/monitor/mon_ke.F |
178 |
MON_KE |
IF ( myIter.GE.2 ) abFac2 = beta_AB |
./pkg/monitor/mon_ke.F |
179 |
MON_KE |
IF ( myIter.GE.1 ) abFac1 = -( alph_AB + abFac2 ) |
./pkg/monitor/mon_ke.F |
181 |
MON_KE |
IF ( myIter.GE.1 ) abFac1 = -( 0.5 _d 0 + abEps ) |
./pkg/monitor/mon_ke.F |
29 |
MON_KE |
INTEGER myIter, myThid |
./model/src/check_pickup.F |
14 |
CHECK_PICKUP |
I myIter, myThid ) |
./model/src/check_pickup.F |
40 |
CHECK_PICKUP |
INTEGER myIter |
./pkg/monitor/mon_solution.F |
13 |
MON_SOLUTION |
I myTime, myIter, myThid ) |
./pkg/monitor/mon_solution.F |
30 |
MON_SOLUTION |
INTEGER myIter |
./pkg/monitor/mon_solution.F |
59 |
MON_SOLUTION |
& 'MON_SOLUTION: STOPPING CALCULATION at Iter=', myIter |
./pkg/monitor/mon_vort3.F |
12 |
MON_VORT3 |
I myIter, myThid ) |
./pkg/monitor/mon_vort3.F |
31 |
MON_VORT3 |
INTEGER myIter, myThid |
./pkg/monitor/monitor.F |
103 |
MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid ) |
./pkg/monitor/monitor.F |
12 |
MONITOR |
I myTime, myIter, myThid ) |
./pkg/monitor/monitor.F |
169 |
MONITOR |
CALL MON_KE(myIter, myThid) |
./pkg/monitor/monitor.F |
172 |
MONITOR |
IF ( monitorSelect.GE.2 ) CALL MON_VORT3( myIter, myThid ) |
./pkg/monitor/monitor.F |
178 |
MONITOR |
CALL MON_SOLUTION( statsTemp, myTime, myIter, myThid ) |
./pkg/monitor/monitor.F |
33 |
MONITOR |
INTEGER myIter |
./pkg/monitor/monitor_ad.F |
112 |
ADMONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
./pkg/monitor/monitor_ad.F |
19 |
ADMONITOR |
I myTime, myIter, myThid ) |
./pkg/monitor/monitor_ad.F |
252 |
ADMONITOR |
CALL ADSEAICE_MONITOR ( myTime, myIter, myThid ) |
./pkg/monitor/monitor_ad.F |
256 |
ADMONITOR |
CALL ADPTRACERS_MONITOR ( myTime, myIter, myThid ) |
./pkg/monitor/monitor_ad.F |
42 |
ADMONITOR |
INTEGER myIter |
./pkg/monitor/monitor_g.F |
108 |
G_MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
./pkg/monitor/monitor_g.F |
19 |
G_MONITOR |
I myTime, myIter, myThid ) |
./pkg/monitor/monitor_g.F |
43 |
G_MONITOR |
INTEGER myIter |
./pkg/my82/my82_calc.F |
11 |
MY82_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./pkg/my82/my82_calc.F |
50 |
MY82_CALC |
INTEGER myIter |
./pkg/my82/my82_output.F |
100 |
MY82_OUTPUT |
& myIter,myThid) |
./pkg/my82/my82_output.F |
102 |
MY82_OUTPUT |
& myIter,myThid) |
./pkg/my82/my82_output.F |
104 |
MY82_OUTPUT |
& myIter,myThid) |
./pkg/my82/my82_output.F |
117 |
MY82_OUTPUT |
CALL MNC_CW_I_W_S('I','my_state',0,0,'iter',myIter,myThid) |
./pkg/my82/my82_output.F |
136 |
MY82_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/my82/my82_output.F |
165 |
MY82_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/my82/my82_output.F |
184 |
MY82_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/my82/my82_output.F |
186 |
MY82_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/my82/my82_output.F |
189 |
MY82_OUTPUT |
& MYviscArTave, myIter, myThid ) |
./pkg/my82/my82_output.F |
191 |
MY82_OUTPUT |
& MYdiffKrTave, myIter, myThid ) |
./pkg/my82/my82_output.F |
193 |
MY82_OUTPUT |
& MYhblTave, myIter, myThid ) |
./pkg/my82/my82_output.F |
206 |
MY82_OUTPUT |
CALL MNC_CW_I_W_S('I','my_timeave',0,0,'iter',myIter,myThid) |
./pkg/my82/my82_output.F |
236 |
MY82_OUTPUT |
IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN |
./pkg/my82/my82_output.F |
59 |
MY82_OUTPUT |
INTEGER myIter |
./pkg/my82/my82_output.F |
86 |
MY82_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/my82/my82_output.F |
95 |
MY82_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/my82/my82_output.F |
97 |
MY82_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/my82/my82_output.F |
9 |
MY82_OUTPUT |
SUBROUTINE MY82_OUTPUT( myTime, myIter, myThid ) |
./model/src/convective_adjustment.F |
14 |
CONVECTIVE_ADJUSTMENT |
I bi, bj, myTime, myIter, myThid ) |
./model/src/convective_adjustment.F |
211 |
CONVECTIVE_ADJUSTMENT |
IF (myIter.NE.nIter0 .AND. taveFreq.GT.0.) THEN |
./model/src/convective_adjustment.F |
218 |
CONVECTIVE_ADJUSTMENT |
IF ( myIter.NE.nIter0 .AND. useDiagnostics ) THEN |
./model/src/convective_adjustment.F |
46 |
CONVECTIVE_ADJUSTMENT |
INTEGER myIter |
./pkg/mypackage/mypackage_calc_rhs.F |
11 |
MYPACKAGE_CALC_RHS |
I myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_calc_rhs.F |
28 |
MYPACKAGE_CALC_RHS |
INTEGER myIter, myThid |
./pkg/mypackage/mypackage_diagnostics_state.F |
12 |
MYPACKAGE_DIAGNOSTICS_STATE |
I myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_diagnostics_state.F |
33 |
MYPACKAGE_DIAGNOSTICS_STATE |
INTEGER myIter, myThid |
./pkg/mypackage/mypackage_read_pickup.F |
11 |
MYPACKAGE_READ_PICKUP |
SUBROUTINE MYPACKAGE_READ_PICKUP( myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
138 |
MYPACKAGE_READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
140 |
MYPACKAGE_READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
142 |
MYPACKAGE_READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
144 |
MYPACKAGE_READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
150 |
MYPACKAGE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
152 |
MYPACKAGE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
163 |
MYPACKAGE_READ_PICKUP |
I myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
26 |
MYPACKAGE_READ_PICKUP |
INTEGER myIter |
./pkg/mypackage/mypackage_read_pickup.F |
59 |
MYPACKAGE_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_mypackage.', myIter |
./pkg/mypackage/mypackage_read_pickup.F |
61 |
MYPACKAGE_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/mypackage/mypackage_read_pickup.F |
72 |
MYPACKAGE_READ_PICKUP |
I Nr, myIter, myThid ) |
./pkg/mypackage/mypackage_tendency_apply.F |
116 |
MYPACKAGE_TENDENCY_APPLY_V |
INTEGER myIter |
./pkg/mypackage/mypackage_tendency_apply.F |
156 |
MYPACKAGE_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_tendency_apply.F |
183 |
MYPACKAGE_TENDENCY_APPLY_T |
INTEGER myIter |
./pkg/mypackage/mypackage_tendency_apply.F |
20 |
MYPACKAGE_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_tendency_apply.F |
213 |
MYPACKAGE_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_tendency_apply.F |
240 |
MYPACKAGE_TENDENCY_APPLY_S |
INTEGER myIter |
./pkg/mypackage/mypackage_tendency_apply.F |
48 |
MYPACKAGE_TENDENCY_APPLY_U |
INTEGER myIter |
./pkg/mypackage/mypackage_tendency_apply.F |
88 |
MYPACKAGE_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
./model/src/convective_adjustment_ini.F |
14 |
CONVECTIVE_ADJUSTMENT_INI |
I bi, bj, myTime, myIter, myThid ) |
./model/src/convective_adjustment_ini.F |
50 |
CONVECTIVE_ADJUSTMENT_INI |
INTEGER myIter |
./pkg/mypackage/mypackage_write_pickup.F |
105 |
MYPACKAGE_WRITE_PICKUP |
& myPa_Surf1, nj, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
111 |
MYPACKAGE_WRITE_PICKUP |
& myPa_Surf2, nj, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
11 |
MYPACKAGE_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
141 |
MYPACKAGE_WRITE_PICKUP |
& nj, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
32 |
MYPACKAGE_WRITE_PICKUP |
INTEGER myIter |
./pkg/mypackage/mypackage_write_pickup.F |
80 |
MYPACKAGE_WRITE_PICKUP |
& myPa_StatScal1, -j, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
85 |
MYPACKAGE_WRITE_PICKUP |
& myPa_StatScal2, -j, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
90 |
MYPACKAGE_WRITE_PICKUP |
& myPa_StatVelU, -j, myIter, myThid ) |
./pkg/mypackage/mypackage_write_pickup.F |
94 |
MYPACKAGE_WRITE_PICKUP |
& myPa_StatVelV, -j, myIter, myThid ) |
./pkg/obcs/obcs_add_tides.F |
11 |
OBCS_ADD_TIDES |
SUBROUTINE OBCS_ADD_TIDES( myTime, myIter, myThid ) |
./pkg/obcs/obcs_add_tides.F |
36 |
OBCS_ADD_TIDES |
INTEGER myIter |
./pkg/obcs/obcs_apply_r_star.F |
14 |
OBCS_APPLY_R_STAR |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_apply_r_star.F |
47 |
OBCS_APPLY_R_STAR |
INTEGER myIter, myThid |
./pkg/obcs/obcs_apply_r_star.F |
62 |
OBCS_APPLY_R_STAR |
useOBeta = myIter.NE.-1 |
./pkg/obcs/obcs_apply_surf_dr.F |
14 |
OBCS_APPLY_SURF_DR |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_apply_surf_dr.F |
49 |
OBCS_APPLY_SURF_DR |
INTEGER myIter, myThid |
./pkg/obcs/obcs_apply_surf_dr.F |
66 |
OBCS_APPLY_SURF_DR |
useOBeta = myIter.NE.-1 |
./pkg/obcs/obcs_balance_flow.F |
11 |
OBCS_BALANCE_FLOW |
SUBROUTINE OBCS_BALANCE_FLOW( myTime, myIter, myThid ) |
./pkg/obcs/obcs_balance_flow.F |
126 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBEu:', flowE, -flowE/areaE |
./pkg/obcs/obcs_balance_flow.F |
175 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBWu:', flowW, -flowW/areaW |
./pkg/obcs/obcs_balance_flow.F |
224 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBNv:', flowN, -flowN/areaN |
./pkg/obcs/obcs_balance_flow.F |
273 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct OBSv:', flowS, -flowS/areaS |
./pkg/obcs/obcs_balance_flow.F |
291 |
OBCS_BALANCE_FLOW |
& myIter, ' ) correct for inFlow:', inFlow, inFlow/areaOB |
./pkg/obcs/obcs_balance_flow.F |
33 |
OBCS_BALANCE_FLOW |
INTEGER myIter |
./model/src/correction_step.F |
12 |
CORRECTION_STEP |
I myTime, myIter, myThid ) |
./model/src/correction_step.F |
46 |
CORRECTION_STEP |
INTEGER myIter |
./pkg/obcs/obcs_diag_balance.F |
14 |
OBCS_DIAG_BALANCE |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_diag_balance.F |
188 |
OBCS_DIAG_BALANCE |
& 'OBCS_DIAG_BALANCE (it,k,n=', myIter, k, n, |
./pkg/obcs/obcs_diag_balance.F |
48 |
OBCS_DIAG_BALANCE |
INTEGER myIter |
./pkg/obcs/obcs_exf_load.F |
105 |
OBCS_EXF_LOAD |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
131 |
OBCS_EXF_LOAD |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
157 |
OBCS_EXF_LOAD |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
18 |
OBCS_EXF_LOAD |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
192 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
270 |
OBCS_EXF_READ_XZ |
INTEGER myIter |
./pkg/obcs/obcs_exf_load.F |
294 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
310 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
319 |
OBCS_EXF_READ_XZ |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/obcs/obcs_exf_load.F |
332 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
336 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
340 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
344 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
349 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
360 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
374 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
390 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
399 |
OBCS_EXF_READ_XZ |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/obcs/obcs_exf_load.F |
412 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
416 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
420 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
424 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
428 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
432 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
467 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
49 |
OBCS_EXF_LOAD |
INTEGER myIter |
./pkg/obcs/obcs_exf_load.F |
545 |
OBCS_EXF_READ_YZ |
INTEGER myIter |
./pkg/obcs/obcs_exf_load.F |
569 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
585 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
594 |
OBCS_EXF_READ_YZ |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/obcs/obcs_exf_load.F |
607 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
611 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
615 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
619 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
624 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
635 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
649 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
665 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
674 |
OBCS_EXF_READ_YZ |
& ' myIter, count0, count1:', myIter, count0, count1 |
./pkg/obcs/obcs_exf_load.F |
687 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
691 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
695 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
699 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
703 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
707 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_exf_load.F |
79 |
OBCS_EXF_LOAD |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
114 |
OBCS_FIELDS_LOAD |
& ' OBCS_FIELDS_LOAD,', myIter, |
./pkg/obcs/obcs_fields_load.F |
127 |
OBCS_FIELDS_LOAD |
IF ( iRec0.NE.iRecP .OR. myIter.EQ.nIter0 ) THEN |
./pkg/obcs/obcs_fields_load.F |
141 |
OBCS_FIELDS_LOAD |
& ' OBCS_FIELDS_LOAD, it=', myIter, |
./pkg/obcs/obcs_fields_load.F |
157 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEuFile, fp,Nr,OBEu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
158 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEuFile, fp,Nr,OBEu1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
161 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEvFile, fp,Nr,OBEv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
162 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEvFile, fp,Nr,OBEv1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
165 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile, fp,Nr,OBEt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
166 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile, fp,Nr,OBEt1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
169 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEsFile, fp,Nr,OBEs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
16 |
OBCS_FIELDS_LOAD |
SUBROUTINE OBCS_FIELDS_LOAD( myTime, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
170 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEsFile, fp,Nr,OBEs1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
174 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile, fp,Nr,OBEw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
175 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile, fp,Nr,OBEw1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
180 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBEetaFile,fp,1,OBEeta0,iRec0,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
181 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBEetaFile,fp,1,OBEeta1,iRec1,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
188 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWuFile, fp,Nr,OBWu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
189 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWuFile, fp,Nr,OBWu1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
192 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile, fp,Nr,OBWv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
193 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile, fp,Nr,OBWv1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
196 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWtFile, fp,Nr,OBWt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
197 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWtFile, fp,Nr,OBWt1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
200 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWsFile, fp,Nr,OBWs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
201 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWsFile, fp,Nr,OBWs1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
205 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWwFile, fp,Nr,OBWw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
206 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWwFile, fp,Nr,OBWw1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
211 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBWetaFile,fp,1,OBWeta0,iRec0,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
212 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL(OBWetaFile,fp,1,OBWeta1,iRec1,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
219 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile, fp,Nr,OBNu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
220 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile, fp,Nr,OBNu1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
223 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNvFile, fp,Nr,OBNv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
224 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNvFile, fp,Nr,OBNv1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
227 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNtFile, fp,Nr,OBNt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
228 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNtFile, fp,Nr,OBNt1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
231 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNsFile, fp,Nr,OBNs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
232 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNsFile, fp,Nr,OBNs1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
236 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNwFile, fp,Nr,OBNw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
237 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNwFile, fp,Nr,OBNw1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
242 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL(OBNetaFile,fp,1,OBNeta0,iRec0,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
243 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL(OBNetaFile,fp,1,OBNeta1,iRec1,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
250 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSuFile, fp,Nr,OBSu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
251 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSuFile, fp,Nr,OBSu1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
254 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSvFile, fp,Nr,OBSv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
255 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSvFile, fp,Nr,OBSv1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
258 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBStFile, fp,Nr,OBSt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
259 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBStFile, fp,Nr,OBSt1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
262 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile, fp,Nr,OBSs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
263 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile, fp,Nr,OBSs1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
267 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSwFile, fp,Nr,OBSw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
268 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSwFile, fp,Nr,OBSw1,iRec1,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
273 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL(OBSetaFile,fp,1,OBSeta0,iRec0,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
274 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL(OBSetaFile,fp,1,OBSeta1,iRec1,myIter,myThid) |
./pkg/obcs/obcs_fields_load.F |
287 |
OBCS_FIELDS_LOAD |
& OBEptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
289 |
OBCS_FIELDS_LOAD |
& OBEptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
296 |
OBCS_FIELDS_LOAD |
& OBWptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
298 |
OBCS_FIELDS_LOAD |
& OBWptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
305 |
OBCS_FIELDS_LOAD |
& OBNptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
307 |
OBCS_FIELDS_LOAD |
& OBNptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
314 |
OBCS_FIELDS_LOAD |
& OBSptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
316 |
OBCS_FIELDS_LOAD |
& OBSptr1(1-Oly,1,1,1,iTr), iRec1, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
349 |
OBCS_FIELDS_LOAD |
IF ( myIter .EQ. nIter0 ) THEN |
./pkg/obcs/obcs_fields_load.F |
357 |
OBCS_FIELDS_LOAD |
& myIter, myTime |
./pkg/obcs/obcs_fields_load.F |
365 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEuFile,fp,Nr,OBEu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
368 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEvFile,fp,Nr,OBEv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
371 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEtFile,fp,Nr,OBEt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
374 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEsFile,fp,Nr,OBEs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
378 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBEwFile,fp,Nr,OBEw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
384 |
OBCS_FIELDS_LOAD |
& myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
391 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWuFile,fp,Nr,OBWu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
394 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWvFile,fp,Nr,OBWv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
397 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWtFile,fp,Nr,OBWt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
400 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWsFile,fp,Nr,OBWs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
404 |
OBCS_FIELDS_LOAD |
CALL READ_REC_YZ_RL( OBWwFile,fp,Nr,OBWw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
410 |
OBCS_FIELDS_LOAD |
& myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
417 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNuFile,fp,Nr,OBNu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
420 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNvFile,fp,Nr,OBNv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
423 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNtFile,fp,Nr,OBNt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
426 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNsFile,fp,Nr,OBNs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
430 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBNwFile,fp,Nr,OBNw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
436 |
OBCS_FIELDS_LOAD |
& myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
443 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSuFile,fp,Nr,OBSu0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
446 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSvFile,fp,Nr,OBSv0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
449 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBStFile,fp,Nr,OBSt0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
452 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSsFile,fp,Nr,OBSs0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
456 |
OBCS_FIELDS_LOAD |
CALL READ_REC_XZ_RL( OBSwFile,fp,Nr,OBSw0,iRec0,myIter,myThid ) |
./pkg/obcs/obcs_fields_load.F |
462 |
OBCS_FIELDS_LOAD |
& myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
474 |
OBCS_FIELDS_LOAD |
& OBEptr0(1-Oly,1,1,1,iTr), iRec0,myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
481 |
OBCS_FIELDS_LOAD |
& OBWptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
488 |
OBCS_FIELDS_LOAD |
& OBNptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
495 |
OBCS_FIELDS_LOAD |
& OBSptr0(1-Oly,1,1,1,iTr), iRec0, myIter, myThid ) |
./pkg/obcs/obcs_fields_load.F |
73 |
OBCS_FIELDS_LOAD |
INTEGER myIter |
./pkg/obcs/obcs_monitor.F |
122 |
OBCS_MONITOR |
I 3, myIter, myThid ) |
./pkg/obcs/obcs_monitor.F |
144 |
OBCS_MONITOR |
I 0, myIter, myThid ) |
./pkg/obcs/obcs_monitor.F |
166 |
OBCS_MONITOR |
I 0, myIter, myThid ) |
./pkg/obcs/obcs_monitor.F |
16 |
OBCS_MONITOR |
SUBROUTINE OBCS_MONITOR( myTime, myIter, myThid ) |
./pkg/obcs/obcs_monitor.F |
214 |
OBCS_MON_WRITESTATS |
I prtSelect, myIter, myThid ) |
./pkg/obcs/obcs_monitor.F |
237 |
OBCS_MON_WRITESTATS |
INTEGER myIter |
./pkg/obcs/obcs_monitor.F |
41 |
OBCS_MONITOR |
INTEGER myIter |
./pkg/obcs/obcs_monitor.F |
98 |
OBCS_MONITOR |
CALL MON_OUT_I( 'tsnumber', myIter,mon_string_none,myThid) |
./pkg/obcs/obcs_output.F |
107 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNu,1,myIter,myThid) |
./pkg/obcs/obcs_output.F |
108 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNv,2,myIter,myThid) |
./pkg/obcs/obcs_output.F |
109 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNt,3,myIter,myThid) |
./pkg/obcs/obcs_output.F |
10 |
OBCS_OUTPUT |
SUBROUTINE OBCS_OUTPUT( myTime, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
110 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNs,4,myIter,myThid) |
./pkg/obcs/obcs_output.F |
113 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNw,5,myIter,myThid) |
./pkg/obcs/obcs_output.F |
121 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSu,1,myIter,myThid) |
./pkg/obcs/obcs_output.F |
122 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSv,2,myIter,myThid) |
./pkg/obcs/obcs_output.F |
123 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSt,3,myIter,myThid) |
./pkg/obcs/obcs_output.F |
124 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSs,4,myIter,myThid) |
./pkg/obcs/obcs_output.F |
127 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSw,5,myIter,myThid) |
./pkg/obcs/obcs_output.F |
135 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEu,1,myIter,myThid) |
./pkg/obcs/obcs_output.F |
136 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEv,2,myIter,myThid) |
./pkg/obcs/obcs_output.F |
137 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEt,3,myIter,myThid) |
./pkg/obcs/obcs_output.F |
138 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEs,4,myIter,myThid) |
./pkg/obcs/obcs_output.F |
141 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEw,5,myIter,myThid) |
./pkg/obcs/obcs_output.F |
149 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWu,1,myIter,myThid) |
./pkg/obcs/obcs_output.F |
150 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWv,2,myIter,myThid) |
./pkg/obcs/obcs_output.F |
151 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWt,3,myIter,myThid) |
./pkg/obcs/obcs_output.F |
152 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWs,4,myIter,myThid) |
./pkg/obcs/obcs_output.F |
155 |
OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWw,5,myIter,myThid) |
./pkg/obcs/obcs_output.F |
165 |
OBCS_OUTPUT |
CALL OBCS_MONITOR( myTime, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
33 |
OBCS_OUTPUT |
INTEGER myIter |
./pkg/obcs/obcs_output.F |
52 |
OBCS_OUTPUT |
& .AND. OBCSprintDiags .AND. myIter.NE.nIter0 |
./pkg/obcs/obcs_output.F |
60 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBNu, 'OBNu' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
61 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBNv, 'OBNv' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
62 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBNt, 'OBNt' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
63 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBNs, 'OBNs' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
67 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBSu, 'OBSu' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
68 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBSv, 'OBSv' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
69 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBSt, 'OBSt' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
70 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBSs, 'OBSs' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
74 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBEu, 'OBEu' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
75 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBEv, 'OBEv' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
76 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBEt, 'OBEt' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
77 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBEs, 'OBEs' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
81 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBWu, 'OBWu' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
82 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBWv, 'OBWv' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
83 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBWt, 'OBWt' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
84 |
OBCS_OUTPUT |
CALL PLOT_FIELD_YZRL( OBWs, 'OBWs' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_output.F |
93 |
OBCS_OUTPUT |
& .AND. myIter.NE.nIter0 |
./pkg/obcs/obcs_output.F |
98 |
OBCS_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/obcs/obcs_prescribe_read.F |
10 |
OBCS_PRESCRIBE_READ |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_prescribe_read.F |
35 |
OBCS_PRESCRIBE_READ |
INTEGER myIter |
./pkg/obcs/obcs_prescribe_read.F |
45 |
OBCS_PRESCRIBE_READ |
CALL OBCS_EXF_LOAD( myTime, myIter, myThid ) |
./pkg/obcs/obcs_prescribe_read.F |
51 |
OBCS_PRESCRIBE_READ |
CALL OBCS_FIELDS_LOAD( myTime, myIter, myThid ) |
./pkg/obcs/obcs_prescribe_read.F |
60 |
OBCS_PRESCRIBE_READ |
if (useCTRL) CALL CTRL_GETOBCSN ( myTime, myIter, mythid ) |
./pkg/obcs/obcs_prescribe_read.F |
64 |
OBCS_PRESCRIBE_READ |
if (useCTRL) CALL CTRL_GETOBCSS ( myTime, myIter, mythid ) |
./pkg/obcs/obcs_prescribe_read.F |
68 |
OBCS_PRESCRIBE_READ |
if (useCTRL) CALL CTRL_GETOBCSW ( myTime, myIter, myThid ) |
./pkg/obcs/obcs_prescribe_read.F |
72 |
OBCS_PRESCRIBE_READ |
if (useCTRL) CALL CTRL_GETOBCSE ( myTime, myIter, myThid ) |
./model/src/cycle_ab_tracer.F |
14 |
CYCLE_AB_TRACER |
I myTime, myIter, myThid ) |
./model/src/cycle_ab_tracer.F |
42 |
CYCLE_AB_TRACER |
INTEGER myIter, myThid |
./pkg/obcs/obcs_read_pickup.F |
100 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,US_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
101 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,US_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
102 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,US_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
103 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,US_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
104 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VS_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
105 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VS_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
106 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VS_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
107 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VS_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
108 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TS_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
109 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TS_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
110 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TS_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
111 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TS_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
112 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SS_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
113 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SS_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
114 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SS_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
115 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SS_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
116 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_US , 17,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
117 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_VS , 18,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
118 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_TS , 19,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
119 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_SS , 20,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
11 |
OBCS_READ_PICKUP |
SUBROUTINE OBCS_READ_PICKUP( myIter, myThid ) |
./pkg/obcs/obcs_read_pickup.F |
122 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WS_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
123 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WS_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
124 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WS_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
125 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WS_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
126 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_WS , 25,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
127 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, OBSw , 26,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
137 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UE_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
138 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UE_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
139 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UE_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
140 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UE_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
141 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VE_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
142 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VE_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
143 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VE_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
144 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VE_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
145 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TE_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
146 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TE_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
147 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TE_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
148 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TE_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
149 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SE_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
150 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SE_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
151 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SE_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
152 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SE_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
153 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_UE , 17,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
154 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_VE , 18,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
155 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_TE , 19,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
156 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_SE , 20,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
159 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WE_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
160 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WE_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
161 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WE_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
162 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WE_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
163 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_WE , 25,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
164 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, OBEw , 26,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
173 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UW_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
174 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UW_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
175 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UW_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
176 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,UW_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
177 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VW_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
178 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VW_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
179 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VW_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
180 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,VW_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
181 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TW_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
182 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TW_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
183 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TW_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
184 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,TW_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
185 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SW_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
186 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SW_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
187 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SW_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
188 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,SW_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
189 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_UW , 17,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
190 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_VW , 18,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
191 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_TW , 19,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
192 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_SW , 20,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
195 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WW_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
196 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WW_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
197 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WW_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
198 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,WW_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
199 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, CVEL_WW , 25,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
200 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr, OBWw , 26,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
228 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBNvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
229 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBNtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
230 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBNsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
237 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBSvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
238 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBStStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
239 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBSsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
246 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBEuStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
247 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBEtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
248 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBEsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
255 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBWuStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
256 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBWtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
257 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBWsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
32 |
OBCS_READ_PICKUP |
INTEGER myIter |
./pkg/obcs/obcs_read_pickup.F |
45 |
OBCS_READ_PICKUP |
WRITE(suff,'(I10.10)') myIter |
./pkg/obcs/obcs_read_pickup.F |
47 |
OBCS_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/obcs/obcs_read_pickup.F |
64 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,UN_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
65 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,UN_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
66 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,UN_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
67 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,UN_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
68 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VN_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
69 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VN_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
70 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VN_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
71 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,VN_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
72 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TN_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
73 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TN_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
74 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TN_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
75 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,TN_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
76 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SN_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
77 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SN_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
78 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SN_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
79 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,SN_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
80 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_UN , 17,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
81 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_VN , 18,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
82 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_TN , 19,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
83 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_SN , 20,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
86 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WN_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
87 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WN_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
88 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WN_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
89 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WN_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
90 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, CVEL_WN , 25,myIter,myThid) |
./pkg/obcs/obcs_read_pickup.F |
91 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr, OBNw , 26,myIter,myThid) |
./pkg/obcs/obcs_sponge.F |
19 |
OBCS_SPONGE_U |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_sponge.F |
213 |
OBCS_SPONGE_V |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_sponge.F |
242 |
OBCS_SPONGE_V |
INTEGER myIter |
./pkg/obcs/obcs_sponge.F |
407 |
OBCS_SPONGE_T |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_sponge.F |
440 |
OBCS_SPONGE_T |
INTEGER myIter |
./pkg/obcs/obcs_sponge.F |
48 |
OBCS_SPONGE_U |
INTEGER myIter |
./pkg/obcs/obcs_sponge.F |
639 |
OBCS_SPONGE_S |
I myTime, myIter, myThid ) |
./pkg/obcs/obcs_sponge.F |
672 |
OBCS_SPONGE_S |
INTEGER myIter |
./pkg/obcs/obcs_write_pickup.F |
101 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,US_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
102 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,US_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
103 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,US_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
104 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,US_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
105 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VS_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
106 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VS_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
107 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VS_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
108 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VS_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
109 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TS_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
110 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TS_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
111 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TS_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
112 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TS_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
113 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SS_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
114 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SS_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
115 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SS_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
116 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SS_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
117 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_US , 17,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
118 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_VS , 18,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
119 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_TS , 19,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
120 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_SS , 20,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
123 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WS_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
124 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WS_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
125 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WS_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
126 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WS_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
127 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_WS , 25,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
128 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, OBSw , 26,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
12 |
OBCS_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
./pkg/obcs/obcs_write_pickup.F |
138 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UE_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
139 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UE_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
140 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UE_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
141 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UE_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
142 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VE_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
143 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VE_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
144 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VE_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
145 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VE_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
146 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TE_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
147 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TE_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
148 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TE_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
149 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TE_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
150 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SE_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
151 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SE_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
152 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SE_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
153 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SE_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
154 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_UE , 17,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
155 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_VE , 18,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
156 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_TE , 19,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
157 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_SE , 20,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
160 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WE_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
161 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WE_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
162 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WE_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
163 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WE_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
164 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_WE , 25,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
165 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, OBEw , 26,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
174 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UW_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
175 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UW_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
176 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UW_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
177 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,UW_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
178 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VW_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
179 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VW_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
180 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VW_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
181 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,VW_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
182 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TW_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
183 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TW_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
184 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TW_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
185 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,TW_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
186 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SW_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
187 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SW_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
188 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SW_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
189 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,SW_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
190 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_UW , 17,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
191 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_VW , 18,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
192 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_TW , 19,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
193 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_SW , 20,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
196 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WW_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
197 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WW_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
198 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WW_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
199 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,WW_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
200 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, CVEL_WW , 25,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
201 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr, OBWw , 26,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
212 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
213 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
214 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
221 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
222 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBStStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
223 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
230 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEuStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
231 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
232 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBEsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
239 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWuStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
240 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWtStevens, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
241 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWsStevens, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
36 |
OBCS_WRITE_PICKUP |
INTEGER myIter |
./pkg/obcs/obcs_write_pickup.F |
65 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,UN_STORE_1, 1,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
66 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,UN_STORE_2, 2,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
67 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,UN_STORE_3, 3,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
68 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,UN_STORE_4, 4,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
69 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VN_STORE_1, 5,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
70 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VN_STORE_2, 6,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
71 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VN_STORE_3, 7,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
72 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,VN_STORE_4, 8,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
73 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TN_STORE_1, 9,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
74 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TN_STORE_2,10,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
75 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TN_STORE_3,11,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
76 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,TN_STORE_4,12,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
77 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SN_STORE_1,13,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
78 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SN_STORE_2,14,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
79 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SN_STORE_3,15,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
80 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,SN_STORE_4,16,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
81 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_UN , 17,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
82 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_VN , 18,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
83 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_TN , 19,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
84 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_SN , 20,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
87 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WN_STORE_1,21,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
88 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WN_STORE_2,22,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
89 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WN_STORE_3,23,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
90 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WN_STORE_4,24,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
91 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, CVEL_WN , 25,myIter,myThid) |
./pkg/obcs/obcs_write_pickup.F |
92 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr, OBNw , 26,myIter,myThid) |
./model/src/cycle_tracer.F |
12 |
CYCLE_TRACER |
I myTime, myIter, myThid ) |
./model/src/cycle_tracer.F |
39 |
CYCLE_TRACER |
INTEGER myIter, myThid |
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
12 |
CPL_DIAGNOSTICS_FILL |
I myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
30 |
CPL_DIAGNOSTICS_FILL |
INTEGER myIter, myThid |
./model/src/diags_oceanic_surf_flux.F |
10 |
DIAGS_OCEANIC_SURF_FLUX |
SUBROUTINE DIAGS_OCEANIC_SURF_FLUX( myTime, myIter, myThid ) |
./model/src/diags_oceanic_surf_flux.F |
37 |
DIAGS_OCEANIC_SURF_FLUX |
INTEGER myIter |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
11 |
CPL_EXPORT_IMPORT_DATA |
I myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
39 |
CPL_EXPORT_IMPORT_DATA |
INTEGER myIter |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
58 |
CPL_EXPORT_IMPORT_DATA |
& ' Exporting oceanic surface fields at iter=', myIter |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
65 |
CPL_EXPORT_IMPORT_DATA |
I myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
67 |
CPL_EXPORT_IMPORT_DATA |
CALL OCN_EXPORT_FIELDS ( myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
78 |
CPL_EXPORT_IMPORT_DATA |
& ' Importing atmospheric surf fluxes at iter=', myIter |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
84 |
CPL_EXPORT_IMPORT_DATA |
CALL OCN_IMPORT_FIELDS ( myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
87 |
CPL_EXPORT_IMPORT_DATA |
CALL CPL_DIAGNOSTICS_FILL( myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_export_import_data.F |
97 |
CPL_EXPORT_IMPORT_DATA |
CALL OCN_EXPORT_DATA( myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
100 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, TYtave , 5, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
101 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, FWtave , 6, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
102 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SFxtave , 7, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
103 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SICtave , 8, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
104 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, MXLtave , 9, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
105 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SSTtave , 10, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
106 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SSStave , 11, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
107 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, vSqtave , 12, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
110 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, aCO2tave , 13, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
111 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, sWSpdtave, 14, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
112 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, iceftave , 15, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
113 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, fCO2tave , 16, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
128 |
CPL_OUTPUT |
CALL MNC_CW_I_W_S('I','cpl_tave',0,0,'iter',myIter,myThid) |
./pkg/ocn_compon_interf/cpl_output.F |
36 |
CPL_OUTPUT |
INTEGER myIter |
./pkg/ocn_compon_interf/cpl_output.F |
59 |
CPL_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/ocn_compon_interf/cpl_output.F |
91 |
CPL_OUTPUT |
WRITE(fn,'(A,I10.10)') 'cplFldtave.', myIter |
./pkg/ocn_compon_interf/cpl_output.F |
93 |
CPL_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
96 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, SLPtave , 1, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
97 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, HFtave , 2, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
98 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, QSWtave , 3, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
99 |
CPL_OUTPUT |
CALL WRITE_REC_XY_RL( fn, TXtave , 4, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_output.F |
9 |
CPL_OUTPUT |
SUBROUTINE CPL_OUTPUT( myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_write_pickup.F |
10 |
CPL_WRITE_PICKUP |
I suff, myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/cpl_write_pickup.F |
42 |
CPL_WRITE_PICKUP |
INTEGER myIter |
./pkg/ocn_compon_interf/cpl_write_pickup.F |
73 |
CPL_WRITE_PICKUP |
& fluxCO2cpl, rec_ind, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_apply_import.F |
10 |
OCN_APPLY_IMPORT |
I apply2AllFields, myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_apply_import.F |
42 |
OCN_APPLY_IMPORT |
INTEGER myIter |
./model/src/diags_phi_hyd.F |
124 |
DIAGS_PHI_HYD |
IF ( useDiagnostics .AND. myIter.GE.0 ) THEN |
./model/src/diags_phi_hyd.F |
13 |
DIAGS_PHI_HYD |
I myTime, myIter, myThid) |
./model/src/diags_phi_hyd.F |
47 |
DIAGS_PHI_HYD |
INTEGER myIter, myThid |
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
34 |
OCN_CPL_DIAGS |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
9 |
OCN_CPL_DIAGS |
SUBROUTINE OCN_CPL_DIAGS( myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
37 |
OCN_CPL_READ_PICKUP |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
52 |
OCN_CPL_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_cpl.', myIter |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
54 |
OCN_CPL_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
80 |
OCN_CPL_READ_PICKUP |
& fluxCO2cpl, rec_ind, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_cpl_read_pickup.F |
9 |
OCN_CPL_READ_PICKUP |
SUBROUTINE OCN_CPL_READ_PICKUP( myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_data.F |
11 |
OCN_EXPORT_DATA |
I myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_data.F |
41 |
OCN_EXPORT_DATA |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_export_data.F |
60 |
OCN_EXPORT_DATA |
& ' Exporting oceanic surface fields at iter=', myIter |
./pkg/ocn_compon_interf/ocn_export_data.F |
67 |
OCN_EXPORT_DATA |
I myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_data.F |
69 |
OCN_EXPORT_DATA |
CALL OCN_EXPORT_FIELDS ( myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_data.F |
78 |
OCN_EXPORT_DATA |
CALL OCN_CPL_DIAGS( myTime, myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_fields.F |
10 |
OCN_EXPORT_FIELDS |
SUBROUTINE OCN_EXPORT_FIELDS( myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_export_fields.F |
35 |
OCN_EXPORT_FIELDS |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_import_fields.F |
10 |
OCN_IMPORT_FIELDS |
SUBROUTINE OCN_IMPORT_FIELDS( myIter, myThid ) |
./pkg/ocn_compon_interf/ocn_import_fields.F |
35 |
OCN_IMPORT_FIELDS |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_store_my_data.F |
47 |
OCN_STORE_MY_DATA |
INTEGER myIter |
./pkg/ocn_compon_interf/ocn_store_my_data.F |
9 |
OCN_STORE_MY_DATA |
I myTime, myIter, myThid ) |
./model/src/diags_phi_rlow.F |
12 |
DIAGS_PHI_RLOW |
I myTime, myIter, myThid) |
./model/src/diags_phi_rlow.F |
54 |
DIAGS_PHI_RLOW |
INTEGER myIter, myThid |
./pkg/offline/offline_fields_load.F |
102 |
OFFLINE_FIELDS_LOAD |
& ' OFFLINE_FIELDS_LOAD,', myIter, |
./pkg/offline/offline_fields_load.F |
114 |
OFFLINE_FIELDS_LOAD |
IF ( intime0.NE.intimeP .OR. myIter.EQ.nIter0 ) THEN |
./pkg/offline/offline_fields_load.F |
135 |
OFFLINE_FIELDS_LOAD |
& ' OFFLINE_FIELDS_LOAD, it=', myIter, |
./pkg/offline/offline_fields_load.F |
155 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, uvel0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
159 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, uvel1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
166 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, vvel0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
169 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, vvel1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
181 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, wvel0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
184 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, wvel1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
194 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, tave0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
197 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, tave1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
207 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, save0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
210 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, save1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
221 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmkx0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
224 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmkx1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
231 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmky0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
234 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmky1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
246 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmkz0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
249 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, gmkz1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
260 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, conv0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
263 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, conv1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
274 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, kdfs0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
277 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, kdfs1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
289 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, kght0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
292 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, Nr, kght1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
318 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, 1, sflx0, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
321 |
OFFLINE_FIELDS_LOAD |
CALL READ_REC_3D_RS( fn, prec, 1, sflx1, 1, myIter, myThid ) |
./pkg/offline/offline_fields_load.F |
360 |
OFFLINE_FIELDS_LOAD |
IF ( myIter.NE.nIter0 .OR. nonlinFreeSurf.LE.0 ) THEN |
./pkg/offline/offline_fields_load.F |
57 |
OFFLINE_FIELDS_LOAD |
INTEGER myIter |
./pkg/offline/offline_fields_load.F |
9 |
OFFLINE_FIELDS_LOAD |
SUBROUTINE OFFLINE_FIELDS_LOAD( myTime, myIter, myThid ) |
./pkg/offline/offline_get_diffus.F |
15 |
OFFLINE_GET_DIFFUS |
SUBROUTINE OFFLINE_GET_DIFFUS( myTime, myIter, myThid ) |
./pkg/offline/offline_get_diffus.F |
49 |
OFFLINE_GET_DIFFUS |
INTEGER myIter |
./pkg/offline/offline_get_diffus.F |
82 |
OFFLINE_GET_DIFFUS |
IF ( Wvelfile .NE. ' ' .AND. myIter.EQ.nIter0 ) THEN |
./model/src/diags_rho.F |
105 |
DIAGS_RHO_G |
I myTime, myIter, myThid ) |
./model/src/diags_rho.F |
137 |
DIAGS_RHO_G |
INTEGER myIter, myThid |
./model/src/diags_rho.F |
19 |
DIAGS_RHO_L |
I myTime, myIter, myThid ) |
./model/src/diags_rho.F |
54 |
DIAGS_RHO_L |
INTEGER myIter, myThid |
./pkg/openad/externalDummies.F |
10 |
DUMMY_IN_STEPPING |
SUBROUTINE DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
./pkg/openad/externalDummies.F |
18 |
DUMMY_IN_STEPPING |
INTEGER myIter |
./pkg/openad/inner_do_loop.F |
202 |
INNER_DO_LOOP |
INTEGER myIter |
./pkg/openad/inner_do_loop.F |
232 |
INNER_DO_LOOP |
CALL FORWARD_STEP_ATM2D( prod, myTime, myIter, myThid ) |
./pkg/openad/inner_do_loop.F |
234 |
INNER_DO_LOOP |
CALL FORWARD_STEP_ATM2D( iloop, myTime, myIter, myThid ) |
./pkg/openad/inner_do_loop.F |
240 |
INNER_DO_LOOP |
CALL FORWARD_STEP( prod, myTime, myIter, myThid ) |
./pkg/openad/inner_do_loop.F |
242 |
INNER_DO_LOOP |
CALL FORWARD_STEP( iloop, myTime, myIter, myThid ) |
./pkg/openad/inner_do_loop.F |
44 |
INNER_DO_LOOP |
SUBROUTINE INNER_DO_LOOP( iloop, myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
121 |
DO_ATMOSPHERIC_PHYS |
CALL UPDATE_OCEAN_EXPORTS ( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
122 |
DO_ATMOSPHERIC_PHYS |
CALL UPDATE_EARTH_EXPORTS ( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
123 |
DO_ATMOSPHERIC_PHYS |
CALL UPDATE_CHEMISTRY_EXPORTS ( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
124 |
DO_ATMOSPHERIC_PHYS |
CALL FIZHI_WRAPPER ( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
125 |
DO_ATMOSPHERIC_PHYS |
CALL STEP_FIZHI_FG ( myTime, myIter, myThid, dTtracerLev(1) ) |
./model/src/do_atmospheric_phys.F |
126 |
DO_ATMOSPHERIC_PHYS |
CALL FIZHI_UPDATE_TIME ( myIter, myThid, deltaTClock ) |
./model/src/do_atmospheric_phys.F |
135 |
DO_ATMOSPHERIC_PHYS |
CALL ATM_PHYS_DRIVER( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
13 |
DO_ATMOSPHERIC_PHYS |
SUBROUTINE DO_ATMOSPHERIC_PHYS(myTime, myIter, myThid) |
./model/src/do_atmospheric_phys.F |
147 |
DO_ATMOSPHERIC_PHYS |
CALL AIM_DO_PHYSICS( myTime, myIter, myThid ) |
./model/src/do_atmospheric_phys.F |
56 |
DO_ATMOSPHERIC_PHYS |
INTEGER myIter |
./pkg/openad/openad_dumpAdjoint.F |
101 |
OPENAD_DUMPADJOINT |
WRITE(suff,'(I10.10)') myIter |
./pkg/openad/openad_dumpAdjoint.F |
103 |
OPENAD_DUMPADJOINT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/openad/openad_dumpAdjoint.F |
107 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjtheta.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
109 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjsalt.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
111 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjuvel.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
113 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjvvel.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
115 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XYZ_RL('adjwvel.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
117 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjetan.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
121 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjdiffkr.',suff,foo5,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
125 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjqnet.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
129 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjempmr.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
133 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjfu.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
137 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjfv.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
141 |
OPENAD_DUMPADJOINT |
call WRITE_FLD_XY_RL('adjhfluxm.',suff,foo4,myIter,1) |
./pkg/openad/openad_dumpAdjoint.F |
27 |
OPENAD_DUMPADJOINT |
SUBROUTINE OPENAD_DUMPADJOINT( myTime, myIter, myThid ) |
./pkg/openad/openad_dumpAdjoint.F |
92 |
OPENAD_DUMPADJOINT |
INTEGER myIter |
./pkg/openad/openad_dumpAdjoint.F |
99 |
OPENAD_DUMPADJOINT |
IF ( MOD(myIter,360).EQ.0 ) THEN |
./pkg/openad/the_model_main.F |
301 |
THE_MODEL_MAIN |
INTEGER myIter |
./pkg/openad/the_model_main.F |
370 |
THE_MODEL_MAIN |
myIter = nIter0 |
./pkg/openad/the_model_main.F |
404 |
THE_MODEL_MAIN |
CALL G_THE_MAIN_LOOP ( myTime, myIter, myThid ) |
./pkg/openad/the_model_main.F |
418 |
THE_MODEL_MAIN |
CALL MDTHE_MAIN_LOOP ( myTime, myIter, myThid ) |
./pkg/openad/the_model_main.F |
448 |
THE_MODEL_MAIN |
CALL OPENAD_THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/openad/the_model_main.F |
460 |
THE_MODEL_MAIN |
CALL OPENAD_THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/openad/the_model_main.F |
496 |
THE_MODEL_MAIN |
call WRITE_FLD_XYZ_RL(fname,suff,foo,myIter,1) |
./pkg/openad/the_model_main.F |
503 |
THE_MODEL_MAIN |
call WRITE_FLD_XYZ_RL(fname,suff,foo,myIter,1) |
./pkg/openad/the_model_main.F |
510 |
THE_MODEL_MAIN |
call WRITE_FLD_XYZ_RL(fname,suff,foo,myIter,1) |
./pkg/openad/the_model_main.F |
519 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
526 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
533 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
540 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
547 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
554 |
THE_MODEL_MAIN |
call WRITE_FLD_XY_RL(fname,suff,foo2D,myIter,1) |
./pkg/openad/the_model_main.F |
595 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/openad/the_model_main.F |
605 |
THE_MODEL_MAIN |
myIter=nIter0 |
./pkg/openad/the_model_main.F |
613 |
THE_MODEL_MAIN |
& .AND. myIter.EQ.nIter0 ) THEN |
./pkg/openad/the_model_main.F |
638 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
./pkg/opps/opps_calc.F |
22 |
OPPS_CALC |
I I, J, bi, bj, myTime, myIter, myThid ) |
./pkg/opps/opps_calc.F |
82 |
OPPS_CALC |
INTEGER myThid, myIter |
./pkg/opps/opps_interface.F |
11 |
OPPS_INTERFACE |
I myTime, myIter, myThid ) |
./pkg/opps/opps_interface.F |
145 |
OPPS_INTERFACE |
I I,J,bi,bj,myTime,myIter,myThid) |
./pkg/opps/opps_interface.F |
54 |
OPPS_INTERFACE |
INTEGER myIter |
./pkg/opps/opps_output.F |
100 |
OPPS_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/opps/opps_output.F |
123 |
OPPS_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/opps/opps_output.F |
137 |
OPPS_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/opps/opps_output.F |
139 |
OPPS_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/opps/opps_output.F |
142 |
OPPS_OUTPUT |
& myIter,myThid) |
./pkg/opps/opps_output.F |
56 |
OPPS_OUTPUT |
INTEGER myIter |
./pkg/opps/opps_output.F |
9 |
OPPS_OUTPUT |
SUBROUTINE OPPS_OUTPUT( myTime, myIter, myThid ) |
./pkg/pp81/pp81_calc.F |
11 |
PP81_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./pkg/pp81/pp81_calc.F |
52 |
PP81_CALC |
INTEGER myIter |
./model/src/do_oceanic_phys.F |
1003 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1008 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1020 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1031 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1042 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1058 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1065 |
DO_OCEANIC_PHYS |
CALL TIMEAVE_SURF_FLUX( bi, bj, myTime, myIter, myThid) |
./model/src/do_oceanic_phys.F |
1097 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1103 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1114 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1118 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1137 |
DO_OCEANIC_PHYS |
CALL OFFLINE_GET_DIFFUS( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1144 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1151 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1157 |
DO_OCEANIC_PHYS |
CALL GMREDI_DO_EXCH( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1171 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
1174 |
DO_OCEANIC_PHYS |
CALL DIAGS_OCEANIC_SURF_FLUX( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
196 |
DO_OCEANIC_PHYS |
INTEGER myIter |
./model/src/do_oceanic_phys.F |
273 |
DO_OCEANIC_PHYS |
CALL OBCS_CALC( myTime+deltaTClock, myIter+1, |
./model/src/do_oceanic_phys.F |
282 |
DO_OCEANIC_PHYS |
CALL OCN_APPLY_IMPORT( .TRUE., myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
321 |
DO_OCEANIC_PHYS |
CALL FRAZIL_CALC_RHS( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
364 |
DO_OCEANIC_PHYS |
CALL THSICE_MAIN( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
382 |
DO_OCEANIC_PHYS |
CALL SEAICE_FAKE( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
40 |
DO_OCEANIC_PHYS |
SUBROUTINE DO_OCEANIC_PHYS(myTime, myIter, myThid) |
./model/src/do_oceanic_phys.F |
476 |
DO_OCEANIC_PHYS |
CALL SEAICE_MODEL( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
479 |
DO_OCEANIC_PHYS |
CALL SEAICE_COST_SENSI ( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
492 |
DO_OCEANIC_PHYS |
CALL OCN_EXPORT_DATA( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
530 |
DO_OCEANIC_PHYS |
CALL THSICE_MAIN( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
551 |
DO_OCEANIC_PHYS |
CALL SHELFICE_THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
566 |
DO_OCEANIC_PHYS |
CALL ICEFRONT_THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
575 |
DO_OCEANIC_PHYS |
CALL SALT_PLUME_DO_EXCH( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
585 |
DO_OCEANIC_PHYS |
CALL FREEZE_SURFACE( myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
608 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
772 |
DO_OCEANIC_PHYS |
I k, bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
785 |
DO_OCEANIC_PHYS |
I k, bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
913 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid) |
./model/src/do_oceanic_phys.F |
921 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
938 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
945 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
948 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
953 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
957 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./model/src/do_oceanic_phys.F |
961 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
./pkg/pp81/pp81_output.F |
104 |
PP81_OUTPUT |
IF ( myIter.EQ.nIter0 ) THEN |
./pkg/pp81/pp81_output.F |
130 |
PP81_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/pp81/pp81_output.F |
146 |
PP81_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/pp81/pp81_output.F |
148 |
PP81_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/pp81/pp81_output.F |
151 |
PP81_OUTPUT |
& PPviscArTave, myIter, myThid ) |
./pkg/pp81/pp81_output.F |
153 |
PP81_OUTPUT |
& PPdiffKrTave, myIter, myThid ) |
./pkg/pp81/pp81_output.F |
174 |
PP81_OUTPUT |
IF ( useDiagnostics .AND. myIter.NE.nIter0 ) THEN |
./pkg/pp81/pp81_output.F |
56 |
PP81_OUTPUT |
INTEGER myIter |
./pkg/pp81/pp81_output.F |
78 |
PP81_OUTPUT |
IF ( myIter.NE.nIter0 .AND. |
./pkg/pp81/pp81_output.F |
85 |
PP81_OUTPUT |
WRITE(suff,'(I10.10)') myIter |
./pkg/pp81/pp81_output.F |
87 |
PP81_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/pp81/pp81_output.F |
90 |
PP81_OUTPUT |
& myIter,myThid) |
./pkg/pp81/pp81_output.F |
92 |
PP81_OUTPUT |
& myIter,myThid) |
./pkg/pp81/pp81_output.F |
9 |
PP81_OUTPUT |
SUBROUTINE PP81_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_stagger_fields_exchanges.F |
31 |
DO_STAGGER_FIELDS_EXCHANGES |
INTEGER myIter |
./model/src/do_stagger_fields_exchanges.F |
9 |
DO_STAGGER_FIELDS_EXCHANGES |
SUBROUTINE DO_STAGGER_FIELDS_EXCHANGES(myTime, myIter, myThid) |
./model/src/do_statevars_diags.F |
105 |
DO_STATEVARS_DIAGS |
CALL THSICE_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
111 |
DO_STATEVARS_DIAGS |
CALL STREAMICE_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
117 |
DO_STATEVARS_DIAGS |
CALL LAND_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
11 |
DO_STATEVARS_DIAGS |
SUBROUTINE DO_STATEVARS_DIAGS( myTime, seqFlag, myIter, myThid ) |
./model/src/do_statevars_diags.F |
123 |
DO_STATEVARS_DIAGS |
CALL MYPACKAGE_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
42 |
DO_STATEVARS_DIAGS |
INTEGER myIter |
./model/src/do_statevars_diags.F |
70 |
DO_STATEVARS_DIAGS |
CALL DIAGNOSTICS_FILL_STATE( selectVars, myIter, myThid ) |
./model/src/do_statevars_diags.F |
74 |
DO_STATEVARS_DIAGS |
CALL GAD_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
81 |
DO_STATEVARS_DIAGS |
CALL PTRACERS_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
87 |
DO_STATEVARS_DIAGS |
CALL GMREDI_DIAGNOSTICS_IMPL( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
93 |
DO_STATEVARS_DIAGS |
CALL BBL_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_diags.F |
99 |
DO_STATEVARS_DIAGS |
CALL SEAICE_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
./model/src/do_statevars_tave.F |
11 |
DO_STATEVARS_TAVE |
SUBROUTINE DO_STATEVARS_TAVE( myTime, myIter, myThid ) |
./model/src/do_statevars_tave.F |
40 |
DO_STATEVARS_TAVE |
INTEGER myIter |
./model/src/do_statevars_tave.F |
55 |
DO_STATEVARS_TAVE |
CALL TIMEAVE_STATVARS( myTime, myIter, bi, bj, myThid ) |
./model/src/do_statevars_tave.F |
59 |
DO_STATEVARS_TAVE |
CALL PTRACERS_TIMEAVE( myTime, myIter, bi, bj, myThid ) |
./pkg/ptracers/ptracers_ad_dump.F |
13 |
PTRACERS_AD_DUMP |
SUBROUTINE PTRACERS_AD_DUMP( myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_ad_dump.F |
47 |
PTRACERS_AD_DUMP |
INTEGER myIter |
./pkg/ptracers/ptracers_ad_dump.F |
74 |
PTRACERS_AD_DUMP |
WRITE(suff,'(I10.10)') myIter |
./pkg/ptracers/ptracers_ad_dump.F |
76 |
PTRACERS_AD_DUMP |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_apply_forcing.F |
122 |
PTRACERS_APPLY_FORCING |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_apply_forcing.F |
14 |
PTRACERS_APPLY_FORCING |
I iTracer, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_apply_forcing.F |
45 |
PTRACERS_APPLY_FORCING |
INTEGER myIter |
./pkg/ptracers/ptracers_apply_forcing.F |
79 |
PTRACERS_APPLY_FORCING |
I iTracer, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
10 |
PTRACERS_CALC_WSURF_TR |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
42 |
PTRACERS_CALC_WSURF_TR |
INTEGER myIter |
./pkg/ptracers/ptracers_check_pickup.F |
13 |
PTRACERS_CHECK_PICKUP |
I myIter, myThid ) |
./pkg/ptracers/ptracers_check_pickup.F |
38 |
PTRACERS_CHECK_PICKUP |
INTEGER myIter |
./model/src/do_the_model_io.F |
114 |
DO_THE_MODEL_IO |
& Nr, myIter, myThid ) |
./model/src/do_the_model_io.F |
116 |
DO_THE_MODEL_IO |
& Nr, myIter, myThid ) |
./model/src/do_the_model_io.F |
118 |
DO_THE_MODEL_IO |
& Nr, myIter, myThid ) |
./model/src/do_the_model_io.F |
120 |
DO_THE_MODEL_IO |
& myIter, myThid ) |
./model/src/do_the_model_io.F |
127 |
DO_THE_MODEL_IO |
CALL WRITE_STATE( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
132 |
DO_THE_MODEL_IO |
IF (taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN |
./model/src/do_the_model_io.F |
133 |
DO_THE_MODEL_IO |
CALL TIMEAVE_STATV_WRITE( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
139 |
DO_THE_MODEL_IO |
& CALL FIZHI_WRITE_STATE( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
145 |
DO_THE_MODEL_IO |
& CALL AIM_WRITE_TAVE( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
14 |
DO_THE_MODEL_IO |
I myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
150 |
DO_THE_MODEL_IO |
& CALL LAND_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
155 |
DO_THE_MODEL_IO |
& CALL OBCS_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
160 |
DO_THE_MODEL_IO |
IF (useGMRedi .AND. myIter.NE.nIter0 .AND. .NOT.useOffLine ) |
./model/src/do_the_model_io.F |
161 |
DO_THE_MODEL_IO |
& CALL GMREDI_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
167 |
DO_THE_MODEL_IO |
& CALL KPP_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
173 |
DO_THE_MODEL_IO |
& CALL PP81_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
179 |
DO_THE_MODEL_IO |
& CALL KL10_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
185 |
DO_THE_MODEL_IO |
& CALL MY82_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
191 |
DO_THE_MODEL_IO |
& CALL OPPS_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
197 |
DO_THE_MODEL_IO |
& CALL GGL90_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
203 |
DO_THE_MODEL_IO |
CALL SBO_CALC( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
204 |
DO_THE_MODEL_IO |
CALL SBO_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
210 |
DO_THE_MODEL_IO |
CALL SEAICE_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
216 |
DO_THE_MODEL_IO |
CALL SHELFICE_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
222 |
DO_THE_MODEL_IO |
IF ( useBulkForce .AND. myIter.NE.nIter0 ) |
./model/src/do_the_model_io.F |
223 |
DO_THE_MODEL_IO |
& CALL BULKF_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
229 |
DO_THE_MODEL_IO |
& CALL THSICE_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
235 |
DO_THE_MODEL_IO |
& CALL PTRACERS_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
241 |
DO_THE_MODEL_IO |
& CALL MATRIX_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
247 |
DO_THE_MODEL_IO |
& CALL GCHEM_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
258 |
DO_THE_MODEL_IO |
& CALL CPL_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
264 |
DO_THE_MODEL_IO |
CALL LAYERS_CALC( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
265 |
DO_THE_MODEL_IO |
CALL LAYERS_OUTPUT( myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
271 |
DO_THE_MODEL_IO |
& CALL DIAGNOSTICS_WRITE( modelEnd, myTime, myIter, myThid ) |
./model/src/do_the_model_io.F |
97 |
DO_THE_MODEL_IO |
INTEGER myIter |
./pkg/ptracers/ptracers_diagnostics_state.F |
10 |
PTRACERS_DIAGNOSTICS_STATE |
SUBROUTINE PTRACERS_DIAGNOSTICS_STATE(myTime, myIter, myThid) |
./pkg/ptracers/ptracers_diagnostics_state.F |
31 |
PTRACERS_DIAGNOSTICS_STATE |
INTEGER myIter |
./pkg/ptracers/ptracers_diagnostics_state.F |
55 |
PTRACERS_DIAGNOSTICS_STATE |
trIter = myIter-1 |
./pkg/ptracers/ptracers_diagnostics_state.F |
57 |
PTRACERS_DIAGNOSTICS_STATE |
trIter = myIter |
./pkg/ptracers/ptracers_forcing_surf.F |
13 |
PTRACERS_FORCING_SURF |
I myTime,myIter,myThid ) |
./pkg/ptracers/ptracers_forcing_surf.F |
43 |
PTRACERS_FORCING_SURF |
INTEGER myIter |
./pkg/ptracers/ptracers_integrate.F |
127 |
PTRACERS_INTEGRATE |
iterNb = myIter - LS_nIter + 1 |
./pkg/ptracers/ptracers_integrate.F |
128 |
PTRACERS_INTEGRATE |
IF (LS_whenToSample.GE.2) iterNb = myIter - LS_nIter |
./pkg/ptracers/ptracers_integrate.F |
130 |
PTRACERS_INTEGRATE |
iterNb = myIter |
./pkg/ptracers/ptracers_integrate.F |
131 |
PTRACERS_INTEGRATE |
IF (staggerTimeStep) iterNb = myIter - 1 |
./pkg/ptracers/ptracers_integrate.F |
17 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
246 |
PTRACERS_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
262 |
PTRACERS_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
303 |
PTRACERS_INTEGRATE |
I iTracer, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
332 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
399 |
PTRACERS_INTEGRATE |
I PTRACERS_dTLev, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
406 |
PTRACERS_INTEGRATE |
I PTRACERS_dTLev, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
416 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
427 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
448 |
PTRACERS_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
467 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
473 |
PTRACERS_INTEGRATE |
I gTracer, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_integrate.F |
59 |
PTRACERS_INTEGRATE |
INTEGER myIter |
./model/src/do_write_pickup.F |
106 |
DO_WRITE_PICKUP |
& "%CHECKPOINT ", myIter, suffix |
./model/src/do_write_pickup.F |
13 |
DO_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./model/src/do_write_pickup.F |
46 |
DO_WRITE_PICKUP |
INTEGER myIter |
./model/src/do_write_pickup.F |
72 |
DO_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./model/src/do_write_pickup.F |
75 |
DO_WRITE_PICKUP |
I myTime, myIter, myThid ) |
./model/src/do_write_pickup.F |
85 |
DO_WRITE_PICKUP |
WRITE(suffix,'(I10.10)') myIter |
./model/src/do_write_pickup.F |
87 |
DO_WRITE_PICKUP |
CALL RW_GET_SUFFIX( suffix, myTime, myIter, myThid ) |
./model/src/do_write_pickup.F |
94 |
DO_WRITE_PICKUP |
I permPickup, suffix, myTime, myIter, myThid ) |
./model/src/do_write_pickup.F |
99 |
DO_WRITE_PICKUP |
I permPickup, suffix, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_monitor.F |
106 |
PTRACERS_MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
./pkg/ptracers/ptracers_monitor.F |
11 |
PTRACERS_MONITOR |
I myIter, myTime, myThid ) |
./pkg/ptracers/ptracers_monitor.F |
34 |
PTRACERS_MONITOR |
INTEGER myIter |
./pkg/ptracers/ptracers_monitor_ad.F |
14 |
ADPTRACERS_MONITOR |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_monitor_ad.F |
40 |
ADPTRACERS_MONITOR |
INTEGER myIter |
./pkg/ptracers/ptracers_output.F |
11 |
PTRACERS_OUTPUT |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_output.F |
29 |
PTRACERS_OUTPUT |
INTEGER myIter |
./pkg/ptracers/ptracers_output.F |
38 |
PTRACERS_OUTPUT |
CALL PTRACERS_WRITE_STATE( myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_output.F |
42 |
PTRACERS_OUTPUT |
IF ( PTRACERS_taveFreq.GT.0. .AND. myIter.NE.nIter0 ) THEN |
./pkg/ptracers/ptracers_output.F |
43 |
PTRACERS_OUTPUT |
CALL PTRACERS_WRITE_TIMEAVE( myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_output.F |
49 |
PTRACERS_OUTPUT |
CALL PTRACERS_MONITOR( myIter, myTime, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
109 |
PTRACERS_READ_PICKUP |
WRITE(fn,'(A,I10.10)') 'pickup_ptracers.', myIter |
./pkg/ptracers/ptracers_read_pickup.F |
111 |
PTRACERS_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
11 |
PTRACERS_READ_PICKUP |
SUBROUTINE PTRACERS_READ_PICKUP( myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
122 |
PTRACERS_READ_PICKUP |
I Nr, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
179 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
197 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
212 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
216 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
231 |
PTRACERS_READ_PICKUP |
& nj, prec, Nr, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
245 |
PTRACERS_READ_PICKUP |
& nj, prec, Nr, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
259 |
PTRACERS_READ_PICKUP |
I myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
269 |
PTRACERS_READ_PICKUP |
I myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
287 |
PTRACERS_READ_PICKUP |
& PTRACERS_ioLabel(iTracer),'.', myIter |
./pkg/ptracers/ptracers_read_pickup.F |
289 |
PTRACERS_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
31 |
PTRACERS_READ_PICKUP |
INTEGER myIter |
./pkg/ptracers/ptracers_read_pickup.F |
320 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_read_pickup.F |
75 |
PTRACERS_READ_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, -1, myThid) |
./pkg/ptracers/ptracers_reset.F |
12 |
PTRACERS_RESET |
SUBROUTINE PTRACERS_RESET( myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_reset.F |
31 |
PTRACERS_RESET |
INTEGER myIter |
./pkg/ptracers/ptracers_reset.F |
56 |
PTRACERS_RESET |
IF ( PTRACERS_resetFreq(iTracer).GT.0. .AND. myIter.GT.0 .AND. |
./pkg/ptracers/ptracers_reset.F |
64 |
PTRACERS_RESET |
& iTracer, myIter |
./pkg/ptracers/ptracers_switch_onoff.F |
11 |
PTRACERS_SWITCH_ONOFF |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_switch_onoff.F |
30 |
PTRACERS_SWITCH_ONOFF |
INTEGER myIter |
./pkg/ptracers/ptracers_timeave.F |
10 |
PTRACERS_TIMEAVE |
I myTime, myIter, bi, bj, myThid ) |
./pkg/ptracers/ptracers_timeave.F |
40 |
PTRACERS_TIMEAVE |
INTEGER myIter |
./pkg/ptracers/ptracers_timeave.F |
59 |
PTRACERS_TIMEAVE |
IF ( myIter .EQ. nIter0 ) THEN |
./pkg/ptracers/ptracers_timeave.F |
72 |
PTRACERS_TIMEAVE |
IF ( myIter .EQ. nIter0 .OR. |
./pkg/ptracers/ptracers_timeave.F |
90 |
PTRACERS_TIMEAVE |
IF ( myIter .NE. nIter0 ) THEN |
./model/src/dynamics.F |
109 |
DYNAMICS |
INTEGER myIter |
./model/src/dynamics.F |
21 |
DYNAMICS |
SUBROUTINE DYNAMICS(myTime, myIter, myThid) |
./model/src/dynamics.F |
261 |
DYNAMICS |
CALL DUMMY_IN_DYNAMICS( myTime, myIter, myThid ) |
./model/src/dynamics.F |
486 |
DYNAMICS |
I myTime, myIter, myThid ) |
./model/src/dynamics.F |
532 |
DYNAMICS |
I myTime, myIter, myThid) |
./model/src/dynamics.F |
542 |
DYNAMICS |
I myTime, myIter, myThid) |
./model/src/dynamics.F |
571 |
DYNAMICS |
I myTime, myIter, myThid) |
./model/src/dynamics.F |
586 |
DYNAMICS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/dynamics.F |
588 |
DYNAMICS |
I bi, bj, myTime, myIter, myThid ) |
./model/src/dynamics.F |
658 |
DYNAMICS |
I myTime, myIter, myThid ) |
./model/src/dynamics.F |
661 |
DYNAMICS |
& CALL TIMESTEP_WVEL( bi,bj, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
100 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
./pkg/ptracers/ptracers_write_pickup.F |
12 |
PTRACERS_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
138 |
PTRACERS_WRITE_PICKUP |
& -j, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
150 |
PTRACERS_WRITE_PICKUP |
& -j, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
178 |
PTRACERS_WRITE_PICKUP |
& j, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
210 |
PTRACERS_WRITE_PICKUP |
I iRec, myIter, myThid ) |
./pkg/ptracers/ptracers_write_pickup.F |
37 |
PTRACERS_WRITE_PICKUP |
INTEGER myIter |
./pkg/ptracers/ptracers_write_pickup.F |
84 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, -1, myThid) |
./pkg/ptracers/ptracers_write_pickup.F |
93 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
./pkg/ptracers/ptracers_write_state.F |
102 |
PTRACERS_WRITE_STATE |
WRITE(suff,'(I10.10)') myIter |
./pkg/ptracers/ptracers_write_state.F |
104 |
PTRACERS_WRITE_STATE |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_state.F |
11 |
PTRACERS_WRITE_STATE |
I myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_state.F |
120 |
PTRACERS_WRITE_STATE |
& pTracer(:,:,:,:,:,iTracer)v,iRec,myIter,myThid) |
./pkg/ptracers/ptracers_write_state.F |
123 |
PTRACERS_WRITE_STATE |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),iRec,myIter,myThid) |
./pkg/ptracers/ptracers_write_state.F |
30 |
PTRACERS_WRITE_STATE |
INTEGER myIter |
./pkg/ptracers/ptracers_write_state.F |
73 |
PTRACERS_WRITE_STATE |
CALL MNC_CW_I_W_S('I','ptracers',0,0,'iter',myIter,myThid) |
./pkg/ptracers/ptracers_write_timeave.F |
10 |
PTRACERS_WRITE_TIMEAVE |
SUBROUTINE PTRACERS_WRITE_TIMEAVE( myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_timeave.F |
119 |
PTRACERS_WRITE_TIMEAVE |
WRITE(suff,'(I10.10)') myIter |
./pkg/ptracers/ptracers_write_timeave.F |
121 |
PTRACERS_WRITE_TIMEAVE |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/ptracers/ptracers_write_timeave.F |
128 |
PTRACERS_WRITE_TIMEAVE |
& myIter, myThid ) |
./pkg/ptracers/ptracers_write_timeave.F |
132 |
PTRACERS_WRITE_TIMEAVE |
& myIter, myThid ) |
./pkg/ptracers/ptracers_write_timeave.F |
145 |
PTRACERS_WRITE_TIMEAVE |
WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter |
./pkg/ptracers/ptracers_write_timeave.F |
151 |
PTRACERS_WRITE_TIMEAVE |
& '// PTRACER time-average data written, t-step', myIter |
./pkg/ptracers/ptracers_write_timeave.F |
36 |
PTRACERS_WRITE_TIMEAVE |
INTEGER myIter |
./pkg/ptracers/ptracers_write_timeave.F |
90 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_I_W_S('I','ptr_tave',0,0,'iter',myIter,myThid) |
./pkg/ptracers/ptracers_write_timeave.F |
96 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_I_W_S('I','ptr_flux_tave',0,0,'iter',myIter, |
./model/src/external_fields_load.F |
10 |
EXTERNAL_FIELDS_LOAD |
SUBROUTINE EXTERNAL_FIELDS_LOAD( myTime, myIter, myThid ) |
./model/src/external_fields_load.F |
111 |
EXTERNAL_FIELDS_LOAD |
& ' EXTERNAL_FIELDS_LOAD, it=', myIter, |
./model/src/external_fields_load.F |
119 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
121 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
125 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
127 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
131 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
133 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
136 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
138 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
142 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
144 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
161 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
163 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
167 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
169 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
173 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
175 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
180 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
182 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
201 |
EXTERNAL_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./model/src/external_fields_load.F |
203 |
EXTERNAL_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./model/src/external_fields_load.F |
53 |
EXTERNAL_FIELDS_LOAD |
INTEGER myIter |
./model/src/external_fields_load.F |
83 |
EXTERNAL_FIELDS_LOAD |
& ' EXTERNAL_FIELDS_LOAD,', myIter, |
./model/src/external_fields_load.F |
95 |
EXTERNAL_FIELDS_LOAD |
IF ( intime0.NE.intimeP .OR. myIter.EQ.nIter0 ) THEN |
./pkg/rbcs/rbcs_add_tendency.F |
13 |
RBCS_ADD_TENDENCY |
I myTime, myIter, myThid ) |
./pkg/rbcs/rbcs_add_tendency.F |
45 |
RBCS_ADD_TENDENCY |
INTEGER myIter |
./pkg/rbcs/rbcs_fields_load.F |
104 |
RBCS_FIELDS_LOAD |
IF ( intime0.NE.intimeP .OR. myIter.EQ.nIter0 ) THEN |
./pkg/rbcs/rbcs_fields_load.F |
117 |
RBCS_FIELDS_LOAD |
& ' RBCS_FIELDS_LOAD, it=', myIter, |
./pkg/rbcs/rbcs_fields_load.F |
133 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcu0, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
135 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcu1, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
137 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxUFile,rbcu0,intime0,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
138 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxUFile,rbcu1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
145 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcv0, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
147 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcv1, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
149 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxVFile,rbcv0,intime0,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
150 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxVFile,rbcv1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
163 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbct0, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
165 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbct1, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
167 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxTFile,rbct0,intime0,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
168 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxTFile,rbct1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
177 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcs0, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
179 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(fullName, rbcs1, 1, myIter, myThid) |
./pkg/rbcs/rbcs_fields_load.F |
181 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxSFile,rbcs0,intime0,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
182 |
RBCS_FIELDS_LOAD |
CALL READ_REC_XYZ_RS(relaxSFile,rbcs1,intime1,myIter,myThid) |
./pkg/rbcs/rbcs_fields_load.F |
199 |
RBCS_FIELDS_LOAD |
& 1, myIter, myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
204 |
RBCS_FIELDS_LOAD |
& 1, myIter, myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
208 |
RBCS_FIELDS_LOAD |
& intime0, myIter, myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
211 |
RBCS_FIELDS_LOAD |
& intime1, myIter, myThid ) |
./pkg/rbcs/rbcs_fields_load.F |
42 |
RBCS_FIELDS_LOAD |
INTEGER myIter |
./pkg/rbcs/rbcs_fields_load.F |
85 |
RBCS_FIELDS_LOAD |
& ' RBCS_FIELDS_LOAD,', myIter, |
./pkg/rbcs/rbcs_fields_load.F |
8 |
RBCS_FIELDS_LOAD |
SUBROUTINE RBCS_FIELDS_LOAD( myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
153 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
171 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
19 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
238 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
390 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
./model/src/external_forcing_surf.F |
52 |
EXTERNAL_FORCING_SURF |
INTEGER myIter |
./pkg/rw/read_fld_xy_rl.F |
17 |
READ_FLD_XY_RL |
INTEGER myIter |
./pkg/rw/read_fld_xy_rl.F |
6 |
READ_FLD_XY_RL |
SUBROUTINE READ_FLD_XY_RL( pref,suff,field,myIter,myThid) |
./pkg/rw/read_fld_xy_rs.F |
17 |
READ_FLD_XY_RS |
INTEGER myIter |
./pkg/rw/read_fld_xy_rs.F |
6 |
READ_FLD_XY_RS |
SUBROUTINE READ_FLD_XY_RS( pref,suff,field,myIter,myThid) |
./pkg/rw/read_fld_xyz_rl.F |
17 |
READ_FLD_XYZ_RL |
INTEGER myIter |
./pkg/rw/read_fld_xyz_rl.F |
6 |
READ_FLD_XYZ_RL |
SUBROUTINE READ_FLD_XYZ_RL( pref,suff,field,myIter,myThid) |
./pkg/rw/read_fld_xyz_rs.F |
17 |
READ_FLD_XYZ_RS |
INTEGER myIter |
./pkg/rw/read_fld_xyz_rs.F |
6 |
READ_FLD_XYZ_RS |
SUBROUTINE READ_FLD_XYZ_RS( pref,suff,field,myIter,myThid) |
./pkg/rw/read_mflds.F |
245 |
READ_MFLDS_3D_RL |
I fPrec, nNz, myIter, myThid ) |
./pkg/rw/read_mflds.F |
274 |
READ_MFLDS_3D_RL |
INTEGER myIter |
./pkg/rw/read_mflds.F |
371 |
READ_MFLDS_LEV_RL |
I fPrec, kSiz, kLo, kHi, myIter, myThid ) |
./pkg/rw/read_mflds.F |
403 |
READ_MFLDS_LEV_RL |
INTEGER myIter |
./pkg/rw/read_mflds.F |
500 |
READ_MFLDS_LEV_RS |
I fPrec, kSiz, kLo, kHi, myIter, myThid ) |
./pkg/rw/read_mflds.F |
532 |
READ_MFLDS_LEV_RS |
INTEGER myIter |
./pkg/rw/read_mflds.F |
628 |
READ_MFLDS_CHECK |
I myIter, myThid ) |
./pkg/rw/read_mflds.F |
654 |
READ_MFLDS_CHECK |
INTEGER myIter |
./pkg/rw/read_mflds.F |
65 |
READ_MFLDS_SET |
I fileDim3, myIter, myThid ) |
./pkg/rw/read_mflds.F |
94 |
READ_MFLDS_SET |
INTEGER myIter |
./pkg/rw/read_rec.F |
139 |
READ_REC_XYZ_RS |
SUBROUTINE READ_REC_XYZ_RS( fName,field,iRec,myIter,myThid ) |
./pkg/rw/read_rec.F |
158 |
READ_REC_XYZ_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
199 |
READ_REC_XYZ_RL |
SUBROUTINE READ_REC_XYZ_RL( fName,field,iRec,myIter,myThid ) |
./pkg/rw/read_rec.F |
218 |
READ_REC_XYZ_RL |
INTEGER myIter |
./pkg/rw/read_rec.F |
24 |
READ_REC_XY_RS |
SUBROUTINE READ_REC_XY_RS( fName,field,iRec,myIter,myThid ) |
./pkg/rw/read_rec.F |
262 |
READ_REC_3D_RS |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
284 |
READ_REC_3D_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
326 |
READ_REC_3D_RL |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
348 |
READ_REC_3D_RL |
INTEGER myIter |
./pkg/rw/read_rec.F |
390 |
READ_REC_LEV_RS |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
40 |
READ_REC_XY_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
413 |
READ_REC_LEV_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
455 |
READ_REC_LEV_RL |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
478 |
READ_REC_LEV_RL |
INTEGER myIter |
./pkg/rw/read_rec.F |
520 |
READ_REC_XZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
540 |
READ_REC_XZ_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
581 |
READ_REC_XZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
602 |
READ_REC_XZ_RL |
INTEGER myIter |
./pkg/rw/read_rec.F |
643 |
READ_REC_YZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
664 |
READ_REC_YZ_RS |
INTEGER myIter |
./pkg/rw/read_rec.F |
706 |
READ_REC_YZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/read_rec.F |
727 |
READ_REC_YZ_RL |
INTEGER myIter |
./pkg/rw/read_rec.F |
80 |
READ_REC_XY_RL |
SUBROUTINE READ_REC_XY_RL( fName,field,iRec,myIter,myThid ) |
./pkg/rw/read_rec.F |
99 |
READ_REC_XY_RL |
INTEGER myIter |
./pkg/rw/rw_get_suffix.F |
12 |
RW_GET_SUFFIX |
I myTime, myIter, myThid ) |
./pkg/rw/rw_get_suffix.F |
31 |
RW_GET_SUFFIX |
INTEGER myIter |
./pkg/rw/rw_get_suffix.F |
55 |
RW_GET_SUFFIX |
WRITE(suff,'(I10.10)') myIter |
./pkg/rw/write_fld_3d_rl.F |
19 |
WRITE_FLD_3D_RL |
INTEGER myIter |
./pkg/rw/write_fld_3d_rl.F |
42 |
WRITE_FLD_3D_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_3d_rl.F |
57 |
WRITE_FLD_3D_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_3d_rl.F |
7 |
WRITE_FLD_3D_RL |
I pref, suff, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_3d_rs.F |
19 |
WRITE_FLD_3D_RS |
INTEGER myIter |
./pkg/rw/write_fld_3d_rs.F |
42 |
WRITE_FLD_3D_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_3d_rs.F |
57 |
WRITE_FLD_3D_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_3d_rs.F |
7 |
WRITE_FLD_3D_RS |
I pref, suff, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rl.F |
103 |
WRITE_FLD_S3D_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rl.F |
10 |
WRITE_FLD_S3D_RL |
I pref, suff, Ovl, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rl.F |
40 |
WRITE_FLD_S3D_RL |
INTEGER myIter |
./pkg/rw/write_fld_s3d_rl.F |
80 |
WRITE_FLD_S3D_RL |
WRITE( fName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_s3d_rs.F |
103 |
WRITE_FLD_S3D_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rs.F |
10 |
WRITE_FLD_S3D_RS |
I pref, suff, Ovl, nNz, field, myIter, myThid ) |
./pkg/rw/write_fld_s3d_rs.F |
40 |
WRITE_FLD_S3D_RS |
INTEGER myIter |
./pkg/rw/write_fld_s3d_rs.F |
80 |
WRITE_FLD_S3D_RS |
WRITE( fName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_xy_rl.F |
17 |
WRITE_FLD_XY_RL |
INTEGER myIter |
./pkg/rw/write_fld_xy_rl.F |
41 |
WRITE_FLD_XY_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_xy_rl.F |
57 |
WRITE_FLD_XY_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_xy_rl.F |
6 |
WRITE_FLD_XY_RL |
SUBROUTINE WRITE_FLD_XY_RL( pref,suff,field,myIter,myThid ) |
./pkg/rw/write_fld_xy_rs.F |
17 |
WRITE_FLD_XY_RS |
INTEGER myIter |
./pkg/rw/write_fld_xy_rs.F |
41 |
WRITE_FLD_XY_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_xy_rs.F |
57 |
WRITE_FLD_XY_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_xy_rs.F |
6 |
WRITE_FLD_XY_RS |
SUBROUTINE WRITE_FLD_XY_RS( pref,suff,field,myIter,myThid ) |
./pkg/rw/write_fld_xyz_rl.F |
17 |
WRITE_FLD_XYZ_RL |
INTEGER myIter |
./pkg/rw/write_fld_xyz_rl.F |
41 |
WRITE_FLD_XYZ_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_xyz_rl.F |
57 |
WRITE_FLD_XYZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_xyz_rl.F |
6 |
WRITE_FLD_XYZ_RL |
SUBROUTINE WRITE_FLD_XYZ_RL( pref,suff,field,myIter,myThid ) |
./pkg/rw/write_fld_xyz_rs.F |
17 |
WRITE_FLD_XYZ_RS |
INTEGER myIter |
./pkg/rw/write_fld_xyz_rs.F |
41 |
WRITE_FLD_XYZ_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_fld_xyz_rs.F |
57 |
WRITE_FLD_XYZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_fld_xyz_rs.F |
6 |
WRITE_FLD_XYZ_RS |
SUBROUTINE WRITE_FLD_XYZ_RS( pref,suff,field,myIter,myThid ) |
./pkg/rw/write_glvec_rl.F |
10 |
WRITE_GLVEC_RL |
I pref, suff, array, sizArr, myIter, myThid ) |
./pkg/rw/write_glvec_rl.F |
29 |
WRITE_GLVEC_RL |
INTEGER myIter |
./pkg/rw/write_glvec_rl.F |
66 |
WRITE_GLVEC_RL |
I bi, bj, iRec, myIter, myThid ) |
./pkg/rw/write_glvec_rs.F |
10 |
WRITE_GLVEC_RS |
I pref, suff, array, sizArr, myIter, myThid ) |
./pkg/rw/write_glvec_rs.F |
29 |
WRITE_GLVEC_RS |
INTEGER myIter |
./pkg/rw/write_glvec_rs.F |
66 |
WRITE_GLVEC_RS |
I bi, bj, iRec, myIter, myThid ) |
./pkg/rw/write_local_rl.F |
11 |
WRITE_LOCAL_RL |
I bi, bj, iRec, myIter, myThArg ) |
./pkg/rw/write_local_rl.F |
39 |
WRITE_LOCAL_RL |
INTEGER myIter |
./pkg/rw/write_local_rl.F |
66 |
WRITE_LOCAL_RL |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_local_rl.F |
86 |
WRITE_LOCAL_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_local_rl.F |
91 |
WRITE_LOCAL_RL |
I bi, bj, iRec, myIter, myThArg ) |
./pkg/rw/write_local_rs.F |
11 |
WRITE_LOCAL_RS |
I bi, bj, iRec, myIter, myThArg ) |
./pkg/rw/write_local_rs.F |
39 |
WRITE_LOCAL_RS |
INTEGER myIter |
./pkg/rw/write_local_rs.F |
66 |
WRITE_LOCAL_RS |
WRITE( fullName, '(A,A,I10.10)' ) pref(s1Lo:s1Hi),'.',myIter |
./pkg/rw/write_local_rs.F |
86 |
WRITE_LOCAL_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_local_rs.F |
91 |
WRITE_LOCAL_RS |
I bi, bj, iRec, myIter, myThArg ) |
./pkg/rw/write_rec.F |
103 |
WRITE_REC_XY_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
139 |
WRITE_REC_XY_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
148 |
WRITE_REC_XY_RL |
SUBROUTINE WRITE_REC_XY_RL( fName,field,iRec,myIter,myThid ) |
./pkg/rw/write_rec.F |
167 |
WRITE_REC_XY_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
203 |
WRITE_REC_XY_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
212 |
WRITE_REC_XYZ_RS |
SUBROUTINE WRITE_REC_XYZ_RS( fName,field,iRec,myIter,myThid ) |
./pkg/rw/write_rec.F |
231 |
WRITE_REC_XYZ_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
267 |
WRITE_REC_XYZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
276 |
WRITE_REC_XYZ_RL |
SUBROUTINE WRITE_REC_XYZ_RL( fName,field,iRec,myIter,myThid ) |
./pkg/rw/write_rec.F |
295 |
WRITE_REC_XYZ_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
331 |
WRITE_REC_XYZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
342 |
WRITE_REC_3D_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
364 |
WRITE_REC_3D_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
397 |
WRITE_REC_3D_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
408 |
WRITE_REC_3D_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
430 |
WRITE_REC_3D_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
463 |
WRITE_REC_3D_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
474 |
WRITE_REC_LEV_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
497 |
WRITE_REC_LEV_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
530 |
WRITE_REC_LEV_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
541 |
WRITE_REC_LEV_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
564 |
WRITE_REC_LEV_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
597 |
WRITE_REC_LEV_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
609 |
WRITE_REC_XZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
629 |
WRITE_REC_XZ_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
662 |
WRITE_REC_XZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
674 |
WRITE_REC_XZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
695 |
WRITE_REC_XZ_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
728 |
WRITE_REC_XZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
740 |
WRITE_REC_YZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
761 |
WRITE_REC_YZ_RS |
INTEGER myIter |
./pkg/rw/write_rec.F |
795 |
WRITE_REC_YZ_RS |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
807 |
WRITE_REC_YZ_RL |
I iRec, myIter, myThid ) |
./pkg/rw/write_rec.F |
828 |
WRITE_REC_YZ_RL |
INTEGER myIter |
./pkg/rw/write_rec.F |
84 |
WRITE_REC_XY_RS |
SUBROUTINE WRITE_REC_XY_RS( fName,field,iRec,myIter,myThid ) |
./pkg/rw/write_rec.F |
862 |
WRITE_REC_YZ_RL |
I iRec, myIter, myThid ) |
./pkg/salt_plume/salt_plume_apply.F |
13 |
SALT_PLUME_APPLY |
I myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_apply.F |
59 |
SALT_PLUME_APPLY |
INTEGER myIter, myThid |
./pkg/salt_plume/salt_plume_calc_depth.F |
14 |
SALT_PLUME_CALC_DEPTH |
I bi, bj, myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_calc_depth.F |
50 |
SALT_PLUME_CALC_DEPTH |
INTEGER myIter |
./model/src/forcing_surf_relax.F |
12 |
FORCING_SURF_RELAX |
I myTime, myIter, myThid ) |
./model/src/forcing_surf_relax.F |
46 |
FORCING_SURF_RELAX |
INTEGER myIter |
./pkg/salt_plume/salt_plume_do_exch.F |
10 |
SALT_PLUME_DO_EXCH |
I myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_do_exch.F |
40 |
SALT_PLUME_DO_EXCH |
INTEGER myIter |
./pkg/salt_plume/salt_plume_forcing_surf.F |
11 |
SALT_PLUME_FORCING_SURF |
I myTime,myIter,myThid ) |
./pkg/salt_plume/salt_plume_forcing_surf.F |
40 |
SALT_PLUME_FORCING_SURF |
INTEGER myIter |
./pkg/salt_plume/salt_plume_frac.F |
15 |
SALT_PLUME_FRAC |
I myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_frac.F |
58 |
SALT_PLUME_FRAC |
INTEGER myIter |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
12 |
SALT_PLUME_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
43 |
SALT_PLUME_TENDENCY_APPLY_S |
INTEGER myIter |
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
12 |
SALT_PLUME_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
43 |
SALT_PLUME_TENDENCY_APPLY_T |
INTEGER myIter |
./pkg/salt_plume/salt_plume_volfrac.F |
10 |
SALT_PLUME_VOLFRAC |
I bi, bj, myTime, myIter, myThid ) |
./pkg/salt_plume/salt_plume_volfrac.F |
54 |
SALT_PLUME_VOLFRAC |
INTEGER myIter |
./model/src/forward_step.F |
1018 |
FORWARD_STEP |
CALL DO_STAGGER_FIELDS_EXCHANGES( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1025 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 1, myIter, myThid ) |
./model/src/forward_step.F |
1037 |
FORWARD_STEP |
CALL THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1052 |
FORWARD_STEP |
CALL TRACERS_CORRECTION_STEP(myTime, myIter, myThid) |
./model/src/forward_step.F |
1076 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1108 |
FORWARD_STEP |
CALL GCHEM_FORCING_SEP( myTime,myIter,myThid ) |
./model/src/forward_step.F |
1126 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 2, myIter, myThid ) |
./model/src/forward_step.F |
1140 |
FORWARD_STEP |
CALL STEP_FIZHI_CORR ( myTime, myIter, myThid, dTtracerLev(1) ) |
./model/src/forward_step.F |
1149 |
FORWARD_STEP |
CALL FLT_MAIN( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1157 |
FORWARD_STEP |
CALL DO_STATEVARS_TAVE( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1163 |
FORWARD_STEP |
CALL NEST_PARENT_IO_2( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1169 |
FORWARD_STEP |
CALL NEST_CHILD_TRANSP( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1177 |
FORWARD_STEP |
CALL MONITOR( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1186 |
FORWARD_STEP |
CALL COST_TILE ( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1196 |
FORWARD_STEP |
modelEnd = myTime.EQ.endTime .OR. myIter.EQ.nEndIter |
./model/src/forward_step.F |
1205 |
FORWARD_STEP |
CALL DO_THE_MODEL_IO( modelEnd, myTime, myIter, myThid ) |
./model/src/forward_step.F |
1212 |
FORWARD_STEP |
CALL PTRACERS_RESET( myTime, myIter, myThid ) |
./model/src/forward_step.F |
1219 |
FORWARD_STEP |
CALL DO_WRITE_PICKUP( modelEnd, myTime, myIter, myThid ) |
./model/src/forward_step.F |
379 |
FORWARD_STEP |
INTEGER myIter |
./model/src/forward_step.F |
404 |
FORWARD_STEP |
myIter = nIter0 + (iloop-1) |
./model/src/forward_step.F |
412 |
FORWARD_STEP |
myIterBeg = myIter |
./model/src/forward_step.F |
429 |
FORWARD_STEP |
CALL RESET_NLFS_VARS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
437 |
FORWARD_STEP |
CALL UPDATE_R_STAR( .FALSE., myTime, myIter, myThid ) |
./model/src/forward_step.F |
446 |
FORWARD_STEP |
CALL UPDATE_SURF_DR( .FALSE., myTime, myIter, myThid ) |
./model/src/forward_step.F |
463 |
FORWARD_STEP |
CALL PTRACERS_SWITCH_ONOFF( myTime, myIter, myThid ) |
./model/src/forward_step.F |
470 |
FORWARD_STEP |
CALL DIAGNOSTICS_SWITCH_ONOFF( myTime, myIter, myThid ) |
./model/src/forward_step.F |
473 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 0, myIter, myThid ) |
./model/src/forward_step.F |
480 |
FORWARD_STEP |
CALL NEST_CHILD_SETMEMO( myTime, myIter, myThid ) |
./model/src/forward_step.F |
486 |
FORWARD_STEP |
CALL NEST_PARENT_IO_1( myTime, myIter, myThid ) |
./model/src/forward_step.F |
502 |
FORWARD_STEP |
CALL LOAD_FIELDS_DRIVER( myTime, myIter, myThid ) |
./model/src/forward_step.F |
513 |
FORWARD_STEP |
CALL BULKF_FORCING( myTime, myIter, myThid ) |
./model/src/forward_step.F |
526 |
FORWARD_STEP |
CALL CHEAPAML( myTime, myIter,myThid ) |
./model/src/forward_step.F |
535 |
FORWARD_STEP |
CALL CTRL_MAP_FORCING( myTime, myIter, myThid ) |
./model/src/forward_step.F |
541 |
FORWARD_STEP |
CALL DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
./model/src/forward_step.F |
549 |
FORWARD_STEP |
CALL CPL_EXPORT_IMPORT_DATA( myTime, myIter, myThid ) |
./model/src/forward_step.F |
557 |
FORWARD_STEP |
CALL OASIS_PUT( myTime, myIter, myThid ) |
./model/src/forward_step.F |
559 |
FORWARD_STEP |
CALL OASIS_GET( myTime, myIter, myThid ) |
./model/src/forward_step.F |
570 |
FORWARD_STEP |
CALL EBM_DRIVER ( myTime, myIter, myThid ) |
./model/src/forward_step.F |
581 |
FORWARD_STEP |
CALL DO_ATMOSPHERIC_PHYS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
616 |
FORWARD_STEP |
CALL DO_OCEANIC_PHYS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
61 |
FORWARD_STEP |
SUBROUTINE FORWARD_STEP( iloop, myTime, myIter, myThid ) |
./model/src/forward_step.F |
621 |
FORWARD_STEP |
CALL STREAMICE_TIMESTEP ( myThid, myIter, |
./model/src/forward_step.F |
664 |
FORWARD_STEP |
CALL GCHEM_CALC_TENDENCY( myTime, myIter, myThid ) |
./model/src/forward_step.F |
736 |
FORWARD_STEP |
CALL LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
./model/src/forward_step.F |
745 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
759 |
FORWARD_STEP |
CALL THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
773 |
FORWARD_STEP |
CALL LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
./model/src/forward_step.F |
782 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
791 |
FORWARD_STEP |
CALL DO_STAGGER_FIELDS_EXCHANGES( myTime, myIter, myThid ) |
./model/src/forward_step.F |
815 |
FORWARD_STEP |
CALL DYNAMICS( myTime, myIter, myThid ) |
./model/src/forward_step.F |
830 |
FORWARD_STEP |
myIter = nIter0 + iLoop |
./model/src/forward_step.F |
836 |
FORWARD_STEP |
CALL MNC_UPDATE_TIME( myTime, myIter, myThid ) |
./model/src/forward_step.F |
847 |
FORWARD_STEP |
CALL OFFLINE_FIELDS_LOAD( myTime, myIter, myThid ) |
./model/src/forward_step.F |
862 |
FORWARD_STEP |
CALL UPDATE_R_STAR( .TRUE., myTime, myIter, myThid ) |
./model/src/forward_step.F |
867 |
FORWARD_STEP |
CALL UPDATE_SIGMA( etaH, myTime, myIter, myThid ) |
./model/src/forward_step.F |
875 |
FORWARD_STEP |
CALL UPDATE_SURF_DR( .TRUE., myTime, myIter, myThid ) |
./model/src/forward_step.F |
897 |
FORWARD_STEP |
CALL UPDATE_CG2D( myTime, myIter, myThid ) |
./model/src/forward_step.F |
910 |
FORWARD_STEP |
& myTime, myIter, myThid ) |
./model/src/forward_step.F |
912 |
FORWARD_STEP |
CALL SHAP_FILT_APPLY_UV( gU,gV,myTime,myIter,myThid) |
./model/src/forward_step.F |
942 |
FORWARD_STEP |
CALL SOLVE_FOR_PRESSURE(myTime, myIter, myThid) |
./model/src/forward_step.F |
958 |
FORWARD_STEP |
CALL MOMENTUM_CORRECTION_STEP(myTime, myIter, myThid) |
./model/src/forward_step.F |
972 |
FORWARD_STEP |
CALL INTEGR_CONTINUITY( uVel, vVel, myTime, myIter, myThid) |
./model/src/forward_step.F |
987 |
FORWARD_STEP |
CALL CALC_R_STAR(etaH, myTime, myIter, myThid ) |
./model/src/forward_step.F |
997 |
FORWARD_STEP |
CALL CALC_SURF_DR(etaH, myTime, myIter, myThid ) |
./pkg/sbo/sbo_calc.F |
13 |
SBO_CALC |
SUBROUTINE SBO_CALC( myTime, myIter, myThid ) |
./pkg/sbo/sbo_calc.F |
86 |
SBO_CALC |
INTEGER myIter, myThid |
./pkg/sbo/sbo_output.F |
102 |
SBO_OUTPUT |
I 0, 0, irecord, myIter, myThid ) |
./pkg/sbo/sbo_output.F |
10 |
SBO_OUTPUT |
SUBROUTINE SBO_OUTPUT( myTime, myIter, myThid ) |
./pkg/sbo/sbo_output.F |
113 |
SBO_OUTPUT |
IF ( myIter .EQ. nIter0 .OR. |
./pkg/sbo/sbo_output.F |
31 |
SBO_OUTPUT |
INTEGER myIter |
./pkg/sbo/sbo_output.F |
87 |
SBO_OUTPUT |
irecord = myIter - nIter0 + 1 |
./pkg/seaice/dynsolver.F |
10 |
DYNSOLVER |
SUBROUTINE DYNSOLVER( myTime, myIter, myThid ) |
./pkg/seaice/dynsolver.F |
42 |
DYNSOLVER |
INTEGER myIter |
./model/src/freeze_surface.F |
10 |
FREEZE_SURFACE |
SUBROUTINE FREEZE_SURFACE( myTime, myIter, myThid ) |
./model/src/freeze_surface.F |
35 |
FREEZE_SURFACE |
INTEGER myIter |
./pkg/seaice/seaice_ad_dump.F |
113 |
SEAICE_AD_DUMP |
& 1, adarea, 1, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
116 |
SEAICE_AD_DUMP |
& 1, adheff, 1, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
119 |
SEAICE_AD_DUMP |
& 1, adhsnow, 1, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
124 |
SEAICE_AD_DUMP |
& 1, aduice, 1, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
127 |
SEAICE_AD_DUMP |
& 1, advice, 1, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
135 |
SEAICE_AD_DUMP |
& 1, adarea, dumpAdRecSi, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
138 |
SEAICE_AD_DUMP |
& 1, adheff, dumpAdRecSi, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
13 |
SEAICE_AD_DUMP |
SUBROUTINE SEAICE_AD_DUMP( myTime, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
141 |
SEAICE_AD_DUMP |
& 1, adhsnow, dumpAdRecSi, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
146 |
SEAICE_AD_DUMP |
& 1, aduice, dumpAdRecSi, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
149 |
SEAICE_AD_DUMP |
& 1, advice, dumpAdRecSi, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
156 |
SEAICE_AD_DUMP |
& suff, var2Du, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
158 |
SEAICE_AD_DUMP |
& var2Du, dumpAdRecMn, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
161 |
SEAICE_AD_DUMP |
& suff, var2Du, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
163 |
SEAICE_AD_DUMP |
& var2Du, dumpAdRecMn, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
166 |
SEAICE_AD_DUMP |
& suff, var2Du, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
168 |
SEAICE_AD_DUMP |
& var2Du, dumpAdRecMn, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
174 |
SEAICE_AD_DUMP |
& suff, var2Du, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
176 |
SEAICE_AD_DUMP |
& var2Du, dumpAdRecMn, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
178 |
SEAICE_AD_DUMP |
& suff, var2Dv, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
180 |
SEAICE_AD_DUMP |
& var2Dv, dumpAdRecMn, myIter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
190 |
SEAICE_AD_DUMP |
CALL MNC_CW_I_W_S('I','adseaice',0,0,'iter',myIter,myThid) |
./pkg/seaice/seaice_ad_dump.F |
54 |
SEAICE_AD_DUMP |
INTEGER myIter |
./pkg/seaice/seaice_ad_dump.F |
90 |
SEAICE_AD_DUMP |
WRITE(suff,'(I10.10)') myIter |
./pkg/seaice/seaice_ad_dump.F |
92 |
SEAICE_AD_DUMP |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
14 |
SEAICE_ADVDIFF |
I uc, vc, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
227 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
235 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
270 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
278 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
301 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
309 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
337 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
345 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
369 |
SEAICE_ADVDIFF |
CALL SEAICE_ITD_SUM(bi, bj, myTime, myIter, myThid) |
./pkg/seaice/seaice_advdiff.F |
380 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
388 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
446 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
454 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
52 |
SEAICE_ADVDIFF |
INTEGER myIter |
./pkg/seaice/seaice_advdiff.F |
576 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
619 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
645 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
677 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advdiff.F |
701 |
SEAICE_ADVDIFF |
CALL SEAICE_ITD_SUM(bi, bj, myTime, myIter, myThid) |
./pkg/seaice/seaice_advdiff.F |
721 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_advection.F |
186 |
SEAICE_ADVECTION |
& .AND. myIter.EQ.nIter0 |
./pkg/seaice/seaice_advection.F |
22 |
SEAICE_ADVECTION |
I bi, bj, myTime, myIter, myThid) |
./pkg/seaice/seaice_advection.F |
758 |
SEAICE_ADVECTION |
& .AND. k.LE.3 .AND. myIter.EQ.1+nIter0 |
./pkg/seaice/seaice_advection.F |
95 |
SEAICE_ADVECTION |
INTEGER myIter |
./pkg/seaice/seaice_bottomdrag_coeffs.F |
23 |
SEAICE_BOTTOMDRAG_COEFFS |
I iStep, myTime, myIter, myThid ) |
./pkg/seaice/seaice_bottomdrag_coeffs.F |
56 |
SEAICE_BOTTOMDRAG_COEFFS |
INTEGER myIter |
./pkg/seaice/seaice_budget_ocean.F |
11 |
SEAICE_BUDGET_OCEAN |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_budget_ocean.F |
52 |
SEAICE_BUDGET_OCEAN |
INTEGER bi, bj, myIter, myThid |
./pkg/seaice/seaice_calc_ice_strength.F |
135 |
SEAICE_CALC_ICE_STRENGTH |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_ice_strength.F |
13 |
SEAICE_CALC_ICE_STRENGTH |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_ice_strength.F |
47 |
SEAICE_CALC_ICE_STRENGTH |
INTEGER myIter |
./pkg/seaice/seaice_calc_lhs.F |
101 |
SEAICE_CALC_LHS |
IF ( myIter.EQ.nIter0 .AND. SEAICEmomStartBDF.EQ.0 ) THEN |
./pkg/seaice/seaice_calc_lhs.F |
134 |
SEAICE_CALC_LHS |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_lhs.F |
15 |
SEAICE_CALC_LHS |
I newtonIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_lhs.F |
205 |
SEAICE_CALC_LHS |
I myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_lhs.F |
63 |
SEAICE_CALC_LHS |
INTEGER myIter |
./pkg/seaice/seaice_calc_residual.F |
100 |
SEAICE_CALC_RESIDUAL |
I krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
104 |
SEAICE_CALC_RESIDUAL |
I krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
116 |
SEAICE_CALC_RESIDUAL |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
128 |
SEAICE_CALC_RESIDUAL |
I newtonIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
12 |
SEAICE_CALC_RESIDUAL |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
44 |
SEAICE_CALC_RESIDUAL |
INTEGER myIter |
./pkg/seaice/seaice_calc_residual.F |
85 |
SEAICE_CALC_RESIDUAL |
I krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_residual.F |
95 |
SEAICE_CALC_RESIDUAL |
I krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_rhs.F |
11 |
SEAICE_CALC_RHS |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_rhs.F |
45 |
SEAICE_CALC_RHS |
INTEGER myIter |
./pkg/seaice/seaice_calc_strainrates.F |
20 |
SEAICE_CALC_STRAINRATES |
I iStep, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_strainrates.F |
65 |
SEAICE_CALC_STRAINRATES |
INTEGER myIter |
./pkg/seaice/seaice_calc_stressdiv.F |
108 |
SEAICE_CALC_STRESS |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_stressdiv.F |
138 |
SEAICE_CALC_STRESS |
INTEGER myIter |
./pkg/seaice/seaice_calc_stressdiv.F |
20 |
SEAICE_CALC_STRESSDIV |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_stressdiv.F |
50 |
SEAICE_CALC_STRESSDIV |
INTEGER myIter |
./pkg/seaice/seaice_calc_stressdiv.F |
77 |
SEAICE_CALC_STRESSDIV |
I bi, bj, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_viscosities.F |
14 |
SEAICE_CALC_VISCOSITIES |
I iStep, myTime, myIter, myThid ) |
./pkg/seaice/seaice_calc_viscosities.F |
40 |
SEAICE_CALC_VISCOSITIES |
INTEGER myIter |
./pkg/seaice/seaice_check_pickup.F |
12 |
SEAICE_CHECK_PICKUP |
I myIter, myThid ) |
./pkg/seaice/seaice_check_pickup.F |
212 |
SEAICE_CHECK_PICKUP |
CALL SEAICE_ITD_PICKUP( myIter, myThid ) |
./pkg/seaice/seaice_check_pickup.F |
40 |
SEAICE_CHECK_PICKUP |
INTEGER myIter |
./pkg/seaice/seaice_cost_accumulate_mean.F |
29 |
SEAICE_COST_ACCUMULATE_MEAN |
INTEGER myIter |
./pkg/seaice/seaice_cost_accumulate_mean.F |
7 |
SEAICE_COST_ACCUMULATE_MEAN |
& myTime, myIter, myThid ) |
./pkg/seaice/seaice_cost_sensi.F |
22 |
SEAICE_COST_SENSI |
integer myIter |
./pkg/seaice/seaice_cost_sensi.F |
28 |
SEAI |