| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/ecco_cost_weights.F |
1661 |
ECCO_COST_WEIGHTS |
_EXCH_XY_RL( wetan, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
1700 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wuvel3d, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
1701 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wvvel3d, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
279 |
ECCO_COST_WEIGHTS |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_cost_weights.F |
289 |
ECCO_COST_WEIGHTS |
I myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
308 |
ECCO_COST_WEIGHTS |
_END_MASTER(myThid) |
|
./pkg/ecco/ecco_cost_weights.F |
416 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wsaltLev, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
459 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wthetaLev, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
504 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wsalt2, myThid ) |
|
./pkg/ecco/ecco_cost_weights.F |
555 |
ECCO_COST_WEIGHTS |
_EXCH_XYZ_RL( wtheta2, myThid ) |
|
./pkg/ecco/ecco_init_varia.F |
47 |
ECCO_INIT_VARIA |
CALL ECCO_PHYS( myThid ) |
|
./pkg/ecco/ecco_init_varia.F |
54 |
ECCO_INIT_VARIA |
CALL ECCO_COST_INIT_VARIA( myThid ) |
|
./pkg/ecco/ecco_phys.F |
106 |
ECCO_PHYS |
CALL GLOBAL_SUM_TILE_RL( VOLsumTile, VOLsumGlob, myThid ) |
|
./pkg/ecco/ecco_phys.F |
107 |
ECCO_PHYS |
CALL GLOBAL_SUM_TILE_RL( RHOsumTile, RHOsumGlob, myThid ) |
|
./pkg/ecco/ecco_phys.F |
128 |
ECCO_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
129 |
ECCO_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
145 |
ECCO_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
146 |
ECCO_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
170 |
ECCO_PHYS |
call ECCO_ZERO(trVol,Nr,zeroRL,myThid) |
|
./pkg/ecco/ecco_phys.F |
171 |
ECCO_PHYS |
call ECCO_ZERO(trHeat,Nr,zeroRL,myThid) |
|
./pkg/ecco/ecco_phys.F |
172 |
ECCO_PHYS |
call ECCO_ZERO(trSalt,Nr,zeroRL,myThid) |
|
./pkg/ecco/ecco_phys.F |
174 |
ECCO_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
175 |
ECCO_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
233 |
ECCO_PHYS |
& 1,zeroRL,myThid) |
|
./pkg/ecco/ecco_phys.F |
235 |
ECCO_PHYS |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
236 |
ECCO_PHYS |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
242 |
ECCO_PHYS |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
243 |
ECCO_PHYS |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
333 |
ECCO_PHYS |
CALL GLOBAL_SUM_TILE_RL( areavolTile, areavolGlob, myThid ) |
|
./pkg/ecco/ecco_phys.F |
335 |
ECCO_PHYS |
& 1, areavolGlob, myThid ) |
|
./pkg/ecco/ecco_phys.F |
74 |
ECCO_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
75 |
ECCO_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
82 |
ECCO_PHYS |
I k, bi, bj, myThid ) |
|
./pkg/ecco/ecco_phys.F |
87 |
ECCO_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_phys.F |
88 |
ECCO_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_readparms.F |
211 |
ECCO_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_readparms.F |
215 |
ECCO_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ecco/ecco_readparms.F |
219 |
ECCO_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
514 |
ECCO_READPARMS |
I myThid ) |
|
./pkg/ecco/ecco_readparms.F |
533 |
ECCO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_readparms.F |
536 |
ECCO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_readparms.F |
542 |
ECCO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_readparms.F |
545 |
ECCO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_readparms.F |
549 |
ECCO_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
554 |
ECCO_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
571 |
ECCO_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
575 |
ECCO_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
782 |
ECCO_READPARMS |
& nR, gencost_mskVertical(1,k), dummyRS, 0, 0, 1, myThid ) |
|
./pkg/ecco/ecco_readparms.F |
890 |
ECCO_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
894 |
ECCO_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ecco/ecco_readparms.F |
902 |
ECCO_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
1035 |
ECCO_MULTFIELD |
subroutine ECCO_MULTFIELD( fld, nnzloc, fld2, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
1049 |
ECCO_MULTFIELD |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
1103 |
ECCO_READBAR |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
1128 |
ECCO_READBAR |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
1159 |
ECCO_READBAR |
& iRec, 1, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
1162 |
ECCO_READBAR |
& iRec, 1, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
1180 |
ECCO_READWEI |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
118 |
ECCO_DIFFMSK |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
1205 |
ECCO_READWEI |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
1233 |
ECCO_READWEI |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_toolbox.F |
1234 |
ECCO_READWEI |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_toolbox.F |
192 |
ECCO_DIFFANOMMSK |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
212 |
ECCO_DIFFANOMMSK |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
287 |
ECCO_OBSMSK |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
29 |
ECCO_ZERO |
subroutine ECCO_ZERO( fld, nnzloc, zeroloc, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
307 |
ECCO_OBSMSK |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
377 |
ECCO_CP |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
397 |
ECCO_CP |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
43 |
ECCO_ZERO |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
450 |
ECCO_CPRSRL |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
470 |
ECCO_CPRSRL |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
524 |
ECCO_ADDCOST |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
544 |
ECCO_ADDCOST |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
619 |
ECCO_ADD |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
639 |
ECCO_ADD |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
693 |
ECCO_SUBTRACT |
I myThid |
|
./pkg/ecco/ecco_toolbox.F |
713 |
ECCO_SUBTRACT |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
765 |
ECCO_ADDMASK |
I nzOut, myThid |
|
./pkg/ecco/ecco_toolbox.F |
786 |
ECCO_ADDMASK |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
844 |
ECCO_DIV |
subroutine ECCO_DIV( fld, nnzloc, numerloc, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
858 |
ECCO_DIV |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
906 |
ECCO_DIVFIELD |
subroutine ECCO_DIVFIELD( fld, nnzloc, flddenom, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
920 |
ECCO_DIVFIELD |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
973 |
ECCO_MULT |
subroutine ECCO_MULT( fld, nnzloc, multloc, myThid ) |
|
./pkg/ecco/ecco_toolbox.F |
987 |
ECCO_MULT |
INTEGER myThid |
|
./pkg/ecco/ecco_toolbox.F |
98 |
ECCO_DIFFMSK |
I myThid |
|
./pkg/embed_files/embed_files_init.F |
11 |
EMBED_FILES_INIT |
SUBROUTINE EMBED_FILES_INIT( myThid ) |
|
./pkg/embed_files/embed_files_init.F |
24 |
EMBED_FILES_INIT |
integer myThid |
|
./pkg/embed_files/embed_files_init.F |
29 |
EMBED_FILES_INIT |
_BEGIN_MASTER( myThid ) |
|
./pkg/embed_files/embed_files_init.F |
41 |
EMBED_FILES_INIT |
_END_MASTER( myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
114 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
119 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
125 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
12 |
EXCH2_CHECK_DEPTHS |
SUBROUTINE EXCH2_CHECK_DEPTHS( rLow, rHigh, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
131 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
137 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
155 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
159 |
EXCH2_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/exch2_check_depths.F |
42 |
EXCH2_CHECK_DEPTHS |
INTEGER myThid |
|
./pkg/exch2/exch2_check_depths.F |
59 |
EXCH2_CHECK_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exch2/exch2_check_depths.F |
60 |
EXCH2_CHECK_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exch2/exch2_get_scal_bounds.F |
15 |
EXCH2_GET_SCAL_BOUNDS |
I myThid ) |
|
./pkg/exch2/exch2_get_scal_bounds.F |
49 |
EXCH2_GET_SCAL_BOUNDS |
INTEGER myThid |
|
./pkg/exch2/exch2_get_uv_bounds.F |
17 |
EXCH2_GET_UV_BOUNDS |
I myThid ) |
|
./pkg/exch2/exch2_get_uv_bounds.F |
59 |
EXCH2_GET_UV_BOUNDS |
INTEGER myThid |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
20 |
W2_CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
271 |
W2_CUMULSUM_Z_TILE_RL |
_END_MASTER( myThid ) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
273 |
W2_CUMULSUM_Z_TILE_RL |
CALL BAR2( myThid ) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
276 |
W2_CUMULSUM_Z_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
277 |
W2_CUMULSUM_Z_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
55 |
W2_CUMULSUM_Z_TILE_RL |
INTEGER myThid |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
90 |
W2_CUMULSUM_Z_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
91 |
W2_CUMULSUM_Z_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
98 |
W2_CUMULSUM_Z_TILE_RL |
CALL BAR2( myThid ) |
|
./pkg/exch2/w2_cumulsum_z_tile.F |
99 |
W2_CUMULSUM_Z_TILE_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
100 |
W2_E2SETUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
103 |
W2_E2SETUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
115 |
W2_E2SETUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
122 |
W2_E2SETUP |
CALL W2_SET_GEN_FACETS( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
124 |
W2_E2SETUP |
CALL W2_SET_SINGLE_FACET( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
126 |
W2_E2SETUP |
CALL W2_SET_MYOWN_FACETS( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
128 |
W2_E2SETUP |
CALL W2_SET_CS6_FACETS( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
135 |
W2_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
138 |
W2_E2SETUP |
CALL W2_SET_F2F_INDEX( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
13 |
W2_E2SETUP |
SUBROUTINE W2_E2SETUP( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
141 |
W2_E2SETUP |
CALL W2_SET_MAP_TILES( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
144 |
W2_E2SETUP |
CALL W2_SET_MAP_CUMSUM( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
147 |
W2_E2SETUP |
CALL W2_SET_TILE2TILES( myThid ) |
|
./pkg/exch2/w2_e2setup.F |
33 |
W2_E2SETUP |
INTEGER myThid |
|
./pkg/exch2/w2_e2setup.F |
74 |
W2_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_e2setup.F |
76 |
W2_E2SETUP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
89 |
W2_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
92 |
W2_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_e2setup.F |
95 |
W2_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
103 |
W2_EEBOOT |
CALL W2_MAP_PROCS( myThid ) |
|
./pkg/exch2/w2_eeboot.F |
107 |
W2_EEBOOT |
CALL W2_PRINT_COMM_SEQUENCE( myThid ) |
|
./pkg/exch2/w2_eeboot.F |
113 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_BOTH, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
117 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
119 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
39 |
W2_EEBOOT |
INTEGER myThid |
|
./pkg/exch2/w2_eeboot.F |
43 |
W2_EEBOOT |
myThid = 1 |
|
./pkg/exch2/w2_eeboot.F |
79 |
W2_EEBOOT |
CALL W2_READPARMS( myThid ) |
|
./pkg/exch2/w2_eeboot.F |
83 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
90 |
W2_EEBOOT |
CALL MDSFINDUNIT( W2_oUnit, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
94 |
W2_EEBOOT |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_eeboot.F |
98 |
W2_EEBOOT |
CALL W2_E2SETUP( myThid ) |
|
./pkg/exch2/w2_map_procs.F |
10 |
W2_MAP_PROCS |
SUBROUTINE W2_MAP_PROCS( myThid ) |
|
./pkg/exch2/w2_map_procs.F |
138 |
W2_MAP_PROCS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_BOTH, myThid ) |
|
./pkg/exch2/w2_map_procs.F |
148 |
W2_MAP_PROCS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_map_procs.F |
158 |
W2_MAP_PROCS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_map_procs.F |
165 |
W2_MAP_PROCS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_map_procs.F |
35 |
W2_MAP_PROCS |
INTEGER myThid |
|
./pkg/exch2/w2_print_comm_sequence.F |
101 |
W2_PRINT_COMM_SEQUENCE |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_comm_sequence.F |
111 |
W2_PRINT_COMM_SEQUENCE |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_comm_sequence.F |
11 |
W2_PRINT_COMM_SEQUENCE |
SUBROUTINE W2_PRINT_COMM_SEQUENCE( myThid ) |
|
./pkg/exch2/w2_print_comm_sequence.F |
137 |
W2_PRINT_COMM_SEQUENCE |
I myThid ) |
|
./pkg/exch2/w2_print_comm_sequence.F |
145 |
W2_PRINT_COMM_SEQUENCE |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_comm_sequence.F |
33 |
W2_PRINT_COMM_SEQUENCE |
INTEGER myThid |
|
./pkg/exch2/w2_print_comm_sequence.F |
85 |
W2_PRINT_COMM_SEQUENCE |
I myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
12 |
W2_PRINT_E2SETUP |
SUBROUTINE W2_PRINT_E2SETUP( myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
155 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
164 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
170 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
199 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
226 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_print_e2setup.F |
32 |
W2_PRINT_E2SETUP |
INTEGER myThid |
|
./pkg/exch2/w2_print_e2setup.F |
56 |
W2_PRINT_E2SETUP |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_readparms.F |
115 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
119 |
W2_READPARMS |
I myThid ) |
|
./pkg/exch2/w2_readparms.F |
125 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
12 |
W2_READPARMS |
SUBROUTINE W2_READPARMS( myThid ) |
|
./pkg/exch2/w2_readparms.F |
134 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
145 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
171 |
W2_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_readparms.F |
174 |
W2_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_readparms.F |
187 |
W2_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_readparms.F |
190 |
W2_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_readparms.F |
199 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
202 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
205 |
W2_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/exch2/w2_readparms.F |
28 |
W2_READPARMS |
INTEGER myThid |
|
./pkg/exch2/w2_set_cs6_facets.F |
113 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
117 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
120 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
123 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
124 |
W2_SET_CS6_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
12 |
W2_SET_CS6_FACETS |
SUBROUTINE W2_SET_CS6_FACETS( myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
160 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE(msgBuf,W2_oUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/exch2/w2_set_cs6_facets.F |
172 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
173 |
W2_SET_CS6_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
179 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
180 |
W2_SET_CS6_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
33 |
W2_SET_CS6_FACETS |
INTEGER myThid |
|
./pkg/exch2/w2_set_cs6_facets.F |
50 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
92 |
W2_SET_CS6_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_cs6_facets.F |
93 |
W2_SET_CS6_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
116 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
119 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
12 |
W2_SET_F2F_INDEX |
SUBROUTINE W2_SET_F2F_INDEX( myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
192 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
195 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
210 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
252 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
255 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
264 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
30 |
W2_SET_F2F_INDEX |
INTEGER myThid |
|
./pkg/exch2/w2_set_f2f_index.F |
46 |
W2_SET_F2F_INDEX |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
61 |
W2_SET_F2F_INDEX |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
67 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
77 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
87 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_f2f_index.F |
96 |
W2_SET_F2F_INDEX |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
103 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
109 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
122 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
125 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
12 |
W2_SET_GEN_FACETS |
SUBROUTINE W2_SET_GEN_FACETS( myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
132 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
31 |
W2_SET_GEN_FACETS |
INTEGER myThid |
|
./pkg/exch2/w2_set_gen_facets.F |
45 |
W2_SET_GEN_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
63 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
70 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
75 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
83 |
W2_SET_GEN_FACETS |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_gen_facets.F |
92 |
W2_SET_GEN_FACETS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
11 |
W2_SET_MAP_CUMSUM |
SUBROUTINE W2_SET_MAP_CUMSUM( myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
215 |
W2_SET_MAP_CUMSUM |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
225 |
W2_SET_MAP_CUMSUM |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
229 |
W2_SET_MAP_CUMSUM |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
29 |
W2_SET_MAP_CUMSUM |
INTEGER myThid |
|
./pkg/exch2/w2_set_map_cumsum.F |
362 |
W2_SET_MAP_CUMSUM |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
367 |
W2_SET_MAP_CUMSUM |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_cumsum.F |
54 |
W2_SET_MAP_CUMSUM |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
101 |
W2_SET_MAP_TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
121 |
W2_SET_MAP_TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
151 |
W2_SET_MAP_TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
156 |
W2_SET_MAP_TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
17 |
W2_SET_MAP_TILES |
SUBROUTINE W2_SET_MAP_TILES( myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
35 |
W2_SET_MAP_TILES |
INTEGER myThid |
|
./pkg/exch2/w2_set_map_tiles.F |
56 |
W2_SET_MAP_TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
74 |
W2_SET_MAP_TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
80 |
W2_SET_MAP_TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
91 |
W2_SET_MAP_TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_map_tiles.F |
98 |
W2_SET_MAP_TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_myown_facets.F |
13 |
W2_SET_MYOWN_FACETS |
SUBROUTINE W2_SET_MYOWN_FACETS( myThid ) |
|
./pkg/exch2/w2_set_myown_facets.F |
34 |
W2_SET_MYOWN_FACETS |
INTEGER myThid |
|
./pkg/exch2/w2_set_single_facet.F |
12 |
W2_SET_SINGLE_FACET |
SUBROUTINE W2_SET_SINGLE_FACET( myThid ) |
|
./pkg/exch2/w2_set_single_facet.F |
30 |
W2_SET_SINGLE_FACET |
INTEGER myThid |
|
./pkg/exch2/w2_set_single_facet.F |
41 |
W2_SET_SINGLE_FACET |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_single_facet.F |
66 |
W2_SET_SINGLE_FACET |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_single_facet.F |
67 |
W2_SET_SINGLE_FACET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_single_facet.F |
75 |
W2_SET_SINGLE_FACET |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/exch2/w2_set_single_facet.F |
76 |
W2_SET_SINGLE_FACET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
12 |
W2_SET_TILE2TILES |
SUBROUTINE W2_SET_TILE2TILES( myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
254 |
W2_SET_TILE2TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
259 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
262 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
288 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
292 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
300 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
309 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
30 |
W2_SET_TILE2TILES |
INTEGER myThid |
|
./pkg/exch2/w2_set_tile2tiles.F |
323 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
326 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
329 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
332 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
340 |
W2_SET_TILE2TILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exch2/w2_set_tile2tiles.F |
57 |
W2_SET_TILE2TILES |
CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid ) |
|
./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 |
156 |
EXF_AD_DUMP |
CALL TIMER_STOP( 'I/O (WRITE) [EXF_AD_DUMP]', myThid ) |
|
./pkg/exf/exf_ad_dump.F |
49 |
EXF_AD_DUMP |
INTEGER myThid |
|
./pkg/exf/exf_ad_dump.F |
70 |
EXF_AD_DUMP |
CALL TIMER_START('I/O (WRITE) [EXF_AD_DUMP]', myThid ) |
|
./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.F |
20 |
EXF_ADJOINT_SNAPSHOTS |
integer myThid |
|
./pkg/exf/exf_adjoint_snapshots.F |
25 |
EXF_ADJOINT_SNAPSHOTS |
call TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/exf/exf_adjoint_snapshots.F |
27 |
EXF_ADJOINT_SNAPSHOTS |
call TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/exf/exf_adjoint_snapshots.F |
6 |
EXF_ADJOINT_SNAPSHOTS |
subroutine EXF_ADJOINT_SNAPSHOTS( iwhen, mytime, 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 |
125 |
G_EXF_ADJOINT_SNAPSHOTS |
CALL TIMER_STOP( 'I/O (WRITE) [TLM LOOP]', myThid ) |
|
./pkg/exf/exf_adjoint_snapshots__g.F |
47 |
G_EXF_ADJOINT_SNAPSHOTS |
INTEGER myThid |
|
./pkg/exf/exf_adjoint_snapshots__g.F |
69 |
G_EXF_ADJOINT_SNAPSHOTS |
CALL TIMER_START('I/O (WRITE) [TLM LOOP]', myThid ) |
|
./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 |
240 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL MNC_CW_SET_UDIM('adexf', -1, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
241 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL MNC_CW_RL_W_S('D','adexf',0,0,'T',myTime,myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
242 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL MNC_CW_SET_UDIM('adexf', 0, 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 |
245 |
ADEXF_ADJOINT_SNAPSHOTS |
& myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
248 |
ADEXF_ADJOINT_SNAPSHOTS |
& adustress, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
250 |
ADEXF_ADJOINT_SNAPSHOTS |
& advstress, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
252 |
ADEXF_ADJOINT_SNAPSHOTS |
& adhflux, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
254 |
ADEXF_ADJOINT_SNAPSHOTS |
& adsflux, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
258 |
ADEXF_ADJOINT_SNAPSHOTS |
& adatemp, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
260 |
ADEXF_ADJOINT_SNAPSHOTS |
& adaqh, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
262 |
ADEXF_ADJOINT_SNAPSHOTS |
& adprecip, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
266 |
ADEXF_ADJOINT_SNAPSHOTS |
& adrunoff, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
271 |
ADEXF_ADJOINT_SNAPSHOTS |
& aduwind, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
273 |
ADEXF_ADJOINT_SNAPSHOTS |
& advwind, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
278 |
ADEXF_ADJOINT_SNAPSHOTS |
& adswdown, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
280 |
ADEXF_ADJOINT_SNAPSHOTS |
& adlwdown, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
284 |
ADEXF_ADJOINT_SNAPSHOTS |
& adclimsst, myThid) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
288 |
ADEXF_ADJOINT_SNAPSHOTS |
& adclimsss, 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 |
302 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
58 |
ADEXF_ADJOINT_SNAPSHOTS |
integer myThid |
|
./pkg/exf/exf_adjoint_snapshots_ad.F |
76 |
ADEXF_ADJOINT_SNAPSHOTS |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./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 |
167 |
EXF_BULKFORMULAE |
INTEGER myThid |
|
./pkg/exf/exf_bulkformulae.F |
254 |
EXF_BULKFORMULAE |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_bulkformulae.F |
259 |
EXF_BULKFORMULAE |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_bulkformulae.F |
266 |
EXF_BULKFORMULAE |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_bulkformulae.F |
267 |
EXF_BULKFORMULAE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/exf/exf_bulkformulae.F |
268 |
EXF_BULKFORMULAE |
act2 = bj - myByLo(myThid) |
|
./pkg/exf/exf_bulkformulae.F |
269 |
EXF_BULKFORMULAE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/exf/exf_bulkformulae.F |
270 |
EXF_BULKFORMULAE |
act3 = myThid - 1 |
|
./pkg/exf/exf_check.F |
113 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
121 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
130 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
140 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
151 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
157 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
16 |
EXF_CHECK |
SUBROUTINE EXF_CHECK( myThid ) |
|
./pkg/exf/exf_check.F |
172 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
179 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
185 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
196 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
202 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
209 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
215 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
224 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
233 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
239 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
246 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
252 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
259 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
265 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
276 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
284 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
291 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
297 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
306 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
315 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
324 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
333 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
342 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
349 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
357 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
363 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
375 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
381 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
389 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
38 |
EXF_CHECK |
INTEGER myThid |
|
./pkg/exf/exf_check.F |
394 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
402 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
408 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
417 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
420 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
423 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
429 |
EXF_CHECK |
& ustress_nlon, ustress_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
432 |
EXF_CHECK |
& vstress_nlon, vstress_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
434 |
EXF_CHECK |
& hflux_nlat, hflux_nlon, hflux_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
436 |
EXF_CHECK |
& sflux_nlat, sflux_nlon, sflux_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
438 |
EXF_CHECK |
& swflux_nlat, swflux_nlon, swflux_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
440 |
EXF_CHECK |
& runoff_nlat, runoff_nlon, runoff_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
443 |
EXF_CHECK |
& saltflx_nlon, saltflx_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
445 |
EXF_CHECK |
& atemp_nlat, atemp_nlon, atemp_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
447 |
EXF_CHECK |
& aqh_nlat, aqh_nlon, aqh_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
449 |
EXF_CHECK |
& hs_nlat, hs_nlon, hs_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
451 |
EXF_CHECK |
& hl_nlat, hl_nlon, hl_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
453 |
EXF_CHECK |
& evap_nlat, evap_nlon, evap_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
455 |
EXF_CHECK |
& precip_nlat, precip_nlon, precip_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
458 |
EXF_CHECK |
& snowprecip_nlon, snowprecip_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
460 |
EXF_CHECK |
& uwind_nlat, uwind_nlon, uwind_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
462 |
EXF_CHECK |
& vwind_nlat, vwind_nlon, vwind_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
464 |
EXF_CHECK |
& wspeed_nlat, wspeed_nlon, wspeed_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
466 |
EXF_CHECK |
& lwflux_nlat, lwflux_nlon, lwflux_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
468 |
EXF_CHECK |
& swdown_nlat, swdown_nlon, swdown_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
46 |
EXF_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_check.F |
470 |
EXF_CHECK |
& lwdown_nlat, lwdown_nlon, lwdown_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
473 |
EXF_CHECK |
& apressure_nlon, apressure_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
476 |
EXF_CHECK |
& tidePot_nlon, tidePot_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
479 |
EXF_CHECK |
& areamask_nlon, areamask_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
482 |
EXF_CHECK |
& climsst_nlon, climsst_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
485 |
EXF_CHECK |
& climsss_nlon, climsss_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
488 |
EXF_CHECK |
& climustr_nlon, climustr_lon_inc, errCount,myThid ) |
|
./pkg/exf/exf_check.F |
491 |
EXF_CHECK |
& climvstr_nlon, climvstr_lon_inc, errCount, myThid ) |
|
./pkg/exf/exf_check.F |
502 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
510 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
514 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
51 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
525 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
534 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
542 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
546 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
561 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
567 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
575 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
585 |
EXF_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_check.F |
592 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
596 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
603 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
60 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
610 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
617 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
620 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
625 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
627 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
635 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
638 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
643 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
645 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
655 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
660 |
EXF_CHECK |
_END_MASTER(myThid) |
|
./pkg/exf/exf_check.F |
675 |
EXF_CHECK_INTERP |
I myThid ) |
|
./pkg/exf/exf_check.F |
68 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
708 |
EXF_CHECK_INTERP |
INTEGER myThid |
|
./pkg/exf/exf_check.F |
719 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
727 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
733 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
740 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
747 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
750 |
EXF_CHECK_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
76 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
83 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
91 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check.F |
98 |
EXF_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_check_range.F |
218 |
EXF_CHECK_RANGE |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_check_range.F |
26 |
EXF_CHECK_RANGE |
INTEGER myIter, myThid |
|
./pkg/exf/exf_check_range.F |
38 |
EXF_CHECK_RANGE |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_check_range.F |
6 |
EXF_CHECK_RANGE |
SUBROUTINE EXF_CHECK_RANGE( myTime, myIter, myThid ) |
|
./pkg/exf/exf_diagnostics_fill.F |
27 |
EXF_DIAGNOSTICS_FILL |
INTEGER myThid |
|
./pkg/exf/exf_diagnostics_fill.F |
34 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(ustress, 'EXFtaux ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
35 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(vstress, 'EXFtauy ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
36 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(wspeed, 'EXFwspee',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
37 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(sflux, 'EXFempmr',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
38 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(hflux, 'EXFqnet ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
40 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(swflux, 'EXFswnet',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
42 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(uwind, 'EXFuwind',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
43 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(vwind, 'EXFvwind',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
45 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(atemp, 'EXFatemp',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
46 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(aqh, 'EXFaqh ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
47 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(hs , 'EXFhs ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
48 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(hl , 'EXFhl ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
49 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(lwflux, 'EXFlwnet',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
50 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(evap, 'EXFevap ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
51 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(precip, 'EXFpreci',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
52 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(snowprecip, 'EXFsnow ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
55 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(lwdown, 'EXFlwdn ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
56 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(swdown, 'EXFswdn ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
59 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(apressure, 'EXFpress',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
62 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(runoff, 'EXFroff ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
65 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(runoftemp, 'EXFroft ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
68 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(saltflx, 'EXFsalfx',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_diagnostics_fill.F |
7 |
EXF_DIAGNOSTICS_FILL |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
107 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
118 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
125 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
132 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
139 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
146 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
153 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
160 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
167 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
174 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
181 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
188 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
195 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
202 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
209 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
28 |
EXF_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/exf/exf_diagnostics_init.F |
53 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
60 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
67 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
74 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
81 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
88 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
95 |
EXF_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/exf/exf_diagnostics_init.F |
9 |
EXF_DIAGNOSTICS_INIT |
SUBROUTINE EXF_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/exf/exf_filter_rl.F |
32 |
EXF_FILTER_RL |
INTEGER myThid |
|
./pkg/exf/exf_filter_rl.F |
46 |
EXF_FILTER_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_filter_rl.F |
47 |
EXF_FILTER_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_filter_rl.F |
8 |
EXF_FILTER_RL |
I ckind, myThid ) |
|
./pkg/exf/exf_getclim.F |
100 |
EXF_GETCLIM |
_EXCH_XY_RL(climsst, 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 |
128 |
EXF_GETCLIM |
_EXCH_XY_RL(climsss, 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 |
165 |
EXF_GETCLIM |
CALL EXCH_UV_XY_RL( climustr, climvstr, .TRUE., myThid ) |
|
./pkg/exf/exf_getclim.F |
169 |
EXF_GETCLIM |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getclim.F |
170 |
EXF_GETCLIM |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_getclim.F |
65 |
EXF_GETCLIM |
INTEGER myThid |
|
./pkg/exf/exf_getclim.F |
85 |
EXF_GETCLIM |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_getclim.F |
87 |
EXF_GETCLIM |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getclim.F |
88 |
EXF_GETCLIM |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffield_start.F |
101 |
EXF_GETFFIELD_START |
CALL CAL_GETDATE( nIter0, startTime, gcm_startdate, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
103 |
EXF_GETFFIELD_START |
I myThid ) |
|
./pkg/exf/exf_getffield_start.F |
104 |
EXF_GETFFIELD_START |
CALL CAL_TOSECONDS ( difftime, fld_start_time, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
117 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
123 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
129 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
137 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
142 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
15 |
EXF_GETFFIELD_START |
I myThid ) |
|
./pkg/exf/exf_getffield_start.F |
50 |
EXF_GETFFIELD_START |
INTEGER myThid |
|
./pkg/exf/exf_getffield_start.F |
73 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
78 |
EXF_GETFFIELD_START |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
86 |
EXF_GETFFIELD_START |
& date_array, myThid ) |
|
./pkg/exf/exf_getffield_start.F |
93 |
EXF_GETFFIELD_START |
I myThid ) |
|
./pkg/exf/exf_getffield_start.F |
94 |
EXF_GETFFIELD_START |
CALL CAL_TOSECONDS ( difftime, fld_start_time, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
127 |
EXF_GETFFIELDREC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
130 |
EXF_GETFFIELDREC |
CALL PRINT_ERROR( msgBuf, 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 |
164 |
EXF_GETFFIELDREC |
CALL CAL_TIMEPASSED(yearStartDate,mydate,difftime,myThid) |
|
./pkg/exf/exf_getffieldrec.F |
165 |
EXF_GETFFIELDREC |
CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid) |
|
./pkg/exf/exf_getffieldrec.F |
172 |
EXF_GETFFIELDREC |
if ( cal_IsLeap(year0,myThid) .eq. 2) |
|
./pkg/exf/exf_getffieldrec.F |
227 |
EXF_GETFFIELDREC |
I deltaTClock, locTime, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
241 |
EXF_GETFFIELDREC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
246 |
EXF_GETFFIELDREC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
250 |
EXF_GETFFIELDREC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
255 |
EXF_GETFFIELDREC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
258 |
EXF_GETFFIELDREC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_getffieldrec.F |
261 |
EXF_GETFFIELDREC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./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 |
146 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
147 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffields.F |
161 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
162 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(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 |
213 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
214 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(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 |
323 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
324 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(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 |
478 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
479 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(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 |
562 |
EXF_GETFFIELDS |
& wevap, myTime, myIter, myThid ) |
|
./pkg/exf/exf_getffields.F |
56 |
EXF_GETFFIELDS |
INTEGER 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 |
620 |
EXF_GETFFIELDS |
& .FALSE.,.FALSE.,.TRUE.,1,myThid) |
|
./pkg/exf/exf_getffields.F |
622 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
623 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffields.F |
638 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
639 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffields.F |
682 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
683 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffields.F |
756 |
EXF_GETFFIELDS |
& .FALSE.,.FALSE.,.TRUE.,1,myThid) |
|
./pkg/exf/exf_getffields.F |
758 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
759 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getffields.F |
95 |
EXF_GETFFIELDS |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_getffields.F |
97 |
EXF_GETFFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getffields.F |
98 |
EXF_GETFFIELDS |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getfield_start.F |
15 |
EXF_GETFIELD_START |
I myThid ) |
|
./pkg/exf/exf_getfield_start.F |
44 |
EXF_GETFIELD_START |
INTEGER myThid |
|
./pkg/exf/exf_getfield_start.F |
65 |
EXF_GETFIELD_START |
I myThid ) |
|
./pkg/exf/exf_getforcing.F |
140 |
EXF_GETFORCING |
INTEGER myThid |
|
./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 |
165 |
EXF_GETFORCING |
& CALL EXCH_UV_XY_RL( ustress, vstress, .TRUE., 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 |
203 |
EXF_GETFORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_getforcing.F |
204 |
EXF_GETFORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_getforcing.F |
245 |
EXF_GETFORCING |
CALL EXCH_UV_XY_RL( ustress, vstress, .TRUE., myThid ) |
|
./pkg/exf/exf_getforcing.F |
247 |
EXF_GETFORCING |
CALL EXCH_UV_AGRID_3D_RL(ustress, vstress, .TRUE., 1, myThid) |
|
./pkg/exf/exf_getforcing.F |
260 |
EXF_GETFORCING |
CALL EXF_GETSURFACEFLUXES( myTime, myIter, myThid ) |
|
./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 |
280 |
EXF_GETFORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_getforcing.F |
281 |
EXF_GETFORCING |
DO bi = myBxLo(myThid), myBxHi(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_getsurfacefluxes.F |
107 |
EXF_GETSURFACEFLUXES |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
108 |
EXF_GETSURFACEFLUXES |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
200 |
EXF_GETSURFACEFLUXES |
_EXCH_XY_RL(tmpUE,myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
201 |
EXF_GETSURFACEFLUXES |
_EXCH_XY_RL(tmpVN,myThid) |
|
./pkg/exf/exf_getsurfacefluxes.F |
207 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_XY_RL( tmpUX, tmpVY, .TRUE., myThid ) |
|
./pkg/exf/exf_getsurfacefluxes.F |
209 |
EXF_GETSURFACEFLUXES |
CALL EXCH_UV_AGRID_3D_RL( tmpUX, tmpVY, .TRUE., 1, myThid) |
|
./pkg/exf/exf_init_fixed.F |
128 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START uwind',myThid) |
|
./pkg/exf/exf_init_fixed.F |
134 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
138 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START vwind',myThid) |
|
./pkg/exf/exf_init_fixed.F |
144 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
150 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START wspeed',myThid) |
|
./pkg/exf/exf_init_fixed.F |
156 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
163 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START ustress',myThid) |
|
./pkg/exf/exf_init_fixed.F |
169 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
174 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START vstress',myThid) |
|
./pkg/exf/exf_init_fixed.F |
180 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
186 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hflux',myThid) |
|
./pkg/exf/exf_init_fixed.F |
192 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
196 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START sflux',myThid) |
|
./pkg/exf/exf_init_fixed.F |
202 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
208 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START swflux',myThid) |
|
./pkg/exf/exf_init_fixed.F |
214 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
221 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START atemp',myThid) |
|
./pkg/exf/exf_init_fixed.F |
227 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
231 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START aqh',myThid) |
|
./pkg/exf/exf_init_fixed.F |
237 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
242 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hs ',myThid) |
|
./pkg/exf/exf_init_fixed.F |
248 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
252 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START hl ',myThid) |
|
./pkg/exf/exf_init_fixed.F |
258 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
263 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START lwflux',myThid) |
|
./pkg/exf/exf_init_fixed.F |
269 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
273 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START precip',myThid) |
|
./pkg/exf/exf_init_fixed.F |
279 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
284 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START snowprecip',myThid) |
|
./pkg/exf/exf_init_fixed.F |
290 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
297 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START evap',myThid) |
|
./pkg/exf/exf_init_fixed.F |
303 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
310 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START runoff',myThid) |
|
./pkg/exf/exf_init_fixed.F |
316 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
31 |
EXF_INIT_FIXED |
INTEGER myThid |
|
./pkg/exf/exf_init_fixed.F |
324 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START saltflx',myThid) |
|
./pkg/exf/exf_init_fixed.F |
330 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
337 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START swdown',myThid) |
|
./pkg/exf/exf_init_fixed.F |
343 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
347 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START lwdown',myThid) |
|
./pkg/exf/exf_init_fixed.F |
353 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
361 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START apressure',myThid) |
|
./pkg/exf/exf_init_fixed.F |
367 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
375 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START tidePot',myThid) |
|
./pkg/exf/exf_init_fixed.F |
381 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
389 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START areamask',myThid) |
|
./pkg/exf/exf_init_fixed.F |
395 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
402 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsN',myThid) |
|
./pkg/exf/exf_init_fixed.F |
408 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
410 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsS',myThid) |
|
./pkg/exf/exf_init_fixed.F |
416 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
418 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsE',myThid) |
|
./pkg/exf/exf_init_fixed.F |
424 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
426 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START obcsW',myThid) |
|
./pkg/exf/exf_init_fixed.F |
432 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
437 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobN',myThid) |
|
./pkg/exf/exf_init_fixed.F |
443 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
445 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobS',myThid) |
|
./pkg/exf/exf_init_fixed.F |
451 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
453 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobE',myThid) |
|
./pkg/exf/exf_init_fixed.F |
459 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
45 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_ENTER('EXF_INIT_FIXED',myThid) |
|
./pkg/exf/exf_init_fixed.F |
461 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFFIELD_START siobW',myThid) |
|
./pkg/exf/exf_init_fixed.F |
467 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
476 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START climsst',myThid) |
|
./pkg/exf/exf_init_fixed.F |
482 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
48 |
EXF_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_init_fixed.F |
490 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START climsss',myThid) |
|
./pkg/exf/exf_init_fixed.F |
496 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
504 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START climustr',myThid) |
|
./pkg/exf/exf_init_fixed.F |
510 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
516 |
EXF_INIT_FIXED |
& CALL DEBUG_CALL('GETFFIELD_START climvstr',myThid) |
|
./pkg/exf/exf_init_fixed.F |
522 |
EXF_INIT_FIXED |
I myThid ) |
|
./pkg/exf/exf_init_fixed.F |
592 |
EXF_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_init_fixed.F |
597 |
EXF_INIT_FIXED |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_init_fixed.F |
603 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('EXF_ZENITHANGLE_TABLE',myThid) |
|
./pkg/exf/exf_init_fixed.F |
605 |
EXF_INIT_FIXED |
CALL EXF_ZENITHANGLE_TABLE(myThid) |
|
./pkg/exf/exf_init_fixed.F |
611 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('EXF_SUMMARY',myThid) |
|
./pkg/exf/exf_init_fixed.F |
613 |
EXF_INIT_FIXED |
CALL EXF_SUMMARY( myThid ) |
|
./pkg/exf/exf_init_fixed.F |
618 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('EXF_DIAGNOSTICS_INIT',myThid) |
|
./pkg/exf/exf_init_fixed.F |
620 |
EXF_INIT_FIXED |
CALL EXF_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/exf/exf_init_fixed.F |
625 |
EXF_INIT_FIXED |
IF (debugMode) CALL DEBUG_LEAVE('EXF_INIT_FIXED',myThid) |
|
./pkg/exf/exf_init_fixed.F |
9 |
EXF_INIT_FIXED |
SUBROUTINE EXF_INIT_FIXED( myThid ) |
|
./pkg/exf/exf_init_fld.F |
104 |
EXF_INIT_FLD |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_init_fld.F |
110 |
EXF_INIT_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_init_fld.F |
111 |
EXF_INIT_FLD |
_END_MASTER(myThid) |
|
./pkg/exf/exf_init_fld.F |
125 |
EXF_INIT_FLD |
I fld_nlon, fld_nlat, interp_method, 0, myThid ) |
|
./pkg/exf/exf_init_fld.F |
129 |
EXF_INIT_FLD |
& fldArr, count, 0, myThid ) |
|
./pkg/exf/exf_init_fld.F |
135 |
EXF_INIT_FLD |
CALL EXF_FILTER_RL( fldArr, fldMask, myThid ) |
|
./pkg/exf/exf_init_fld.F |
138 |
EXF_INIT_FLD |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_init_fld.F |
139 |
EXF_INIT_FLD |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_init_fld.F |
19 |
EXF_INIT_FLD |
I myThid ) |
|
./pkg/exf/exf_init_fld.F |
57 |
EXF_INIT_FLD |
INTEGER myThid |
|
./pkg/exf/exf_init_fld.F |
89 |
EXF_INIT_FLD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_init_fld.F |
90 |
EXF_INIT_FLD |
DO bi = myBxLo(myThid), mybxhi(myThid) |
|
./pkg/exf/exf_init_varia.F |
118 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
11 |
EXF_INIT_VARIA |
SUBROUTINE EXF_INIT_VARIA( myThid ) |
|
./pkg/exf/exf_init_varia.F |
129 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
132 |
EXF_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
133 |
EXF_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
153 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
164 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
175 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
188 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
199 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
212 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
223 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
236 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
248 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
260 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
272 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
286 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
300 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
311 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
326 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
339 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
352 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
365 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
376 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
38 |
EXF_INIT_VARIA |
INTEGER myThid |
|
./pkg/exf/exf_init_varia.F |
390 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
403 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
416 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
429 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
440 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
447 |
EXF_INIT_VARIA |
_EXCH_XY_RL(climsst, myThid) |
|
./pkg/exf/exf_init_varia.F |
450 |
EXF_INIT_VARIA |
_EXCH_XY_RL(climsss, myThid) |
|
./pkg/exf/exf_init_varia.F |
453 |
EXF_INIT_VARIA |
CALL EXCH_UV_XY_RL( climustr, climvstr, .TRUE., myThid ) |
|
./pkg/exf/exf_init_varia.F |
455 |
EXF_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
456 |
EXF_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
45 |
EXF_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
46 |
EXF_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
77 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
88 |
EXF_INIT_VARIA |
I myThid ) |
|
./pkg/exf/exf_init_varia.F |
91 |
EXF_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_init_varia.F |
92 |
EXF_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_interp.F |
131 |
EXF_INTERP |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp.F |
20 |
EXF_INTERP |
I nxIn, nyIn, method, myIter, myThid ) |
|
./pkg/exf/exf_interp.F |
319 |
EXF_INTERP |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_interp.F |
324 |
EXF_INTERP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp.F |
328 |
EXF_INTERP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp.F |
332 |
EXF_INTERP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp.F |
333 |
EXF_INTERP |
_END_MASTER(myThid) |
|
./pkg/exf/exf_interp.F |
341 |
EXF_INTERP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_interp.F |
342 |
EXF_INTERP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_interp.F |
362 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
365 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
368 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
371 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
374 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
384 |
EXF_INTERP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_interp.F |
385 |
EXF_INTERP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_interp.F |
423 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
426 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
429 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
432 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
435 |
EXF_INTERP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp.F |
457 |
EXF_INTERP |
I bi, bj, myThid ) |
|
./pkg/exf/exf_interp.F |
69 |
EXF_INTERP |
INTEGER method, myIter, myThid |
|
./pkg/exf/exf_interp_read.F |
108 |
EXF_INTERP_READ |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/exf/exf_interp_read.F |
118 |
EXF_INTERP_READ |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/exf/exf_interp_read.F |
124 |
EXF_INTERP_READ |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/exf/exf_interp_read.F |
125 |
EXF_INTERP_READ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_read.F |
129 |
EXF_INTERP_READ |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/exf/exf_interp_read.F |
12 |
EXF_INTERP_READ |
I irecord, nx_in, ny_in, myThid ) |
|
./pkg/exf/exf_interp_read.F |
130 |
EXF_INTERP_READ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_read.F |
134 |
EXF_INTERP_READ |
CALL MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/exf/exf_interp_read.F |
135 |
EXF_INTERP_READ |
length_of_rec=MDS_RECLEN( filePrec, nx_in*ny_in, myThid ) |
|
./pkg/exf/exf_interp_read.F |
161 |
EXF_INTERP_READ |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_interp_read.F |
182 |
EXF_INTERP_READ |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_interp_read.F |
39 |
EXF_INTERP_READ |
INTEGER myThid |
|
./pkg/exf/exf_interp_uv.F |
145 |
EXF_INTERP_UV |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
149 |
EXF_INTERP_UV |
I irecord, nxIn, nyIn, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
21 |
EXF_INTERP_UV |
I methodU, methodV, myIter, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
346 |
EXF_INTERP_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
350 |
EXF_INTERP_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
354 |
EXF_INTERP_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
367 |
EXF_INTERP_UV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_interp_uv.F |
368 |
EXF_INTERP_UV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_interp_uv.F |
388 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
391 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
394 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
397 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
400 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
410 |
EXF_INTERP_UV |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/exf/exf_interp_uv.F |
411 |
EXF_INTERP_UV |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/exf/exf_interp_uv.F |
449 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
452 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
455 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
458 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
461 |
EXF_INTERP_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
483 |
EXF_INTERP_UV |
I bi, bj, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
491 |
EXF_INTERP_UV |
I bi, bj, myThid ) |
|
./pkg/exf/exf_interp_uv.F |
77 |
EXF_INTERP_UV |
INTEGER methodU, methodV, myIter, myThid |
|
./pkg/exf/exf_interpolate.F |
111 |
EXF_INTERPOLATE |
INTEGER bi, bj, myThid |
|
./pkg/exf/exf_interpolate.F |
239 |
EXF_INTERPOLATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interpolate.F |
242 |
EXF_INTERPOLATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_interpolate.F |
69 |
EXF_INTERPOLATE |
I bi, bj, myThid ) |
|
./pkg/exf/exf_mapfields.F |
100 |
EXF_MAPFIELDS |
act3 = myThid - 1 |
|
./pkg/exf/exf_mapfields.F |
13 |
EXF_MAPFIELDS |
SUBROUTINE EXF_MAPFIELDS( myTime, myIter, myThid ) |
|
./pkg/exf/exf_mapfields.F |
362 |
EXF_MAPFIELDS |
_EXCH_XY_RS( Qnet, myThid ) |
|
./pkg/exf/exf_mapfields.F |
363 |
EXF_MAPFIELDS |
_EXCH_XY_RS( EmPmR, myThid ) |
|
./pkg/exf/exf_mapfields.F |
364 |
EXF_MAPFIELDS |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./pkg/exf/exf_mapfields.F |
368 |
EXF_MAPFIELDS |
_EXCH_XY_RS( Qsw, myThid ) |
|
./pkg/exf/exf_mapfields.F |
371 |
EXF_MAPFIELDS |
_EXCH_XY_RS( SST, myThid ) |
|
./pkg/exf/exf_mapfields.F |
374 |
EXF_MAPFIELDS |
_EXCH_XY_RS( SSS, myThid ) |
|
./pkg/exf/exf_mapfields.F |
377 |
EXF_MAPFIELDS |
_EXCH_XY_RS( pLoad, myThid ) |
|
./pkg/exf/exf_mapfields.F |
380 |
EXF_MAPFIELDS |
_EXCH_XY_RS( phiTide2d, myThid ) |
|
./pkg/exf/exf_mapfields.F |
383 |
EXF_MAPFIELDS |
_EXCH_XY_RS( exf_iceFraction, myThid ) |
|
./pkg/exf/exf_mapfields.F |
78 |
EXF_MAPFIELDS |
INTEGER myThid |
|
./pkg/exf/exf_mapfields.F |
92 |
EXF_MAPFIELDS |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_mapfields.F |
93 |
EXF_MAPFIELDS |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_mapfields.F |
96 |
EXF_MAPFIELDS |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_mapfields.F |
97 |
EXF_MAPFIELDS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/exf/exf_mapfields.F |
98 |
EXF_MAPFIELDS |
act2 = bj - myByLo(myThid) |
|
./pkg/exf/exf_mapfields.F |
99 |
EXF_MAPFIELDS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/exf/exf_monitor.F |
107 |
EXF_MONITOR |
CALL MON_SET_PREF('exf',myThid) |
|
./pkg/exf/exf_monitor.F |
108 |
EXF_MONITOR |
CALL MON_OUT_I ('_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/exf/exf_monitor.F |
109 |
EXF_MONITOR |
CALL MON_OUT_RL('_time_sec', myTime,mon_string_none,myThid) |
|
./pkg/exf/exf_monitor.F |
114 |
EXF_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
116 |
EXF_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
119 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
121 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
125 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
129 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
12 |
EXF_MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_monitor.F |
133 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
135 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
139 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
144 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
148 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
152 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
156 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
160 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
164 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
170 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
176 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
180 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
186 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
192 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
197 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
204 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
210 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
216 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
222 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
228 |
EXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
234 |
EXF_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
238 |
EXF_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor.F |
242 |
EXF_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/exf/exf_monitor.F |
39 |
EXF_MONITOR |
INTEGER myThid |
|
./pkg/exf/exf_monitor.F |
67 |
EXF_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/exf/exf_monitor.F |
84 |
EXF_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/exf/exf_monitor.F |
85 |
EXF_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/exf/exf_monitor.F |
87 |
EXF_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/exf/exf_monitor.F |
88 |
EXF_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/exf/exf_monitor_ad.F |
106 |
ADEXF_MONITOR |
CALL MON_SET_PREF('ad_exf',myThid) |
|
./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 |
108 |
ADEXF_MONITOR |
CALL MON_OUT_RL('_time_sec', myTime,mon_string_none,myThid) |
|
./pkg/exf/exf_monitor_ad.F |
115 |
ADEXF_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
117 |
ADEXF_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
120 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
122 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
125 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
127 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
129 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
136 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
138 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
143 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
145 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
147 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
149 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
153 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
157 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
159 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
15 |
ADEXF_MONITOR |
I iwhen, myTime, myIter, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
167 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
191 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
193 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
195 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
197 |
ADEXF_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/exf/exf_monitor_ad.F |
201 |
ADEXF_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/exf/exf_monitor_ad.F |
44 |
ADEXF_MONITOR |
INTEGER myThid |
|
./pkg/exf/exf_monitor_ad.F |
64 |
ADEXF_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/exf/exf_monitor_ad.F |
81 |
ADEXF_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/exf/exf_monitor_ad.F |
82 |
ADEXF_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/exf/exf_monitor_ad.F |
84 |
ADEXF_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/exf/exf_monitor_ad.F |
85 |
ADEXF_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/exf/exf_radiation.F |
142 |
EXF_RADIATION |
CALL EXF_ZENITHANGLE(myTime, myIter, myThid) |
|
./pkg/exf/exf_radiation.F |
145 |
EXF_RADIATION |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_radiation.F |
146 |
EXF_RADIATION |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_radiation.F |
159 |
EXF_RADIATION |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_radiation.F |
160 |
EXF_RADIATION |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_radiation.F |
42 |
EXF_RADIATION |
INTEGER myThid |
|
./pkg/exf/exf_radiation.F |
69 |
EXF_RADIATION |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_radiation.F |
70 |
EXF_RADIATION |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_radiation.F |
9 |
EXF_RADIATION |
SUBROUTINE EXF_RADIATION( myTime, myIter, myThid ) |
|
./pkg/exf/exf_readparms.F |
1003 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
1009 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
1018 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
1044 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
1085 |
EXF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_readparms.F |
1088 |
EXF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_readparms.F |
1099 |
EXF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_readparms.F |
1102 |
EXF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_readparms.F |
1112 |
EXF_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_readparms.F |
305 |
EXF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_readparms.F |
309 |
EXF_READPARMS |
_END_MASTER(myThid) |
|
./pkg/exf/exf_readparms.F |
313 |
EXF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_readparms.F |
64 |
EXF_READPARMS |
INTEGER myThid |
|
./pkg/exf/exf_readparms.F |
945 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
950 |
EXF_READPARMS |
I myThid ) |
|
./pkg/exf/exf_readparms.F |
955 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
998 |
EXF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_readparms.F |
9 |
EXF_READPARMS |
SUBROUTINE EXF_READPARMS( myThid ) |
|
./pkg/exf/exf_set_fld.F |
119 |
EXF_SET_FLD |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_set_fld.F |
124 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
125 |
EXF_SET_FLD |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_set_fld.F |
135 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_fld.F |
142 |
EXF_SET_FLD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_set_fld.F |
151 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_fld.F |
155 |
EXF_SET_FLD |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_set_fld.F |
159 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
163 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
164 |
EXF_SET_FLD |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_set_fld.F |
172 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_fld.F |
174 |
EXF_SET_FLD |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_set_fld.F |
180 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
184 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
185 |
EXF_SET_FLD |
_END_MASTER(myThid) |
|
./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 |
219 |
EXF_SET_FLD |
CALL EXF_FILTER_RL( fld1, fldMask, myThid ) |
|
./pkg/exf/exf_set_fld.F |
225 |
EXF_SET_FLD |
CALL EXF_SWAPFFIELDS( fld0, fld1, myThid ) |
|
./pkg/exf/exf_set_fld.F |
231 |
EXF_SET_FLD |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_fld.F |
233 |
EXF_SET_FLD |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_set_fld.F |
239 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
243 |
EXF_SET_FLD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_fld.F |
244 |
EXF_SET_FLD |
_END_MASTER(myThid) |
|
./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 |
276 |
EXF_SET_FLD |
CALL EXF_FILTER_RL( fld1, fldMask, myThid ) |
|
./pkg/exf/exf_set_fld.F |
282 |
EXF_SET_FLD |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_fld.F |
283 |
EXF_SET_FLD |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/exf/exf_set_fld.F |
93 |
EXF_SET_FLD |
INTEGER myThid |
|
./pkg/exf/exf_set_gen.F |
118 |
EXF_INIT_GEN |
INTEGER myThid |
|
./pkg/exf/exf_set_gen.F |
150 |
EXF_INIT_GEN |
I myThid ) |
|
./pkg/exf/exf_set_gen.F |
21 |
EXF_SET_GEN |
& myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_gen.F |
48 |
EXF_SET_GEN |
INTEGER myThid |
|
./pkg/exf/exf_set_gen.F |
81 |
EXF_SET_GEN |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_gen.F |
95 |
EXF_INIT_GEN |
& myThid ) |
|
./pkg/exf/exf_set_obcs.F |
103 |
EXF_SET_OBCS_XZ |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
104 |
EXF_SET_OBCS_XZ |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
129 |
EXF_SET_OBCS_YZ |
I myTime, myIter, myThid) |
|
./pkg/exf/exf_set_obcs.F |
167 |
EXF_SET_OBCS_YZ |
INTEGER myThid |
|
./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 |
196 |
EXF_SET_OBCS_YZ |
CALL EXF_SWAPFFIELDS_YZ( obcs_yz_0, obcs_yz_1, nNz,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 |
210 |
EXF_SET_OBCS_YZ |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
211 |
EXF_SET_OBCS_YZ |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
236 |
EXF_SET_OBCS_X |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_obcs.F |
274 |
EXF_SET_OBCS_X |
INTEGER myThid |
|
./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 |
302 |
EXF_SET_OBCS_X |
CALL EXF_SWAPFFIELDS_XZ( obcs_x_0, obcs_x_1, 1,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 |
314 |
EXF_SET_OBCS_X |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
315 |
EXF_SET_OBCS_X |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
338 |
EXF_SET_OBCS_Y |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_obcs.F |
375 |
EXF_SET_OBCS_Y |
INTEGER myThid |
|
./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 |
403 |
EXF_SET_OBCS_Y |
CALL EXF_SWAPFFIELDS_YZ( obcs_y_0, obcs_y_1, 1,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 |
415 |
EXF_SET_OBCS_Y |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
416 |
EXF_SET_OBCS_Y |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_obcs.F |
60 |
EXF_SET_OBCS_XZ |
INTEGER myThid |
|
./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 |
89 |
EXF_SET_OBCS_XZ |
CALL EXF_SWAPFFIELDS_XZ( obcs_xz_0, obcs_xz_1, nNz,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 |
101 |
EXF_SET_UV |
INTEGER myThid |
|
./pkg/exf/exf_set_uv.F |
137 |
EXF_SET_UV |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_set_uv.F |
143 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
147 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
148 |
EXF_SET_UV |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_set_uv.F |
157 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_uv.F |
164 |
EXF_SET_UV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/exf/exf_set_uv.F |
173 |
EXF_SET_UV |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_set_uv.F |
176 |
EXF_SET_UV |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_set_uv.F |
180 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
184 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
185 |
EXF_SET_UV |
_END_MASTER( myThid ) |
|
./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 |
202 |
EXF_SET_UV |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_set_uv.F |
206 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
211 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
216 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
217 |
EXF_SET_UV |
_END_MASTER(myThid) |
|
./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 |
278 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
279 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
332 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
333 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
344 |
EXF_SET_UV |
CALL EXF_FILTER_RL( uVec1, uVecMask, myThid ) |
|
./pkg/exf/exf_set_uv.F |
345 |
EXF_SET_UV |
CALL EXF_FILTER_RL( vVec1, vVecMask, myThid ) |
|
./pkg/exf/exf_set_uv.F |
353 |
EXF_SET_UV |
CALL EXF_SWAPFFIELDS( uVec0, uVec1, myThid ) |
|
./pkg/exf/exf_set_uv.F |
354 |
EXF_SET_UV |
CALL EXF_SWAPFFIELDS( vVec0, vVec1, 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 |
367 |
EXF_SET_UV |
_BEGIN_MASTER(myThid) |
|
./pkg/exf/exf_set_uv.F |
371 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
376 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
381 |
EXF_SET_UV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_set_uv.F |
382 |
EXF_SET_UV |
_END_MASTER(myThid) |
|
./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 |
439 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
440 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
493 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
494 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
505 |
EXF_SET_UV |
CALL EXF_FILTER_RL( uVec1, uVecMask, myThid ) |
|
./pkg/exf/exf_set_uv.F |
506 |
EXF_SET_UV |
CALL EXF_FILTER_RL( vVec1, vVecMask, myThid ) |
|
./pkg/exf/exf_set_uv.F |
512 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
513 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(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_set_uv.F |
556 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
557 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
566 |
EXF_SET_UV |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_set_uv.F |
567 |
EXF_SET_UV |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_summary.F |
17 |
EXF_SUMMARY |
SUBROUTINE EXF_SUMMARY( myThid ) |
|
./pkg/exf/exf_summary.F |
207 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
213 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
215 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
221 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/exf/exf_summary.F |
226 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/exf/exf_summary.F |
233 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
238 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
245 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
250 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
257 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
262 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
269 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
274 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
288 |
EXF_SUMMARY |
I ustressStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
292 |
EXF_SUMMARY |
& ustress_nlon, ustress_nlat, ustress_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
301 |
EXF_SUMMARY |
I vstressStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
305 |
EXF_SUMMARY |
& vstress_nlon, vstress_nlat, vstress_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
309 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
318 |
EXF_SUMMARY |
I hfluxStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
322 |
EXF_SUMMARY |
& hflux_nlon, hflux_nlat, hflux_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
331 |
EXF_SUMMARY |
I sfluxStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
335 |
EXF_SUMMARY |
& sflux_nlon, sflux_nlat, sflux_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
345 |
EXF_SUMMARY |
I swfluxStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
349 |
EXF_SUMMARY |
& swflux_nlon, swflux_nlat, swflux_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
359 |
EXF_SUMMARY |
I uwindStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
363 |
EXF_SUMMARY |
& uwind_nlon, uwind_nlat, uwind_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
372 |
EXF_SUMMARY |
I vwindStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
376 |
EXF_SUMMARY |
& vwind_nlon, vwind_nlat, vwind_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
380 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
389 |
EXF_SUMMARY |
I wspeedStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
393 |
EXF_SUMMARY |
& wspeed_nlon, wspeed_nlat, wspeed_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
403 |
EXF_SUMMARY |
I atempStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
407 |
EXF_SUMMARY |
& atemp_nlon, atemp_nlat, atemp_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
416 |
EXF_SUMMARY |
I aqhStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
420 |
EXF_SUMMARY |
& aqh_nlon, aqh_nlat, aqh_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
428 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
435 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
441 |
EXF_SUMMARY |
I hs_StartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
445 |
EXF_SUMMARY |
& hs_nlon, hs_nlat, hs_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
454 |
EXF_SUMMARY |
I hl_StartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
458 |
EXF_SUMMARY |
& hl_nlon, hl_nlat, hl_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
467 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
474 |
EXF_SUMMARY |
I lwfluxStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
478 |
EXF_SUMMARY |
& lwflux_nlon, lwflux_nlat, lwflux_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
487 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
494 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
500 |
EXF_SUMMARY |
I evapStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
505 |
EXF_SUMMARY |
& evap_nlon, evap_nlat, evap_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
514 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
522 |
EXF_SUMMARY |
I precipStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
526 |
EXF_SUMMARY |
& precip_nlon, precip_nlat, precip_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
535 |
EXF_SUMMARY |
I snowprecipStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
540 |
EXF_SUMMARY |
& snowprecip_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
549 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
54 |
EXF_SUMMARY |
INTEGER myThid |
|
./pkg/exf/exf_summary.F |
556 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
561 |
EXF_SUMMARY |
I runoffStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
566 |
EXF_SUMMARY |
& runoff_nlon, runoff_nlat, runoff_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
572 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
579 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
590 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
593 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
600 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
606 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
612 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
619 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
623 |
EXF_SUMMARY |
I saltflxStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
627 |
EXF_SUMMARY |
& saltflx_nlon, saltflx_nlat, saltflx_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
635 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
643 |
EXF_SUMMARY |
I swdownStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
647 |
EXF_SUMMARY |
& swdown_nlon, swdown_nlat, swdown_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
656 |
EXF_SUMMARY |
I lwdownStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
660 |
EXF_SUMMARY |
& lwdown_nlon, lwdown_nlat, lwdown_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
671 |
EXF_SUMMARY |
I apressureStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
675 |
EXF_SUMMARY |
& apressure_nlon, apressure_nlat, apressure_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
67 |
EXF_SUMMARY |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_summary.F |
686 |
EXF_SUMMARY |
I tidePotStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
690 |
EXF_SUMMARY |
& tidePot_nlon, tidePot_nlat, tidePot_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
701 |
EXF_SUMMARY |
I areamaskStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
705 |
EXF_SUMMARY |
& areamask_nlon, areamask_nlat, areamask_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
714 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
718 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
71 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
722 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
726 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
728 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
743 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
748 |
EXF_SUMMARY |
I climsstStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
752 |
EXF_SUMMARY |
& climsst_nlon, climsst_nlat, climsst_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
758 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
75 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
764 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
769 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
777 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
782 |
EXF_SUMMARY |
I climsssStartTime, useExfYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
786 |
EXF_SUMMARY |
& climsss_nlon, climsss_nlat, climsss_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
792 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
798 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
79 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
802 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
806 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
810 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
814 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
816 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
818 |
EXF_SUMMARY |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_summary.F |
830 |
EXF_FLD_SUMMARY |
I useYearlyFields, addBlkLn, myThid ) |
|
./pkg/exf/exf_summary.F |
83 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
856 |
EXF_FLD_SUMMARY |
INTEGER myThid |
|
./pkg/exf/exf_summary.F |
85 |
EXF_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
873 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
879 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
884 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
895 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
899 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
903 |
EXF_FLD_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/exf/exf_summary.F |
90 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
915 |
EXF_PRINT_INTERP |
I var_nlon, var_nlat, var_interpMethod, myThid ) |
|
./pkg/exf/exf_summary.F |
931 |
EXF_PRINT_INTERP |
INTEGER myThid |
|
./pkg/exf/exf_summary.F |
93 |
EXF_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
947 |
EXF_PRINT_INTERP |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
952 |
EXF_PRINT_INTERP |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
965 |
EXF_PRINT_INTERP |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_summary.F |
996 |
EXF_PRINT_INTERP |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/exf/exf_swapffields.F |
100 |
EXF_SWAPFFIELDS_3D |
INTEGER myThid |
|
./pkg/exf/exf_swapffields.F |
108 |
EXF_SWAPFFIELDS_3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
109 |
EXF_SWAPFFIELDS_3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
129 |
EXF_SWAPFFIELDS_XZ |
I nNz, myThid ) |
|
./pkg/exf/exf_swapffields.F |
154 |
EXF_SWAPFFIELDS_XZ |
INTEGER myThid |
|
./pkg/exf/exf_swapffields.F |
162 |
EXF_SWAPFFIELDS_XZ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
163 |
EXF_SWAPFFIELDS_XZ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
181 |
EXF_SWAPFFIELDS_YZ |
I nNz, myThid ) |
|
./pkg/exf/exf_swapffields.F |
18 |
EXF_SWAPFFIELDS |
I myThid ) |
|
./pkg/exf/exf_swapffields.F |
206 |
EXF_SWAPFFIELDS_YZ |
INTEGER myThid |
|
./pkg/exf/exf_swapffields.F |
214 |
EXF_SWAPFFIELDS_YZ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
215 |
EXF_SWAPFFIELDS_YZ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
50 |
EXF_SWAPFFIELDS |
INTEGER myThid |
|
./pkg/exf/exf_swapffields.F |
58 |
EXF_SWAPFFIELDS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
59 |
EXF_SWAPFFIELDS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_swapffields.F |
77 |
EXF_SWAPFFIELDS_3D |
I nNz, myThid ) |
|
./pkg/exf/exf_wind.F |
12 |
EXF_WIND |
SUBROUTINE EXF_WIND( myTime, myIter, myThid ) |
|
./pkg/exf/exf_wind.F |
51 |
EXF_WIND |
INTEGER myThid |
|
./pkg/exf/exf_wind.F |
78 |
EXF_WIND |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_wind.F |
79 |
EXF_WIND |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_wind.F |
82 |
EXF_WIND |
act1 = bi - myBxLo(myThid) |
|
./pkg/exf/exf_wind.F |
83 |
EXF_WIND |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/exf/exf_wind.F |
84 |
EXF_WIND |
act2 = bj - myByLo(myThid) |
|
./pkg/exf/exf_wind.F |
85 |
EXF_WIND |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/exf/exf_wind.F |
86 |
EXF_WIND |
act3 = myThid - 1 |
|
./pkg/exf/exf_zenithangle.F |
10 |
EXF_ZENITHANGLE |
I myTime, myIter, myThid ) |
|
./pkg/exf/exf_zenithangle.F |
114 |
EXF_ZENITHANGLE |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_zenithangle.F |
115 |
EXF_ZENITHANGLE |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_zenithangle.F |
277 |
EXF_ZENITHANGLE |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_zenithangle.F |
278 |
EXF_ZENITHANGLE |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_zenithangle.F |
38 |
EXF_ZENITHANGLE |
INTEGER myThid |
|
./pkg/exf/exf_zenithangle.F |
75 |
EXF_ZENITHANGLE |
CALL CAL_GETDATE( myIter, myTime, mydate, myThid ) |
|
./pkg/exf/exf_zenithangle.F |
78 |
EXF_ZENITHANGLE |
IF ( cal_IsLeap(year0,myThid) .EQ. 2) |
|
./pkg/exf/exf_zenithangle.F |
85 |
EXF_ZENITHANGLE |
CALL CAL_TIMEPASSED(yearStartDate,mydate,difftime,myThid) |
|
./pkg/exf/exf_zenithangle.F |
86 |
EXF_ZENITHANGLE |
CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid) |
|
./pkg/exf/exf_zenithangle.F |
94 |
EXF_ZENITHANGLE |
CALL CAL_TIMEPASSED(dayStartDate,mydate,difftime,myThid) |
|
./pkg/exf/exf_zenithangle.F |
95 |
EXF_ZENITHANGLE |
CALL CAL_TOSECONDS (difftime,myDateSeconds,myThid) |
|
./pkg/exf/exf_zenithangle_table.F |
117 |
EXF_ZENITHANGLE_TABLE |
_END_MASTER( myThid ) |
|
./pkg/exf/exf_zenithangle_table.F |
122 |
EXF_ZENITHANGLE_TABLE |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/exf/exf_zenithangle_table.F |
123 |
EXF_ZENITHANGLE_TABLE |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/exf/exf_zenithangle_table.F |
30 |
EXF_ZENITHANGLE_TABLE |
INTEGER myThid |
|
./pkg/exf/exf_zenithangle_table.F |
43 |
EXF_ZENITHANGLE_TABLE |
_BEGIN_MASTER( myThid ) |
|
./pkg/exf/exf_zenithangle_table.F |
6 |
EXF_ZENITHANGLE_TABLE |
SUBROUTINE EXF_ZENITHANGLE_TABLE( myThid ) |
|
./pkg/fizhi/AtoC.F |
31 |
ATOC |
integer myThid, numlevs |
|
./pkg/fizhi/AtoC.F |
47 |
ATOC |
I .TRUE., numlevs, myThid ) |
|
./pkg/fizhi/AtoC.F |
50 |
ATOC |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/AtoC.F |
51 |
ATOC |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/AtoC.F |
5 |
ATOC |
subroutine ATOC(myThid,fieldin1,fieldin2,mask,idim1,idim2, |
|
./pkg/fizhi/CtoA.F |
32 |
CTOA |
integer myThid, numlevs |
|
./pkg/fizhi/CtoA.F |
49 |
CTOA |
call EXCH_UV_XYZ_RL(fieldin1,fieldin2,withSigns,myThid) |
|
./pkg/fizhi/CtoA.F |
52 |
CTOA |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/CtoA.F |
53 |
CTOA |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/CtoA.F |
5 |
CTOA |
subroutine CTOA(myThid,fieldin1,fieldin2,mask1,mask2,idim1,idim2, |
|
./pkg/fizhi/fizhi_diagalarms.F |
29 |
FIZHI_DIAGALARMS |
integer myThid |
|
./pkg/fizhi/fizhi_diagalarms.F |
5 |
FIZHI_DIAGALARMS |
subroutine FIZHI_DIAGALARMS (myThid) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1005 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1012 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1020 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1027 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1034 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1042 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1049 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1057 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
105 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1064 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1071 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1078 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1085 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1092 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1100 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1107 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1115 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1122 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
112 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1130 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1137 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1145 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1152 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1160 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1168 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1175 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1182 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1190 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1198 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
119 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1206 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1213 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1220 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1227 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1234 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1241 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1249 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1257 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1264 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
126 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1271 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1279 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1287 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1295 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1302 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1309 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1317 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1325 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1333 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
133 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1341 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1349 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1357 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1364 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1371 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1379 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1386 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1393 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1400 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1407 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1414 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
141 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1422 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1430 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1438 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1445 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1453 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1461 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1469 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1477 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1484 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1491 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1498 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
149 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1506 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1514 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1522 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1530 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1538 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1546 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1554 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1562 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1571 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
157 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1580 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1588 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1597 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1606 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1615 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1624 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1633 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1642 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1649 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1656 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
165 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1665 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1674 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1682 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1690 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1699 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1708 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1716 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1724 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1733 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
173 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1742 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1750 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
1758 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
181 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
189 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
197 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
205 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
213 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
220 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
227 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
235 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
243 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
250 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
257 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
264 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
271 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
278 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
27 |
FIZHI_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
285 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
292 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
299 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
306 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
313 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
320 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
327 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
334 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
341 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
348 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
355 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
362 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
369 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
377 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
384 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
391 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
398 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
406 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
413 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
422 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
429 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
436 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
443 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
450 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
458 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
466 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
473 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
481 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
488 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
496 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
504 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
511 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
518 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
525 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
533 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
541 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
548 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
54 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
555 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
562 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
569 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
576 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
583 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
590 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
597 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
605 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
613 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
61 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
620 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
627 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
635 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
642 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
649 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
656 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
664 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
671 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
680 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
689 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
697 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
69 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
705 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
714 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
723 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
732 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
741 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
749 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
757 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
765 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
774 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
77 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
782 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
790 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
798 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
806 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
814 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
821 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
828 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
836 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
844 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
84 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
851 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
858 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
866 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
874 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
881 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
888 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
895 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
902 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
909 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
916 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
91 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
923 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
930 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
938 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
945 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
953 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
960 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
968 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
975 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
982 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
98 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
990 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
997 |
FIZHI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/fizhi/fizhi_diagnostics_init.F |
9 |
FIZHI_DIAGNOSTICS_INIT |
SUBROUTINE FIZHI_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/fizhi/fizhi_init_chem.F |
32 |
FIZHI_INIT_CHEM |
call MDSFINDUNIT( kqz, myThid ) |
|
./pkg/fizhi/fizhi_init_chem.F |
33 |
FIZHI_INIT_CHEM |
call MDSFINDUNIT( koz, myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
104 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( myThid, vegdata,im2,jm2,nSx,nSy, |
|
./pkg/fizhi/fizhi_init_fixed.F |
109 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
110 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
137 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_CHEM(myThid, |
|
./pkg/fizhi/fizhi_init_fixed.F |
144 |
FIZHI_INIT_FIXED |
CALL READ_REC_XY_RL('topvar19232.data',tempoverlap,1,0,myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
146 |
FIZHI_INIT_FIXED |
CALL READ_REC_XY_RL('topvar612102.data',tempoverlap,1,0,myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
153 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
154 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
170 |
FIZHI_INIT_FIXED |
call MDSFINDUNIT( kice, myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
172 |
FIZHI_INIT_FIXED |
call MDSFINDUNIT( ksst, myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
42 |
FIZHI_INIT_FIXED |
INTEGER myThid |
|
./pkg/fizhi/fizhi_init_fixed.F |
5 |
FIZHI_INIT_FIXED |
SUBROUTINE FIZHI_INIT_FIXED (myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
73 |
FIZHI_INIT_FIXED |
call FIZHI_MNC_INIT(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
79 |
FIZHI_INIT_FIXED |
call FIZHI_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/fizhi/fizhi_init_fixed.F |
85 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_fixed.F |
86 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
155 |
FIZHI_INIT_VARS |
call CTOA(myThid,uvel,vvel,maskW,maskS,im1,im2,jm1,jm2,Nr, |
|
./pkg/fizhi/fizhi_init_vars.F |
158 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
159 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
249 |
FIZHI_INIT_VARS |
& nymd,nhms, 'D', myThid ) |
|
./pkg/fizhi/fizhi_init_vars.F |
294 |
FIZHI_INIT_VARS |
call FIZHI_READ_PICKUP( nIter0, myThid ) |
|
./pkg/fizhi/fizhi_init_vars.F |
295 |
FIZHI_INIT_VARS |
CALL FIZHI_READ_VEGTILES( nIter0, 'D', myThid ) |
|
./pkg/fizhi/fizhi_init_vars.F |
296 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
297 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
42 |
FIZHI_INIT_VARS |
INTEGER myThid |
|
./pkg/fizhi/fizhi_init_vars.F |
5 |
FIZHI_INIT_VARS |
SUBROUTINE FIZHI_INIT_VARS (myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
96 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_vars.F |
97 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
104 |
FIZHI_INIT_VEG |
IF (myThid.EQ.1) THEN |
|
./pkg/fizhi/fizhi_init_veg.F |
121 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
122 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
155 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
156 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg |
|
./pkg/fizhi/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
SUBROUTINE FIZHI_INIT_VEG(myThid,vegdata,im,jm,nSx,nSy,Nxg,Nyg, |
|
./pkg/fizhi/fizhi_init_veg.F |
83 |
FIZHI_INIT_VEG |
CALL MDSFINDUNIT( kveg, myThid ) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
10 |
FIZHI_INIT_VEGSURFTILES |
& nymd,nhms,prec,myThid) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
37 |
FIZHI_INIT_VEGSURFTILES |
INTEGER myThid |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
71 |
FIZHI_INIT_VEGSURFTILES |
_BEGIN_MASTER( myThid ) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
76 |
FIZHI_INIT_VEGSURFTILES |
_END_MASTER( myThid ) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
83 |
FIZHI_INIT_VEGSURFTILES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_init_vegsurftiles.F |
84 |
FIZHI_INIT_VEGSURFTILES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
11 |
FIZHI_MNC_INIT |
SUBROUTINE FIZHI_MNC_INIT( myThid ) |
|
./pkg/fizhi/fizhi_mnc_init.F |
201 |
FIZHI_MNC_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
229 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_veg', ndim, dim, dn,ib,ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
230 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('surftype', 'fizhi_veg', 4,5, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
231 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tilefrac', 'fizhi_veg', 4,5, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
234 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('uphy', 'U_xy_Hn__Zph__-' ,4,5,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
235 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('vphy', 'V_xy_Hn__Zph__-' ,4,5,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
236 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('thphy','Cen_xy_Hn__Zph__-',4,5,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
237 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('sphy', 'Cen_xy_Hn__Zph__-',4,5,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
246 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_chip', ndim, dim, dn,ib,ie, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
247 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('ctmt', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
248 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('xxmt', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
249 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('yymt', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
250 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('zetamt', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
251 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tcanopy', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
252 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tdeep', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
253 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('ecanopy', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
254 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('swetshal', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
255 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('swetroot', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
256 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('swetdeep', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
257 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('snodep', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
258 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('capac', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
259 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('chlt', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
260 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('chlon', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
261 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('igrd', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
262 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('ityp', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
263 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('chfr', 'fizhi_chip', 2,3, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
275 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_GNAME('fizhi_chiplev',ndim,dim,dn,ib,ie,myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
276 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('xlmt', 'fizhi_chiplev', 3,4, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
277 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('khmt', 'fizhi_chiplev', 3,4, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
278 |
FIZHI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tke', 'fizhi_chiplev', 3,4, myThid) |
|
./pkg/fizhi/fizhi_mnc_init.F |
30 |
FIZHI_MNC_INIT |
integer myThid |
|
./pkg/fizhi/fizhi_read_pickup.F |
100 |
FIZHI_READ_PICKUP |
_BEGIN_MASTER(myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
104 |
FIZHI_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'uphy',uphy,myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
105 |
FIZHI_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'vphy',vphy,myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
106 |
FIZHI_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'thphy',thphy,myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
107 |
FIZHI_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'sphy',sphy,myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
108 |
FIZHI_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'sphy',sphy,myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
111 |
FIZHI_READ_PICKUP |
_END_MASTER(myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
36 |
FIZHI_READ_PICKUP |
INTEGER myThid |
|
./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 |
74 |
FIZHI_READ_PICKUP |
do bj = 1,myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
75 |
FIZHI_READ_PICKUP |
do bi = 1,myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_read_pickup.F |
9 |
FIZHI_READ_PICKUP |
SUBROUTINE FIZHI_READ_PICKUP( myIter, myThid ) |
|
./pkg/fizhi/fizhi_readparms.F |
119 |
FIZHI_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/fizhi/fizhi_readparms.F |
11 |
FIZHI_READPARMS |
SUBROUTINE FIZHI_READPARMS( myThid ) |
|
./pkg/fizhi/fizhi_readparms.F |
122 |
FIZHI_READPARMS |
_END_MASTER(myThid) |
|
./pkg/fizhi/fizhi_readparms.F |
27 |
FIZHI_READPARMS |
integer myThid |
|
./pkg/fizhi/fizhi_readparms.F |
50 |
FIZHI_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/fizhi/fizhi_readparms.F |
54 |
FIZHI_READPARMS |
_END_MASTER(myThid) |
|
./pkg/fizhi/fizhi_readparms.F |
72 |
FIZHI_READPARMS |
& ku,myThid ) |
|
./pkg/fizhi/fizhi_readparms.F |
81 |
FIZHI_READPARMS |
CALL MDSFINDUNIT( ku2, myThid ) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
101 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_I_W('I',bnam,0,0,'ityp', ityp, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
102 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'chfr', chfr, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
111 |
FIZHI_WRITE_VEGTILES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
112 |
FIZHI_WRITE_VEGTILES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
283 |
FIZHI_READ_VEGTILES |
SUBROUTINE FIZHI_READ_VEGTILES(Iter,prec,myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
312 |
FIZHI_READ_VEGTILES |
INTEGER myThid |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
338 |
FIZHI_READ_VEGTILES |
CALL MNC_FILE_CLOSE_ALL_MATCHING(bnam, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
339 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_SET_UDIM(bnam, 1, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
342 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'ctmt', ctmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
343 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'xxmt', xxmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
344 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'yymt', yymt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
345 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'zetamt', zetamt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
346 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'xlmt', xlmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
347 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'khmt', khmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
348 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'tke', tke, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
351 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'tcanopy', tcanopy, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
352 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'tdeep', tdeep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
353 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'ecanopy', ecanopy, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
354 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'swetshal', swetshal, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
355 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'swetroot', swetroot, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
356 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'swetdeep', swetdeep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
357 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'snodep', snodep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
358 |
FIZHI_READ_VEGTILES |
CALL MNC_CW_RL_R(prec,bnam,0,0,'capac', capac, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
366 |
FIZHI_READ_VEGTILES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
367 |
FIZHI_READ_VEGTILES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
40 |
FIZHI_WRITE_VEGTILES |
INTEGER myThid |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
74 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_SET_UDIM(bnam, 1, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
75 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W_S('D',bnam,0,0,'T', myTime, myThid) |
|
./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 |
79 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'ctmt', ctmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
80 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'xxmt', xxmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
81 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'yymt', yymt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
82 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'zetamt', zetamt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
83 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'xlmt', xlmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
84 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'khmt', khmt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
85 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'tke', tke, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
88 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'tcanopy', tcanopy, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
89 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'tdeep', tdeep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
90 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'ecanopy', ecanopy, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
91 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'swetshal', swetshal, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
92 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'swetroot', swetroot, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
93 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'swetdeep', swetdeep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
94 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'snodep', snodep, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
95 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'capac', capac, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
96 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'chlt', chlt, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
97 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_RL_W(prec,bnam,0,0,'chlon', chlon, myThid) |
|
./pkg/fizhi/fizhi_readwrite_vegtiles.F |
98 |
FIZHI_WRITE_VEGTILES |
CALL MNC_CW_I_W('I',bnam,0,0,'igrd', igrd, 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 |
122 |
FIZHI_TENDENCY_APPLY_V |
INTEGER myThid |
|
./pkg/fizhi/fizhi_tendency_apply.F |
147 |
FIZHI_TENDENCY_APPLY_V |
IF ( DIAGNOSTICS_IS_ON('DIABVDYN',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
156 |
FIZHI_TENDENCY_APPLY_V |
CALL DIAGNOSTICS_FILL(tmpdiag,'DIABVDYN',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
159 |
FIZHI_TENDENCY_APPLY_V |
IF ( DIAGNOSTICS_IS_ON('RFV ',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
166 |
FIZHI_TENDENCY_APPLY_V |
CALL DIAGNOSTICS_FILL(tmpdiag,'RFV ',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
174 |
FIZHI_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
204 |
FIZHI_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/fizhi/fizhi_tendency_apply.F |
240 |
FIZHI_TENDENCY_APPLY_T |
IF ( DIAGNOSTICS_IS_ON('DIABTDYN',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
257 |
FIZHI_TENDENCY_APPLY_T |
CALL DIAGNOSTICS_FILL(tmpdiag,'DIABTDYN',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
260 |
FIZHI_TENDENCY_APPLY_T |
IF ( DIAGNOSTICS_IS_ON('RFT ',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
275 |
FIZHI_TENDENCY_APPLY_T |
CALL DIAGNOSTICS_FILL(tmpdiag,'RFT ',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
283 |
FIZHI_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
313 |
FIZHI_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/fizhi/fizhi_tendency_apply.F |
329 |
FIZHI_TENDENCY_APPLY_S |
IF ( DIAGNOSTICS_IS_ON('DIABQDYN',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
336 |
FIZHI_TENDENCY_APPLY_S |
CALL DIAGNOSTICS_FILL(tmpdiag,'DIABQDYN',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
39 |
FIZHI_TENDENCY_APPLY_U |
INTEGER myThid |
|
./pkg/fizhi/fizhi_tendency_apply.F |
64 |
FIZHI_TENDENCY_APPLY_U |
IF ( DIAGNOSTICS_IS_ON('DIABUDYN',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
73 |
FIZHI_TENDENCY_APPLY_U |
CALL DIAGNOSTICS_FILL(tmpdiag,'DIABUDYN',kLev,1,2,bi,bj,myThid) |
|
./pkg/fizhi/fizhi_tendency_apply.F |
76 |
FIZHI_TENDENCY_APPLY_U |
IF ( DIAGNOSTICS_IS_ON('RFU ',myThid) ) THEN |
|
./pkg/fizhi/fizhi_tendency_apply.F |
83 |
FIZHI_TENDENCY_APPLY_U |
CALL DIAGNOSTICS_FILL(tmpdiag,'RFU ',kLev,1,2,bi,bj,myThid) |
|
./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 |
111 |
FIZHI_WRAPPER |
if(diagnostics_is_on('TENDTFIZ',myThid) .or. |
|
./pkg/fizhi/fizhi_wrapper.F |
112 |
FIZHI_WRAPPER |
& diagnostics_is_on('CORRDT ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
113 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
114 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
132 |
FIZHI_WRAPPER |
if(diagnostics_is_on('TENDQFIZ',myThid) .or. |
|
./pkg/fizhi/fizhi_wrapper.F |
133 |
FIZHI_WRAPPER |
& diagnostics_is_on('CORRDQ ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
134 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
135 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
156 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
157 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
208 |
FIZHI_WRAPPER |
if(diagnostics_is_on('FIZPRES ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
209 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
210 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
221 |
FIZHI_WRAPPER |
& Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
226 |
FIZHI_WRAPPER |
CALL TIMER_START ('DO_FIZHI [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
227 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
228 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
234 |
FIZHI_WRAPPER |
if(diagnostics_is_on('SLP ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
254 |
FIZHI_WRAPPER |
call DIAGNOSTICS_FILL( slp,'SLP ',1,1,3,bi,bj,myThid ) |
|
./pkg/fizhi/fizhi_wrapper.F |
262 |
FIZHI_WRAPPER |
call DO_FIZHI(myIter,myThid, |
|
./pkg/fizhi/fizhi_wrapper.F |
279 |
FIZHI_WRAPPER |
CALL TIMER_STOP ('DO_FIZHI [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
281 |
FIZHI_WRAPPER |
CALL TIMER_START ('PHYS2DYN [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
282 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
283 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
327 |
FIZHI_WRAPPER |
CALL TIMER_STOP ('PHYS2DYN [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
330 |
FIZHI_WRAPPER |
CALL TIMER_START ('ATOC [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
331 |
FIZHI_WRAPPER |
call ATOC(myThid,guphy,gvphy,maskC,idim1,idim2,jdim1,jdim2,Nr, |
|
./pkg/fizhi/fizhi_wrapper.F |
333 |
FIZHI_WRAPPER |
CALL TIMER_STOP ('ATOC [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
335 |
FIZHI_WRAPPER |
CALL TIMER_START ('EXCHANGES [FIZHI_WRAPPER]',myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
337 |
FIZHI_WRAPPER |
call EXCH_UV_XYZ_RL(guphy,gvphy,.TRUE.,myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
339 |
FIZHI_WRAPPER |
_EXCH_XYZ_RL(gthphy,myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
340 |
FIZHI_WRAPPER |
_EXCH_XYZ_RL(gsphy,myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
341 |
FIZHI_WRAPPER |
CALL TIMER_STOP ('EXCHANGES [FIZHI_WRAPPER]',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_wrapper.F |
69 |
FIZHI_WRAPPER |
if(diagnostics_is_on('TENDUFIZ',myThid) .or. |
|
./pkg/fizhi/fizhi_wrapper.F |
70 |
FIZHI_WRAPPER |
& diagnostics_is_on('CORRDU ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
71 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
72 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
90 |
FIZHI_WRAPPER |
if(diagnostics_is_on('TENDVFIZ',myThid) .or. |
|
./pkg/fizhi/fizhi_wrapper.F |
91 |
FIZHI_WRAPPER |
& diagnostics_is_on('CORRDV ',myThid) ) then |
|
./pkg/fizhi/fizhi_wrapper.F |
92 |
FIZHI_WRAPPER |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_wrapper.F |
93 |
FIZHI_WRAPPER |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_write_datetime.F |
19 |
FIZHI_WRITE_DATETIME |
integer myIter, myThid |
|
./pkg/fizhi/fizhi_write_datetime.F |
25 |
FIZHI_WRITE_DATETIME |
if( myThid.eq.1) then |
|
./pkg/fizhi/fizhi_write_datetime.F |
27 |
FIZHI_WRITE_DATETIME |
CALL MDSFINDUNIT( ku, 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 |
39 |
FIZHI_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/fizhi/fizhi_write_pickup.F |
52 |
FIZHI_WRITE_PICKUP |
do bj = 1,myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_write_pickup.F |
53 |
FIZHI_WRITE_PICKUP |
do bi = 1,myBxLo(myThid), myBxHi(myThid) |
|
./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_pickup.F |
91 |
FIZHI_WRITE_PICKUP |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/fizhi_write_pickup.F |
92 |
FIZHI_WRITE_PICKUP |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/fizhi_write_state.F |
38 |
FIZHI_WRITE_STATE |
INTEGER myThid |
|
./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 |
62 |
FIZHI_WRITE_STATE |
CALL WRITE_REC_3D_RL( fn,prec, Nrphys, vphy, 1, myIter,myThid ) |
|
./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 |
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/getpwhere.F |
41 |
GETPWHERE |
integer myThid,numpress |
|
./pkg/fizhi/getpwhere.F |
7 |
GETPWHERE |
subroutine GETPWHERE(myThid,numpress,pressures,levpressures) |
|
./pkg/fizhi/step_fizhi_corr.F |
133 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
134 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
183 |
STEP_FIZHI_CORR |
call ATOC(myThid,udyntemp,vdyntemp,maskC,im1,im2,jm1,jm2,Nr, |
|
./pkg/fizhi/step_fizhi_corr.F |
188 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
189 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
207 |
STEP_FIZHI_CORR |
call CTOA(myThid,udyntemp,vdyntemp,maskW,maskS,im1,im2,jm1,jm2, |
|
./pkg/fizhi/step_fizhi_corr.F |
213 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
214 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
258 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
259 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
271 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(uphy,'UAVE ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
272 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(vphy,'VAVE ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
273 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(thphy,'TAVE ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
274 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(sphy,'QAVE ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
278 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
279 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
284 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('TENDUFIZ',myThid) ) then |
|
./pkg/fizhi/step_fizhi_corr.F |
291 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(tempij,'TENDUFIZ',L,1,3,bi,bj,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
296 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('TENDVFIZ',myThid) ) then |
|
./pkg/fizhi/step_fizhi_corr.F |
303 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(tempij,'TENDVFIZ',L,1,3,bi,bj,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
308 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('TENDTFIZ',myThid) ) then |
|
./pkg/fizhi/step_fizhi_corr.F |
315 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(tempij,'TENDTFIZ',L,1,3,bi,bj,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
320 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('TENDQFIZ',myThid) ) then |
|
./pkg/fizhi/step_fizhi_corr.F |
327 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(tempij,'TENDQFIZ',L,1,3,bi,bj,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
336 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('CORRDU ',myThid) .or. |
|
./pkg/fizhi/step_fizhi_corr.F |
337 |
STEP_FIZHI_CORR |
. diagnostics_is_on('CORRDV ',myThid) ) then |
|
./pkg/fizhi/step_fizhi_corr.F |
341 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
342 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
358 |
STEP_FIZHI_CORR |
call CTOA(myThid,udyntemp,vdyntemp,maskW,maskS,im1,im2,jm1,jm2, |
|
./pkg/fizhi/step_fizhi_corr.F |
35 |
STEP_FIZHI_CORR |
integer myIter, myThid |
|
./pkg/fizhi/step_fizhi_corr.F |
408 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('CORRDU ',myThid)) then |
|
./pkg/fizhi/step_fizhi_corr.F |
409 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(uphytemp,'CORRDU ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
411 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('CORRDV ',myThid)) then |
|
./pkg/fizhi/step_fizhi_corr.F |
412 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(vphytemp,'CORRDV ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
419 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('CORRDT ',myThid)) then |
|
./pkg/fizhi/step_fizhi_corr.F |
423 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
424 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
461 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(thphytemp,'CORRDT ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
466 |
STEP_FIZHI_CORR |
if(diagnostics_is_on('CORRDQ ',myThid)) then |
|
./pkg/fizhi/step_fizhi_corr.F |
470 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
471 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
507 |
STEP_FIZHI_CORR |
call DIAGNOSTICS_FILL(sphytemp,'CORRDQ ',0,Nrphys,0,1,1,myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
5 |
STEP_FIZHI_CORR |
subroutine STEP_FIZHI_CORR (myTime, myIter, myThid, dt) |
|
./pkg/fizhi/step_fizhi_corr.F |
75 |
STEP_FIZHI_CORR |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_corr.F |
76 |
STEP_FIZHI_CORR |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/step_fizhi_fg.F |
24 |
STEP_FIZHI_FG |
integer myIter, myThid |
|
./pkg/fizhi/step_fizhi_fg.F |
43 |
STEP_FIZHI_FG |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/step_fizhi_fg.F |
44 |
STEP_FIZHI_FG |
do bi = myBxLo(myThid), myBxHi(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 |
49 |
UPDATE_CHEMISTRY_EXPORTS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/update_chemistry_exports.F |
50 |
UPDATE_CHEMISTRY_EXPORTS |
do bi = myBxLo(myThid), myBxHi(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_earth_exports.F |
73 |
UPDATE_EARTH_EXPORTS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/fizhi/update_earth_exports.F |
74 |
UPDATE_EARTH_EXPORTS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
111 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_RL(sst,myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
112 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_RL(sice,myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
25 |
UPDATE_OCEAN_EXPORTS |
integer myIter, myThid |
|
./pkg/fizhi/update_ocean_exports.F |
286 |
GETSICE |
_BEGIN_MASTER( myThid ) |
|
./pkg/fizhi/update_ocean_exports.F |
301 |
GETSICE |
_END_MASTER( myThid ) |
|
./pkg/fizhi/update_ocean_exports.F |
546 |
GETSST |
_BEGIN_MASTER( myThid ) |
|
./pkg/fizhi/update_ocean_exports.F |
561 |
GETSST |
_END_MASTER( myThid ) |
|
./pkg/fizhi/update_ocean_exports.F |
5 |
UPDATE_OCEAN_EXPORTS |
subroutine UPDATE_OCEAN_EXPORTS (myTime, myIter, myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
79 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
80 |
UPDATE_OCEAN_EXPORTS |
DO BI = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
93 |
UPDATE_OCEAN_EXPORTS |
. ssttimes(1,bi,bj),sst,myThid) |
|
./pkg/fizhi/update_ocean_exports.F |
98 |
UPDATE_OCEAN_EXPORTS |
. sicetimes(1,bi,bj),sice,myThid) |
|
./pkg/flt/exch2_recv_get_vec.F |
198 |
EXCH2_RECV_GET_VEC_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch2_recv_get_vec.F |
19 |
EXCH2_RECV_GET_VEC_RL |
I myd1, myThid ) |
|
./pkg/flt/exch2_recv_get_vec.F |
56 |
EXCH2_RECV_GET_VEC_RL |
INTEGER myThid |
|
./pkg/flt/exch2_recv_get_vec.F |
93 |
EXCH2_RECV_GET_VEC_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch2_send_put_vec.F |
157 |
EXCH2_SEND_PUT_VEC_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch2_send_put_vec.F |
20 |
EXCH2_SEND_PUT_VEC_RL |
I myd1, myThid ) |
|
./pkg/flt/exch2_send_put_vec.F |
55 |
EXCH2_SEND_PUT_VEC_RL |
INTEGER myThid |
|
./pkg/flt/exch2_send_put_vec.F |
98 |
EXCH2_SEND_PUT_VEC_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
168 |
EXCH_RECV_GET_VEC_X_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
180 |
EXCH_RECV_GET_VEC_X_RL |
CALL BARRIER( myThid ) |
|
./pkg/flt/exch_recv_get_vec.F |
184 |
EXCH_RECV_GET_VEC_X_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
185 |
EXCH_RECV_GET_VEC_X_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
199 |
EXCH_RECV_GET_VEC_X_RL |
IF ( myThid.EQ.1 .AND. spinCount.GT. _EXCH_SPIN_LIMIT ) THEN |
|
./pkg/flt/exch_recv_get_vec.F |
19 |
EXCH_RECV_GET_VEC_X_RL |
I myd1, myThid ) |
|
./pkg/flt/exch_recv_get_vec.F |
223 |
EXCH_RECV_GET_VEC_Y_RL |
I myd1, myThid ) |
|
./pkg/flt/exch_recv_get_vec.F |
249 |
EXCH_RECV_GET_VEC_Y_RL |
INTEGER myThid |
|
./pkg/flt/exch_recv_get_vec.F |
287 |
EXCH_RECV_GET_VEC_Y_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
356 |
EXCH_RECV_GET_VEC_Y_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
368 |
EXCH_RECV_GET_VEC_Y_RL |
CALL BARRIER( myThid ) |
|
./pkg/flt/exch_recv_get_vec.F |
372 |
EXCH_RECV_GET_VEC_Y_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
373 |
EXCH_RECV_GET_VEC_Y_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/exch_recv_get_vec.F |
387 |
EXCH_RECV_GET_VEC_Y_RL |
IF ( myThid.EQ.1 .AND. spinCount.GT. _EXCH_SPIN_LIMIT ) THEN |
|
./pkg/flt/exch_recv_get_vec.F |
45 |
EXCH_RECV_GET_VEC_X_RL |
INTEGER myThid |
|
./pkg/flt/exch_recv_get_vec.F |
83 |
EXCH_RECV_GET_VEC_X_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
100 |
EXCH_SEND_PUT_VEC_X_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
188 |
EXCH_SEND_PUT_VEC_X_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
199 |
EXCH_SEND_PUT_VEC_X_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
19 |
EXCH_SEND_PUT_VEC_X_RL |
I myd1, myThid ) |
|
./pkg/flt/exch_send_put_vec.F |
200 |
EXCH_SEND_PUT_VEC_X_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
240 |
EXCH_SEND_PUT_VEC_Y_RL |
I myd1, myThid ) |
|
./pkg/flt/exch_send_put_vec.F |
275 |
EXCH_SEND_PUT_VEC_Y_RL |
INTEGER myThid |
|
./pkg/flt/exch_send_put_vec.F |
325 |
EXCH_SEND_PUT_VEC_Y_RL |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
396 |
EXCH_SEND_PUT_VEC_Y_RL |
_END_MASTER(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
407 |
EXCH_SEND_PUT_VEC_Y_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
408 |
EXCH_SEND_PUT_VEC_Y_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/exch_send_put_vec.F |
50 |
EXCH_SEND_PUT_VEC_X_RL |
INTEGER myThid |
|
./pkg/flt/flt_down.F |
27 |
FLT_DOWN |
INTEGER myIter, myThid |
|
./pkg/flt/flt_down.F |
35 |
FLT_DOWN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_down.F |
36 |
FLT_DOWN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_down.F |
7 |
FLT_DOWN |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_exch2.F |
174 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
181 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
311 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
318 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
362 |
FLT_EXCH2 |
I imax2, myThid ) |
|
./pkg/flt/flt_exch2.F |
373 |
FLT_EXCH2 |
I imax2, myThid ) |
|
./pkg/flt/flt_exch2.F |
37 |
FLT_EXCH2 |
INTEGER myIter, myThid |
|
./pkg/flt/flt_exch2.F |
386 |
FLT_EXCH2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exch2.F |
387 |
FLT_EXCH2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exch2.F |
414 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
443 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
472 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
501 |
FLT_EXCH2 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exch2.F |
74 |
FLT_EXCH2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exch2.F |
75 |
FLT_EXCH2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exch2.F |
8 |
FLT_EXCH2 |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_exchg.F |
170 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
177 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
217 |
FLT_EXCHG |
I imax2, myThid ) |
|
./pkg/flt/flt_exchg.F |
224 |
FLT_EXCHG |
I imax2, myThid ) |
|
./pkg/flt/flt_exchg.F |
231 |
FLT_EXCHG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exchg.F |
232 |
FLT_EXCHG |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exchg.F |
259 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
288 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
306 |
FLT_EXCHG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exchg.F |
307 |
FLT_EXCHG |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exchg.F |
30 |
FLT_EXCHG |
INTEGER myIter, myThid |
|
./pkg/flt/flt_exchg.F |
413 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
420 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
459 |
FLT_EXCHG |
I imax2, myThid ) |
|
./pkg/flt/flt_exchg.F |
466 |
FLT_EXCHG |
I imax2, myThid ) |
|
./pkg/flt/flt_exchg.F |
474 |
FLT_EXCHG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exchg.F |
475 |
FLT_EXCHG |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exchg.F |
502 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
531 |
FLT_EXCHG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_exchg.F |
74 |
FLT_EXCHG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_exchg.F |
75 |
FLT_EXCHG |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_exchg.F |
8 |
FLT_EXCHG |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
30 |
FLT_INIT_FIXED |
INTEGER myThid |
|
./pkg/flt/flt_init_fixed.F |
44 |
FLT_INIT_FIXED |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_init_fixed.F |
45 |
FLT_INIT_FIXED |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_init_fixed.F |
52 |
FLT_INIT_FIXED |
_GLOBAL_MAX_RL( xLo, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
53 |
FLT_INIT_FIXED |
_GLOBAL_MAX_RL( xHi, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
54 |
FLT_INIT_FIXED |
_GLOBAL_MAX_RL( yLo, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
55 |
FLT_INIT_FIXED |
_GLOBAL_MAX_RL( yHi, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
57 |
FLT_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_init_fixed.F |
65 |
FLT_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
69 |
FLT_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_fixed.F |
6 |
FLT_INIT_FIXED |
SUBROUTINE FLT_INIT_FIXED( myThid ) |
|
./pkg/flt/flt_init_fixed.F |
70 |
FLT_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/flt/flt_init_fixed.F |
77 |
FLT_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_init_varia.F |
108 |
FLT_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_init_varia.F |
111 |
FLT_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_init_varia.F |
118 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
130 |
FLT_INIT_VARIA |
& bi, bj, 1, myThid ) |
|
./pkg/flt/flt_init_varia.F |
138 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
145 |
FLT_INIT_VARIA |
& bi, bj, ip+1, myThid ) |
|
./pkg/flt/flt_init_varia.F |
150 |
FLT_INIT_VARIA |
I tmp(3), tmp(4),bi,bj,myThid ) |
|
./pkg/flt/flt_init_varia.F |
151 |
FLT_INIT_VARIA |
kz = FLT_MAP_R2K( tmp(5), bi, bj, myThid ) |
|
./pkg/flt/flt_init_varia.F |
180 |
FLT_INIT_VARIA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/flt/flt_init_varia.F |
193 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
218 |
FLT_INIT_VARIA |
& bi, bj, 1, myThid ) |
|
./pkg/flt/flt_init_varia.F |
222 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
231 |
FLT_INIT_VARIA |
& bi, bj, ip+1, myThid ) |
|
./pkg/flt/flt_init_varia.F |
235 |
FLT_INIT_VARIA |
I tmp(3), tmp(4),bi,bj,myThid ) |
|
./pkg/flt/flt_init_varia.F |
236 |
FLT_INIT_VARIA |
kz = FLT_MAP_R2K( tmp(5), bi, bj, myThid ) |
|
./pkg/flt/flt_init_varia.F |
271 |
FLT_INIT_VARIA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/flt/flt_init_varia.F |
276 |
FLT_INIT_VARIA |
_END_MASTER( myThid ) |
|
./pkg/flt/flt_init_varia.F |
279 |
FLT_INIT_VARIA |
_GLOBAL_SUM_RL( npart_dist, myThid ) |
|
./pkg/flt/flt_init_varia.F |
281 |
FLT_INIT_VARIA |
_BEGIN_MASTER( myThid ) |
|
./pkg/flt/flt_init_varia.F |
286 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
289 |
FLT_INIT_VARIA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_init_varia.F |
290 |
FLT_INIT_VARIA |
_END_MASTER( myThid ) |
|
./pkg/flt/flt_init_varia.F |
294 |
FLT_INIT_VARIA |
& CALL FLT_UP( startTime, nIter0, myThid ) |
|
./pkg/flt/flt_init_varia.F |
296 |
FLT_INIT_VARIA |
& CALL FLT_TRAJ( startTime, nIter0, myThid ) |
|
./pkg/flt/flt_init_varia.F |
38 |
FLT_INIT_VARIA |
INTEGER myThid |
|
./pkg/flt/flt_init_varia.F |
6 |
FLT_INIT_VARIA |
SUBROUTINE FLT_INIT_VARIA ( myThid ) |
|
./pkg/flt/flt_init_varia.F |
81 |
FLT_INIT_VARIA |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_init_varia.F |
98 |
FLT_INIT_VARIA |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/flt/flt_interp_linear.F |
110 |
FLT_TRILINEAR |
I nu, bi, bj, myThid ) |
|
./pkg/flt/flt_interp_linear.F |
135 |
FLT_TRILINEAR |
INTEGER nu, bi, bj, myThid |
|
./pkg/flt/flt_interp_linear.F |
17 |
FLT_BILINEAR |
I kl, nu, bi, bj, myThid ) |
|
./pkg/flt/flt_interp_linear.F |
205 |
FLT_BILINEAR2D |
I nu, bi, bj, myThid ) |
|
./pkg/flt/flt_interp_linear.F |
227 |
FLT_BILINEAR2D |
INTEGER nu, bi, bj, myThid |
|
./pkg/flt/flt_interp_linear.F |
36 |
FLT_BILINEAR |
INTEGER kl, nu, bi, bj, myThid |
|
./pkg/flt/flt_main.F |
103 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_ENTER( 'FLT_MAIN', myThid ) |
|
./pkg/flt/flt_main.F |
108 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_CALL('FLT_RUNGA*', myThid ) |
|
./pkg/flt/flt_main.F |
112 |
FLT_MAIN |
CALL TIMER_START('FLOATS RUNGA2 [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
113 |
FLT_MAIN |
CALL FLT_RUNGA2( myTime, myIter, myThid ) |
|
./pkg/flt/flt_main.F |
114 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS RUNGA2 [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
118 |
FLT_MAIN |
CALL TIMER_START('FLOATS RUNGA4 [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
119 |
FLT_MAIN |
CALL FLT_RUNGA4( myTime, myIter, myThid ) |
|
./pkg/flt/flt_main.F |
120 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS RUNGA4 [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
127 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_CALL('FLT_EXCH*', myThid ) |
|
./pkg/flt/flt_main.F |
129 |
FLT_MAIN |
CALL TIMER_START('FLOATS EXCHG [FLT LOOP]',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 |
135 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS EXCHG [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
142 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_CALL('FLT_UP', myThid ) |
|
./pkg/flt/flt_main.F |
144 |
FLT_MAIN |
CALL TIMER_START('FLOATS UP [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
145 |
FLT_MAIN |
CALL FLT_UP( myTime, myIter, myThid ) |
|
./pkg/flt/flt_main.F |
146 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS UP [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
150 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_CALL('FLT_DOWN', myThid ) |
|
./pkg/flt/flt_main.F |
153 |
FLT_MAIN |
CALL TIMER_START('FLOATS DOWN [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
154 |
FLT_MAIN |
CALL FLT_DOWN( myTime, myIter, myThid ) |
|
./pkg/flt/flt_main.F |
155 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS DOWN [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
163 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_CALL('FLT_TRAJ', myThid ) |
|
./pkg/flt/flt_main.F |
166 |
FLT_MAIN |
CALL TIMER_START('FLOATS TRAJ [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
167 |
FLT_MAIN |
CALL FLT_TRAJ( myTime, myIter, myThid ) |
|
./pkg/flt/flt_main.F |
168 |
FLT_MAIN |
CALL TIMER_STOP ('FLOATS TRAJ [FLT LOOP]',myThid) |
|
./pkg/flt/flt_main.F |
173 |
FLT_MAIN |
IF (debugMode) CALL DEBUG_LEAVE( 'FLT_MAIN', 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_mapping.F |
116 |
FLT_MAP_IJLOCAL2XY |
INTEGER bi, bj, myThid |
|
./pkg/flt/flt_mapping.F |
16 |
FLT_MAP_XY2IJLOCAL |
I xx, yy, bi, bj, myThid ) |
|
./pkg/flt/flt_mapping.F |
182 |
FLT_MAP_IJLOCAL2XY |
I rr, bi, bj, myThid ) |
|
./pkg/flt/flt_mapping.F |
204 |
FLT_MAP_IJLOCAL2XY |
INTEGER bi, bj, myThid |
|
./pkg/flt/flt_mapping.F |
229 |
FLT_MAP_IJLOCAL2XY |
I kr, bi, bj, myThid ) |
|
./pkg/flt/flt_mapping.F |
251 |
FLT_MAP_IJLOCAL2XY |
INTEGER bi, bj, myThid |
|
./pkg/flt/flt_mapping.F |
42 |
FLT_MAP_XY2IJLOCAL |
INTEGER bi, bj, myThid |
|
./pkg/flt/flt_mapping.F |
90 |
FLT_MAP_IJLOCAL2XY |
I ix, jy, bi, bj, myThid ) |
|
./pkg/flt/flt_readparms.F |
25 |
FLT_READPARMS |
INTEGER myThid |
|
./pkg/flt/flt_readparms.F |
40 |
FLT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_readparms.F |
44 |
FLT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/flt/flt_readparms.F |
48 |
FLT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_readparms.F |
63 |
FLT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_readparms.F |
67 |
FLT_READPARMS |
I myThid ) |
|
./pkg/flt/flt_readparms.F |
6 |
FLT_READPARMS |
SUBROUTINE FLT_READPARMS( myThid ) |
|
./pkg/flt/flt_readparms.F |
73 |
FLT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_readparms.F |
90 |
FLT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/flt/flt_runga2.F |
113 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,uu,uVel,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
114 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,vv,vVel,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
115 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,ww,wVel,4,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
120 |
FLT_RUNGA2 |
CALL FLT_BILINEAR(ix,jy,uu,uVel,kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
121 |
FLT_RUNGA2 |
CALL FLT_BILINEAR(ix,jy,vv,vVel,kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
150 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(itx,jty,ktz,u1,uVel,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
151 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(itx,jty,ktz,v1,vVel,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
152 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(itx,jty,ktz,w1,wVel,4,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
157 |
FLT_RUNGA2 |
CALL FLT_BILINEAR(itx,jty,u1,uVel,kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
158 |
FLT_RUNGA2 |
CALL FLT_BILINEAR(itx,jty,v1,vVel,kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
35 |
FLT_RUNGA2 |
INTEGER myIter, myThid |
|
./pkg/flt/flt_runga2.F |
78 |
FLT_RUNGA2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_runga2.F |
79 |
FLT_RUNGA2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_runga2.F |
8 |
FLT_RUNGA2 |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_runga4.F |
115 |
FLT_RUNGA4 |
CALL FLT_TRILINEAR(ix,jy,kz,u1,uVel,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
116 |
FLT_RUNGA4 |
CALL FLT_TRILINEAR(ix,jy,kz,v1,vVel,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
117 |
FLT_RUNGA4 |
CALL FLT_TRILINEAR(ix,jy,kz,w1,wVel,4,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
122 |
FLT_RUNGA4 |
CALL FLT_BILINEAR(ix,jy,u1,uVel,kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
123 |
FLT_RUNGA4 |
CALL FLT_BILINEAR(ix,jy,v1,vVel,kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
153 |
FLT_RUNGA4 |
& 1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
155 |
FLT_RUNGA4 |
& 2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
157 |
FLT_RUNGA4 |
& 4,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
163 |
FLT_RUNGA4 |
& kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
165 |
FLT_RUNGA4 |
& kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
203 |
FLT_RUNGA4 |
& 1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
205 |
FLT_RUNGA4 |
& 2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
207 |
FLT_RUNGA4 |
& 4,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
213 |
FLT_RUNGA4 |
& kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
215 |
FLT_RUNGA4 |
& kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
253 |
FLT_RUNGA4 |
& 1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
255 |
FLT_RUNGA4 |
& 2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
257 |
FLT_RUNGA4 |
& 4,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
263 |
FLT_RUNGA4 |
& kc,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
265 |
FLT_RUNGA4 |
& kc,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga4.F |
35 |
FLT_RUNGA4 |
INTEGER myIter, myThid |
|
./pkg/flt/flt_runga4.F |
78 |
FLT_RUNGA4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_runga4.F |
79 |
FLT_RUNGA4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_runga4.F |
8 |
FLT_RUNGA4 |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_traj.F |
107 |
FLT_TRAJ |
I ix, jy, bi,bj, myThid ) |
|
./pkg/flt/flt_traj.F |
108 |
FLT_TRAJ |
zz = FLT_MAP_K2R( kpart(ip,bi,bj),bi,bj,myThid ) |
|
./pkg/flt/flt_traj.F |
11 |
FLT_TRAJ |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_traj.F |
127 |
FLT_TRAJ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_traj.F |
131 |
FLT_TRAJ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_traj.F |
137 |
FLT_TRAJ |
CALL FLT_BILINEAR (ix,jy,uu,uVel, kp,1,bi,bj,myThid) |
|
./pkg/flt/flt_traj.F |
138 |
FLT_TRAJ |
CALL FLT_BILINEAR (ix,jy,vv,vVel, kp,2,bi,bj,myThid) |
|
./pkg/flt/flt_traj.F |
139 |
FLT_TRAJ |
CALL FLT_BILINEAR2D(ix,jy,pp,etaN, 0,bi,bj,myThid) |
|
./pkg/flt/flt_traj.F |
140 |
FLT_TRAJ |
CALL FLT_BILINEAR (ix,jy,tt,theta, kp,0,bi,bj,myThid) |
|
./pkg/flt/flt_traj.F |
141 |
FLT_TRAJ |
CALL FLT_BILINEAR (ix,jy,ss,salt, kp,0,bi,bj,myThid) |
|
./pkg/flt/flt_traj.F |
169 |
FLT_TRAJ |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_traj.F |
181 |
FLT_TRAJ |
I bi, bj, 1, myThid ) |
|
./pkg/flt/flt_traj.F |
191 |
FLT_TRAJ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_traj.F |
194 |
FLT_TRAJ |
CALL PRINT_ERROR( msgBuf, 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 |
244 |
FLT_TRAJ |
_END_MASTER(myThid) |
|
./pkg/flt/flt_traj.F |
40 |
FLT_TRAJ |
INTEGER myIter, myThid |
|
./pkg/flt/flt_traj.F |
74 |
FLT_TRAJ |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_traj.F |
77 |
FLT_TRAJ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_traj.F |
80 |
FLT_TRAJ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_traj.F |
81 |
FLT_TRAJ |
_END_MASTER(myThid) |
|
./pkg/flt/flt_traj.F |
82 |
FLT_TRAJ |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/flt/flt_traj.F |
91 |
FLT_TRAJ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_traj.F |
92 |
FLT_TRAJ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_up.F |
116 |
FLT_UP |
I ix, jy, bi,bj, myThid ) |
|
./pkg/flt/flt_up.F |
117 |
FLT_UP |
zz = FLT_MAP_K2R( kpart(ip,bi,bj),bi,bj,myThid ) |
|
./pkg/flt/flt_up.F |
11 |
FLT_UP |
I myTime, myIter, myThid ) |
|
./pkg/flt/flt_up.F |
133 |
FLT_UP |
CALL FLT_BILINEAR2D(ix,jy,pp,etaN,0,bi,bj,myThid) |
|
./pkg/flt/flt_up.F |
136 |
FLT_UP |
CALL FLT_BILINEAR (ix,jy,uu,uVel, k,1,bi,bj,myThid) |
|
./pkg/flt/flt_up.F |
137 |
FLT_UP |
CALL FLT_BILINEAR (ix,jy,vv,vVel, k,2,bi,bj,myThid) |
|
./pkg/flt/flt_up.F |
138 |
FLT_UP |
CALL FLT_BILINEAR (ix,jy,tt,theta, k,0,bi,bj,myThid) |
|
./pkg/flt/flt_up.F |
139 |
FLT_UP |
CALL FLT_BILINEAR (ix,jy,ss,salt, k,0,bi,bj,myThid) |
|
./pkg/flt/flt_up.F |
167 |
FLT_UP |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_up.F |
179 |
FLT_UP |
& bi, bj, 1, myThid ) |
|
./pkg/flt/flt_up.F |
189 |
FLT_UP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_up.F |
192 |
FLT_UP |
CALL PRINT_ERROR( msgBuf, 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 |
242 |
FLT_UP |
_END_MASTER(myThid) |
|
./pkg/flt/flt_up.F |
38 |
FLT_UP |
INTEGER myIter, myThid |
|
./pkg/flt/flt_up.F |
68 |
FLT_UP |
_BEGIN_MASTER(myThid) |
|
./pkg/flt/flt_up.F |
71 |
FLT_UP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_up.F |
74 |
FLT_UP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/flt/flt_up.F |
75 |
FLT_UP |
_END_MASTER(myThid) |
|
./pkg/flt/flt_up.F |
76 |
FLT_UP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/flt/flt_up.F |
85 |
FLT_UP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/flt/flt_up.F |
86 |
FLT_UP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/flt/flt_write_pickup.F |
105 |
FLT_WRITE_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/flt/flt_write_pickup.F |
107 |
FLT_WRITE_PICKUP |
_GLOBAL_SUM_RL( npart_dist, myThid ) |
|
./pkg/flt/flt_write_pickup.F |
108 |
FLT_WRITE_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/flt/flt_write_pickup.F |
112 |
FLT_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/flt/flt_write_pickup.F |
113 |
FLT_WRITE_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/flt/flt_write_pickup.F |
34 |
FLT_WRITE_PICKUP |
INTEGER myIter, myThid |
|
./pkg/flt/flt_write_pickup.F |
57 |
FLT_WRITE_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./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 |
111 |
FRAZIL_CALC_RHS |
& 0,Nr, 0, 1, 1, myThid ) |
|
./pkg/frazil/frazil_calc_rhs.F |
11 |
FRAZIL_CALC_RHS |
I myTime, myIter, myThid ) |
|
./pkg/frazil/frazil_calc_rhs.F |
35 |
FRAZIL_CALC_RHS |
INTEGER myThid |
|
./pkg/frazil/frazil_calc_rhs.F |
53 |
FRAZIL_CALC_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/frazil/frazil_calc_rhs.F |
54 |
FRAZIL_CALC_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/frazil/frazil_diagnostics_init.F |
11 |
FRAZIL_DIAGNOSTICS_INIT |
SUBROUTINE FRAZIL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/frazil/frazil_diagnostics_init.F |
21 |
FRAZIL_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/frazil/frazil_diagnostics_init.F |
46 |
FRAZIL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/frazil/frazil_init_fixed.F |
11 |
FRAZIL_INIT_FIXED |
SUBROUTINE FRAZIL_INIT_FIXED( myThid ) |
|
./pkg/frazil/frazil_init_fixed.F |
24 |
FRAZIL_INIT_FIXED |
INTEGER myThid |
|
./pkg/frazil/frazil_init_fixed.F |
29 |
FRAZIL_INIT_FIXED |
CALL FRAZIL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/frazil/frazil_init_varia.F |
11 |
FRAZIL_INIT_VARIA |
SUBROUTINE FRAZIL_INIT_VARIA( myThid ) |
|
./pkg/frazil/frazil_init_varia.F |
26 |
FRAZIL_INIT_VARIA |
INTEGER myThid |
|
./pkg/frazil/frazil_init_varia.F |
35 |
FRAZIL_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/frazil/frazil_init_varia.F |
36 |
FRAZIL_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/frazil/frazil_tendency_apply.F |
16 |
FRAZIL_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/frazil/frazil_tendency_apply.F |
47 |
FRAZIL_TENDENCY_APPLY_T |
INTEGER myThid |
|
./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_calc_tendency.F |
63 |
GCHEM_CALC_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gchem/gchem_calc_tendency.F |
64 |
GCHEM_CALC_TENDENCY |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gchem/gchem_calc_tendency.F |
82 |
GCHEM_CALC_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gchem/gchem_calc_tendency.F |
83 |
GCHEM_CALC_TENDENCY |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gchem/gchem_check.F |
100 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
108 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
116 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
124 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/gchem/gchem_check.F |
128 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
134 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
138 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
145 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
149 |
GCHEM_CHECK |
_END_MASTER(myThid) |
|
./pkg/gchem/gchem_check.F |
158 |
GCHEM_CHECK |
CALL CFC_CHECK( myThid ) |
|
./pkg/gchem/gchem_check.F |
165 |
GCHEM_CHECK |
CALL DARWIN_CHECK( myThid ) |
|
./pkg/gchem/gchem_check.F |
169 |
GCHEM_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/gchem/gchem_check.F |
173 |
GCHEM_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_check.F |
176 |
GCHEM_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_check.F |
178 |
GCHEM_CHECK |
_END_MASTER(myThid) |
|
./pkg/gchem/gchem_check.F |
39 |
GCHEM_CHECK |
INTEGER myThid |
|
./pkg/gchem/gchem_check.F |
51 |
GCHEM_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/gchem/gchem_check.F |
57 |
GCHEM_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_check.F |
64 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
72 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
78 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
84 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
92 |
GCHEM_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_check.F |
9 |
GCHEM_CHECK |
SUBROUTINE GCHEM_CHECK( myThid ) |
|
./pkg/gchem/gchem_diagnostics_init.F |
25 |
GCHEM_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/gchem/gchem_diagnostics_init.F |
74 |
GCHEM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gchem/gchem_diagnostics_init.F |
7 |
GCHEM_DIAGNOSTICS_INIT |
SUBROUTINE GCHEM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gchem/gchem_fields_load.F |
11 |
GCHEM_FIELDS_LOAD |
I myTime, myIter, myThid) |
|
./pkg/gchem/gchem_fields_load.F |
26 |
GCHEM_FIELDS_LOAD |
INTEGER myThid |
|
./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 |
103 |
GCHEM_FORCING_SEP |
CALL GCHEM_SURFMEAN(salt,gsm_s,myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
105 |
GCHEM_FORCING_SEP |
& pTracer(1-OLx,1-OLy,1,1,1,1), gsm_dic, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
108 |
GCHEM_FORCING_SEP |
& pTracer(1-OLx,1-OLy,1,1,1,2), gsm_alk, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
119 |
GCHEM_FORCING_SEP |
CALL GCHEM_SURFMEAN(salt,gsm_s,myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
121 |
GCHEM_FORCING_SEP |
& pTracer(1-OLx,1-OLy,1,1,1,iDIC), gsm_dic, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
124 |
GCHEM_FORCING_SEP |
& pTracer(1-OLx,1-OLy,1,1,1,iALK), gsm_alk, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
132 |
GCHEM_FORCING_SEP |
CALL DARWIN_CONS( myIter, myTime, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
140 |
GCHEM_FORCING_SEP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
142 |
GCHEM_FORCING_SEP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
152 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_CALL('DIC_BIOTIC_FORCING',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 |
212 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_CALL('DARWIN_NUT_SUPPLY',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 |
231 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_CALL('DARWIN_FORCING',myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
235 |
GCHEM_FORCING_SEP |
& myIter, myTime, myThid ) |
|
./pkg/gchem/gchem_forcing_sep.F |
246 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
252 |
GCHEM_FORCING_SEP |
I 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 |
276 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_CALL('DIC_ATMOS',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 |
291 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_LEAVE('GCHEM_FORCING_SEP',myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
52 |
GCHEM_FORCING_SEP |
INTEGER myIter, myThid |
|
./pkg/gchem/gchem_forcing_sep.F |
74 |
GCHEM_FORCING_SEP |
IF (debugMode) CALL DEBUG_ENTER('GCHEM_FORCING_SEP',myThid) |
|
./pkg/gchem/gchem_forcing_sep.F |
84 |
GCHEM_FORCING_SEP |
& 0, Nr, 0, 1, 1, myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
22 |
GCHEM_INIT_FIXED |
INTEGER myThid |
|
./pkg/gchem/gchem_init_fixed.F |
39 |
GCHEM_INIT_FIXED |
CALL CFC_PARAM( myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
41 |
GCHEM_INIT_FIXED |
CALL CFC_ATMOS( myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
47 |
GCHEM_INIT_FIXED |
CALL DIC_INIT_FIXED( myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
52 |
GCHEM_INIT_FIXED |
CALL BLING_INIT_FIXED( myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
59 |
GCHEM_INIT_FIXED |
CALL DARWIN_INIT_FIXED(myThid) |
|
./pkg/gchem/gchem_init_fixed.F |
66 |
GCHEM_INIT_FIXED |
CALL GCHEM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gchem/gchem_init_fixed.F |
7 |
GCHEM_INIT_FIXED |
SUBROUTINE GCHEM_INIT_FIXED(myThid ) |
|
./pkg/gchem/gchem_init_vari.F |
100 |
GCHEM_INIT_VARI |
CALL DIC_SURFFORCING_INIT(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
101 |
GCHEM_INIT_VARI |
CALL DIC_DIAGS_INIT(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
13 |
GCHEM_INIT_VARI |
SUBROUTINE GCHEM_INIT_VARI(myThid ) |
|
./pkg/gchem/gchem_init_vari.F |
34 |
GCHEM_INIT_VARI |
INTEGER myThid |
|
./pkg/gchem/gchem_init_vari.F |
50 |
GCHEM_INIT_VARI |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
51 |
GCHEM_INIT_VARI |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
72 |
GCHEM_INIT_VARI |
CALL DIC_INIT_VARIA(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
73 |
GCHEM_INIT_VARI |
CALL DIC_INI_FORCING(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
74 |
GCHEM_INIT_VARI |
CALL DIC_SURFFORCING_INIT(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
75 |
GCHEM_INIT_VARI |
CALL DIC_BIOTIC_INIT(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
77 |
GCHEM_INIT_VARI |
CALL DIC_SET_CONTROL(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
88 |
GCHEM_INIT_VARI |
CALL BLING_INIT_VARIA(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
89 |
GCHEM_INIT_VARI |
CALL BLING_INI_FORCING(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
90 |
GCHEM_INIT_VARI |
CALL BLING_CARBONATE_INIT(myThid) |
|
./pkg/gchem/gchem_init_vari.F |
98 |
GCHEM_INIT_VARI |
CALL DARWIN_INIT_VARI(myThid ) |
|
./pkg/gchem/gchem_output.F |
10 |
GCHEM_OUTPUT |
SUBROUTINE GCHEM_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/gchem/gchem_output.F |
28 |
GCHEM_OUTPUT |
INTEGER myThid |
|
./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_readparms.F |
101 |
GCHEM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_readparms.F |
105 |
GCHEM_READPARMS |
I myThid ) |
|
./pkg/gchem/gchem_readparms.F |
10 |
GCHEM_READPARMS |
SUBROUTINE GCHEM_READPARMS( myThid ) |
|
./pkg/gchem/gchem_readparms.F |
110 |
GCHEM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_readparms.F |
125 |
GCHEM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_readparms.F |
129 |
GCHEM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gchem/gchem_readparms.F |
133 |
GCHEM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/gchem/gchem_readparms.F |
140 |
GCHEM_READPARMS |
CALL CFC_READPARMS(myThid) |
|
./pkg/gchem/gchem_readparms.F |
146 |
GCHEM_READPARMS |
CALL DIC_READPARMS(myThid) |
|
./pkg/gchem/gchem_readparms.F |
152 |
GCHEM_READPARMS |
CALL BLING_READPARMS(myThid) |
|
./pkg/gchem/gchem_readparms.F |
158 |
GCHEM_READPARMS |
CALL SPOIL_READPARMS(myThid) |
|
./pkg/gchem/gchem_readparms.F |
164 |
GCHEM_READPARMS |
CALL DARWIN_READPARMS(myThid) |
|
./pkg/gchem/gchem_readparms.F |
169 |
GCHEM_READPARMS |
CALL GCHEM_TR_REGISTER( myThid ) |
|
./pkg/gchem/gchem_readparms.F |
24 |
GCHEM_READPARMS |
INTEGER myThid |
|
./pkg/gchem/gchem_readparms.F |
62 |
GCHEM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/gchem/gchem_readparms.F |
66 |
GCHEM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/gchem/gchem_readparms.F |
70 |
GCHEM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/gchem/gchem_surfmean.F |
10 |
GCHEM_SURFMEAN |
I myThid ) |
|
./pkg/gchem/gchem_surfmean.F |
24 |
GCHEM_SURFMEAN |
INTEGER myThid |
|
./pkg/gchem/gchem_surfmean.F |
44 |
GCHEM_SURFMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gchem/gchem_surfmean.F |
45 |
GCHEM_SURFMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gchem/gchem_surfmean.F |
55 |
GCHEM_SURFMEAN |
CALL GLOBAL_SUM_TILE_RL(sumTracerTile,sumTracer,myThid) |
|
./pkg/gchem/gchem_tr_register.F |
100 |
GCHEM_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
102 |
GCHEM_TR_REGISTER |
_END_MASTER(myThid) |
|
./pkg/gchem/gchem_tr_register.F |
10 |
GCHEM_TR_REGISTER |
SUBROUTINE GCHEM_TR_REGISTER( myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
24 |
GCHEM_TR_REGISTER |
INTEGER myThid |
|
./pkg/gchem/gchem_tr_register.F |
40 |
GCHEM_TR_REGISTER |
_BEGIN_MASTER(myThid) |
|
./pkg/gchem/gchem_tr_register.F |
45 |
GCHEM_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
58 |
GCHEM_TR_REGISTER |
I myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
65 |
GCHEM_TR_REGISTER |
I myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
72 |
GCHEM_TR_REGISTER |
I myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
80 |
GCHEM_TR_REGISTER |
I myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
87 |
GCHEM_TR_REGISTER |
I myThid ) |
|
./pkg/gchem/gchem_tr_register.F |
97 |
GCHEM_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/gchem/gchem_write_pickup.F |
14 |
GCHEM_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/gchem/gchem_write_pickup.F |
38 |
GCHEM_WRITE_PICKUP |
INTEGER myThid |
|
./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 |
1056 |
GAD_ADVECTION |
& diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
1061 |
GAD_ADVECTION |
& 'AFR', k, 1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
176 |
GAD_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
177 |
GAD_ADVECTION |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/generic_advdiff/gad_advection.F |
178 |
GAD_ADVECTION |
act2 = bj - myByLo(myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
179 |
GAD_ADVECTION |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/generic_advdiff/gad_advection.F |
180 |
GAD_ADVECTION |
act3 = myThid - 1 |
|
./pkg/generic_advdiff/gad_advection.F |
192 |
GAD_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
19 |
GAD_ADVECTION |
I bi,bj, myTime,myIter,myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
203 |
GAD_ADVECTION |
diagSufx = GAD_DIAG_SUFX( trIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
205 |
GAD_ADVECTION |
doDiagAdvX = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
207 |
GAD_ADVECTION |
doDiagAdvY = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
209 |
GAD_ADVECTION |
doDiagAdvR = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
318 |
GAD_ADVECTION |
& withSigns, maskLocW,maskLocS, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
386 |
GAD_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
407 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
411 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
415 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
419 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
424 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
430 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
436 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
447 |
GAD_ADVECTION |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
454 |
GAD_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
595 |
GAD_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
616 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
620 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
624 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
628 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
633 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
639 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
645 |
GAD_ADVECTION |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
656 |
GAD_ADVECTION |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
663 |
GAD_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
805 |
GAD_ADVECTION |
CALL DIAGNOSTICS_FILL( afx, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
809 |
GAD_ADVECTION |
CALL DIAGNOSTICS_FILL( afy, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
813 |
GAD_ADVECTION |
CALL LAYERS_FILL(afx,trIdentity,'AFX',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
814 |
GAD_ADVECTION |
CALL LAYERS_FILL(afy,trIdentity,'AFY',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_advection.F |
826 |
GAD_ADVECTION |
& afx,afy, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
83 |
GAD_ADVECTION |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_advection.F |
864 |
GAD_ADVECTION |
O afr, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
893 |
GAD_ADVECTION |
O afr, myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
958 |
GAD_ADVECTION |
O fVerT(1-OLx,1-OLy,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
962 |
GAD_ADVECTION |
O fVerT(1-OLx,1-OLy,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
966 |
GAD_ADVECTION |
O fVerT(1-OLx,1-OLy,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
970 |
GAD_ADVECTION |
O fVerT(1-OLx,1-OLy,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advection.F |
975 |
GAD_ADVECTION |
O fVerT(1-OLx,1-OLy,kUp), myThid ) |
|
./pkg/generic_advdiff/gad_advscheme.F |
100 |
GAD_ADVSCHEME_SET |
_END_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_advscheme.F |
104 |
GAD_ADVSCHEME_SET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_advscheme.F |
107 |
GAD_ADVSCHEME_SET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_advscheme.F |
17 |
GAD_ADVSCHEME_INIT |
SUBROUTINE GAD_ADVSCHEME_INIT( myThid ) |
|
./pkg/generic_advdiff/gad_advscheme.F |
38 |
GAD_ADVSCHEME_INIT |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_advscheme.F |
44 |
GAD_ADVSCHEME_INIT |
_BEGIN_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_advscheme.F |
48 |
GAD_ADVSCHEME_INIT |
_END_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_advscheme.F |
61 |
GAD_ADVSCHEME_SET |
I myThid ) |
|
./pkg/generic_advdiff/gad_advscheme.F |
90 |
GAD_ADVSCHEME_SET |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_advscheme.F |
98 |
GAD_ADVSCHEME_SET |
_BEGIN_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_biharm_r.F |
14 |
GAD_BIHARM_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_biharm_r.F |
38 |
GAD_BIHARM_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_biharm_x.F |
14 |
GAD_BIHARM_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_biharm_x.F |
39 |
GAD_BIHARM_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_biharm_y.F |
14 |
GAD_BIHARM_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_biharm_y.F |
39 |
GAD_BIHARM_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c2_adv_r.F |
15 |
GAD_C2_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_c2_adv_r.F |
40 |
GAD_C2_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c2_adv_x.F |
15 |
GAD_C2_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_c2_adv_x.F |
38 |
GAD_C2_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c2_adv_y.F |
15 |
GAD_C2_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_c2_adv_y.F |
38 |
GAD_C2_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
13 |
GAD_C2_IMPL_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_c2_impl_r.F |
50 |
GAD_C2_IMPL_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
15 |
GAD_C4_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
42 |
GAD_C4_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
15 |
GAD_C4_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_c4_adv_x.F |
44 |
GAD_C4_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_c4_adv_y.F |
15 |
GAD_C4_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_c4_adv_y.F |
44 |
GAD_C4_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
112 |
GAD_CALC_RHS |
INTEGER myIter, myThid |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
164 |
GAD_CALC_RHS |
diagSufx = GAD_DIAG_SUFX( trIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
202 |
GAD_CALC_RHS |
CALL GAD_GRAD_X(bi,bj,k,xA,localT,fZon,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
203 |
GAD_CALC_RHS |
CALL GAD_GRAD_Y(bi,bj,k,yA,localT,fMer,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
204 |
GAD_CALC_RHS |
CALL GAD_DEL2(bi,bj,k,fZon,fMer,df4,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
217 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_X( bi,bj,k, uTrans, locABT, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
21 |
GAD_CALC_RHS |
I myTime, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
222 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
236 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
239 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
242 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
255 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
259 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
264 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
276 |
GAD_CALC_RHS |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
287 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
292 |
GAD_CALC_RHS |
& k, 1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
300 |
GAD_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,localT,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
311 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
321 |
GAD_CALC_RHS |
I myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
337 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( df, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
341 |
GAD_CALC_RHS |
& k, 1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
357 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_Y( bi,bj,k, vTrans, locABT, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
362 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
376 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
379 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
382 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
395 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
399 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
404 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
416 |
GAD_CALC_RHS |
U af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
427 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
432 |
GAD_CALC_RHS |
& k, 1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
440 |
GAD_CALC_RHS |
CALL GAD_DIFF_Y(bi,bj,k,yA,diffKh,localT,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
451 |
GAD_CALC_RHS |
CALL GAD_BIHARM_Y(bi,bj,k,yA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
461 |
GAD_CALC_RHS |
I myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
477 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( df, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
481 |
GAD_CALC_RHS |
& k, 1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
500 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
505 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
509 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
511 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
513 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R( bi,bj,k, rTrans, TracAB, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
526 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
530 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
535 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
543 |
GAD_CALC_RHS |
CALL GAD_C2_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
548 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
552 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
554 |
GAD_CALC_RHS |
CALL GAD_U3_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
556 |
GAD_CALC_RHS |
CALL GAD_C4_ADV_R( bi,bj,k, rTrans, TracerN, af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
569 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
573 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
578 |
GAD_CALC_RHS |
O af, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
593 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( af, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
596 |
GAD_CALC_RHS |
IF ( k.EQ.2 ) CALL DIAGNOSTICS_COUNT(diagName,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
599 |
GAD_CALC_RHS |
CALL LAYERS_FILL(af,trIdentity,'AFR',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
616 |
GAD_CALC_RHS |
CALL GAD_DIFF_R(bi,bj,k,KappaR,TracerN,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
620 |
GAD_CALC_RHS |
CALL GAD_BIHARM_R( bi,bj,k, diffKr4, TracerN, df, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
630 |
GAD_CALC_RHS |
I myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
647 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( df, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
650 |
GAD_CALC_RHS |
CALL LAYERS_FILL(df,trIdentity,'DFR',k,1,2,bi,bj,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 |
697 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL( df, diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
700 |
GAD_CALC_RHS |
IF ( k.EQ.2 ) CALL DIAGNOSTICS_COUNT(diagName,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
703 |
GAD_CALC_RHS |
CALL LAYERS_FILL(df,trIdentity,'DFR',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
796 |
GAD_CALC_RHS |
& fZon,fMer, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
109 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
112 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
116 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
127 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
132 |
GAD_CHECK |
_END_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_check.F |
31 |
GAD_CHECK |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_check.F |
41 |
GAD_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_check.F |
45 |
GAD_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
58 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/generic_advdiff/gad_check.F |
61 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/generic_advdiff/gad_check.F |
75 |
GAD_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/generic_advdiff/gad_check.F |
90 |
GAD_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/generic_advdiff/gad_check.F |
94 |
GAD_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/generic_advdiff/gad_check.F |
9 |
GAD_CHECK |
SUBROUTINE GAD_CHECK( myThid ) |
|
./pkg/generic_advdiff/gad_del2.F |
14 |
GAD_DEL2 |
I myThid ) |
|
./pkg/generic_advdiff/gad_del2.F |
36 |
GAD_DEL2 |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
100 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
106 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
113 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
116 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trUnits, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
123 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
129 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
134 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
141 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
147 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
152 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
158 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
164 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
170 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
172 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( '('//trUnits//')^2', myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
177 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
194 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trUnits//flxUnits, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
195 |
GAD_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_SALINITY, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
202 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
208 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
214 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
221 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
227 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
233 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
240 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
246 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
24 |
GAD_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
250 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trUnits, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
257 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
263 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
268 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
275 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
281 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
286 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
292 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
298 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
304 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
306 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( '('//trUnits//')^2', myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
311 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
327 |
GAD_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
351 |
GAD_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
67 |
GAD_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trUnits//flxUnits, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
68 |
GAD_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_TEMPERATURE, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
75 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
81 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
87 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
94 |
GAD_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_init.F |
9 |
GAD_DIAGNOSTICS_INIT |
SUBROUTINE GAD_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
102 |
GAD_DIAGNOSTICS_STATE |
diagSufx = GAD_DIAG_SUFX( GAD_SALINITY, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
107 |
GAD_DIAGNOSTICS_STATE |
& 0, Nr, 0, 1, 1, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
111 |
GAD_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON( diagName, myThid ) ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
112 |
GAD_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
113 |
GAD_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./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 |
140 |
GAD_DIAGNOSTICS_STATE |
& 0, Nr, 2, bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
31 |
GAD_DIAGNOSTICS_STATE |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
57 |
GAD_DIAGNOSTICS_STATE |
diagSufx = GAD_DIAG_SUFX( GAD_TEMPERATURE, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
62 |
GAD_DIAGNOSTICS_STATE |
& 0, Nr, 0, 1, 1, myThid ) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
66 |
GAD_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON( diagName, myThid ) ) THEN |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
67 |
GAD_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
68 |
GAD_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/generic_advdiff/gad_diagnostics_state.F |
96 |
GAD_DIAGNOSTICS_STATE |
& 0, Nr, 2, bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_diff_r.F |
15 |
GAD_DIFF_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_diff_r.F |
40 |
GAD_DIFF_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diff_x.F |
15 |
GAD_DIFF_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_diff_x.F |
40 |
GAD_DIFF_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_diff_y.F |
15 |
GAD_DIFF_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_diff_y.F |
40 |
GAD_DIFF_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
15 |
GAD_DST2U1_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_r.F |
44 |
GAD_DST2U1_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
15 |
GAD_DST2U1_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_x.F |
46 |
GAD_DST2U1_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
15 |
GAD_DST2U1_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst2u1_adv_y.F |
45 |
GAD_DST2U1_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
13 |
GAD_DST2U1_IMPL_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst2u1_impl_r.F |
56 |
GAD_DST2U1_IMPL_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
15 |
GAD_DST3_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
47 |
GAD_DST3_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
15 |
GAD_DST3_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
50 |
GAD_DST3_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
15 |
GAD_DST3_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
49 |
GAD_DST3_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
15 |
GAD_DST3FL_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
43 |
GAD_DST3FL_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
11 |
GAD_DST3FL_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
33 |
GAD_DST3FL_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
11 |
GAD_DST3FL_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
33 |
GAD_DST3FL_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
13 |
GAD_DST3FL_IMPL_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
61 |
GAD_DST3FL_IMPL_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_exch_som.F |
11 |
GAD_EXCH_SOM |
I myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
36 |
GAD_EXCH_SOM |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_exch_som.F |
47 |
GAD_EXCH_SOM |
I .TRUE., myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
51 |
GAD_EXCH_SOM |
I myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
58 |
GAD_EXCH_SOM |
I .FALSE., myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
62 |
GAD_EXCH_SOM |
I myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
66 |
GAD_EXCH_SOM |
I .TRUE., myNz, myThid ) |
|
./pkg/generic_advdiff/gad_exch_som.F |
71 |
GAD_EXCH_SOM |
I .TRUE., myNz, myThid ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
15 |
GAD_FLUXLIMIT_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
49 |
GAD_FLUXLIMIT_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
15 |
GAD_FLUXLIMIT_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F |
51 |
GAD_FLUXLIMIT_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
15 |
GAD_FLUXLIMIT_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F |
51 |
GAD_FLUXLIMIT_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
13 |
GAD_FLUXLIMIT_IMPL_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
54 |
GAD_FLUXLIMIT_IMPL_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_grad_x.F |
15 |
GAD_GRAD_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_grad_x.F |
34 |
GAD_GRAD_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_grad_x.F |
54 |
GAD_GRAD_X |
& tracer, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_grad_y.F |
15 |
GAD_GRAD_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_grad_y.F |
34 |
GAD_GRAD_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_grad_y.F |
54 |
GAD_GRAD_Y |
& tracer, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
14 |
GAD_IMPLICIT_R |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
219 |
GAD_IMPLICIT_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
227 |
GAD_IMPLICIT_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
233 |
GAD_IMPLICIT_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
242 |
GAD_IMPLICIT_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
248 |
GAD_IMPLICIT_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
268 |
GAD_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
279 |
GAD_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
290 |
GAD_IMPLICIT_R |
diagSufx = GAD_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
293 |
GAD_IMPLICIT_R |
IF ( diagDif ) diagDif = DIAGNOSTICS_IS_ON(diagName,myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
296 |
GAD_IMPLICIT_R |
IF ( diagAdv ) diagAdv = DIAGNOSTICS_IS_ON(diagName,myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
334 |
GAD_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
335 |
GAD_IMPLICIT_R |
IF ( k.EQ.2 ) CALL DIAGNOSTICS_COUNT(diagName,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
339 |
GAD_IMPLICIT_R |
& k, 1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
350 |
GAD_IMPLICIT_R |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
354 |
GAD_IMPLICIT_R |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
433 |
GAD_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(af,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
437 |
GAD_IMPLICIT_R |
& k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
53 |
GAD_IMPLICIT_R |
INTEGER myIter, myThid |
|
./pkg/generic_advdiff/gad_init_fixed.F |
102 |
GAD_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
109 |
GAD_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
116 |
GAD_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
189 |
GAD_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
196 |
GAD_INIT_FIXED |
CALL GAD_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
203 |
GAD_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
25 |
GAD_INIT_FIXED |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_init_fixed.F |
262 |
GAD_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
40 |
GAD_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
43 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_INIT( myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
47 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_UPWIND_1RST , 1, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
48 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_CENTERED_2ND , 1, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
49 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_UPWIND_3RD , 2, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
50 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_CENTERED_4TH , 2, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
51 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_DST2 , 1, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
52 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_FLUX_LIMIT , 2, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
53 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_DST3 , 2, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
54 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_DST3_FLUX_LIMIT,2, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
55 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_OS7MP , 4, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
56 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_SOM_PRATHER , 1, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
57 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_SOM_LIMITER , 1, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
58 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PPM_NULL_LIMIT, 3, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
59 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PPM_MONO_LIMIT, 3, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
60 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PPM_WENO_LIMIT, 3, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
61 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PQM_NULL_LIMIT, 4, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
62 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PQM_MONO_LIMIT, 4, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
63 |
GAD_INIT_FIXED |
CALL GAD_ADVSCHEME_SET( ENUM_PQM_WENO_LIMIT, 4, errCode, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
67 |
GAD_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
95 |
GAD_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_init_fixed.F |
9 |
GAD_INIT_FIXED |
SUBROUTINE GAD_INIT_FIXED( myThid ) |
|
./pkg/generic_advdiff/gad_init_varia.F |
31 |
GAD_INIT_VARIA |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_init_varia.F |
40 |
GAD_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/generic_advdiff/gad_init_varia.F |
41 |
GAD_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/generic_advdiff/gad_init_varia.F |
71 |
GAD_INIT_VARIA |
CALL GAD_READ_PICKUP( nIter0, myThid ) |
|
./pkg/generic_advdiff/gad_init_varia.F |
72 |
GAD_INIT_VARIA |
CALL GAD_SOM_EXCHANGES( myThid ) |
|
./pkg/generic_advdiff/gad_init_varia.F |
9 |
GAD_INIT_VARIA |
SUBROUTINE GAD_INIT_VARIA( myThid ) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
11 |
GAD_OS7MP_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
31 |
GAD_OS7MP_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
11 |
GAD_OS7MP_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
33 |
GAD_OS7MP_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
11 |
GAD_OS7MP_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
33 |
GAD_OS7MP_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_osc_hat_r.F |
115 |
GAD_OSC_HAT_R |
integer myThid |
|
./pkg/generic_advdiff/gad_osc_hat_r.F |
99 |
GAD_OSC_HAT_R |
& mask,fbar,ohat,myThid) |
|
./pkg/generic_advdiff/gad_osc_hat_x.F |
107 |
GAD_OSC_HAT_X |
& mask,fbar,ohat,myThid) |
|
./pkg/generic_advdiff/gad_osc_hat_x.F |
123 |
GAD_OSC_HAT_X |
integer myThid |
|
./pkg/generic_advdiff/gad_osc_hat_y.F |
107 |
GAD_OSC_HAT_Y |
& mask,fbar,ohat,myThid) |
|
./pkg/generic_advdiff/gad_osc_hat_y.F |
123 |
GAD_OSC_HAT_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
128 |
GAD_PPM_ADV_R |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
134 |
GAD_PPM_ADV_R |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
141 |
GAD_PPM_ADV_R |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
147 |
GAD_PPM_ADV_R |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
46 |
GAD_PPM_ADV_R |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_adv_r.F |
8 |
GAD_PPM_ADV_R |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
115 |
GAD_PPM_ADV_X |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
121 |
GAD_PPM_ADV_X |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
128 |
GAD_PPM_ADV_X |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
135 |
GAD_PPM_ADV_X |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
45 |
GAD_PPM_ADV_X |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_adv_x.F |
8 |
GAD_PPM_ADV_X |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
115 |
GAD_PPM_ADV_Y |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
121 |
GAD_PPM_ADV_Y |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
128 |
GAD_PPM_ADV_Y |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
135 |
GAD_PPM_ADV_Y |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
45 |
GAD_PPM_ADV_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_adv_y.F |
8 |
GAD_PPM_ADV_Y |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_ppm_flx_r.F |
44 |
GAD_PPM_FLX_R |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_flx_r.F |
8 |
GAD_PPM_FLX_R |
& flux,myThid ) |
|
./pkg/generic_advdiff/gad_ppm_flx_x.F |
43 |
GAD_PPM_FLX_X |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_flx_x.F |
8 |
GAD_PPM_FLX_X |
& ufac,fhat,flux,myThid) |
|
./pkg/generic_advdiff/gad_ppm_flx_y.F |
43 |
GAD_PPM_FLX_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_flx_y.F |
8 |
GAD_PPM_FLX_Y |
& vfac,fhat,flux,myThid ) |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
43 |
GAD_PPM_HAT_R |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_hat_r.F |
8 |
GAD_PPM_HAT_R |
& ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
44 |
GAD_PPM_HAT_X |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_hat_x.F |
8 |
GAD_PPM_HAT_X |
& ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
44 |
GAD_PPM_HAT_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_hat_y.F |
8 |
GAD_PPM_HAT_Y |
I ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
25 |
GAD_PPM_P3E_R |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_p3e_r.F |
7 |
GAD_PPM_P3E_R |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
25 |
GAD_PPM_P3E_X |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_p3e_x.F |
7 |
GAD_PPM_P3E_X |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
25 |
GAD_PPM_P3E_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_ppm_p3e_y.F |
7 |
GAD_PPM_P3E_Y |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
125 |
GAD_PQM_ADV_R |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
131 |
GAD_PQM_ADV_R |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
138 |
GAD_PQM_ADV_R |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
144 |
GAD_PQM_ADV_R |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
46 |
GAD_PQM_ADV_R |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_adv_r.F |
8 |
GAD_PQM_ADV_R |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
113 |
GAD_PQM_ADV_X |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
119 |
GAD_PQM_ADV_X |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
126 |
GAD_PQM_ADV_X |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
133 |
GAD_PQM_ADV_X |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
45 |
GAD_PQM_ADV_X |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_adv_x.F |
8 |
GAD_PQM_ADV_X |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
113 |
GAD_PQM_ADV_Y |
& ohat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
119 |
GAD_PQM_ADV_Y |
& edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
126 |
GAD_PQM_ADV_Y |
& fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
133 |
GAD_PQM_ADV_Y |
& flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
45 |
GAD_PQM_ADV_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_adv_y.F |
8 |
GAD_PQM_ADV_Y |
O flux,myThid ) |
|
./pkg/generic_advdiff/gad_pqm_flx_r.F |
44 |
GAD_PQM_FLX_R |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_flx_r.F |
8 |
GAD_PQM_FLX_R |
& fhat,flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_flx_x.F |
43 |
GAD_PQM_FLX_X |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_flx_x.F |
8 |
GAD_PQM_FLX_X |
& ufac,fhat,flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_flx_y.F |
43 |
GAD_PQM_FLX_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_flx_y.F |
8 |
GAD_PQM_FLX_Y |
& vfac,fhat,flux,myThid) |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
47 |
GAD_PQM_HAT_R |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_hat_r.F |
8 |
GAD_PQM_HAT_R |
& ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
47 |
GAD_PQM_HAT_X |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_hat_x.F |
8 |
GAD_PQM_HAT_X |
& ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
47 |
GAD_PQM_HAT_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_hat_y.F |
8 |
GAD_PQM_HAT_Y |
& ohat,fhat,myThid) |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
26 |
GAD_PQM_P5E_R |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_p5e_r.F |
7 |
GAD_PQM_P5E_R |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
26 |
GAD_PQM_P5E_X |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_p5e_x.F |
7 |
GAD_PQM_P5E_X |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
26 |
GAD_PQM_P5E_Y |
integer myThid |
|
./pkg/generic_advdiff/gad_pqm_p5e_y.F |
7 |
GAD_PQM_P5E_Y |
& mask,fbar,edge,myThid) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
103 |
GAD_READ_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
110 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
115 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, 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 |
129 |
GAD_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
142 |
GAD_READ_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
154 |
GAD_READ_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
161 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
166 |
GAD_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
31 |
GAD_READ_PICKUP |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_read_pickup.F |
78 |
GAD_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/generic_advdiff/gad_read_pickup.F |
91 |
GAD_READ_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
20 |
GAD_SOM_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
60 |
GAD_SOM_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
18 |
GAD_SOM_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
59 |
GAD_SOM_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
18 |
GAD_SOM_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
59 |
GAD_SOM_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_advect.F |
160 |
GAD_SOM_ADVECT |
diagSufx = GAD_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
162 |
GAD_SOM_ADVECT |
doDiagAdvX = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
164 |
GAD_SOM_ADVECT |
doDiagAdvY = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
166 |
GAD_SOM_ADVECT |
doDiagAdvR = DIAGNOSTICS_IS_ON( diagName, 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 |
202 |
GAD_SOM_ADVECT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
208 |
GAD_SOM_ADVECT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
319 |
GAD_SOM_ADVECT |
I ipass, k, Nr, bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
342 |
GAD_SOM_ADVECT |
O afx, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
366 |
GAD_SOM_ADVECT |
I iPass, k, Nr, bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
389 |
GAD_SOM_ADVECT |
O afy, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
422 |
GAD_SOM_ADVECT |
CALL DIAGNOSTICS_FILL(afx,diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
426 |
GAD_SOM_ADVECT |
CALL DIAGNOSTICS_FILL(afy,diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
430 |
GAD_SOM_ADVECT |
CALL LAYERS_FILL(afx,tracerIdentity,'AFX',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_som_advect.F |
431 |
GAD_SOM_ADVECT |
CALL LAYERS_FILL(afy,tracerIdentity,'AFY',k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_som_advect.F |
443 |
GAD_SOM_ADVECT |
& afx,afy, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
469 |
GAD_SOM_ADVECT |
I myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
574 |
GAD_SOM_ADVECT |
O afr, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
605 |
GAD_SOM_ADVECT |
& diagName, k,1, 2,bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_advect.F |
610 |
GAD_SOM_ADVECT |
& k,1,2,bi,bj,myThid) |
|
./pkg/generic_advdiff/gad_som_advect.F |
62 |
GAD_SOM_ADVECT |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_exchanges.F |
30 |
GAD_SOM_EXCHANGES |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_exchanges.F |
39 |
GAD_SOM_EXCHANGES |
CALL GAD_EXCH_SOM( som_T, Nr, myThid ) |
|
./pkg/generic_advdiff/gad_som_exchanges.F |
44 |
GAD_SOM_EXCHANGES |
CALL GAD_EXCH_SOM( som_S, Nr, myThid ) |
|
./pkg/generic_advdiff/gad_som_exchanges.F |
9 |
GAD_SOM_EXCHANGES |
SUBROUTINE GAD_SOM_EXCHANGES( myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
13 |
GAD_SOM_FILL_CS_CORNER |
I bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
59 |
GAD_SOM_FILL_CS_CORNER |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
73 |
GAD_SOM_FILL_CS_CORNER |
& sm_v , bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
75 |
GAD_SOM_FILL_CS_CORNER |
& sm_o , bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
77 |
GAD_SOM_FILL_CS_CORNER |
& sm_x , sm_y , bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
79 |
GAD_SOM_FILL_CS_CORNER |
& sm_z , bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
81 |
GAD_SOM_FILL_CS_CORNER |
& sm_xx, sm_yy, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
83 |
GAD_SOM_FILL_CS_CORNER |
& sm_zz, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
85 |
GAD_SOM_FILL_CS_CORNER |
& sm_xy, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
87 |
GAD_SOM_FILL_CS_CORNER |
& sm_xz, sm_yz, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
14 |
GAD_SOM_LIM_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
35 |
GAD_SOM_LIM_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
122 |
GAD_SOM_PREP_CS_CORNER |
I bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
13 |
GAD_SOM_PREP_CS_CORNER |
I iPass, k, myNz, bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
57 |
GAD_SOM_PREP_CS_CORNER |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_som_prep_cs_corner.F |
99 |
GAD_SOM_PREP_CS_CORNER |
I bi, bj, myThid ) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
15 |
GAD_U3_ADV_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
41 |
GAD_U3_ADV_R |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
15 |
GAD_U3_ADV_X |
I myThid ) |
|
./pkg/generic_advdiff/gad_u3_adv_x.F |
43 |
GAD_U3_ADV_X |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_u3_adv_y.F |
15 |
GAD_U3_ADV_Y |
I myThid ) |
|
./pkg/generic_advdiff/gad_u3_adv_y.F |
43 |
GAD_U3_ADV_Y |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
13 |
GAD_U3C4_IMPL_R |
I myThid ) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
61 |
GAD_U3C4_IMPL_R |
INTEGER myThid |
|
./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 |
35 |
GAD_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/generic_advdiff/gad_write_pickup.F |
64 |
GAD_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/generic_advdiff/gad_write_pickup.F |
86 |
GAD_WRITE_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/generic_advdiff/salt_fill.F |
113 |
SALT_FILL |
CALL DIAGNOSTICS_FILL(salt,'SALTFILL',0,Nr,1,bi,bj,myThid) |
|
./pkg/generic_advdiff/salt_fill.F |
13 |
SALT_FILL |
I flag,myTime,myIter,myThid) |
|
./pkg/generic_advdiff/salt_fill.F |
52 |
SALT_FILL |
INTEGER myThid |
|
./pkg/generic_advdiff/salt_fill.F |
70 |
SALT_FILL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/generic_advdiff/salt_fill.F |
71 |
SALT_FILL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/generic_advdiff/salt_fill.F |
77 |
SALT_FILL |
& 0,Nr,-1,bi,bj,myThid) |
|
./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 |
53 |
GGL90_CALC |
INTEGER myThid |
|
./pkg/ggl90/ggl90_calc.F |
666 |
GGL90_CALC |
I bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
778 |
GGL90_CALC |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
780 |
GGL90_CALC |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
782 |
GGL90_CALC |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
784 |
GGL90_CALC |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
786 |
GGL90_CALC |
& 0,Nr, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
788 |
GGL90_CALC |
& 0,Nr, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
801 |
GGL90_CALC |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc.F |
815 |
GGL90_CALC |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_calc_diff.F |
39 |
GGL90_CALC_DIFF |
INTEGER myThid |
|
./pkg/ggl90/ggl90_calc_diff.F |
9 |
GGL90_CALC_DIFF |
I myThid) |
|
./pkg/ggl90/ggl90_calc_visc.F |
33 |
GGL90_CALC_VISC |
INTEGER myThid |
|
./pkg/ggl90/ggl90_calc_visc.F |
9 |
GGL90_CALC_VISC |
I myThid) |
|
./pkg/ggl90/ggl90_check.F |
21 |
GGL90_CHECK |
INTEGER myThid |
|
./pkg/ggl90/ggl90_check.F |
31 |
GGL90_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
37 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
46 |
GGL90_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
54 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
5 |
GGL90_CHECK |
SUBROUTINE GGL90_CHECK( myThid ) |
|
./pkg/ggl90/ggl90_check.F |
63 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
71 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
78 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
85 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
93 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_check.F |
99 |
GGL90_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
105 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
10 |
GGL90_DIAGNOSTICS_INIT |
SUBROUTINE GGL90_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
113 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
120 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
127 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
134 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
141 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
148 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
155 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
162 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
169 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
28 |
GGL90_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
55 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
62 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
69 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
76 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
83 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
90 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_diagnostics_init.F |
97 |
GGL90_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ggl90/ggl90_exchanges.F |
10 |
GGL90_EXCHANGES |
SUBROUTINE GGL90_EXCHANGES( myThid ) |
|
./pkg/ggl90/ggl90_exchanges.F |
29 |
GGL90_EXCHANGES |
INTEGER myThid |
|
./pkg/ggl90/ggl90_exchanges.F |
39 |
GGL90_EXCHANGES |
_EXCH_XYZ_RL(GGL90TKE,myThid) |
|
./pkg/ggl90/ggl90_exchanges.F |
44 |
GGL90_EXCHANGES |
_EXCH_XYZ_RL(IDEMIX_E,myThid) |
|
./pkg/ggl90/ggl90_exchanges.F |
45 |
GGL90_EXCHANGES |
_EXCH_XYZ_RL(IDEMIX_V0,myThid) |
|
./pkg/ggl90/ggl90_idemix.F |
10 |
GGL90_IDEMIX |
I bi, bj, hFacI, recip_hFacI, sigmaR, myTime, myIter, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
430 |
GGL90_IDEMIX |
I bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
451 |
GGL90_IDEMIX |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
453 |
GGL90_IDEMIX |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
455 |
GGL90_IDEMIX |
& 0,Nr, 1, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
457 |
GGL90_IDEMIX |
& 0,Nr, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
459 |
GGL90_IDEMIX |
& 0,Nr, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
461 |
GGL90_IDEMIX |
& 0,Nr, 2, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_idemix.F |
462 |
GGL90_IDEMIX |
CALL DIAGNOSTICS_FILL(IDEMIX_F_b,'IDEM_F_b',0,1,1,bi,bj,myThid) |
|
./pkg/ggl90/ggl90_idemix.F |
463 |
GGL90_IDEMIX |
CALL DIAGNOSTICS_FILL(IDEMIX_F_s,'IDEM_F_s',0,1,1,bi,bj,myThid) |
|
./pkg/ggl90/ggl90_idemix.F |
465 |
GGL90_IDEMIX |
& 0,1,2,bi,bj,myThid) |
|
./pkg/ggl90/ggl90_idemix.F |
54 |
GGL90_IDEMIX |
INTEGER myThid |
|
./pkg/ggl90/ggl90_init_fixed.F |
10 |
GGL90_INIT_FIXED |
SUBROUTINE GGL90_INIT_FIXED( myThid ) |
|
./pkg/ggl90/ggl90_init_fixed.F |
28 |
GGL90_INIT_FIXED |
INTEGER myThid |
|
./pkg/ggl90/ggl90_init_fixed.F |
45 |
GGL90_INIT_FIXED |
CALL GGL90_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ggl90/ggl90_init_fixed.F |
50 |
GGL90_INIT_FIXED |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_fixed.F |
51 |
GGL90_INIT_FIXED |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_fixed.F |
61 |
GGL90_INIT_FIXED |
I bi,bj, myThid ) |
|
./pkg/ggl90/ggl90_init_varia.F |
100 |
GGL90_INIT_VARIA |
_EXCH_XY_RL(IDEMIX_F_b,myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
102 |
GGL90_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
103 |
GGL90_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
119 |
GGL90_INIT_VARIA |
CALL READ_REC_XY_RL( IDEMIX_wind_file ,IDEMIX_F_s,1,0,myThid ) |
|
./pkg/ggl90/ggl90_init_varia.F |
120 |
GGL90_INIT_VARIA |
_EXCH_XY_RL(IDEMIX_F_s,myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
121 |
GGL90_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
122 |
GGL90_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
139 |
GGL90_INIT_VARIA |
CALL GGL90_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ggl90/ggl90_init_varia.F |
143 |
GGL90_INIT_VARIA |
CALL READ_FLD_XYZ_RL( GGL90TKEFile, ' ', GGL90TKE, 0, myThid ) |
|
./pkg/ggl90/ggl90_init_varia.F |
144 |
GGL90_INIT_VARIA |
_EXCH_XYZ_RL(GGL90TKE,myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
145 |
GGL90_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
146 |
GGL90_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
30 |
GGL90_INIT_VARIA |
INTEGER myThid |
|
./pkg/ggl90/ggl90_init_varia.F |
42 |
GGL90_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
43 |
GGL90_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
73 |
GGL90_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
74 |
GGL90_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_init_varia.F |
99 |
GGL90_INIT_VARIA |
CALL READ_REC_XY_RL( IDEMIX_tidal_file,IDEMIX_F_b,1,0,myThid ) |
|
./pkg/ggl90/ggl90_init_varia.F |
9 |
GGL90_INIT_VARIA |
SUBROUTINE GGL90_INIT_VARIA( myThid ) |
|
./pkg/ggl90/ggl90_output.F |
112 |
GGL90_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
113 |
GGL90_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
114 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90viscArUtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
115 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90viscArVtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
116 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90diffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
117 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90TKEtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
125 |
GGL90_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
126 |
GGL90_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
128 |
GGL90_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
130 |
GGL90_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
132 |
GGL90_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
134 |
GGL90_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
147 |
GGL90_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
148 |
GGL90_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
150 |
GGL90_OUTPUT |
& GGL90_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
152 |
GGL90_OUTPUT |
& GGL90_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
154 |
GGL90_OUTPUT |
& GGL90_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
156 |
GGL90_OUTPUT |
& GGL90_timeAve, Nr, bi, bj, myThid ) |
|
./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 |
176 |
GGL90_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
177 |
GGL90_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ggl90/ggl90_output.F |
178 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90viscArUtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
179 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90viscArVtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
180 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90diffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
181 |
GGL90_OUTPUT |
CALL TIMEAVE_RESET( GGL90TKEtave, Nr, bi, bj, myThid ) |
|
./pkg/ggl90/ggl90_output.F |
57 |
GGL90_OUTPUT |
INTEGER myThid |
|
./pkg/ggl90/ggl90_output.F |
87 |
GGL90_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./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 |
30 |
GGL90_READ_PICKUP |
INTEGER myThid |
|
./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 |
59 |
GGL90_READ_PICKUP |
_EXCH_XYZ_RL( GGL90TKE, 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 |
64 |
GGL90_READ_PICKUP |
_EXCH_XYZ_RL( IDEMIX_E, myThid ) |
|
./pkg/ggl90/ggl90_read_pickup.F |
9 |
GGL90_READ_PICKUP |
SUBROUTINE GGL90_READ_PICKUP( myIter, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
149 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
170 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
177 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
198 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
211 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
264 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
267 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
271 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
30 |
GGL90_READPARMS |
INTEGER myThid |
|
./pkg/ggl90/ggl90_readparms.F |
318 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
363 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
366 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
370 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
373 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
375 |
GGL90_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ggl90/ggl90_readparms.F |
74 |
GGL90_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ggl90/ggl90_readparms.F |
78 |
GGL90_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ggl90/ggl90_readparms.F |
82 |
GGL90_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ggl90/ggl90_readparms.F |
86 |
GGL90_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
91 |
GGL90_READPARMS |
I myThid ) |
|
./pkg/ggl90/ggl90_readparms.F |
9 |
GGL90_READPARMS |
SUBROUTINE GGL90_READPARMS( myThid ) |
|
./pkg/ggl90/ggl90_write_pickup.F |
10 |
GGL90_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/ggl90/ggl90_write_pickup.F |
38 |
GGL90_WRITE_PICKUP |
INTEGER myThid |
|
./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_diff.F |
43 |
GMREDI_CALC_DIFF |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_diff.F |
9 |
GMREDI_CALC_DIFF |
I tracerIdentity,myThid) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
10 |
GMREDI_CALC_EIGS |
I bi, bj, N2, myThid, kLow, |
|
./pkg/gmredi/gmredi_calc_eigs.F |
187 |
GMREDI_CALC_EIGS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
193 |
GMREDI_CALC_EIGS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
38 |
GMREDI_CALC_EIGS |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_eigs.F |
395 |
GMREDI_CALC_EIGS |
CALL DIAGNOSTICS_FILL(a3d, 'GM_A3D ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
396 |
GMREDI_CALC_EIGS |
CALL DIAGNOSTICS_FILL(b3d, 'GM_B3D ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_calc_eigs.F |
397 |
GMREDI_CALC_EIGS |
CALL DIAGNOSTICS_FILL(c3d, 'GM_C3D ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
132 |
GMREDI_CALC_PSI_B |
I bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
19 |
GMREDI_CALC_PSI_B |
I myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
56 |
GMREDI_CALC_PSI_B |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
76 |
GMREDI_CALC_PSI_B |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
77 |
GMREDI_CALC_PSI_B |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
78 |
GMREDI_CALC_PSI_B |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
79 |
GMREDI_CALC_PSI_B |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_calc_psi_b.F |
80 |
GMREDI_CALC_PSI_B |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
12 |
GMREDI_CALC_PSI_BVP |
I myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
163 |
GMREDI_CALC_PSI_BVP |
& errCode, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
168 |
GMREDI_CALC_PSI_BVP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
235 |
GMREDI_CALC_PSI_BVP |
& errCode, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
240 |
GMREDI_CALC_PSI_BVP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
249 |
GMREDI_CALC_PSI_BVP |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
251 |
GMREDI_CALC_PSI_BVP |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
44 |
GMREDI_CALC_PSI_BVP |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1060 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KvzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1074 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1076 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1078 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1082 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1088 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1090 |
GMREDI_CALC_TENSOR |
& deltaTclock, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1100 |
GMREDI_CALC_TENSOR |
CALL GMREDI_DIAGNOSTICS_FILL(bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1117 |
GMREDI_CALC_TENSOR_DUMMY |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
1142 |
GMREDI_CALC_TENSOR_DUMMY |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_tensor.F |
126 |
GMREDI_CALC_TENSOR |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
127 |
GMREDI_CALC_TENSOR |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
128 |
GMREDI_CALC_TENSOR |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
129 |
GMREDI_CALC_TENSOR |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
130 |
GMREDI_CALC_TENSOR |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_calc_tensor.F |
141 |
GMREDI_CALC_TENSOR |
doDiagRediFlx = DIAGNOSTICS_IS_ON('GM_KuzTz', myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
143 |
GMREDI_CALC_TENSOR |
& DIAGNOSTICS_IS_ON('GM_KvzTz', myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
21 |
GMREDI_CALC_TENSOR |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
280 |
GMREDI_CALC_TENSOR |
& myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
285 |
GMREDI_CALC_TENSOR |
I bi, bj, myTime, myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
288 |
GMREDI_CALC_TENSOR |
& myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
430 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
586 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL( hTransLay, 'GM_hTrsL', 0,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
587 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL( baseSlope, 'GM_baseS', 0,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
588 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(recipLambda,'GM_rLamb', 0,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
602 |
GMREDI_CALC_TENSOR |
I myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
613 |
GMREDI_CALC_TENSOR |
I myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
629 |
GMREDI_CALC_TENSOR |
I myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
68 |
GMREDI_CALC_TENSOR |
INTEGER myThid |
|
./pkg/gmredi/gmredi_calc_tensor.F |
709 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
842 |
GMREDI_CALC_TENSOR |
CALL DIAGNOSTICS_FILL(tmp1k, 'GM_KuzTz', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_calc_tensor.F |
924 |
GMREDI_CALC_TENSOR |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_calc_urms.F |
10 |
GMREDI_CALC_URMS |
I bi, bj, N2, myThid, |
|
./pkg/gmredi/gmredi_calc_urms.F |
35 |
GMREDI_CALC_URMS |
INTEGER myThid |
|
./pkg/gmredi/gmredi_check.F |
127 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/gmredi/gmredi_check.F |
12 |
GMREDI_CHECK |
SUBROUTINE GMREDI_CHECK( myThid ) |
|
./pkg/gmredi/gmredi_check.F |
136 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
139 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
149 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
152 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
161 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
199 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
202 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
213 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
216 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
226 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
229 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
238 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
241 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
249 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
258 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
271 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
278 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
291 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
297 |
GMREDI_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_check.F |
317 |
GMREDI_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/gmredi/gmredi_check.F |
321 |
GMREDI_CHECK |
_END_MASTER(myThid) |
|
./pkg/gmredi/gmredi_check.F |
41 |
GMREDI_CHECK |
INTEGER myThid |
|
./pkg/gmredi/gmredi_check.F |
54 |
GMREDI_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/gmredi/gmredi_check.F |
58 |
GMREDI_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
100 |
GMREDI_DIAGNOSTICS_FILL |
& 0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
105 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D ',0,Nr,0,1,1,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
28 |
GMREDI_DIAGNOSTICS_FILL |
INTEGER myThid |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
51 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(VisbeckK,'GM_VisbK',0,1,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
55 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kux,'GM_Kux ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
56 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kvy,'GM_Kvy ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
60 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kuz,'GM_Kuz ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
61 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kvz,'GM_Kvz ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
64 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kwx,'GM_Kwx ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
65 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kwy,'GM_Kwy ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
66 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(Kwz,'GM_Kwz ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
69 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(GM_PsiX,'GM_PsiX ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
70 |
GMREDI_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(GM_PsiY,'GM_PsiY ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
75 |
GMREDI_DIAGNOSTICS_FILL |
IF ( DIAGNOSTICS_IS_ON('GMEdTauX',myThid) ) THEN |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
86 |
GMREDI_DIAGNOSTICS_FILL |
& 0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
89 |
GMREDI_DIAGNOSTICS_FILL |
IF ( DIAGNOSTICS_IS_ON('GMEdTauY',myThid) ) THEN |
|
./pkg/gmredi/gmredi_diagnostics_fill.F |
8 |
GMREDI_DIAGNOSTICS_FILL |
I bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
10 |
GMREDI_DIAGNOSTICS_IMPL |
I myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
31 |
GMREDI_DIAGNOSTICS_IMPL |
INTEGER myThid |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
53 |
GMREDI_DIAGNOSTICS_IMPL |
IF ( DIAGNOSTICS_IS_ON('GM_KwzTz', myThid ) ) THEN |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
54 |
GMREDI_DIAGNOSTICS_IMPL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
55 |
GMREDI_DIAGNOSTICS_IMPL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
56 |
GMREDI_DIAGNOSTICS_IMPL |
CALL DIAGNOSTICS_COUNT( 'GM_KwzTz', bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_impl.F |
68 |
GMREDI_DIAGNOSTICS_IMPL |
& k, 1, 2, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
108 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
117 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
125 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
133 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
141 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
149 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
157 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
164 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
172 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
180 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
188 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
196 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
203 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
211 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
219 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
228 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
236 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
246 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
254 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
264 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
272 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
280 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
289 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
297 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
305 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
30 |
GMREDI_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
314 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
322 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
330 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
338 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
346 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
354 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
362 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
371 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
379 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
387 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
395 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
403 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
411 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
419 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
427 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
435 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
443 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
451 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
459 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
467 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
475 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
483 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
491 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
499 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
507 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
515 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
523 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
531 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
539 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
547 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
556 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
60 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
67 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
74 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
82 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
90 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
99 |
GMREDI_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/gmredi/gmredi_diagnostics_init.F |
9 |
GMREDI_DIAGNOSTICS_INIT |
SUBROUTINE GMREDI_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gmredi/gmredi_do_exch.F |
10 |
GMREDI_DO_EXCH |
I myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_do_exch.F |
34 |
GMREDI_DO_EXCH |
INTEGER myThid |
|
./pkg/gmredi/gmredi_do_exch.F |
55 |
GMREDI_DO_EXCH |
IF (debugMode) CALL DEBUG_CALL('EXCH_UV(GM_PsiX,Y)',myThid) |
|
./pkg/gmredi/gmredi_do_exch.F |
57 |
GMREDI_DO_EXCH |
CALL EXCH_UV_XYZ_RL( GM_PsiX, GM_PsiY, .TRUE., myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
31 |
GMREDI_INIT_FIXED |
INTEGER myThid |
|
./pkg/gmredi/gmredi_init_fixed.F |
46 |
GMREDI_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_init_fixed.F |
47 |
GMREDI_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_init_fixed.F |
59 |
GMREDI_INIT_FIXED |
CALL READ_FLD_XY_RS( GM_iso2dFile, ' ', GM_isoFac2d, 0, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
60 |
GMREDI_INIT_FIXED |
CALL EXCH_XY_RS( GM_isoFac2d, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
63 |
GMREDI_INIT_FIXED |
CALL READ_FLD_XY_RS( GM_bol2dFile, ' ', GM_bolFac2d, 0, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
64 |
GMREDI_INIT_FIXED |
CALL EXCH_XY_RS( GM_bolFac2d, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
68 |
GMREDI_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
78 |
GMREDI_INIT_FIXED |
& GM_isoFac1d, Nr, 1, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
82 |
GMREDI_INIT_FIXED |
& GM_bolFac1d, Nr, 1, myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
84 |
GMREDI_INIT_FIXED |
_END_MASTER( myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
93 |
GMREDI_INIT_FIXED |
CALL GMREDI_MNC_INIT( myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
99 |
GMREDI_INIT_FIXED |
CALL GMREDI_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gmredi/gmredi_init_fixed.F |
9 |
GMREDI_INIT_FIXED |
SUBROUTINE GMREDI_INIT_FIXED( myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
102 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_isoFac2d',' ',GM_isoFac2d,-1,myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
105 |
GMREDI_INIT_VARIA |
CALL WRITE_FLD_XY_RS( 'GM_bolFac2d',' ',GM_bolFac2d,-1,myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
113 |
GMREDI_INIT_VARIA |
IF (GM_useK3D) CALL GMREDI_READ_PICKUP( niter0, myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
122 |
GMREDI_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
123 |
GMREDI_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
132 |
GMREDI_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
133 |
GMREDI_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
142 |
GMREDI_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
143 |
GMREDI_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
158 |
GMREDI_INIT_VARIA |
CALL EXCH_XY_RL( gradf, myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
32 |
GMREDI_INIT_VARIA |
INTEGER myThid |
|
./pkg/gmredi/gmredi_init_varia.F |
41 |
GMREDI_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
42 |
GMREDI_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
75 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(GM_Kwx_T,Nr, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
76 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(GM_Kwy_T,Nr, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
77 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(GM_Kwz_T,Nr, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
80 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(Visbeck_K_T, 1, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
83 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(GM_PsiXtave,Nr, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
84 |
GMREDI_INIT_VARIA |
CALL TIMEAVE_RESET(GM_PsiYtave,Nr, bi,bj,myThid) |
|
./pkg/gmredi/gmredi_init_varia.F |
95 |
GMREDI_INIT_VARIA |
I Nr, -1, myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
99 |
GMREDI_INIT_VARIA |
I Nr, -1, myThid ) |
|
./pkg/gmredi/gmredi_init_varia.F |
9 |
GMREDI_INIT_VARIA |
SUBROUTINE GMREDI_INIT_VARIA( myThid ) |
|
./pkg/gmredi/gmredi_k3d.F |
1099 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D ',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1100 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(KPV, 'GM_KPV ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1101 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(urms, 'GM_URMS ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1102 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Rdef, 'GM_RDEF ',0, 1,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1103 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Rurms, 'GM_RURMS',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1104 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(RRhines,'GM_RRHNS',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1105 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Rmix, 'GM_RMIX ',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1106 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(supp, 'GM_SUPP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1107 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Xix, 'GM_Xix ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1108 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Xiy, 'GM_Xiy ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1109 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(cDopp, 'GM_C ',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1110 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Ubaro, 'GM_UBARO',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1111 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(eady, 'GM_EADY ',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1112 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(SlopeX, 'GM_Sx ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1113 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(SlopeY, 'GM_Sy ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1114 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(tfluxX, 'GM_TFLXX',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1115 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(tfluxY, 'GM_TFLXY',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1116 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(gradqx, 'GM_dqdx ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1117 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(gradqy, 'GM_dqdy ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1118 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Kdqdy, 'GM_Kdqdy',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1119 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Kdqdx, 'GM_Kdqdx',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1120 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(surfkz, 'GM_SFLYR',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1121 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(ustar, 'GM_USTAR',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1122 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(vstar, 'GM_VSTAR',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1123 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(umc, 'GM_UMC ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1124 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(ubar, 'GM_UBAR ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1125 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(modesC, 'GM_MODEC',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1126 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(M4loc, 'GM_M4 ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1127 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(N2loc, 'GM_N2 ',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1128 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(M4onN2, 'GM_M4_N2',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1129 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(slopeC, 'GM_SLOPE',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1130 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(Renorm, 'GM_RENRM',0, 1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1132 |
GMREDI_K3D |
CALL DIAGNOSTICS_FILL(psistar,'GM_PSTAR',0,Nr,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
1151 |
GMREDI_K3D |
& CALL DIAGNOSTICS_FILL(K3D, 'GM_K3D_T',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_k3d.F |
11 |
GMREDI_K3D |
I bi, bj, myTime, myThid ) |
|
./pkg/gmredi/gmredi_k3d.F |
42 |
GMREDI_K3D |
INTEGER myThid |
|
./pkg/gmredi/gmredi_k3d.F |
456 |
GMREDI_K3D |
I iMin,iMax,jMin,jMax,bi,bj,N2,myThid, |
|
./pkg/gmredi/gmredi_k3d.F |
580 |
GMREDI_K3D |
I iMin,iMax,jMin,jMax,bi,bj,N2,myThid, |
|
./pkg/gmredi/gmredi_k3d.F |
853 |
GMREDI_K3D |
I iMin,iMax,jMin,jMax,bi,bj,N2W,myThid, |
|
./pkg/gmredi/gmredi_k3d.F |
905 |
GMREDI_K3D |
I iMin,iMax,jMin,jMax,bi,bj,N2S,myThid, |
|
./pkg/gmredi/gmredi_mnc_init.F |
11 |
GMREDI_MNC_INIT |
SUBROUTINE GMREDI_MNC_INIT( myThid ) |
|
./pkg/gmredi/gmredi_mnc_init.F |
24 |
GMREDI_MNC_INIT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_mnc_init.F |
32 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kux','U_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
33 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kux','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
36 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
40 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kvy','V_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
41 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kvy','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
44 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
46 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kuz','U_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
47 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kuz','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
50 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
52 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kvz','V_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
53 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kvz','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
56 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
58 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kwx','Cen_xy_Hn__L__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
59 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kwx','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
62 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
64 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kwy','Cen_xy_Hn__L__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
65 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kwy','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
68 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
70 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Kwz','Cen_xy_Hn__L__t', 4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
71 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Kwz','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
74 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
76 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('VisbK','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
77 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('VisbK','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
80 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
82 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('PsiX','Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
83 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PsiX','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
86 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
88 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VNAME('PsiY','Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
89 |
GMREDI_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PsiY','units','m^2/s', myThid) |
|
./pkg/gmredi/gmredi_mnc_init.F |
92 |
GMREDI_MNC_INIT |
& myThid) |
|
./pkg/gmredi/gmredi_output.F |
100 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kvz',Kvz,myThid) |
|
./pkg/gmredi/gmredi_output.F |
10 |
GMREDI_OUTPUT |
SUBROUTINE GMREDI_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
116 |
GMREDI_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_output.F |
117 |
GMREDI_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_output.F |
119 |
GMREDI_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
121 |
GMREDI_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
123 |
GMREDI_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
127 |
GMREDI_OUTPUT |
& 1 , bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
132 |
GMREDI_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
134 |
GMREDI_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./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 |
171 |
GMREDI_OUTPUT |
CALL MNC_CW_SET_UDIM('gm_tave', -1, myThid) |
|
./pkg/gmredi/gmredi_output.F |
172 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W_S('D','gm_tave',0,0,'T',myTime,myThid) |
|
./pkg/gmredi/gmredi_output.F |
173 |
GMREDI_OUTPUT |
CALL MNC_CW_SET_UDIM('gm_tave', 0, 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 |
175 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwx',GM_Kwx_T,myThid) |
|
./pkg/gmredi/gmredi_output.F |
176 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwy',GM_Kwy_T,myThid) |
|
./pkg/gmredi/gmredi_output.F |
177 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_tave',0,0,'Kwz',GM_Kwz_T,myThid) |
|
./pkg/gmredi/gmredi_output.F |
181 |
GMREDI_OUTPUT |
& Visbeck_K_T, myThid) |
|
./pkg/gmredi/gmredi_output.F |
187 |
GMREDI_OUTPUT |
& pf,'gm_tave',0,0,'PsiX', GM_PsiXtave, myThid) |
|
./pkg/gmredi/gmredi_output.F |
189 |
GMREDI_OUTPUT |
& pf,'gm_tave',0,0,'PsiY', GM_PsiYtave, myThid) |
|
./pkg/gmredi/gmredi_output.F |
196 |
GMREDI_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gmredi/gmredi_output.F |
197 |
GMREDI_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gmredi/gmredi_output.F |
198 |
GMREDI_OUTPUT |
CALL TIMEAVE_RESET( GM_Kwx_T, Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
199 |
GMREDI_OUTPUT |
CALL TIMEAVE_RESET( GM_Kwy_T, Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
200 |
GMREDI_OUTPUT |
CALL TIMEAVE_RESET( GM_Kwz_T, Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
203 |
GMREDI_OUTPUT |
& CALL TIMEAVE_RESET( Visbeck_K_T, 1, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
207 |
GMREDI_OUTPUT |
CALL TIMEAVE_RESET( GM_PsiXtave, Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
208 |
GMREDI_OUTPUT |
CALL TIMEAVE_RESET( GM_PsiYtave, Nr, bi, bj, myThid ) |
|
./pkg/gmredi/gmredi_output.F |
38 |
GMREDI_OUTPUT |
INTEGER myThid |
|
./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 |
89 |
GMREDI_OUTPUT |
CALL MNC_CW_SET_UDIM('gm_inst', -1, myThid) |
|
./pkg/gmredi/gmredi_output.F |
90 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W_S('D','gm_inst',0,0,'T',myTime,myThid) |
|
./pkg/gmredi/gmredi_output.F |
91 |
GMREDI_OUTPUT |
CALL MNC_CW_SET_UDIM('gm_inst', 0, 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_output.F |
94 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kux',Kux,myThid) |
|
./pkg/gmredi/gmredi_output.F |
95 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kvy',Kvy,myThid) |
|
./pkg/gmredi/gmredi_output.F |
99 |
GMREDI_OUTPUT |
CALL MNC_CW_RL_W(pf,'gm_inst',0,0,'Kuz',Kuz,myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
100 |
GMREDI_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
105 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
110 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
11 |
GMREDI_READ_PICKUP |
SUBROUTINE GMREDI_READ_PICKUP( myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
121 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
122 |
GMREDI_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
141 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
142 |
GMREDI_READ_PICKUP |
CALL EXCH_3D_RL(vec, Nr, myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
143 |
GMREDI_READ_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
144 |
GMREDI_READ_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
159 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
160 |
GMREDI_READ_PICKUP |
CALL EXCH_3D_RL(vec, Nr, myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
161 |
GMREDI_READ_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
162 |
GMREDI_READ_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
178 |
GMREDI_READ_PICKUP |
& nm, fp, Nr, myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
179 |
GMREDI_READ_PICKUP |
CALL EXCH_3D_RL(vec, Nr, myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
180 |
GMREDI_READ_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
181 |
GMREDI_READ_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
199 |
GMREDI_READ_PICKUP |
& nm, fp, 1, myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
200 |
GMREDI_READ_PICKUP |
CALL EXCH_XY_RL(Rdef, myThid) |
|
./pkg/gmredi/gmredi_read_pickup.F |
210 |
GMREDI_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
214 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
215 |
GMREDI_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
223 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
225 |
GMREDI_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
27 |
GMREDI_READ_PICKUP |
INTEGER myThid |
|
./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_read_pickup.F |
74 |
GMREDI_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
79 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
82 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
86 |
GMREDI_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
95 |
GMREDI_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_read_pickup.F |
99 |
GMREDI_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/gmredi/gmredi_readparms.F |
174 |
GMREDI_READPARMS |
I myThid ) |
|
./pkg/gmredi/gmredi_readparms.F |
226 |
GMREDI_READPARMS |
_END_MASTER(myThid) |
|
./pkg/gmredi/gmredi_readparms.F |
32 |
GMREDI_READPARMS |
INTEGER myThid |
|
./pkg/gmredi/gmredi_readparms.F |
83 |
GMREDI_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/gmredi/gmredi_readparms.F |
87 |
GMREDI_READPARMS |
_END_MASTER(myThid) |
|
./pkg/gmredi/gmredi_readparms.F |
91 |
GMREDI_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/gmredi/gmredi_readparms.F |
9 |
GMREDI_READPARMS |
SUBROUTINE GMREDI_READPARMS( myThid ) |
|
./pkg/gmredi/gmredi_residual_flow.F |
11 |
GMREDI_RESIDUAL_FLOW |
I bi, bj, myIter, myThid ) |
|
./pkg/gmredi/gmredi_residual_flow.F |
125 |
GMREDI_RESIDUAL_FLOW |
CALL DIAGNOSTICS_FILL(uEulerMean,'U_EulerM',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_residual_flow.F |
126 |
GMREDI_RESIDUAL_FLOW |
CALL DIAGNOSTICS_FILL(vEulerMean,'V_EulerM',0,Nr,1,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_residual_flow.F |
37 |
GMREDI_RESIDUAL_FLOW |
INTEGER bi, bj, myIter, myThid |
|
./pkg/gmredi/gmredi_rtransport.F |
16 |
GMREDI_RTRANSPORT |
I myThid ) |
|
./pkg/gmredi/gmredi_rtransport.F |
61 |
GMREDI_RTRANSPORT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_rtransport.F |
77 |
GMREDI_RTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_rtransport.F |
78 |
GMREDI_RTRANSPORT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_rtransport.F |
79 |
GMREDI_RTRANSPORT |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_rtransport.F |
80 |
GMREDI_RTRANSPORT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_rtransport.F |
81 |
GMREDI_RTRANSPORT |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_slope_limit.F |
132 |
GMREDI_SLOPE_LIMIT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_slope_limit.F |
133 |
GMREDI_SLOPE_LIMIT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_slope_limit.F |
134 |
GMREDI_SLOPE_LIMIT |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_slope_limit.F |
135 |
GMREDI_SLOPE_LIMIT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_slope_limit.F |
136 |
GMREDI_SLOPE_LIMIT |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_slope_limit.F |
19 |
GMREDI_SLOPE_LIMIT |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_slope_limit.F |
98 |
GMREDI_SLOPE_LIMIT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_slope_psi.F |
15 |
GMREDI_SLOPE_PSI |
I bi,bj, myThid ) |
|
./pkg/gmredi/gmredi_slope_psi.F |
54 |
GMREDI_SLOPE_PSI |
INTEGER K,bi,bj,myThid |
|
./pkg/gmredi/gmredi_slope_psi.F |
77 |
GMREDI_SLOPE_PSI |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_slope_psi.F |
78 |
GMREDI_SLOPE_PSI |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_slope_psi.F |
79 |
GMREDI_SLOPE_PSI |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_slope_psi.F |
80 |
GMREDI_SLOPE_PSI |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_slope_psi.F |
81 |
GMREDI_SLOPE_PSI |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_write_pickup.F |
100 |
GMREDI_WRITE_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_write_pickup.F |
112 |
GMREDI_WRITE_PICKUP |
& vec, -m, myIter, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
119 |
GMREDI_WRITE_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_write_pickup.F |
11 |
GMREDI_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
120 |
GMREDI_WRITE_PICKUP |
DO bi=myBxLo(myThid),myBxHi(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 |
153 |
GMREDI_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
156 |
GMREDI_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
157 |
GMREDI_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
174 |
GMREDI_WRITE_PICKUP |
& nm, myIter, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
33 |
GMREDI_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/gmredi/gmredi_write_pickup.F |
80 |
GMREDI_WRITE_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_write_pickup.F |
81 |
GMREDI_WRITE_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/gmredi/gmredi_write_pickup.F |
93 |
GMREDI_WRITE_PICKUP |
& vec, -m, myIter, myThid ) |
|
./pkg/gmredi/gmredi_write_pickup.F |
99 |
GMREDI_WRITE_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
20 |
GMREDI_XTRANSPORT |
I myThid ) |
|
./pkg/gmredi/gmredi_xtransport.F |
214 |
GMREDI_XTRANSPORT |
& .AND. DIAGNOSTICS_IS_ON('GM_ubT ', myThid ) |
|
./pkg/gmredi/gmredi_xtransport.F |
227 |
GMREDI_XTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_ubT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
66 |
GMREDI_XTRANSPORT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_xtransport.F |
93 |
GMREDI_XTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
94 |
GMREDI_XTRANSPORT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_xtransport.F |
95 |
GMREDI_XTRANSPORT |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_xtransport.F |
96 |
GMREDI_XTRANSPORT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_xtransport.F |
97 |
GMREDI_XTRANSPORT |
act3 = myThid - 1 |
|
./pkg/gmredi/gmredi_ytransport.F |
19 |
GMREDI_YTRANSPORT |
I myThid ) |
|
./pkg/gmredi/gmredi_ytransport.F |
212 |
GMREDI_YTRANSPORT |
& .AND. DIAGNOSTICS_IS_ON('GM_vbT ', myThid ) |
|
./pkg/gmredi/gmredi_ytransport.F |
225 |
GMREDI_YTRANSPORT |
CALL DIAGNOSTICS_FILL(tmp1k,'GM_vbT ', k,1,2,bi,bj,myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
65 |
GMREDI_YTRANSPORT |
INTEGER myThid |
|
./pkg/gmredi/gmredi_ytransport.F |
92 |
GMREDI_YTRANSPORT |
act1 = bi - myBxLo(myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
93 |
GMREDI_YTRANSPORT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_ytransport.F |
94 |
GMREDI_YTRANSPORT |
act2 = bj - myByLo(myThid) |
|
./pkg/gmredi/gmredi_ytransport.F |
95 |
GMREDI_YTRANSPORT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/gmredi/gmredi_ytransport.F |
96 |
GMREDI_YTRANSPORT |
act3 = myThid - 1 |
|
./pkg/gmredi/submeso_calc_psi.F |
13 |
SUBMESO_CALC_PSI |
I myIter, myThid ) |
|
./pkg/gmredi/submeso_calc_psi.F |
183 |
SUBMESO_CALC_PSI |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/gmredi/submeso_calc_psi.F |
185 |
SUBMESO_CALC_PSI |
& 0, 1, 2, bi, bj, 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 |
226 |
SUBMESO_CALC_PSI |
& 0, 1, 2, bi, bj, myThid ) |
|
./pkg/gmredi/submeso_calc_psi.F |
231 |
SUBMESO_CALC_PSI |
& bi,bj,1,myIter,myThid ) |
|
./pkg/gmredi/submeso_calc_psi.F |
43 |
SUBMESO_CALC_PSI |
INTEGER myThid |
|
./pkg/grdchk/grdchk_check.F |
33 |
GRDCHK_CHECK |
INTEGER myThid |
|
./pkg/grdchk/grdchk_check.F |
45 |
GRDCHK_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_check.F |
51 |
GRDCHK_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/grdchk/grdchk_check.F |
9 |
GRDCHK_CHECK |
SUBROUTINE GRDCHK_CHECK( myThid ) |
|
./model/src/adams_bashforth2.F |
13 |
ADAMS_BASHFORTH2 |
I startAB, myIter, myThid ) |
|
./model/src/adams_bashforth2.F |
52 |
ADAMS_BASHFORTH2 |
INTEGER myIter, myThid |
|
./pkg/grdchk/grdchk_main.F |
140 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
142 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
145 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
150 |
GRDCHK_MAIN |
CALL TURNOFF_MODEL_IO( 0, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
154 |
GRDCHK_MAIN |
CALL GRDCHK_INIT( myThid ) |
|
./pkg/grdchk/grdchk_main.F |
175 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
177 |
GRDCHK_MAIN |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/grdchk/grdchk_main.F |
178 |
GRDCHK_MAIN |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/grdchk/grdchk_main.F |
216 |
GRDCHK_MAIN |
IF ( nbeg .EQ. 0 ) CALL GRDCHK_GET_POSITION( myThid ) |
|
./pkg/grdchk/grdchk_main.F |
227 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
234 |
GRDCHK_MAIN |
& myThid ) |
|
./pkg/grdchk/grdchk_main.F |
248 |
GRDCHK_MAIN |
CALL GLOBAL_SUM_INT( icvrec , myThid ) |
|
./pkg/grdchk/grdchk_main.F |
249 |
GRDCHK_MAIN |
CALL GLOBAL_SUM_INT( layer , myThid ) |
|
./pkg/grdchk/grdchk_main.F |
250 |
GRDCHK_MAIN |
CALL GLOBAL_SUM_INT( ierr , myThid ) |
|
./pkg/grdchk/grdchk_main.F |
256 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
266 |
GRDCHK_MAIN |
& adxxmemo, ierr, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
268 |
GRDCHK_MAIN |
_GLOBAL_SUM_RL( adxxmemo, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
282 |
GRDCHK_MAIN |
& ierr, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
299 |
GRDCHK_MAIN |
CALL G_THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
310 |
GRDCHK_MAIN |
& xxmemo_ref, ierr, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
327 |
GRDCHK_MAIN |
& ierr, myThid ) |
|
./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 |
347 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
353 |
GRDCHK_MAIN |
& xxmemo_ref, ierr, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
366 |
GRDCHK_MAIN |
& ierr, myThid ) |
|
./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 |
386 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
392 |
GRDCHK_MAIN |
& xxmemo_ref, ierr, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
475 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
478 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
481 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
485 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
488 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
491 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
497 |
GRDCHK_MAIN |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
511 |
GRDCHK_MAIN |
& 'grd_findiff' , tmpplot1, 1, 0, myThid) |
|
./pkg/grdchk/grdchk_main.F |
513 |
GRDCHK_MAIN |
& 'grd_ratio_ad' , tmpplot2, 1, 0, myThid) |
|
./pkg/grdchk/grdchk_main.F |
515 |
GRDCHK_MAIN |
& 'grd_ratio_ftl' , tmpplot3, 1, 0, myThid) |
|
./pkg/grdchk/grdchk_main.F |
519 |
GRDCHK_MAIN |
CALL GRDCHK_PRINT( ichknum, ierr_grdchk, myThid ) |
|
./pkg/grdchk/grdchk_main.F |
56 |
GRDCHK_MAIN |
SUBROUTINE GRDCHK_MAIN( myThid ) |
|
./pkg/grdchk/grdchk_main.F |
93 |
GRDCHK_MAIN |
INTEGER myThid |
|
./pkg/grdchk/grdchk_readparms.F |
131 |
GRDCHK_READPARMS |
I myThid ) |
|
./pkg/grdchk/grdchk_readparms.F |
148 |
GRDCHK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/grdchk/grdchk_readparms.F |
153 |
GRDCHK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/grdchk/grdchk_readparms.F |
159 |
GRDCHK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/grdchk/grdchk_readparms.F |
87 |
GRDCHK_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/grdchk/grdchk_readparms.F |
91 |
GRDCHK_READPARMS |
_END_MASTER(myThid) |
|
./pkg/gridalt/gridalt_diagnostics_init.F |
27 |
GRIDALT_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/gridalt/gridalt_diagnostics_init.F |
52 |
GRIDALT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/gridalt/gridalt_diagnostics_init.F |
9 |
GRIDALT_DIAGNOSTICS_INIT |
SUBROUTINE GRIDALT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gridalt/gridalt_initialise.F |
27 |
GRIDALT_INITIALISE |
integer myThid |
|
./pkg/gridalt/gridalt_initialise.F |
44 |
GRIDALT_INITIALISE |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gridalt/gridalt_initialise.F |
45 |
GRIDALT_INITIALISE |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gridalt/gridalt_initialise.F |
63 |
GRIDALT_INITIALISE |
call GRIDALT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/gridalt/gridalt_initialise.F |
6 |
GRIDALT_INITIALISE |
subroutine GRIDALT_INITIALISE (myThid) |
|
./model/src/adams_bashforth3.F |
13 |
ADAMS_BASHFORTH3 |
I startAB, myIter, myThid ) |
|
./model/src/adams_bashforth3.F |
70 |
ADAMS_BASHFORTH3 |
INTEGER myIter, myThid |
|
./pkg/gridalt/gridalt_update.F |
27 |
GRIDALT_UPDATE |
integer myThid |
|
./pkg/gridalt/gridalt_update.F |
49 |
GRIDALT_UPDATE |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gridalt/gridalt_update.F |
50 |
GRIDALT_UPDATE |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gridalt/gridalt_update.F |
6 |
GRIDALT_UPDATE |
subroutine GRIDALT_UPDATE(myThid) |
|
./pkg/gridalt/gridalt_update.F |
70 |
GRIDALT_UPDATE |
IF ( DIAGNOSTICS_IS_ON('DPPHYS ',myThid) ) THEN |
|
./pkg/gridalt/gridalt_update.F |
71 |
GRIDALT_UPDATE |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/gridalt/gridalt_update.F |
72 |
GRIDALT_UPDATE |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/gridalt/gridalt_update.F |
82 |
GRIDALT_UPDATE |
CALL DIAGNOSTICS_FILL(temparr,'DPPHYS ',-1,Nrphys,0,1,1,myThid) |
|
./pkg/icefront/icefront_check.F |
21 |
ICEFRONT_CHECK |
INTEGER myThid |
|
./pkg/icefront/icefront_check.F |
29 |
ICEFRONT_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/icefront/icefront_check.F |
33 |
ICEFRONT_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/icefront/icefront_check.F |
39 |
ICEFRONT_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/icefront/icefront_check.F |
55 |
ICEFRONT_CHECK |
_END_MASTER(myThid) |
|
./pkg/icefront/icefront_check.F |
5 |
ICEFRONT_CHECK |
SUBROUTINE ICEFRONT_CHECK( myThid ) |
|
./pkg/icefront/icefront_diagnostics_init.F |
11 |
ICEFRONT_DIAGNOSTICS_INIT |
SUBROUTINE ICEFRONT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/icefront/icefront_diagnostics_init.F |
24 |
ICEFRONT_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/icefront/icefront_diagnostics_init.F |
49 |
ICEFRONT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/icefront/icefront_diagnostics_init.F |
56 |
ICEFRONT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
108 |
ICEFRONT_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
109 |
ICEFRONT_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
10 |
ICEFRONT_INIT_FIXED |
SUBROUTINE ICEFRONT_INIT_FIXED( myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
126 |
ICEFRONT_INIT_FIXED |
CALL ICEFRONT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
31 |
ICEFRONT_INIT_FIXED |
INTEGER myThid |
|
./pkg/icefront/icefront_init_fixed.F |
48 |
ICEFRONT_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
51 |
ICEFRONT_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GETFIELD_START SGRunOff',myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
57 |
ICEFRONT_INIT_FIXED |
I myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
61 |
ICEFRONT_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
65 |
ICEFRONT_INIT_FIXED |
_END_MASTER( myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
72 |
ICEFRONT_INIT_FIXED |
& icefrontlength, 0, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
73 |
ICEFRONT_INIT_FIXED |
_EXCH_XY_RS( icefrontlength, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
78 |
ICEFRONT_INIT_FIXED |
& R_icefront, 0, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
79 |
ICEFRONT_INIT_FIXED |
_EXCH_XY_RS( R_icefront, myThid ) |
|
./pkg/icefront/icefront_init_fixed.F |
83 |
ICEFRONT_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
84 |
ICEFRONT_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
93 |
ICEFRONT_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/icefront/icefront_init_fixed.F |
94 |
ICEFRONT_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/icefront/icefront_init_varia.F |
25 |
ICEFRONT_INIT_VARIA |
INTEGER myThid |
|
./pkg/icefront/icefront_init_varia.F |
34 |
ICEFRONT_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/icefront/icefront_init_varia.F |
35 |
ICEFRONT_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/icefront/icefront_init_varia.F |
7 |
ICEFRONT_INIT_VARIA |
SUBROUTINE ICEFRONT_INIT_VARIA( myThid ) |
|
./model/src/add_walls2masks.F |
108 |
ADD_WALLS2MASKS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/add_walls2masks.F |
109 |
ADD_WALLS2MASKS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/add_walls2masks.F |
10 |
ADD_WALLS2MASKS |
SUBROUTINE ADD_WALLS2MASKS( myThid ) |
|
./model/src/add_walls2masks.F |
36 |
ADD_WALLS2MASKS |
INTEGER myThid |
|
./model/src/add_walls2masks.F |
54 |
ADD_WALLS2MASKS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/add_walls2masks.F |
55 |
ADD_WALLS2MASKS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/add_walls2masks.F |
65 |
ADD_WALLS2MASKS |
CALL READ_FLD_XY_RS( addWwallFile, ' ', tmpFldW, 0, myThid ) |
|
./model/src/add_walls2masks.F |
68 |
ADD_WALLS2MASKS |
CALL READ_FLD_XY_RS( addSwallFile, ' ', tmpFldS, 0, myThid ) |
|
./model/src/add_walls2masks.F |
70 |
ADD_WALLS2MASKS |
CALL EXCH_UV_XY_RS( tmpFldW, tmpFldS, .FALSE., myThid ) |
|
./model/src/add_walls2masks.F |
81 |
ADD_WALLS2MASKS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/add_walls2masks.F |
82 |
ADD_WALLS2MASKS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/icefront/icefront_readparms.F |
10 |
ICEFRONT_READPARMS |
SUBROUTINE ICEFRONT_READPARMS( myThid ) |
|
./pkg/icefront/icefront_readparms.F |
117 |
ICEFRONT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/icefront/icefront_readparms.F |
121 |
ICEFRONT_READPARMS |
I myThid ) |
|
./pkg/icefront/icefront_readparms.F |
125 |
ICEFRONT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/icefront/icefront_readparms.F |
133 |
ICEFRONT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/icefront/icefront_readparms.F |
141 |
ICEFRONT_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/icefront/icefront_readparms.F |
154 |
ICEFRONT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/icefront/icefront_readparms.F |
27 |
ICEFRONT_READPARMS |
INTEGER myThid |
|
./pkg/icefront/icefront_readparms.F |
58 |
ICEFRONT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/icefront/icefront_readparms.F |
63 |
ICEFRONT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/icefront/icefront_readparms.F |
67 |
ICEFRONT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/icefront/icefront_tendency_apply.F |
17 |
ICEFRONT_TENDENCY_APPLY_T |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/icefront/icefront_tendency_apply.F |
42 |
ICEFRONT_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/icefront/icefront_tendency_apply.F |
69 |
ICEFRONT_TENDENCY_APPLY_S |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/icefront/icefront_tendency_apply.F |
94 |
ICEFRONT_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/icefront/icefront_thermodynamics.F |
10 |
ICEFRONT_THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./pkg/icefront/icefront_thermodynamics.F |
192 |
ICEFRONT_THERMODYNAMICS |
& k,1,3,bi,bj,myThid) |
|
./pkg/icefront/icefront_thermodynamics.F |
194 |
ICEFRONT_THERMODYNAMICS |
& k,1,3,bi,bj,myThid) |
|
./pkg/icefront/icefront_thermodynamics.F |
41 |
ICEFRONT_THERMODYNAMICS |
INTEGER myThid |
|
./pkg/icefront/icefront_thermodynamics.F |
85 |
ICEFRONT_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/icefront/icefront_thermodynamics.F |
86 |
ICEFRONT_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_calc.F |
11 |
KL10_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./pkg/kl10/kl10_calc.F |
55 |
KL10_CALC |
INTEGER myThid |
|
./pkg/kl10/kl10_calc.F |
83 |
KL10_CALC |
& totPhiHyd(I,J,K,bi,bj),rhot,myThid ) |
|
./pkg/kl10/kl10_calc.F |
98 |
KL10_CALC |
& ,bj),totPhiHyd(I,J,K,bi,bj),rhot,myThid ) |
|
./pkg/kl10/kl10_calc_diff.F |
41 |
KL10_CALC_DIFF |
INTEGER myThid |
|
./pkg/kl10/kl10_calc_diff.F |
9 |
KL10_CALC_DIFF |
I myThid) |
|
./pkg/kl10/kl10_calc_visc.F |
34 |
KL10_CALC_VISC |
INTEGER myThid |
|
./pkg/kl10/kl10_calc_visc.F |
8 |
KL10_CALC_VISC |
I myThid) |
|
./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 |
246 |
APPLY_FORCING_V |
INTEGER myThid |
|
./model/src/apply_forcing.F |
269 |
APPLY_FORCING_V |
I myTime, myThid ) |
|
./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 |
436 |
APPLY_FORCING_T |
INTEGER myThid |
|
./model/src/apply_forcing.F |
466 |
APPLY_FORCING_T |
I myTime, myThid ) |
|
./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 |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./model/src/apply_forcing.F |
621 |
APPLY_FORCING_T |
& 'MoistCor', kc, 1, 2, bi,bj,myThid ) |
|
./model/src/apply_forcing.F |
681 |
APPLY_FORCING_T |
I myTime, 1, myThid ) |
|
./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 |
79 |
APPLY_FORCING_U |
I myTime, myThid ) |
|
./model/src/apply_forcing.F |
812 |
APPLY_FORCING_S |
INTEGER myThid |
|
./model/src/apply_forcing.F |
832 |
APPLY_FORCING_S |
I myTime, myThid ) |
|
./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_check.F |
21 |
KL10_CHECK |
INTEGER myThid |
|
./pkg/kl10/kl10_check.F |
6 |
KL10_CHECK |
SUBROUTINE KL10_CHECK( myThid ) |
|
./pkg/kl10/kl10_diagnostics_init.F |
26 |
KL10_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/kl10/kl10_diagnostics_init.F |
51 |
KL10_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kl10/kl10_diagnostics_init.F |
58 |
KL10_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kl10/kl10_diagnostics_init.F |
65 |
KL10_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kl10/kl10_diagnostics_init.F |
9 |
KL10_DIAGNOSTICS_INIT |
SUBROUTINE KL10_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/kl10/kl10_init_fixed.F |
29 |
KL10_INIT_FIXED |
INTEGER myThid |
|
./pkg/kl10/kl10_init_fixed.F |
61 |
KL10_INIT_FIXED |
CALL KL10_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/kl10/kl10_init_fixed.F |
9 |
KL10_INIT_FIXED |
SUBROUTINE KL10_INIT_FIXED( myThid ) |
|
./pkg/kl10/kl10_init_varia.F |
24 |
KL10_INIT_VARIA |
INTEGER myThid |
|
./pkg/kl10/kl10_init_varia.F |
37 |
KL10_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kl10/kl10_init_varia.F |
38 |
KL10_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_init_varia.F |
6 |
KL10_INIT_VARIA |
SUBROUTINE KL10_INIT_VARIA( myThid ) |
|
./pkg/kl10/kl10_output.F |
109 |
KL10_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kl10/kl10_output.F |
110 |
KL10_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_output.F |
111 |
KL10_OUTPUT |
CALL TIMEAVE_RESET( KLviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
112 |
KL10_OUTPUT |
CALL TIMEAVE_RESET( KLdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
120 |
KL10_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kl10/kl10_output.F |
121 |
KL10_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_output.F |
123 |
KL10_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
125 |
KL10_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
138 |
KL10_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kl10/kl10_output.F |
139 |
KL10_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_output.F |
141 |
KL10_OUTPUT |
& KL_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
143 |
KL10_OUTPUT |
& KL_timeAve, Nr, bi, bj, myThid ) |
|
./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 |
159 |
KL10_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kl10/kl10_output.F |
160 |
KL10_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kl10/kl10_output.F |
161 |
KL10_OUTPUT |
CALL TIMEAVE_RESET( KLviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
162 |
KL10_OUTPUT |
CALL TIMEAVE_RESET( KLdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/kl10/kl10_output.F |
176 |
KL10_OUTPUT |
CALL DIAGNOSTICS_FILL(KLviscAr,'KLviscAr',0,Nr,0,1,1,myThid) |
|
./pkg/kl10/kl10_output.F |
177 |
KL10_OUTPUT |
CALL DIAGNOSTICS_FILL(KLdiffKr,'KLdiffKr',0,Nr,0,1,1,myThid) |
|
./pkg/kl10/kl10_output.F |
178 |
KL10_OUTPUT |
CALL DIAGNOSTICS_FILL(KLeps, 'KLeps ',0,Nr,0,1,1,myThid) |
|
./pkg/kl10/kl10_output.F |
57 |
KL10_OUTPUT |
INTEGER myThid |
|
./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/kl10/kl10_readparms.F |
10 |
KL10_READPARMS |
SUBROUTINE KL10_READPARMS( myThid ) |
|
./pkg/kl10/kl10_readparms.F |
24 |
KL10_READPARMS |
INTEGER myThid |
|
./pkg/kl10/kl10_readparms.F |
46 |
KL10_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/kl10/kl10_readparms.F |
51 |
KL10_READPARMS |
_END_MASTER(myThid) |
|
./pkg/kl10/kl10_readparms.F |
55 |
KL10_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/kl10/kl10_readparms.F |
74 |
KL10_READPARMS |
I myThid ) |
|
./pkg/kl10/kl10_readparms.F |
87 |
KL10_READPARMS |
_END_MASTER(myThid) |
|
./model/src/calc_3d_diffusivity.F |
14 |
CALC_3D_DIFFUSIVITY |
I myThid ) |
|
./model/src/calc_3d_diffusivity.F |
161 |
CALC_3D_DIFFUSIVITY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./model/src/calc_3d_diffusivity.F |
175 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
180 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
187 |
CALC_3D_DIFFUSIVITY |
I iTr, myThid ) |
|
./model/src/calc_3d_diffusivity.F |
192 |
CALC_3D_DIFFUSIVITY |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/calc_3d_diffusivity.F |
203 |
CALC_3D_DIFFUSIVITY |
I trIdentity,myThid) |
|
./model/src/calc_3d_diffusivity.F |
212 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
221 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
230 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
239 |
CALC_3D_DIFFUSIVITY |
I myThid) |
|
./model/src/calc_3d_diffusivity.F |
59 |
CALC_3D_DIFFUSIVITY |
INTEGER myThid |
|
./pkg/kpp/kpp_calc.F |
139 |
KPP_CALC |
INTEGER myThid |
|
./pkg/kpp/kpp_calc.F |
17 |
KPP_CALC |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_calc.F |
223 |
KPP_CALC |
act1 = bi - myBxLo(myThid) |
|
./pkg/kpp/kpp_calc.F |
224 |
KPP_CALC |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/kpp/kpp_calc.F |
225 |
KPP_CALC |
act2 = bj - myByLo(myThid) |
|
./pkg/kpp/kpp_calc.F |
226 |
KPP_CALC |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/kpp/kpp_calc.F |
227 |
KPP_CALC |
act3 = myThid - 1 |
|
./pkg/kpp/kpp_calc.F |
278 |
KPP_CALC |
I ikppkey, bi, bj, myThid ) |
|
./pkg/kpp/kpp_calc.F |
298 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
308 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
313 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
317 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
321 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
325 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
445 |
KPP_CALC |
I ikppkey, iMin, iMax, jMin, jMax, bi, bj, myTime, myThid ) |
|
./pkg/kpp/kpp_calc.F |
521 |
KPP_CALC |
I myThid) |
|
./pkg/kpp/kpp_calc.F |
526 |
KPP_CALC |
I myThid) |
|
./pkg/kpp/kpp_calc.F |
537 |
KPP_CALC |
I ikppkey,1-OLx,sNx+OLx,1-OLy,sNy+OLy,bi,bj,myThid) |
|
./pkg/kpp/kpp_calc.F |
564 |
KPP_CALC |
I , bi, bj, myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_calc.F |
598 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
610 |
KPP_CALC |
I myThid ) |
|
./pkg/kpp/kpp_calc.F |
614 |
KPP_CALC |
I 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 |
717 |
KPP_CALC_DUMMY |
INTEGER myThid |
|
./pkg/kpp/kpp_calc.F |
742 |
KPP_CALC_DUMMY |
I myThid) |
|
./pkg/kpp/kpp_calc.F |
747 |
KPP_CALC_DUMMY |
I myThid) |
|
./pkg/kpp/kpp_calc_diff_ptr.F |
46 |
KPP_CALC_DIFF_PTR |
INTEGER myThid |
|
./pkg/kpp/kpp_calc_diff_ptr.F |
9 |
KPP_CALC_DIFF_PTR |
I iTr, myThid ) |
|
./pkg/kpp/kpp_calc_diff_s.F |
39 |
KPP_CALC_DIFF_S |
INTEGER myThid |
|
./pkg/kpp/kpp_calc_diff_s.F |
9 |
KPP_CALC_DIFF_S |
I myThid) |
|
./pkg/kpp/kpp_calc_diff_t.F |
39 |
KPP_CALC_DIFF_T |
INTEGER myThid |
|
./pkg/kpp/kpp_calc_diff_t.F |
9 |
KPP_CALC_DIFF_T |
I myThid) |
|
./pkg/kpp/kpp_calc_visc.F |
32 |
KPP_CALC_VISC |
INTEGER myThid |
|
./pkg/kpp/kpp_calc_visc.F |
9 |
KPP_CALC_VISC |
I myThid) |
|
./pkg/kpp/kpp_check.F |
133 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
140 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
145 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
152 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
173 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
183 |
KPP_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/kpp/kpp_check.F |
190 |
KPP_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_check.F |
192 |
KPP_CHECK |
_END_MASTER(myThid) |
|
./pkg/kpp/kpp_check.F |
23 |
KPP_CHECK |
INTEGER myThid |
|
./pkg/kpp/kpp_check.F |
30 |
KPP_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/kpp/kpp_check.F |
34 |
KPP_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_check.F |
5 |
KPP_CHECK |
SUBROUTINE KPP_CHECK( myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
103 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
110 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
117 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
124 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
12 |
KPP_DIAGNOSTICS_INIT |
SUBROUTINE KPP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
131 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
138 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
145 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
153 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
160 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
165 |
KPP_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_TEMPERATURE, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
172 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
175 |
KPP_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_SALINITY, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
182 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
190 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
201 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
34 |
KPP_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/kpp/kpp_diagnostics_init.F |
67 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
74 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
81 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
89 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_diagnostics_init.F |
96 |
KPP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/kpp/kpp_do_exch.F |
30 |
KPP_DO_EXCH |
INTEGER myThid |
|
./pkg/kpp/kpp_do_exch.F |
37 |
KPP_DO_EXCH |
CALL EXCH_3D_RL( KPPviscAz, Nr, myThid ) |
|
./pkg/kpp/kpp_do_exch.F |
39 |
KPP_DO_EXCH |
_EXCH_XYZ_RL( KPPviscAz, myThid ) |
|
./pkg/kpp/kpp_do_exch.F |
9 |
KPP_DO_EXCH |
SUBROUTINE KPP_DO_EXCH( myThid ) |
|
./pkg/kpp/kpp_forcing_surf.F |
101 |
KPP_FORCING_SURF |
INTEGER myThid |
|
./pkg/kpp/kpp_forcing_surf.F |
262 |
KPP_FORCING_SURF |
CALL DIAGNOSTICS_FILL(bo ,'KPPbo ',0,1,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_forcing_surf.F |
263 |
KPP_FORCING_SURF |
CALL DIAGNOSTICS_FILL(bosol ,'KPPbosol',0,1,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_forcing_surf.F |
265 |
KPP_FORCING_SURF |
CALL DIAGNOSTICS_FILL(boplume,'KPPboplm',0,Nr,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_forcing_surf.F |
29 |
KPP_FORCING_SURF |
I ikppkey, iMin, iMax, jMin, jMax, bi, bj, myTime, myThid ) |
|
./pkg/kpp/kpp_init_fixed.F |
100 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
102 |
KPP_INIT_FIXED |
& 'KPP_boundary_layer_depth', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
104 |
KPP_INIT_FIXED |
& 'coordinates','XC YC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
107 |
KPP_INIT_FIXED |
& 3,4, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
109 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
112 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
114 |
KPP_INIT_FIXED |
& 'coordinates','XC YC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
119 |
KPP_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
186 |
KPP_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
191 |
KPP_INIT_FIXED |
CALL KPP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/kpp/kpp_init_fixed.F |
31 |
KPP_INIT_FIXED |
INTEGER myThid |
|
./pkg/kpp/kpp_init_fixed.F |
51 |
KPP_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
53 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
55 |
KPP_INIT_FIXED |
& 'KPP_vertical_eddy_viscosity_coefficient', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
57 |
KPP_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
60 |
KPP_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
62 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
65 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
67 |
KPP_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
70 |
KPP_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
72 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
74 |
KPP_INIT_FIXED |
& 'KPP_vertical_heat_diffusion_coefficient', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
76 |
KPP_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
79 |
KPP_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
81 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
83 |
KPP_INIT_FIXED |
& 'KPP_nonlocal_transport_coefficient', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
85 |
KPP_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
88 |
KPP_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
90 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
93 |
KPP_INIT_FIXED |
& myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
95 |
KPP_INIT_FIXED |
& 'XC YC RF iter', myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
98 |
KPP_INIT_FIXED |
& 3,4, myThid) |
|
./pkg/kpp/kpp_init_fixed.F |
9 |
KPP_INIT_FIXED |
SUBROUTINE KPP_INIT_FIXED( myThid ) |
|
./model/src/calc_adv_flow.F |
15 |
CALC_ADV_FLOW |
I k, bi, bj, myThid ) |
|
./model/src/calc_adv_flow.F |
64 |
CALC_ADV_FLOW |
INTEGER myThid |
|
./pkg/kpp/kpp_init_varia.F |
10 |
KPP_INIT_VARIA |
SUBROUTINE KPP_INIT_VARIA( myThid ) |
|
./pkg/kpp/kpp_init_varia.F |
26 |
KPP_INIT_VARIA |
INTEGER myThid |
|
./pkg/kpp/kpp_init_varia.F |
40 |
KPP_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_init_varia.F |
41 |
KPP_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
114 |
KPP_OUTPUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/kpp/kpp_output.F |
119 |
KPP_OUTPUT |
_END_MASTER( myThid ) |
|
./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 |
147 |
KPP_OUTPUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/kpp/kpp_output.F |
149 |
KPP_OUTPUT |
_END_MASTER( myThid ) |
|
./pkg/kpp/kpp_output.F |
14 |
KPP_OUTPUT |
SUBROUTINE KPP_OUTPUT( myTime, myIter, myThid ) |
|
./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 |
180 |
KPP_OUTPUT |
CALL MNC_CW_SET_UDIM('kpp_state', -1, myThid) |
|
./pkg/kpp/kpp_output.F |
181 |
KPP_OUTPUT |
CALL MNC_CW_RL_W_S('D','kpp_state',0,0,'T',myTime,myThid) |
|
./pkg/kpp/kpp_output.F |
182 |
KPP_OUTPUT |
CALL MNC_CW_SET_UDIM('kpp_state', 0, 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 |
185 |
KPP_OUTPUT |
& 'KPPviscAz', KPPviscAz, myThid) |
|
./pkg/kpp/kpp_output.F |
187 |
KPP_OUTPUT |
& 'KPPdiffKzT', KPPdiffKzT, myThid) |
|
./pkg/kpp/kpp_output.F |
189 |
KPP_OUTPUT |
& 'KPPdiffKzS', KPPdiffKzS, myThid) |
|
./pkg/kpp/kpp_output.F |
191 |
KPP_OUTPUT |
& 'KPPGHAT', KPPghat, myThid) |
|
./pkg/kpp/kpp_output.F |
193 |
KPP_OUTPUT |
& 'KPPHBL', KPPhbl, myThid) |
|
./pkg/kpp/kpp_output.F |
208 |
KPP_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_output.F |
209 |
KPP_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
210 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPviscAztave, Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
211 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPdiffKzTtave,Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
212 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPghatKStave, Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
213 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPdiffKzStave,Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
214 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPhbltave, 1, bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
228 |
KPP_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_output.F |
229 |
KPP_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
231 |
KPP_OUTPUT |
& KPPviscAztave, KPPviscAz, Nr,DDTT,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
233 |
KPP_OUTPUT |
& KPPdiffKzTtave,KPPdiffKzT,Nr,DDTT,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
235 |
KPP_OUTPUT |
& KPPdiffKzStave,KPPdiffKzS,Nr,DDTT,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
249 |
KPP_OUTPUT |
& KPPhbltave, KPPhbl, 1, DDTT,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
266 |
KPP_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_output.F |
273 |
KPP_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_output.F |
274 |
KPP_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
276 |
KPP_OUTPUT |
& KPP_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/kpp/kpp_output.F |
278 |
KPP_OUTPUT |
& KPP_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/kpp/kpp_output.F |
280 |
KPP_OUTPUT |
& KPP_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/kpp/kpp_output.F |
282 |
KPP_OUTPUT |
& KPP_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/kpp/kpp_output.F |
284 |
KPP_OUTPUT |
& KPP_timeAve, 1 , bi, bj, 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 |
305 |
KPP_OUTPUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/kpp/kpp_output.F |
307 |
KPP_OUTPUT |
_END_MASTER( myThid ) |
|
./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 |
338 |
KPP_OUTPUT |
CALL MNC_CW_SET_UDIM('kpp_timeave', -1, myThid) |
|
./pkg/kpp/kpp_output.F |
339 |
KPP_OUTPUT |
CALL MNC_CW_RL_W_S('D','kpp_timeave',0,0,'T',myTime,myThid) |
|
./pkg/kpp/kpp_output.F |
340 |
KPP_OUTPUT |
CALL MNC_CW_SET_UDIM('kpp_timeave', 0, 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 |
343 |
KPP_OUTPUT |
& 'KPPviscAz', KPPviscAztave, myThid) |
|
./pkg/kpp/kpp_output.F |
345 |
KPP_OUTPUT |
& 'KPPdiffKzT', KPPdiffKzTtave, myThid) |
|
./pkg/kpp/kpp_output.F |
347 |
KPP_OUTPUT |
& 'KPPdiffKzS', KPPdiffKzStave, myThid) |
|
./pkg/kpp/kpp_output.F |
349 |
KPP_OUTPUT |
& 'KPPghatKS', KPPghatKStave, myThid) |
|
./pkg/kpp/kpp_output.F |
351 |
KPP_OUTPUT |
& 'KPPHBL', KPPhbltave, myThid) |
|
./pkg/kpp/kpp_output.F |
356 |
KPP_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_output.F |
357 |
KPP_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
358 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPviscAztave, Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
359 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPdiffKzTtave,Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
360 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPghatKStave, Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
361 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPdiffKzStave,Nr,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
362 |
KPP_OUTPUT |
CALL TIMEAVE_RESET(KPPhbltave, 1, bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
377 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPviscAz ,'KPPviscA',0,Nr,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
378 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPdiffKzS,'KPPdiffS',0,Nr,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
379 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPdiffKzT,'KPPdiffT',0,Nr,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
380 |
KPP_OUTPUT |
IF ( DIAGNOSTICS_IS_ON( 'KPPghatK', myThid ) ) THEN |
|
./pkg/kpp/kpp_output.F |
386 |
KPP_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/kpp/kpp_output.F |
387 |
KPP_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/kpp/kpp_output.F |
405 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(tmpLoc,'KPPghatK',0,Nr,3,bi,bj,myThid) |
|
./pkg/kpp/kpp_output.F |
409 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPhbl ,'KPPhbl ',0,1 ,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
410 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPfrac ,'KPPfrac ',0,1 ,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
412 |
KPP_OUTPUT |
CALL DIAGNOSTICS_FILL(KPPplumefrac,'KPPpfrac',0,1 ,0,1,1,myThid) |
|
./pkg/kpp/kpp_output.F |
69 |
KPP_OUTPUT |
INTEGER myThid |
|
./pkg/kpp/kpp_readparms.F |
10 |
KPP_READPARMS |
SUBROUTINE KPP_READPARMS( myThid ) |
|
./pkg/kpp/kpp_readparms.F |
162 |
KPP_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
172 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
175 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
180 |
KPP_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
191 |
KPP_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
198 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
204 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
210 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
216 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
222 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
225 |
KPP_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
231 |
KPP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/kpp/kpp_readparms.F |
23 |
KPP_READPARMS |
INTEGER myThid |
|
./pkg/kpp/kpp_readparms.F |
62 |
KPP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/kpp/kpp_readparms.F |
66 |
KPP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/kpp/kpp_readparms.F |
70 |
KPP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/kpp/kpp_readparms.F |
74 |
KPP_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/kpp/kpp_readparms.F |
79 |
KPP_READPARMS |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
1056 |
RI_IWMIX |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
1125 |
Z121 |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
1144 |
Z121 |
integer myThid |
|
./pkg/kpp/kpp_routines.F |
1214 |
SMOOTH_HORIZ |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
1227 |
SMOOTH_HORIZ |
INTEGER myThid |
|
./pkg/kpp/kpp_routines.F |
1298 |
BLMIX |
I , myThid ) |
|
./pkg/kpp/kpp_routines.F |
1325 |
BLMIX |
integer myThid |
|
./pkg/kpp/kpp_routines.F |
1380 |
BLMIX |
O wm, ws, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1479 |
BLMIX |
O wm, ws, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1537 |
BLMIX |
O wm, ws, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1568 |
ENHANCE |
& , myThid ) |
|
./pkg/kpp/kpp_routines.F |
1584 |
ENHANCE |
integer myThid |
|
./pkg/kpp/kpp_routines.F |
1632 |
STATEKPP |
I ikppkey, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1673 |
STATEKPP |
INTEGER bi, bj, myThid |
|
./pkg/kpp/kpp_routines.F |
1715 |
STATEKPP |
I 1, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1725 |
STATEKPP |
O WORK2, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1729 |
STATEKPP |
O WORK3, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1757 |
STATEKPP |
I k, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
175 |
KPPMIX |
O , diffus, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1769 |
STATEKPP |
I k-1, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1781 |
STATEKPP |
I 1, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1794 |
STATEKPP |
O WORK1, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1798 |
STATEKPP |
O WORK2, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1824 |
STATEKPP |
CALL DIAGNOSTICS_FILL(DBSFC ,'KPPdbsfc',0,Nr,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_routines.F |
1825 |
STATEKPP |
CALL DIAGNOSTICS_FILL(DBLOC ,'KPPdbloc',0,Nr,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_routines.F |
1840 |
KPP_DOUBLEDIFF |
I ikppkey, imin, imax, jmin, jmax, bi, bj, myThid ) |
|
./pkg/kpp/kpp_routines.F |
1877 |
KPP_DOUBLEDIFF |
INTEGER ikppkey, imin, imax, jmin, jmax, bi, bj, myThid |
|
./pkg/kpp/kpp_routines.F |
1986 |
KPP_DOUBLEDIFF |
CALL DIAGNOSTICS_FILL(nuddt,'KPPnuddt',k,1,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_routines.F |
1987 |
KPP_DOUBLEDIFF |
CALL DIAGNOSTICS_FILL(nudds,'KPPnudds',k,1,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_routines.F |
219 |
KPPMIX |
I , bi, bj, myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_routines.F |
233 |
KPPMIX |
I , myThid ) |
|
./pkg/kpp/kpp_routines.F |
251 |
KPPMIX |
I , myThid ) |
|
./pkg/kpp/kpp_routines.F |
307 |
BLDEPTH |
I , bi, bj, myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_routines.F |
360 |
BLDEPTH |
integer myThid |
|
./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 |
536 |
BLDEPTH |
O wm, ws, myThid ) |
|
./pkg/kpp/kpp_routines.F |
581 |
BLDEPTH |
CALL DIAGNOSTICS_FILL(KPPBFSFC,'KPPbfsfc',0,Nr,2,bi,bj,myThid) |
|
./pkg/kpp/kpp_routines.F |
582 |
BLDEPTH |
CALL DIAGNOSTICS_FILL(KPPRi ,'KPPRi ',0,Nr,2,bi,bj,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 |
834 |
WSCALE |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
856 |
WSCALE |
integer myThid |
|
./pkg/kpp/kpp_routines.F |
945 |
RI_IWMIX |
I myThid ) |
|
./pkg/kpp/kpp_routines.F |
980 |
RI_IWMIX |
integer myThid |
|
./pkg/kpp/kpp_routines.F |
99 |
KPPMIX |
integer myThid |
|
./pkg/kpp/kpp_transport_ptr.F |
13 |
KPP_TRANSPORT_PTR |
I myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_transport_ptr.F |
69 |
KPP_TRANSPORT_PTR |
INTEGER myThid |
|
./pkg/kpp/kpp_transport_s.F |
15 |
KPP_TRANSPORT_S |
I myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_transport_s.F |
57 |
KPP_TRANSPORT_S |
INTEGER myThid |
|
./pkg/kpp/kpp_transport_t.F |
12 |
KPP_TRANSPORT_T |
I myTime, myIter, myThid ) |
|
./pkg/kpp/kpp_transport_t.F |
55 |
KPP_TRANSPORT_T |
INTEGER myThid |
|
./model/src/calc_div_ghat.F |
12 |
CALC_DIV_GHAT |
I myThid) |
|
./model/src/calc_div_ghat.F |
51 |
CALC_DIV_GHAT |
INTEGER myThid |
|
./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_check.F |
105 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
107 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
109 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
182 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
191 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
194 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
201 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
204 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
213 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
216 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
226 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
229 |
LAND_CHECK |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/land/land_check.F |
236 |
LAND_CHECK |
_END_MASTER(myThid) |
|
./pkg/land/land_check.F |
34 |
LAND_CHECK |
INTEGER myThid |
|
./pkg/land/land_check.F |
51 |
LAND_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/land/land_check.F |
55 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
59 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
61 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
63 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
85 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
87 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
89 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
95 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
97 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
99 |
LAND_CHECK |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/land/land_check.F |
9 |
LAND_CHECK |
SUBROUTINE LAND_CHECK( myThid ) |
|
./pkg/land/land_diagnostics_init.F |
108 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
115 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
122 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
129 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
137 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
30 |
LAND_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/land/land_diagnostics_init.F |
58 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
65 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
72 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
80 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
92 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
99 |
LAND_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/land/land_diagnostics_init.F |
9 |
LAND_DIAGNOSTICS_INIT |
SUBROUTINE LAND_DIAGNOSTICS_INIT( 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_diagnostics_state.F |
53 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_skinT,'GrdSurfT',0,1,0,1,1,myThid) |
|
./pkg/land/land_diagnostics_state.F |
55 |
LAND_DIAGNOSTICS_STATE |
& 0,1,1,myThid) |
|
./pkg/land/land_diagnostics_state.F |
57 |
LAND_DIAGNOSTICS_STATE |
& 0,1,1,myThid) |
|
./pkg/land/land_diagnostics_state.F |
59 |
LAND_DIAGNOSTICS_STATE |
& 0,1,1,myThid) |
|
./pkg/land/land_diagnostics_state.F |
60 |
LAND_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(land_hSnow,'LdSnowH ',0,1,0,1,1,myThid) |
|
./pkg/land/land_diagnostics_state.F |
62 |
LAND_DIAGNOSTICS_STATE |
& 0,1,1,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_do_diags.F |
60 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
62 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
64 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
66 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
68 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
70 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
72 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
74 |
LAND_DO_DIAGS |
& land_deltaT, bi, bj, myThid ) |
|
./pkg/land/land_do_diags.F |
90 |
LAND_DO_DIAGS |
& 1,bi,bj,myThid) |
|
./pkg/land/land_do_diags.F |
92 |
LAND_DO_DIAGS |
& 1,bi,bj,myThid) |
|
./pkg/land/land_do_diags.F |
94 |
LAND_DO_DIAGS |
& 1,bi,bj,myThid) |
|
./pkg/land/land_do_diags.F |
96 |
LAND_DO_DIAGS |
& 1,bi,bj,myThid) |
|
./pkg/land/land_do_diags.F |
98 |
LAND_DO_DIAGS |
& 1,bi,bj,myThid) |
|
./pkg/land/land_impl_temp.F |
13 |
LAND_IMPL_TEMP |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/land/land_impl_temp.F |
198 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
204 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
209 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
213 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
251 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
257 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
262 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
266 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
270 |
LAND_IMPL_TEMP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_impl_temp.F |
51 |
LAND_IMPL_TEMP |
INTEGER bi, bj, myIter, myThid |
|
./pkg/land/land_ini_vars.F |
100 |
LAND_INI_VARS |
& land_nLev, land_groundT, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
104 |
LAND_INI_VARS |
& land_nLev, land_groundW, 1, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
108 |
LAND_INI_VARS |
& land_hSnow, nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
114 |
LAND_INI_VARS |
CALL LAND_READ_PICKUP( nIter0, myThid ) |
|
./pkg/land/land_ini_vars.F |
126 |
LAND_INI_VARS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/land/land_ini_vars.F |
127 |
LAND_INI_VARS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/land/land_ini_vars.F |
36 |
LAND_INI_VARS |
INTEGER myThid |
|
./pkg/land/land_ini_vars.F |
58 |
LAND_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/land/land_ini_vars.F |
59 |
LAND_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/land/land_ini_vars.F |
9 |
LAND_INI_VARS |
SUBROUTINE LAND_INI_VARS( myThid ) |
|
./pkg/land/land_init_fixed.F |
33 |
LAND_INIT_FIXED |
INTEGER myThid |
|
./pkg/land/land_init_fixed.F |
44 |
LAND_INIT_FIXED |
& land_nLev, myThid) |
|
./pkg/land/land_init_fixed.F |
47 |
LAND_INIT_FIXED |
IF ( useDiagnostics ) CALL LAND_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/land/land_init_fixed.F |
9 |
LAND_INIT_FIXED |
SUBROUTINE LAND_INIT_FIXED( myThid ) |
|
./model/src/calc_eddy_stress.F |
101 |
CALC_EDDY_STRESS |
& 0, Nr, 1, bi, bj, myThid ) |
|
./model/src/calc_eddy_stress.F |
11 |
CALC_EDDY_STRESS |
SUBROUTINE CALC_EDDY_STRESS( bi, bj, myThid ) |
|
./model/src/calc_eddy_stress.F |
39 |
CALC_EDDY_STRESS |
INTEGER myThid |
|
./model/src/calc_eddy_stress.F |
99 |
CALC_EDDY_STRESS |
& 0, Nr, 1, bi, bj, myThid ) |
|
./pkg/land/land_mnc_init.F |
13 |
LAND_MNC_INIT |
I myThid ) |
|
./pkg/land/land_mnc_init.F |
211 |
LAND_MNC_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/land/land_mnc_init.F |
225 |
LAND_MNC_INIT |
& 'land_groundT','Cen_xy_Hn__Zland__t',4,5,myThid) |
|
./pkg/land/land_mnc_init.F |
226 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_groundT','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
229 |
LAND_MNC_INIT |
& 'land_enthalp','Cen_xy_Hn__Zland__t',4,5,myThid) |
|
./pkg/land/land_mnc_init.F |
230 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_enthalp','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
233 |
LAND_MNC_INIT |
& 'land_groundW','Cen_xy_Hn__Zland__t',4,5,myThid) |
|
./pkg/land/land_mnc_init.F |
234 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_groundW','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
236 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_skinT','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
237 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_skinT','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
238 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_hSnow','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
239 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_hSnow','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
240 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_snAge','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
241 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_snAge','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
242 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_RunOff','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
243 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_RunOff','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
244 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_enRnOf','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
245 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_enRnOf','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
247 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_HeatFx','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
248 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_HeatFx','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
249 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_frWaFx','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
250 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_frWaFx','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
251 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VNAME('land_EnWaFx','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/land/land_mnc_init.F |
252 |
LAND_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('land_EnWaFx','units','---',myThid) |
|
./pkg/land/land_mnc_init.F |
47 |
LAND_MNC_INIT |
integer myThid |
|
./pkg/land/land_monitor.F |
101 |
LAND_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/land/land_monitor.F |
102 |
LAND_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/land/land_monitor.F |
104 |
LAND_MONITOR |
& 'I',mon_fname,1,1,'T', myIter, myThid) |
|
./pkg/land/land_monitor.F |
105 |
LAND_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/land/land_monitor.F |
124 |
LAND_MONITOR |
CALL MON_SET_PREF('land_',myThid) |
|
./pkg/land/land_monitor.F |
125 |
LAND_MONITOR |
CALL MON_OUT_RL('time_sec', myTime,mon_string_none,myThid) |
|
./pkg/land/land_monitor.F |
136 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
147 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
148 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
149 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
150 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
152 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
153 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
154 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
157 |
LAND_MONITOR |
_BEGIN_MASTER(myThid) |
|
./pkg/land/land_monitor.F |
164 |
LAND_MONITOR |
_END_MASTER(myThid) |
|
./pkg/land/land_monitor.F |
172 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
182 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
183 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
184 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
185 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
187 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
188 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
189 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
191 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
192 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
193 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
200 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
210 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
211 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
212 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
213 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
215 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
216 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
217 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
219 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
220 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
221 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
228 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
238 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
239 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
240 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
241 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
243 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
244 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
245 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
247 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
248 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
249 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
259 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
266 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theEnergy, mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
267 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theEng(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
268 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theEng(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
269 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theEng(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
276 |
LAND_MONITOR |
I myThid ) |
|
./pkg/land/land_monitor.F |
286 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/land/land_monitor.F |
287 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
288 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
289 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
291 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/land/land_monitor.F |
292 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/land/land_monitor.F |
293 |
LAND_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(3), mon_sufx(3), myThid) |
|
./pkg/land/land_monitor.F |
299 |
LAND_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/land/land_monitor.F |
34 |
LAND_MONITOR |
INTEGER myThid |
|
./pkg/land/land_monitor.F |
84 |
LAND_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/land/land_monitor.F |
9 |
LAND_MONITOR |
SUBROUTINE LAND_MONITOR( land_frc, myTime, myIter, myThid ) |
|
./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 |
126 |
LAND_OUTPUT |
CALL MNC_CW_SET_UDIM(fn, -1, myThid) |
|
./pkg/land/land_output.F |
127 |
LAND_OUTPUT |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, myThid) |
|
./pkg/land/land_output.F |
128 |
LAND_OUTPUT |
CALL MNC_CW_SET_UDIM(fn, 0, 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 |
132 |
LAND_OUTPUT |
& 'land_groundT', land_groundT, myThid) |
|
./pkg/land/land_output.F |
134 |
LAND_OUTPUT |
& 'land_enthalp', land_enthalp, myThid) |
|
./pkg/land/land_output.F |
136 |
LAND_OUTPUT |
& 'land_groundW', land_groundW, myThid) |
|
./pkg/land/land_output.F |
139 |
LAND_OUTPUT |
& 'land_skinT', land_skinT, myThid) |
|
./pkg/land/land_output.F |
141 |
LAND_OUTPUT |
& 'land_hSnow', land_hSnow, myThid) |
|
./pkg/land/land_output.F |
143 |
LAND_OUTPUT |
& 'land_snAge', land_snowAge, myThid) |
|
./pkg/land/land_output.F |
145 |
LAND_OUTPUT |
& 'land_RunOff', land_runOff, myThid) |
|
./pkg/land/land_output.F |
147 |
LAND_OUTPUT |
& 'land_enRnOf', land_enRnOf, myThid) |
|
./pkg/land/land_output.F |
150 |
LAND_OUTPUT |
& 'land_HeatFx', land_HeatFlx, myThid) |
|
./pkg/land/land_output.F |
152 |
LAND_OUTPUT |
& 'land_frWaFx', land_Pr_m_Ev, myThid) |
|
./pkg/land/land_output.F |
154 |
LAND_OUTPUT |
& 'land_EnWaFx', land_EnWFlux, myThid) |
|
./pkg/land/land_output.F |
170 |
LAND_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/land/land_output.F |
171 |
LAND_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/land/land_output.F |
172 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grTtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
173 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_entave, land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
174 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grWtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
175 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_sTtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
176 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_hStave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
177 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_sAtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
178 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_ROftave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
179 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_eROtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
190 |
LAND_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/land/land_output.F |
191 |
LAND_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/land/land_output.F |
193 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
195 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
197 |
LAND_OUTPUT |
& land_nLev, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
199 |
LAND_OUTPUT |
& 1, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
201 |
LAND_OUTPUT |
& 1, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
203 |
LAND_OUTPUT |
& 1, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
205 |
LAND_OUTPUT |
& 1, bi, bj, myThid ) |
|
./pkg/land/land_output.F |
207 |
LAND_OUTPUT |
& 1, bi, bj, myThid ) |
|
./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 |
244 |
LAND_OUTPUT |
CALL MNC_CW_SET_UDIM(fn, -1, 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 |
246 |
LAND_OUTPUT |
CALL MNC_CW_SET_UDIM(fn, 0, myThid) |
|
./pkg/land/land_output.F |
247 |
LAND_OUTPUT |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, myThid) |
|
./pkg/land/land_output.F |
249 |
LAND_OUTPUT |
& 'land_groundT', land_grTtave, myThid) |
|
./pkg/land/land_output.F |
251 |
LAND_OUTPUT |
& 'land_enthalp', land_entave, myThid) |
|
./pkg/land/land_output.F |
253 |
LAND_OUTPUT |
& 'land_groundW', land_grWtave, myThid) |
|
./pkg/land/land_output.F |
256 |
LAND_OUTPUT |
& 'land_skinT', land_sTtave, myThid) |
|
./pkg/land/land_output.F |
258 |
LAND_OUTPUT |
& 'land_hSnow', land_hStave, myThid) |
|
./pkg/land/land_output.F |
260 |
LAND_OUTPUT |
& 'land_snAge', land_sAtave, myThid) |
|
./pkg/land/land_output.F |
262 |
LAND_OUTPUT |
& 'land_RunOff', land_ROftave, myThid) |
|
./pkg/land/land_output.F |
264 |
LAND_OUTPUT |
& 'land_enRnOf', land_eROtave, myThid) |
|
./pkg/land/land_output.F |
273 |
LAND_OUTPUT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_output.F |
276 |
LAND_OUTPUT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_output.F |
279 |
LAND_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/land/land_output.F |
280 |
LAND_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/land/land_output.F |
281 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grTtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
282 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_entave, land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
283 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_grWtave,land_nLev, bi, bj, myThid) |
|
./pkg/land/land_output.F |
284 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_sTtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
285 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_hStave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
286 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_sAtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
287 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_ROftave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
288 |
LAND_OUTPUT |
CALL TIMEAVE_RESET(land_eROtave, 1, bi, bj, myThid) |
|
./pkg/land/land_output.F |
41 |
LAND_OUTPUT |
INTEGER myThid |
|
./pkg/land/land_output.F |
62 |
LAND_OUTPUT |
CALL LAND_MONITOR( aim_landFr, myTime, myIter, myThid ) |
|
./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 |
100 |
LAND_READ_PICKUP |
& 'land_skinT', land_skinT, myThid) |
|
./pkg/land/land_read_pickup.F |
102 |
LAND_READ_PICKUP |
& 'land_hSnow', land_hSnow, myThid) |
|
./pkg/land/land_read_pickup.F |
104 |
LAND_READ_PICKUP |
& 'land_snAge', land_snowAge, myThid) |
|
./pkg/land/land_read_pickup.F |
32 |
LAND_READ_PICKUP |
INTEGER myThid |
|
./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 |
90 |
LAND_READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/land/land_read_pickup.F |
91 |
LAND_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, 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 |
95 |
LAND_READ_PICKUP |
& 'land_enthalp', land_enthalp, myThid) |
|
./pkg/land/land_read_pickup.F |
97 |
LAND_READ_PICKUP |
& 'land_groundW', land_groundW, myThid) |
|
./pkg/land/land_read_pickup.F |
9 |
LAND_READ_PICKUP |
SUBROUTINE LAND_READ_PICKUP( myIter, myThid ) |
|
./pkg/land/land_readparms.F |
105 |
LAND_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/land/land_readparms.F |
109 |
LAND_READPARMS |
_END_MASTER(myThid) |
|
./pkg/land/land_readparms.F |
113 |
LAND_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/land/land_readparms.F |
170 |
LAND_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_readparms.F |
173 |
LAND_READPARMS |
O iUnit, myThid ) |
|
./pkg/land/land_readparms.F |
186 |
LAND_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/land/land_readparms.F |
241 |
LAND_READPARMS |
_END_MASTER(myThid) |
|
./pkg/land/land_readparms.F |
35 |
LAND_READPARMS |
INTEGER myThid |
|
./pkg/land/land_readparms.F |
9 |
LAND_READPARMS |
SUBROUTINE LAND_READPARMS( 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 |
100 |
LAND_WRITE_PICKUP |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, 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 |
104 |
LAND_WRITE_PICKUP |
& 'land_enthalp', land_enthalp, myThid) |
|
./pkg/land/land_write_pickup.F |
106 |
LAND_WRITE_PICKUP |
& 'land_groundW', land_groundW, myThid) |
|
./pkg/land/land_write_pickup.F |
109 |
LAND_WRITE_PICKUP |
& 'land_skinT', land_skinT, myThid) |
|
./pkg/land/land_write_pickup.F |
10 |
LAND_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/land/land_write_pickup.F |
111 |
LAND_WRITE_PICKUP |
& 'land_hSnow', land_hSnow, myThid) |
|
./pkg/land/land_write_pickup.F |
113 |
LAND_WRITE_PICKUP |
& 'land_snAge', land_snowAge, myThid) |
|
./pkg/land/land_write_pickup.F |
40 |
LAND_WRITE_PICKUP |
INTEGER myThid |
|
./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 |
91 |
LAND_WRITE_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/land/land_write_pickup.F |
92 |
LAND_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/land/land_write_pickup.F |
94 |
LAND_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./pkg/land/land_write_pickup.F |
96 |
LAND_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./pkg/land/land_write_pickup.F |
98 |
LAND_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, 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 |
119 |
LAYERS_CALC |
CALL LAYERS_CALC_RHS(myThid) |
|
./pkg/layers/layers_calc.F |
130 |
LAYERS_CALC |
& myThid ) |
|
./pkg/layers/layers_calc.F |
142 |
LAYERS_CALC |
& myThid) |
|
./pkg/layers/layers_calc.F |
14 |
LAYERS_CALC |
I myTime, myIter, myThid ) |
|
./pkg/layers/layers_calc.F |
150 |
LAYERS_CALC |
& myThid ) |
|
./pkg/layers/layers_calc.F |
162 |
LAYERS_CALC |
& myThid) |
|
./pkg/layers/layers_calc.F |
169 |
LAYERS_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/layers/layers_calc.F |
170 |
LAYERS_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/layers/layers_calc.F |
185 |
LAYERS_CALC |
& k, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
191 |
LAYERS_CALC |
& layers_alpha(1-OLx,1-OLy,k,bi,bj), myThid ) |
|
./pkg/layers/layers_calc.F |
194 |
LAYERS_CALC |
& layers_beta(1-OLx,1-OLy,k,bi,bj), myThid ) |
|
./pkg/layers/layers_calc.F |
209 |
LAYERS_CALC |
& myThid ) |
|
./pkg/layers/layers_calc.F |
221 |
LAYERS_CALC |
& myThid) |
|
./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 |
309 |
LAYERS_CALC |
& diagName, 0, Nr, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
316 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
320 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
323 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
326 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
333 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
337 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
340 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
343 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
350 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
353 |
LAYERS_CALC |
& diagName,0,Nlayers, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
356 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
359 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
362 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
365 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
368 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
371 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
374 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
377 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
380 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
383 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
386 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
389 |
LAYERS_CALC |
& diagName,0,Nlayers-1, 0, 1, 1, myThid ) |
|
./pkg/layers/layers_calc.F |
402 |
LAYERS_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/layers/layers_calc.F |
403 |
LAYERS_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/layers/layers_calc.F |
407 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
410 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
415 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
418 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
425 |
LAYERS_CALC |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/layers/layers_calc.F |
42 |
LAYERS_CALC |
INTEGER myThid |
|
./pkg/layers/layers_calc.F |
440 |
LAYERS_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_calc.F |
441 |
LAYERS_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_check.F |
104 |
LAYERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_check.F |
114 |
LAYERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_check.F |
120 |
LAYERS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/layers/layers_check.F |
123 |
LAYERS_CHECK |
_END_MASTER(myThid) |
|
./pkg/layers/layers_check.F |
21 |
LAYERS_CHECK |
INTEGER myThid |
|
./pkg/layers/layers_check.F |
32 |
LAYERS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/layers/layers_check.F |
36 |
LAYERS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/layers/layers_check.F |
81 |
LAYERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_check.F |
8 |
LAYERS_CHECK |
SUBROUTINE LAYERS_CHECK( myThid ) |
|
./pkg/layers/layers_check.F |
94 |
LAYERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_check.F |
97 |
LAYERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
103 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
104 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
111 |
LAYERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
115 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
116 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
11 |
LAYERS_DIAGNOSTICS_INIT |
SUBROUTINE LAYERS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
120 |
LAYERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
124 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
125 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
134 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
135 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
143 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
144 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
153 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
154 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
162 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
163 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
173 |
LAYERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
177 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
178 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
186 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
187 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
195 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
196 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
206 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
207 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
215 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
216 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
224 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
225 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
233 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
234 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
242 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
243 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
251 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
252 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
260 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
261 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
269 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
270 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
278 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
279 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
287 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
288 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers-1 , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
297 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
298 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
29 |
LAYERS_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/layers/layers_diagnostics_init.F |
61 |
LAYERS_DIAGNOSTICS_INIT |
diagNum = DIAGS_GET_PARMS_I( 'LAST_DIAG_ID', myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
81 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
90 |
LAYERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m/s', myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
94 |
LAYERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
95 |
LAYERS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nlayers , myThid ) |
|
./pkg/layers/layers_diagnostics_init.F |
99 |
LAYERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m/s', myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
127 |
LAYERS_FLUXCALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/layers/layers_fluxcalc.F |
128 |
LAYERS_FLUXCALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/layers/layers_fluxcalc.F |
192 |
LAYERS_FLUXCALC |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
203 |
LAYERS_FLUXCALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
21 |
LAYERS_FLUXCALC |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
272 |
LAYERS_FLUXCALC |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
283 |
LAYERS_FLUXCALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
387 |
LAYERS_DIAPYCNAL |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
420 |
LAYERS_DIAPYCNAL |
INTEGER iLa, myThid |
|
./pkg/layers/layers_fluxcalc.F |
476 |
LAYERS_DIAPYCNAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/layers/layers_fluxcalc.F |
477 |
LAYERS_DIAPYCNAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/layers/layers_fluxcalc.F |
565 |
LAYERS_DIAPYCNAL |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
576 |
LAYERS_DIAPYCNAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
589 |
LAYERS_DIAPYCNAL |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
58 |
LAYERS_FLUXCALC |
INTEGER myThid |
|
./pkg/layers/layers_fluxcalc.F |
600 |
LAYERS_DIAPYCNAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
717 |
LAYERS_LOCATE |
I myThid ) |
|
./pkg/layers/layers_fluxcalc.F |
741 |
LAYERS_LOCATE |
INTEGER myThid |
|
./pkg/layers/layers_init_fixed.F |
118 |
LAYERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_init_fixed.F |
132 |
LAYERS_INIT_FIXED |
& standardMessageUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/layers/layers_init_fixed.F |
140 |
LAYERS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/layers/layers_init_fixed.F |
149 |
LAYERS_INIT_FIXED |
& -1, myThid ) |
|
./pkg/layers/layers_init_fixed.F |
173 |
LAYERS_INIT_FIXED |
CALL LAYERS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/layers/layers_init_fixed.F |
24 |
LAYERS_INIT_FIXED |
INTEGER myThid |
|
./pkg/layers/layers_init_fixed.F |
50 |
LAYERS_INIT_FIXED |
CALL LAYERS_MNC_INIT( myThid ) |
|
./pkg/layers/layers_init_fixed.F |
8 |
LAYERS_INIT_FIXED |
SUBROUTINE LAYERS_INIT_FIXED( myThid ) |
|
./pkg/layers/layers_init_varia.F |
23 |
LAYERS_INIT_VARIA |
INTEGER myThid |
|
./pkg/layers/layers_init_varia.F |
34 |
LAYERS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_init_varia.F |
35 |
LAYERS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_init_varia.F |
8 |
LAYERS_INIT_VARIA |
SUBROUTINE LAYERS_INIT_VARIA( myThid ) |
|
./pkg/layers/layers_mnc_init.F |
20 |
LAYERS_MNC_INIT |
INTEGER myThid |
|
./pkg/layers/layers_mnc_init.F |
32 |
LAYERS_MNC_INIT |
CALL MNC_CW_ADD_VNAME('UFlux','U_xy_Hn__G__t', 4,5,myThid) |
|
./pkg/layers/layers_mnc_init.F |
33 |
LAYERS_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('UFlux','units','m^2/s', myThid) |
|
./pkg/layers/layers_mnc_init.F |
36 |
LAYERS_MNC_INIT |
& myThid) |
|
./pkg/layers/layers_mnc_init.F |
38 |
LAYERS_MNC_INIT |
CALL MNC_CW_ADD_VNAME('VFlux','V_xy_Hn__G__t', 4,5,myThid) |
|
./pkg/layers/layers_mnc_init.F |
39 |
LAYERS_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('VFlux','units','m^2/s', myThid) |
|
./pkg/layers/layers_mnc_init.F |
42 |
LAYERS_MNC_INIT |
& myThid) |
|
./pkg/layers/layers_mnc_init.F |
8 |
LAYERS_MNC_INIT |
SUBROUTINE LAYERS_MNC_INIT( myThid ) |
|
./pkg/layers/layers_output.F |
104 |
LAYERS_OUTPUT |
& Nlayers, bi, bj, myThid ) |
|
./pkg/layers/layers_output.F |
107 |
LAYERS_OUTPUT |
& Nlayers, bi, bj, myThid ) |
|
./pkg/layers/layers_output.F |
10 |
LAYERS_OUTPUT |
SUBROUTINE LAYERS_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/layers/layers_output.F |
114 |
LAYERS_OUTPUT |
& Nr, bi, bj, myThid ) |
|
./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 |
156 |
LAYERS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_output.F |
157 |
LAYERS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_output.F |
160 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_UH_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
162 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_Hw_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
167 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_VH_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
169 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_Hs_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
175 |
LAYERS_OUTPUT |
& CALL TIMEAVE_RESET(prho_tave,Nr,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
38 |
LAYERS_OUTPUT |
INTEGER myThid |
|
./pkg/layers/layers_output.F |
61 |
LAYERS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_output.F |
62 |
LAYERS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_output.F |
65 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_UH_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
67 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_Hw_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
72 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_VH_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
74 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(layers_Hs_T, Nlayers,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
79 |
LAYERS_OUTPUT |
CALL TIMEAVE_RESET(prho_tave,Nr,bi,bj,myThid) |
|
./pkg/layers/layers_output.F |
90 |
LAYERS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_output.F |
91 |
LAYERS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_output.F |
95 |
LAYERS_OUTPUT |
& Nlayers, bi, bj, myThid ) |
|
./pkg/layers/layers_output.F |
98 |
LAYERS_OUTPUT |
& Nlayers, bi, bj, myThid ) |
|
./pkg/layers/layers_readparms.F |
107 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
136 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
139 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
142 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
157 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
171 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
189 |
LAYERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/layers/layers_readparms.F |
194 |
LAYERS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/layers/layers_readparms.F |
20 |
LAYERS_READPARMS |
INTEGER myThid |
|
./pkg/layers/layers_readparms.F |
46 |
LAYERS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/layers/layers_readparms.F |
50 |
LAYERS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/layers/layers_readparms.F |
54 |
LAYERS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/layers/layers_readparms.F |
88 |
LAYERS_READPARMS |
I myThid ) |
|
./pkg/layers/layers_readparms.F |
8 |
LAYERS_READPARMS |
SUBROUTINE LAYERS_READPARMS( myThid ) |
|
./pkg/layers/layers_save.F |
125 |
LAYERS_FILL_FIELD |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/layers/layers_save.F |
141 |
LAYERS_FILL_FIELD |
INTEGER myThid |
|
./pkg/layers/layers_save.F |
15 |
LAYERS_FILL |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/layers/layers_save.F |
218 |
LAYERS_FILL_FIELD |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_save.F |
219 |
LAYERS_FILL_FIELD |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_save.F |
227 |
LAYERS_FILL_FIELD |
I myThid) |
|
./pkg/layers/layers_save.F |
241 |
LAYERS_FILL_FIELD |
I myThid) |
|
./pkg/layers/layers_save.F |
290 |
LAYERS_CUMULATE |
I myThid ) |
|
./pkg/layers/layers_save.F |
319 |
LAYERS_CUMULATE |
INTEGER myThid |
|
./pkg/layers/layers_save.F |
57 |
LAYERS_FILL |
INTEGER myThid |
|
./pkg/layers/layers_save.F |
71 |
LAYERS_FILL |
& klev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
74 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
77 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
80 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
83 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
86 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
89 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
92 |
LAYERS_FILL |
& kLev, nLevs, bibjFlg, biArg, bjArg, myThid) |
|
./pkg/layers/layers_save.F |
97 |
LAYERS_FILL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/calc_grad_phi_hyd.F |
119 |
CALC_GRAD_PHI_HYD |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./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_thermodynamics.F |
134 |
LAYERS_CALC_RHS |
I 1.0, 1, myThid ) |
|
./pkg/layers/layers_thermodynamics.F |
13 |
LAYERS_CALC_RHS |
I myThid ) |
|
./pkg/layers/layers_thermodynamics.F |
37 |
LAYERS_CALC_RHS |
INTEGER myThid |
|
./pkg/layers/layers_thermodynamics.F |
66 |
LAYERS_CALC_RHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_thermodynamics.F |
67 |
LAYERS_CALC_RHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/layers/layers_wsurf_tr.F |
11 |
LAYERS_WSURF_TR |
I myTime, myIter, myThid ) |
|
./pkg/layers/layers_wsurf_tr.F |
43 |
LAYERS_WSURF_TR |
INTEGER myThid |
|
./pkg/layers/layers_wsurf_tr.F |
60 |
LAYERS_WSURF_TR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/layers/layers_wsurf_tr.F |
61 |
LAYERS_WSURF_TR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_average.F |
102 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D( LS_fwFluxCount,LS_fwFlux,PmEpR,1,myThid) |
|
./pkg/longstep/longstep_average.F |
104 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D_RS(LS_fwFluxCount,LS_fwFlux,EmPmR,1,myThid) |
|
./pkg/longstep/longstep_average.F |
108 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_KwxCount, LS_Kwx, Kwx, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
109 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_KwyCount, LS_Kwy, Kwy, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
110 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_KwzCount, LS_Kwz, Kwz, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
116 |
LONGSTEP_AVERAGE |
& LS_KPPdiffKzS, KPPdiffKzS, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
118 |
LONGSTEP_AVERAGE |
& LS_KPPghat, KPPghat, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
126 |
LONGSTEP_AVERAGE |
& Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
128 |
LONGSTEP_AVERAGE |
& Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
129 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_wVelCount, LS_wVel, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
130 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_thetaCount,LS_theta,Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
131 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_saltCount, LS_salt, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
134 |
LONGSTEP_AVERAGE |
& LS_IVDConvCount, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
136 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_QswCount, LS_Qsw, 1, myThid) |
|
./pkg/longstep/longstep_average.F |
138 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_fwFluxCount, LS_fwFlux, 1, myThid) |
|
./pkg/longstep/longstep_average.F |
142 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_KwxCount, LS_Kwx, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
143 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_KwyCount, LS_Kwy, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
144 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_AVERAGE_3D(LS_KwzCount, LS_Kwz, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
150 |
LONGSTEP_AVERAGE |
& LS_KPPdiffKzS, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
152 |
LONGSTEP_AVERAGE |
& LS_KPPghat, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
158 |
LONGSTEP_AVERAGE |
CALL EXCH_UV_3D_RL( LS_uVel, LS_vVel, .TRUE., Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
159 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_wVel , Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
160 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_theta, Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
161 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_salt , Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
163 |
LONGSTEP_AVERAGE |
& CALL EXCH_3D_RL( LS_IVDConvCount, myThid ) |
|
./pkg/longstep/longstep_average.F |
165 |
LONGSTEP_AVERAGE |
CALL EXCH_XY_RL( LS_Qsw, myThid ) |
|
./pkg/longstep/longstep_average.F |
167 |
LONGSTEP_AVERAGE |
CALL EXCH_XY_RL( LS_fwFlux, myThid ) |
|
./pkg/longstep/longstep_average.F |
170 |
LONGSTEP_AVERAGE |
CALL EXCH_UV_AGRID_3D_RL( LS_Kwx, LS_Kwy, .FALSE., Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
171 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_Kwz , Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
176 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_KPPdiffKzS, Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
177 |
LONGSTEP_AVERAGE |
CALL EXCH_3D_RL( LS_KPPghat, Nr, myThid ) |
|
./pkg/longstep/longstep_average.F |
184 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_uVel, 'LSuVel ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
185 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_vVel, 'LSvVel ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
186 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_wVel, 'LSwVel ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
187 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_theta,'LStheta ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
188 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_salt, 'LSsalt ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
191 |
LONGSTEP_AVERAGE |
& 'LScnvAdj',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
193 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_Qsw , 'LSqsw ',0,1 ,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
195 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_fwFlux, 'LSfwFlux',0,1 ,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
198 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_Kwx , 'LSkwx ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
199 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_Kwy , 'LSkwy ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
200 |
LONGSTEP_AVERAGE |
CALL DIAGNOSTICS_FILL(LS_Kwz , 'LSkwz ',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
206 |
LONGSTEP_AVERAGE |
& 'LSKPPdfS',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
208 |
LONGSTEP_AVERAGE |
& 'LSKPPght',0,Nr,0,1,1,myThid) |
|
./pkg/longstep/longstep_average.F |
216 |
LONGSTEP_AVERAGE |
_BEGIN_MASTER(myThid) |
|
./pkg/longstep/longstep_average.F |
221 |
LONGSTEP_AVERAGE |
_END_MASTER(myThid) |
|
./pkg/longstep/longstep_average.F |
228 |
LONGSTEP_AVERAGE |
_BEGIN_MASTER(myThid) |
|
./pkg/longstep/longstep_average.F |
230 |
LONGSTEP_AVERAGE |
_END_MASTER(myThid) |
|
./pkg/longstep/longstep_average.F |
46 |
LONGSTEP_AVERAGE |
INTEGER myThid |
|
./pkg/longstep/longstep_average.F |
56 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_uVelCount, LS_uVel, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
57 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_vVelCount, LS_vVel, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
58 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_wVelCount, LS_wVel, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
59 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_thetaCount,LS_theta,Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
60 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_saltCount, LS_salt, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
63 |
LONGSTEP_AVERAGE |
& LS_IVDConvCount, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
65 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_QswCount, LS_Qsw, 1, myThid) |
|
./pkg/longstep/longstep_average.F |
67 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_fwFluxCount, LS_fwFlux, 1, myThid) |
|
./pkg/longstep/longstep_average.F |
70 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_KwxCount, LS_Kwx, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
71 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_KwyCount, LS_Kwy, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
72 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_RESET_3D(LS_KwzCount, LS_Kwz, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
78 |
LONGSTEP_AVERAGE |
& LS_KPPdiffKzS, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
80 |
LONGSTEP_AVERAGE |
& LS_KPPghat, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
89 |
LONGSTEP_AVERAGE |
& Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
91 |
LONGSTEP_AVERAGE |
& Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
92 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_wVelCount, LS_wVel, wVel, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
93 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_thetaCount, LS_theta, theta, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
94 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D(LS_saltCount, LS_salt, salt, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
97 |
LONGSTEP_AVERAGE |
& LS_IVDConvCount, IVDConvCount, Nr, myThid) |
|
./pkg/longstep/longstep_average.F |
99 |
LONGSTEP_AVERAGE |
CALL LONGSTEP_FILL_3D_RS(LS_QswCount, LS_Qsw, Qsw, 1, myThid) |
|
./pkg/longstep/longstep_average.F |
9 |
LONGSTEP_AVERAGE |
SUBROUTINE LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
|
./pkg/longstep/longstep_average_3d.F |
12 |
LONGSTEP_AVERAGE_3D |
I myNr, myThid) |
|
./pkg/longstep/longstep_average_3d.F |
38 |
LONGSTEP_AVERAGE_3D |
INTEGER myThid |
|
./pkg/longstep/longstep_average_3d.F |
47 |
LONGSTEP_AVERAGE_3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_average_3d.F |
48 |
LONGSTEP_AVERAGE_3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_average_3d_fac.F |
13 |
LONGSTEP_AVERAGE_3D_FAC |
I myNr, myThid) |
|
./pkg/longstep/longstep_average_3d_fac.F |
40 |
LONGSTEP_AVERAGE_3D_FAC |
INTEGER myThid |
|
./pkg/longstep/longstep_average_3d_fac.F |
49 |
LONGSTEP_AVERAGE_3D_FAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_average_3d_fac.F |
50 |
LONGSTEP_AVERAGE_3D_FAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_check_iters.F |
11 |
LONGSTEP_CHECK_ITERS |
SUBROUTINE LONGSTEP_CHECK_ITERS( myThid ) |
|
./pkg/longstep/longstep_check_iters.F |
25 |
LONGSTEP_CHECK_ITERS |
INTEGER myThid |
|
./pkg/longstep/longstep_check_iters.F |
42 |
LONGSTEP_CHECK_ITERS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/longstep/longstep_check_iters.F |
53 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_check_iters.F |
57 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_check_iters.F |
65 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_check_iters.F |
69 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_check_iters.F |
73 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_check_iters.F |
77 |
LONGSTEP_CHECK_ITERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/longstep/longstep_correction_step.F |
10 |
LONGSTEP_CORRECTION_STEP |
SUBROUTINE LONGSTEP_CORRECTION_STEP(myTime, myIter, myThid) |
|
./pkg/longstep/longstep_correction_step.F |
35 |
LONGSTEP_CORRECTION_STEP |
INTEGER myThid |
|
./model/src/calc_grad_phi_surf.F |
12 |
CALC_GRAD_PHI_SURF |
I myThid ) |
|
./model/src/calc_grad_phi_surf.F |
40 |
CALC_GRAD_PHI_SURF |
INTEGER myThid |
|
./pkg/longstep/longstep_diagnostics_init.F |
102 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
112 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
120 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
127 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
138 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
145 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
24 |
LONGSTEP_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/longstep/longstep_diagnostics_init.F |
47 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
55 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
63 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
70 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
77 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
85 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
94 |
LONGSTEP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/longstep/longstep_diagnostics_init.F |
9 |
LONGSTEP_DIAGNOSTICS_INIT |
SUBROUTINE LONGSTEP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/longstep/longstep_fill_3d.F |
11 |
LONGSTEP_FILL_3D |
I fld, myNr, myThid) |
|
./pkg/longstep/longstep_fill_3d.F |
39 |
LONGSTEP_FILL_3D |
INTEGER myThid |
|
./pkg/longstep/longstep_fill_3d.F |
47 |
LONGSTEP_FILL_3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_fill_3d.F |
48 |
LONGSTEP_FILL_3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_fill_3d_fac.F |
11 |
LONGSTEP_FILL_3D_FAC |
I fld, fac, myNr, myThid) |
|
./pkg/longstep/longstep_fill_3d_fac.F |
40 |
LONGSTEP_FILL_3D_FAC |
INTEGER myThid |
|
./pkg/longstep/longstep_fill_3d_fac.F |
48 |
LONGSTEP_FILL_3D_FAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_fill_3d_fac.F |
49 |
LONGSTEP_FILL_3D_FAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_fill_3d_rs.F |
11 |
LONGSTEP_FILL_3D_RS |
I fld, myNr, myThid) |
|
./pkg/longstep/longstep_fill_3d_rs.F |
40 |
LONGSTEP_FILL_3D_RS |
INTEGER myThid |
|
./pkg/longstep/longstep_fill_3d_rs.F |
48 |
LONGSTEP_FILL_3D_RS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_fill_3d_rs.F |
49 |
LONGSTEP_FILL_3D_RS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_forcing_surf.F |
12 |
LONGSTEP_FORCING_SURF |
I myTime,myIter,myThid ) |
|
./pkg/longstep/longstep_forcing_surf.F |
41 |
LONGSTEP_FORCING_SURF |
INTEGER myThid |
|
./pkg/longstep/longstep_init_fixed.F |
10 |
LONGSTEP_INIT_FIXED |
SUBROUTINE LONGSTEP_INIT_FIXED( myThid ) |
|
./pkg/longstep/longstep_init_fixed.F |
23 |
LONGSTEP_INIT_FIXED |
INTEGER myThid |
|
./pkg/longstep/longstep_init_fixed.F |
41 |
LONGSTEP_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/longstep/longstep_init_fixed.F |
45 |
LONGSTEP_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/longstep/longstep_init_fixed.F |
57 |
LONGSTEP_INIT_FIXED |
CALL LONGSTEP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/longstep/longstep_init_varia.F |
30 |
LONGSTEP_INIT_VARIA |
INTEGER myThid |
|
./pkg/longstep/longstep_init_varia.F |
39 |
LONGSTEP_INIT_VARIA |
_BEGIN_MASTER(myThid) |
|
./pkg/longstep/longstep_init_varia.F |
41 |
LONGSTEP_INIT_VARIA |
_END_MASTER(myThid) |
|
./pkg/longstep/longstep_init_varia.F |
46 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_uVelCount, LS_uVel, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
47 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_vVelCount, LS_vVel, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
48 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_wVelCount, LS_wVel, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
49 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_thetaCount,LS_theta,Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
50 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_saltCount, LS_salt, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
53 |
LONGSTEP_INIT_VARIA |
& LS_IVDConvCount, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
55 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_QswCount, LS_Qsw, 1, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
59 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_KwxCount, LS_Kwx, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
60 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_KwyCount, LS_Kwy, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
61 |
LONGSTEP_INIT_VARIA |
CALL LONGSTEP_RESET_3D(LS_KwzCount, LS_Kwz, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
67 |
LONGSTEP_INIT_VARIA |
& LS_KPPdiffKzS, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
69 |
LONGSTEP_INIT_VARIA |
& LS_KPPghat, Nr, myThid) |
|
./pkg/longstep/longstep_init_varia.F |
9 |
LONGSTEP_INIT_VARIA |
SUBROUTINE LONGSTEP_INIT_VARIA( myThid ) |
|
./pkg/longstep/longstep_readparms.F |
106 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/longstep/longstep_readparms.F |
108 |
LONGSTEP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/longstep/longstep_readparms.F |
11 |
LONGSTEP_READPARMS |
SUBROUTINE LONGSTEP_READPARMS( myThid ) |
|
./pkg/longstep/longstep_readparms.F |
24 |
LONGSTEP_READPARMS |
INTEGER myThid |
|
./pkg/longstep/longstep_readparms.F |
52 |
LONGSTEP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/longstep/longstep_readparms.F |
57 |
LONGSTEP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/longstep/longstep_readparms.F |
61 |
LONGSTEP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/longstep/longstep_readparms.F |
70 |
LONGSTEP_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/longstep/longstep_readparms.F |
74 |
LONGSTEP_READPARMS |
I myThid ) |
|
./pkg/longstep/longstep_readparms.F |
79 |
LONGSTEP_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/longstep/longstep_readparms.F |
94 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/longstep/longstep_readparms.F |
96 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/longstep/longstep_readparms.F |
98 |
LONGSTEP_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/longstep/longstep_reset_3d.F |
11 |
LONGSTEP_RESET_3D |
I myNr, myThid) |
|
./pkg/longstep/longstep_reset_3d.F |
37 |
LONGSTEP_RESET_3D |
INTEGER myThid |
|
./pkg/longstep/longstep_reset_3d.F |
45 |
LONGSTEP_RESET_3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/longstep/longstep_reset_3d.F |
46 |
LONGSTEP_RESET_3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
107 |
LONGSTEP_THERMODYNAMICS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
108 |
LONGSTEP_THERMODYNAMICS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
111 |
LONGSTEP_THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
112 |
LONGSTEP_THERMODYNAMICS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/longstep/longstep_thermodynamics.F |
113 |
LONGSTEP_THERMODYNAMICS |
act2 = bj - myByLo(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
114 |
LONGSTEP_THERMODYNAMICS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/longstep/longstep_thermodynamics.F |
115 |
LONGSTEP_THERMODYNAMICS |
act3 = myThid - 1 |
|
./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 |
228 |
LONGSTEP_THERMODYNAMICS |
IF (debugMode) CALL DEBUG_CALL('PTRACERS_INTEGRATE',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
234 |
LONGSTEP_THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./pkg/longstep/longstep_thermodynamics.F |
244 |
LONGSTEP_THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,LS_uVel,'LS_Uvel (THERMODYNAMICS)',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
245 |
LONGSTEP_THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,LS_vVel,'LS_Vvel (THERMODYNAMICS)',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
246 |
LONGSTEP_THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,LS_wVel,'LS_Wvel (THERMODYNAMICS)',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
248 |
LONGSTEP_THERMODYNAMICS |
& myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
249 |
LONGSTEP_THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,LS_salt,'LS_Salt (THERMODYNAMICS)',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
252 |
LONGSTEP_THERMODYNAMICS |
CALL PTRACERS_DEBUG(myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
262 |
LONGSTEP_THERMODYNAMICS |
IF (debugMode) CALL DEBUG_LEAVE('LONGSTEP_THERMODYNAMICS',myThid) |
|
./pkg/longstep/longstep_thermodynamics.F |
71 |
LONGSTEP_THERMODYNAMICS |
INTEGER myThid |
|
./pkg/longstep/longstep_thermodynamics.F |
95 |
LONGSTEP_THERMODYNAMICS |
IF (debugMode) CALL DEBUG_ENTER('LONGSTEP_THERMODYNAMICS',myThid) |
|
./model/src/calc_grid_angles.F |
10 |
CALC_GRID_ANGLES |
SUBROUTINE CALC_GRID_ANGLES( skipCalcAngleC, myThid ) |
|
./model/src/calc_grid_angles.F |
33 |
CALC_GRID_ANGLES |
INTEGER myThid |
|
./model/src/calc_grid_angles.F |
49 |
CALC_GRID_ANGLES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/calc_grid_angles.F |
50 |
CALC_GRID_ANGLES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/matrix/matrix_init_varia.F |
18 |
MATRIX_INIT_VARIA |
INTEGER myThid |
|
./pkg/matrix/matrix_init_varia.F |
29 |
MATRIX_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_init_varia.F |
30 |
MATRIX_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_init_varia.F |
36 |
MATRIX_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_init_varia.F |
37 |
MATRIX_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_init_varia.F |
6 |
MATRIX_INIT_VARIA |
SUBROUTINE MATRIX_INIT_VARIA( myThid ) |
|
./pkg/matrix/matrix_output.F |
11 |
MATRIX_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/matrix/matrix_output.F |
29 |
MATRIX_OUTPUT |
INTEGER myThid |
|
./pkg/matrix/matrix_output.F |
37 |
MATRIX_OUTPUT |
CALL MATRIX_WRITE_GRID( myThid ) |
|
./pkg/matrix/matrix_output.F |
40 |
MATRIX_OUTPUT |
CALL MATRIX_WRITE_TENDENCY( myTime, myIter, myThid ) |
|
./pkg/matrix/matrix_readparms.F |
22 |
MATRIX_READPARMS |
INTEGER myThid |
|
./pkg/matrix/matrix_readparms.F |
40 |
MATRIX_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_readparms.F |
44 |
MATRIX_READPARMS |
_END_MASTER(myThid) |
|
./pkg/matrix/matrix_readparms.F |
48 |
MATRIX_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_readparms.F |
59 |
MATRIX_READPARMS |
I myThid ) |
|
./pkg/matrix/matrix_readparms.F |
72 |
MATRIX_READPARMS |
_END_MASTER(myThid) |
|
./pkg/matrix/matrix_readparms.F |
8 |
MATRIX_READPARMS |
SUBROUTINE MATRIX_READPARMS( myThid ) |
|
./pkg/matrix/matrix_store_tendency.F |
19 |
MATRIX_STORE_TENDENCY_EXP |
I myTime, myIter, myThid ) |
|
./pkg/matrix/matrix_store_tendency.F |
43 |
MATRIX_STORE_TENDENCY_EXP |
INTEGER myThid |
|
./pkg/matrix/matrix_store_tendency.F |
75 |
MATRIX_STORE_TENDENCY_IMP |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/matrix/matrix_store_tendency.F |
96 |
MATRIX_STORE_TENDENCY_IMP |
INTEGER myThid |
|
./pkg/matrix/matrix_write_grid.F |
15 |
MATRIX_WRITE_GRID |
INTEGER myThid |
|
./pkg/matrix/matrix_write_grid.F |
22 |
MATRIX_WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXF',' ',DXF,0,myThid) |
|
./pkg/matrix/matrix_write_grid.F |
23 |
MATRIX_WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYF',' ',DYF,0,myThid) |
|
./pkg/matrix/matrix_write_grid.F |
6 |
MATRIX_WRITE_GRID |
SUBROUTINE MATRIX_WRITE_GRID( myThid ) |
|
./pkg/matrix/matrix_write_tendency.F |
103 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid), myByHi (myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
104 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid), myBxHi (myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
10 |
MATRIX_WRITE_TENDENCY |
SUBROUTINE MATRIX_WRITE_TENDENCY( myTime, myIter, myThid ) |
|
./pkg/matrix/matrix_write_tendency.F |
116 |
MATRIX_WRITE_TENDENCY |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
117 |
MATRIX_WRITE_TENDENCY |
bj=myByLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
118 |
MATRIX_WRITE_TENDENCY |
bi=myBxLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
122 |
MATRIX_WRITE_TENDENCY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/matrix/matrix_write_tendency.F |
123 |
MATRIX_WRITE_TENDENCY |
_END_MASTER(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 |
129 |
MATRIX_WRITE_TENDENCY |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
131 |
MATRIX_WRITE_TENDENCY |
_END_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
134 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
135 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
140 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid), myByHi (myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
141 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid), myBxHi (myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
22 |
MATRIX_WRITE_TENDENCY |
INTEGER myThid |
|
./pkg/matrix/matrix_write_tendency.F |
38 |
MATRIX_WRITE_TENDENCY |
bj=myByLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
39 |
MATRIX_WRITE_TENDENCY |
bi=myBxLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
44 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
45 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
57 |
MATRIX_WRITE_TENDENCY |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
58 |
MATRIX_WRITE_TENDENCY |
bj=myByLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
59 |
MATRIX_WRITE_TENDENCY |
bi=myBxLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
63 |
MATRIX_WRITE_TENDENCY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/matrix/matrix_write_tendency.F |
64 |
MATRIX_WRITE_TENDENCY |
_END_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
67 |
MATRIX_WRITE_TENDENCY |
& MATRIX(1-OLx,1-OLy,1,1,1,iTracer,1),iRec,myIter,myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
70 |
MATRIX_WRITE_TENDENCY |
_BEGIN_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
72 |
MATRIX_WRITE_TENDENCY |
_END_MASTER(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
75 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
76 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
81 |
MATRIX_WRITE_TENDENCY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
82 |
MATRIX_WRITE_TENDENCY |
DO bi=myBxLo (myThid),myBxHi(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
97 |
MATRIX_WRITE_TENDENCY |
bj=myByLo(myThid) |
|
./pkg/matrix/matrix_write_tendency.F |
98 |
MATRIX_WRITE_TENDENCY |
bi=myBxLo(myThid) |
|
./model/src/calc_gw.F |
137 |
CALC_GW |
diagDiss = DIAGNOSTICS_IS_ON( 'Wm_Diss ', myThid ) |
|
./model/src/calc_gw.F |
138 |
CALC_GW |
diagAdvec = DIAGNOSTICS_IS_ON( 'Wm_Advec', myThid ) |
|
./model/src/calc_gw.F |
139 |
CALC_GW |
diag_AB = DIAGNOSTICS_IS_ON( 'AB_gW ', myThid ) |
|
./model/src/calc_gw.F |
18 |
CALC_GW |
I myTime, myIter, myThid ) |
|
./model/src/calc_gw.F |
308 |
CALC_GW |
& wFld, bi,bj, myThid ) |
|
./model/src/calc_gw.F |
329 |
CALC_GW |
& wFld, bi,bj, myThid ) |
|
./model/src/calc_gw.F |
466 |
CALC_GW |
I myThid ) |
|
./model/src/calc_gw.F |
481 |
CALC_GW |
I iMin,iMax,jMin,jMax, k, bi, bj, myThid ) |
|
./model/src/calc_gw.F |
613 |
CALC_GW |
I myThid ) |
|
./model/src/calc_gw.F |
625 |
CALC_GW |
I myThid ) |
|
./model/src/calc_gw.F |
638 |
CALC_GW |
& k, 1, 2, bi,bj, myThid ) |
|
./model/src/calc_gw.F |
645 |
CALC_GW |
& k,Nr, 1, bi,bj, 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 |
677 |
CALC_GW |
CALL DIAGNOSTICS_FILL(gw_AB,'AB_gW ',k,1,2,bi,bj,myThid) |
|
./model/src/calc_gw.F |
695 |
CALC_GW |
CALL DIAGNOSTICS_FILL(viscAh_W,'VISCAHW ',0,Nr,1,bi,bj,myThid) |
|
./model/src/calc_gw.F |
696 |
CALC_GW |
CALL DIAGNOSTICS_FILL(viscA4_W,'VISCA4W ',0,Nr,1,bi,bj,myThid) |
|
./model/src/calc_gw.F |
74 |
CALC_GW |
INTEGER myThid |
|
./pkg/mdsio/mdsio_buffertorl.F |
11 |
MDS_BUFFERTORL |
SUBROUTINE MDS_BUFFERTORL( vecBuf, arr, narr, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_buffertorl.F |
30 |
MDS_BUFFERTORL |
INTEGER myThid |
|
./pkg/mdsio/mdsio_buffertors.F |
11 |
MDS_BUFFERTORS |
SUBROUTINE MDS_BUFFERTORS( vecBuf, arr, narr, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_buffertors.F |
30 |
MDS_BUFFERTORS |
INTEGER myThid |
|
./pkg/mdsio/mdsio_check4file.F |
129 |
MDS_CHECK4FILE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
131 |
MDS_CHECK4FILE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
137 |
MDS_CHECK4FILE |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
15 |
MDS_CHECK4FILE |
I myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
42 |
MDS_CHECK4FILE |
INTEGER myThid |
|
./pkg/mdsio/mdsio_check4file.F |
72 |
MDS_CHECK4FILE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_check4file.F |
77 |
MDS_CHECK4FILE |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
110 |
MDS_FACEF_READ_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
117 |
MDS_FACEF_READ_RS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
118 |
MDS_FACEF_READ_RS |
length_of_rec = MDS_RECLEN( fPrec, (sNx+1)*(sNy+1), myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
144 |
MDS_FACEF_READ_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
19 |
MDS_FACEF_READ_RS |
I bi,bj, myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
45 |
MDS_FACEF_READ_RS |
INTEGER bi,bj, myThid |
|
./pkg/mdsio/mdsio_facef_read.F |
79 |
MDS_FACEF_READ_RS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_facef_read.F |
80 |
MDS_FACEF_READ_RS |
length_of_rec = MDS_RECLEN( fPrec, (dNx+1), myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1174 |
MDSREADFIELD_2D_GL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
1175 |
MDSREADFIELD_2D_GL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
1196 |
MDSREADFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1215 |
MDSWRITEFIELD_2D_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1271 |
MDSWRITEFIELD_2D_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl.F |
1312 |
MDSWRITEFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1354 |
MDSWRITEFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1360 |
MDSWRITEFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1372 |
MDSWRITEFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1379 |
MDSWRITEFIELD_2D_GL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
1380 |
MDSWRITEFIELD_2D_GL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
1392 |
MDSWRITEFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1422 |
MDSWRITEFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1426 |
MDSWRITEFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1446 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1448 |
MDSWRITEFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1453 |
MDSWRITEFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1564 |
MDSWRITEFIELD_2D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
1572 |
MDSWRITEFIELD_2D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
22 |
MDSREADFIELD_3D_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
387 |
MDSREADFIELD_3D_GL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
388 |
MDSREADFIELD_3D_GL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
409 |
MDSREADFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
428 |
MDSWRITEFIELD_3D_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
483 |
MDSWRITEFIELD_3D_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl.F |
524 |
MDSWRITEFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
565 |
MDSWRITEFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
571 |
MDSWRITEFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
583 |
MDSWRITEFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
590 |
MDSWRITEFIELD_3D_GL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
591 |
MDSWRITEFIELD_3D_GL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_gl.F |
603 |
MDSWRITEFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
633 |
MDSWRITEFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
637 |
MDSWRITEFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
64 |
MDSREADFIELD_3D_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl.F |
657 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
659 |
MDSWRITEFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
664 |
MDSWRITEFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
775 |
MDSWRITEFIELD_3D_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
783 |
MDSWRITEFIELD_3D_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
808 |
MDSREADFIELD_2D_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
851 |
MDSREADFIELD_2D_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl.F |
886 |
MDSREADFIELD_2D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl.F |
99 |
MDSREADFIELD_3D_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
22 |
MDSREADFIELD_XZ_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
245 |
MDSREADFIELD_XZ_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
263 |
MDSREADFIELD_YZ_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
305 |
MDSREADFIELD_YZ_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl_slice.F |
324 |
MDSREADFIELD_YZ_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
485 |
MDSREADFIELD_YZ_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
504 |
MDSWRITEFIELD_XZ_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
559 |
MDSWRITEFIELD_XZ_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl_slice.F |
583 |
MDSWRITEFIELD_XZ_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
64 |
MDSREADFIELD_XZ_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl_slice.F |
718 |
MDSWRITEFIELD_XZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
726 |
MDSWRITEFIELD_XZ_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
745 |
MDSWRITEFIELD_YZ_GL |
I myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
800 |
MDSWRITEFIELD_YZ_GL |
integer myThid |
|
./pkg/mdsio/mdsio_gl_slice.F |
824 |
MDSWRITEFIELD_YZ_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
83 |
MDSREADFIELD_XZ_GL |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
959 |
MDSWRITEFIELD_YZ_GL |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_gl_slice.F |
967 |
MDSWRITEFIELD_YZ_GL |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
18 |
MDS_PASS_R4TORL |
I biArg, bjArg, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
53 |
MDS_PASS_R4TORL |
INTEGER myThid |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
68 |
MDS_PASS_R4TORL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
69 |
MDS_PASS_R4TORL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
81 |
MDS_PASS_R4TORL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4torl.F |
82 |
MDS_PASS_R4TORL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
18 |
MDS_PASS_R4TORS |
I biArg, bjArg, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
53 |
MDS_PASS_R4TORS |
INTEGER myThid |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
68 |
MDS_PASS_R4TORS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
69 |
MDS_PASS_R4TORS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
81 |
MDS_PASS_R4TORS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r4tors.F |
82 |
MDS_PASS_R4TORS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
18 |
MDS_PASS_R8TORL |
I biArg, bjArg, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
53 |
MDS_PASS_R8TORL |
INTEGER myThid |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
68 |
MDS_PASS_R8TORL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
69 |
MDS_PASS_R8TORL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
81 |
MDS_PASS_R8TORL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8torl.F |
82 |
MDS_PASS_R8TORL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/calc_ivdc.F |
11 |
CALC_IVDC |
I myTime,myIter, myThid ) |
|
./model/src/calc_ivdc.F |
39 |
CALC_IVDC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
18 |
MDS_PASS_R8TORS |
I biArg, bjArg, copyTo, myThid ) |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
53 |
MDS_PASS_R8TORS |
INTEGER myThid |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
68 |
MDS_PASS_R8TORS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
69 |
MDS_PASS_R8TORS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
81 |
MDS_PASS_R8TORS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mdsio/mdsio_pass_r8tors.F |
82 |
MDS_PASS_R8TORS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
14 |
MDS_RD_REC_RL |
I fPrec, dUnit, iRec, nArr, myThid ) |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
39 |
MDS_RD_REC_RL |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
54 |
MDS_RD_REC_RL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
76 |
MDS_RD_REC_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
14 |
MDS_RD_REC_RS |
I fPrec, dUnit, iRec, nArr, myThid ) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
39 |
MDS_RD_REC_RS |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
54 |
MDS_RD_REC_RS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
76 |
MDS_RD_REC_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
142 |
MDS_READ_FIELD |
iAmDoingIO = MASTER_CPU_IO(myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
150 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
152 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
157 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
160 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
168 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
172 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
175 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
176 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
17 |
MDS_READ_FIELD |
I myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
184 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
189 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
192 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
193 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
201 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
206 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
209 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
213 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
214 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
230 |
MDS_READ_FIELD |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
240 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
254 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
272 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
279 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
280 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
284 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
285 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
312 |
MDS_READ_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
319 |
MDS_READ_FIELD |
I useExch2ioLayOut, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
321 |
MDS_READ_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
324 |
MDS_READ_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
327 |
MDS_READ_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
331 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
332 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
340 |
MDS_READ_FIELD |
I useExch2ioLayOut, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
342 |
MDS_READ_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
345 |
MDS_READ_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
348 |
MDS_READ_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
352 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
353 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
359 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
360 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
384 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
465 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
467 |
MDS_READ_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
476 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
477 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
481 |
MDS_READ_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_read_field.F |
482 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
526 |
MDS_READ_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
532 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
535 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
539 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
540 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
546 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
549 |
MDS_READ_FIELD |
I 0, 0, nNz, kLo, kSize, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
553 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
554 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
560 |
MDS_READ_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
561 |
MDS_READ_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
568 |
MDS_READ_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_field.F |
88 |
MDS_READ_FIELD |
INTEGER myThid |
|
./pkg/mdsio/mdsio_read_meta.F |
130 |
MDS_READ_META |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
176 |
MDS_READ_META |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
180 |
MDS_READ_META |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
189 |
MDS_READ_META |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/mdsio/mdsio_read_meta.F |
18 |
MDS_READ_META |
I myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
193 |
MDS_READ_META |
CALL MDSFINDUNIT( mUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
202 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
229 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
281 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
282 |
MDS_READ_META |
CALL PRINT_ERROR(lineBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
296 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
297 |
MDS_READ_META |
CALL PRINT_ERROR(lineBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
327 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
361 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
384 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
390 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
391 |
MDS_READ_META |
CALL PRINT_ERROR(lineBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
397 |
MDS_READ_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
398 |
MDS_READ_META |
CALL PRINT_ERROR(lineBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
408 |
MDS_READ_META |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_meta.F |
74 |
MDS_READ_META |
INTEGER myThid |
|
./pkg/mdsio/mdsio_read_section.F |
104 |
MDS_READ_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
107 |
MDS_READ_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
126 |
MDS_READ_SEC_XZ |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
136 |
MDS_READ_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
150 |
MDS_READ_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
158 |
MDS_READ_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
181 |
MDS_READ_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
183 |
MDS_READ_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
192 |
MDS_READ_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
195 |
MDS_READ_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
239 |
MDS_READ_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
24 |
MDS_READ_SEC_XZ |
I myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
256 |
MDS_READ_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
262 |
MDS_READ_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
282 |
MDS_READ_SEC_XZ |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
301 |
MDS_READ_SEC_YZ |
I myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
349 |
MDS_READ_SEC_YZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_read_section.F |
375 |
MDS_READ_SEC_YZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
382 |
MDS_READ_SEC_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
385 |
MDS_READ_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
404 |
MDS_READ_SEC_YZ |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
414 |
MDS_READ_SEC_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
428 |
MDS_READ_SEC_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
436 |
MDS_READ_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
459 |
MDS_READ_SEC_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
461 |
MDS_READ_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
470 |
MDS_READ_SEC_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
473 |
MDS_READ_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
517 |
MDS_READ_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
534 |
MDS_READ_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
540 |
MDS_READ_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
560 |
MDS_READ_SEC_YZ |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_section.F |
72 |
MDS_READ_SEC_XZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_read_section.F |
97 |
MDS_READ_SEC_XZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
112 |
MDS_READ_TAPE |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
131 |
MDS_READ_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
133 |
MDS_READ_TAPE |
length_of_rec = MDS_RECLEN( filePrec, vec_size, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
142 |
MDS_READ_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
143 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
147 |
MDS_READ_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
148 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
172 |
MDS_READ_TAPE |
CALL SCATTER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
174 |
MDS_READ_TAPE |
CALL SCATTER_VEC_R8( gl_buffer_r8, local_r8, nSize, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
178 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
17 |
MDS_READ_TAPE |
I myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
194 |
MDS_READ_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
198 |
MDS_READ_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
216 |
MDS_READ_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
218 |
MDS_READ_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
227 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
252 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
263 |
MDS_READ_TAPE |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
291 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
51 |
MDS_READ_TAPE |
INTEGER myThid |
|
./pkg/mdsio/mdsio_read_tape.F |
84 |
MDS_READ_TAPE |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
90 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_tape.F |
93 |
MDS_READ_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
128 |
MDS_READ_WHALOS |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
130 |
MDS_READ_WHALOS |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
138 |
MDS_READ_WHALOS |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*procNyWh, myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
141 |
MDS_READ_WHALOS |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*gloNyWh,myThid) |
|
./pkg/mdsio/mdsio_read_whalos.F |
144 |
MDS_READ_WHALOS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
236 |
MDS_READ_WHALOS |
& fld2d_procbuff_r4,myThid) |
|
./pkg/mdsio/mdsio_read_whalos.F |
238 |
MDS_READ_WHALOS |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
241 |
MDS_READ_WHALOS |
& OLx, OLy, 1, i2d, n2d, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
246 |
MDS_READ_WHALOS |
& fld2d_procbuff_r8,myThid) |
|
./pkg/mdsio/mdsio_read_whalos.F |
248 |
MDS_READ_WHALOS |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_read_whalos.F |
251 |
MDS_READ_WHALOS |
& OLx, OLy, 1, i2d, n2d, 0, 0, .TRUE., myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
101 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
110 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
113 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
116 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
119 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
141 |
MDS_READVEC_LOC |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
179 |
MDS_READVEC_LOC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
181 |
MDS_READVEC_LOC |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
18 |
MDS_READVEC_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
190 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
194 |
MDS_READVEC_LOC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
200 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
209 |
MDS_READVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
212 |
MDS_READVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
216 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
231 |
MDS_READVEC_LOC |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
69 |
MDS_READVEC_LOC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_readvec_loc.F |
88 |
MDS_READVEC_LOC |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_readvec_loc.F |
98 |
MDS_READVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
121 |
MDSREADFIELD_LOC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_field.F |
132 |
MDSREADFIELD_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
137 |
MDSREADFIELD_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
158 |
MDSWRITEFIELD |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
193 |
MDSWRITEFIELD |
INTEGER myThid |
|
./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 |
230 |
MDSWRITEFIELD_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
24 |
MDSREADFIELD |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
265 |
MDSWRITEFIELD_LOC |
INTEGER myThid |
|
./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 ) |
|
./pkg/mdsio/mdsio_rw_field.F |
55 |
MDSREADFIELD |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_field.F |
66 |
MDSREADFIELD |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
71 |
MDSREADFIELD |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_field.F |
90 |
MDSREADFIELD_LOC |
I myThid ) |
|
./model/src/calc_oce_mxlayer.F |
114 |
CALC_OCE_MXLAYER |
I k, bi, bj, myThid ) |
|
./model/src/calc_oce_mxlayer.F |
12 |
CALC_OCE_MXLAYER |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/calc_oce_mxlayer.F |
160 |
CALC_OCE_MXLAYER |
I k, bi, bj, myThid ) |
|
./model/src/calc_oce_mxlayer.F |
219 |
CALC_OCE_MXLAYER |
& 0, 1, 1, bi, bj, myThid ) |
|
./model/src/calc_oce_mxlayer.F |
45 |
CALC_OCE_MXLAYER |
INTEGER myThid |
|
./model/src/calc_oce_mxlayer.F |
75 |
CALC_OCE_MXLAYER |
calcMixLayerDepth = DIAGNOSTICS_IS_ON('MXLDEPTH',myThid) |
|
./model/src/calc_oce_mxlayer.F |
98 |
CALC_OCE_MXLAYER |
O rhoMxL, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
123 |
MDSREADFIELDYZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_slice.F |
134 |
MDSREADFIELDYZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
139 |
MDSREADFIELDYZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
158 |
MDSREADFIELDXZ_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
188 |
MDSREADFIELDXZ_LOC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_slice.F |
199 |
MDSREADFIELDXZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
204 |
MDSREADFIELDXZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
223 |
MDSREADFIELDYZ_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
253 |
MDSREADFIELDYZ_LOC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_slice.F |
264 |
MDSREADFIELDYZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
269 |
MDSREADFIELDYZ_LOC |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
28 |
MDSREADFIELDXZ |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
290 |
MDSWRITEFIELDXZ |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
324 |
MDSWRITEFIELDXZ |
INTEGER myThid |
|
./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 |
361 |
MDSWRITEFIELDYZ |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
395 |
MDSWRITEFIELDYZ |
INTEGER myThid |
|
./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 |
432 |
MDSWRITEFIELDXZ_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
466 |
MDSWRITEFIELDXZ_LOC |
INTEGER myThid |
|
./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 |
503 |
MDSWRITEFIELDYZ_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
537 |
MDSWRITEFIELDYZ_LOC |
INTEGER myThid |
|
./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_rw_slice.F |
58 |
MDSREADFIELDXZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_rw_slice.F |
69 |
MDSREADFIELDXZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
74 |
MDSREADFIELDXZ |
I irecord, myThid ) |
|
./pkg/mdsio/mdsio_rw_slice.F |
93 |
MDSREADFIELDYZ |
I myThid ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
119 |
MDS_WR_METAFILES |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./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 |
22 |
MDS_WR_METAFILES |
I myThid ) |
|
./pkg/mdsio/mdsio_wr_metafiles.F |
87 |
MDS_WR_METAFILES |
INTEGER myThid |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
14 |
MDS_WR_REC_RL |
I fPrec, dUnit, iRec, nArr, myThid ) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
39 |
MDS_WR_REC_RL |
INTEGER myThid |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
54 |
MDS_WR_REC_RL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
76 |
MDS_WR_REC_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
14 |
MDS_WR_REC_RS |
I fPrec, dUnit, iRec, nArr, myThid ) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
39 |
MDS_WR_REC_RS |
INTEGER myThid |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
54 |
MDS_WR_REC_RS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
76 |
MDS_WR_REC_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
105 |
MDS_WRITE_FIELD |
INTEGER myThid |
|
./pkg/mdsio/mdsio_write_field.F |
170 |
MDS_WRITE_FIELD |
iAmDoingIO = MASTER_CPU_IO(myThid) |
|
./pkg/mdsio/mdsio_write_field.F |
178 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
180 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
185 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
188 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
196 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
19 |
MDS_WRITE_FIELD |
I myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
200 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
203 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
204 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
212 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
217 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
220 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
221 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
229 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
234 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
237 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
241 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/mdsio/mdsio_write_field.F |
242 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
261 |
MDS_WRITE_FIELD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
265 |
MDS_WRITE_FIELD |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
277 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, xSize*ySize, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
294 |
MDS_WRITE_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
297 |
MDS_WRITE_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
301 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
302 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
306 |
MDS_WRITE_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
311 |
MDS_WRITE_FIELD |
I useExch2ioLayOut, zeroBuff, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
315 |
MDS_WRITE_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
318 |
MDS_WRITE_FIELD |
I 0, 0, 1, k, kSize, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
322 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
323 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
327 |
MDS_WRITE_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
332 |
MDS_WRITE_FIELD |
I useExch2ioLayOut, zeroBuff, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
336 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
337 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
342 |
MDS_WRITE_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
373 |
MDS_WRITE_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
379 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
382 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
386 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
387 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
393 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
396 |
MDS_WRITE_FIELD |
I 0, 0, nNz, kLo, kSize, 0,0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
400 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
401 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
407 |
MDS_WRITE_FIELD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
408 |
MDS_WRITE_FIELD |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
413 |
MDS_WRITE_FIELD |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
429 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_write_field.F |
501 |
MDS_WRITE_FIELD |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
|
./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 |
120 |
CALC_PHI_HYD |
act1 = bi - myBxLo(myThid) |
|
./model/src/calc_phi_hyd.F |
121 |
CALC_PHI_HYD |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/calc_phi_hyd.F |
123 |
CALC_PHI_HYD |
act2 = bj - myByLo(myThid) |
|
./model/src/calc_phi_hyd.F |
124 |
CALC_PHI_HYD |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/calc_phi_hyd.F |
126 |
CALC_PHI_HYD |
act3 = myThid - 1 |
|
./model/src/calc_phi_hyd.F |
170 |
CALC_PHI_HYD |
I k, bi, bj, myThid ) |
|
./model/src/calc_phi_hyd.F |
18 |
CALC_PHI_HYD |
I myTime, myIter, myThid ) |
|
./model/src/calc_phi_hyd.F |
203 |
CALC_PHI_HYD |
CALL MOM_QUASIHYDROSTATIC(bi,bj,k,uVel,vVel,alphaRho,myThid) |
|
./model/src/calc_phi_hyd.F |
332 |
CALC_PHI_HYD |
I k, bi, bj, myThid ) |
|
./model/src/calc_phi_hyd.F |
357 |
CALC_PHI_HYD |
CALL MOM_QUASIHYDROSTATIC(bi,bj,k,uVel,vVel,alphaRho,myThid) |
|
./model/src/calc_phi_hyd.F |
463 |
CALC_PHI_HYD |
CALL MOM_QUASIHYDROSTATIC(bi,bj,k,uVel,vVel,alphaRho,myThid) |
|
./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 |
153 |
MDS_WRITE_META |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_meta.F |
18 |
MDS_WRITE_META |
I nrecords, myIter, myThid ) |
|
./pkg/mdsio/mdsio_write_meta.F |
69 |
MDS_WRITE_META |
INTEGER myThid |
|
./pkg/mdsio/mdsio_write_meta.F |
94 |
MDS_WRITE_META |
CALL MDSFINDUNIT( mUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
104 |
MDS_WRITE_SEC_XZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
111 |
MDS_WRITE_SEC_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
114 |
MDS_WRITE_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
132 |
MDS_WRITE_SEC_XZ |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
138 |
MDS_WRITE_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
143 |
MDS_WRITE_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
160 |
MDS_WRITE_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
165 |
MDS_WRITE_SEC_XZ |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
206 |
MDS_WRITE_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
223 |
MDS_WRITE_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
233 |
MDS_WRITE_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
241 |
MDS_WRITE_SEC_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
259 |
MDS_WRITE_SEC_XZ |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
26 |
MDS_WRITE_SEC_XZ |
I myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
280 |
MDS_WRITE_SEC_YZ |
I myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
335 |
MDS_WRITE_SEC_YZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_write_section.F |
357 |
MDS_WRITE_SEC_YZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
364 |
MDS_WRITE_SEC_YZ |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/mdsio/mdsio_write_section.F |
367 |
MDS_WRITE_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
385 |
MDS_WRITE_SEC_YZ |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
391 |
MDS_WRITE_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
396 |
MDS_WRITE_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
413 |
MDS_WRITE_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
418 |
MDS_WRITE_SEC_YZ |
length_of_rec = MDS_RECLEN( filePrec, sNy, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
459 |
MDS_WRITE_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
476 |
MDS_WRITE_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
486 |
MDS_WRITE_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
494 |
MDS_WRITE_SEC_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
512 |
MDS_WRITE_SEC_YZ |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_section.F |
81 |
MDS_WRITE_SEC_XZ |
INTEGER myThid |
|
./pkg/mdsio/mdsio_write_tape.F |
119 |
MDS_WRITE_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
126 |
MDS_WRITE_TAPE |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
132 |
MDS_WRITE_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
135 |
MDS_WRITE_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
155 |
MDS_WRITE_TAPE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
159 |
MDS_WRITE_TAPE |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
167 |
MDS_WRITE_TAPE |
CALL GATHER_VEC_R4( gl_buffer_r4, local_r4, nSize, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
169 |
MDS_WRITE_TAPE |
CALL GATHER_VEC_R8( gl_buffer_r8, local_r8, nSize, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
173 |
MDS_WRITE_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
181 |
MDS_WRITE_TAPE |
length_of_rec = MDS_RECLEN( filePrec, vec_size, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
19 |
MDS_WRITE_TAPE |
I myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
213 |
MDS_WRITE_TAPE |
I 0, dummyRL, oneRL, iRec, myIter, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
225 |
MDS_WRITE_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
240 |
MDS_WRITE_TAPE |
length_of_rec = MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
282 |
MDS_WRITE_TAPE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
310 |
MDS_WRITE_TAPE |
I 0, dummyRL, oneRL, iRec, myIter, myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
318 |
MDS_WRITE_TAPE |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_tape.F |
58 |
MDS_WRITE_TAPE |
INTEGER myThid |
|
./pkg/mdsio/mdsio_write_whalos.F |
119 |
MDS_WRITE_WHALOS |
_BEGIN_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
121 |
MDS_WRITE_WHALOS |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
129 |
MDS_WRITE_WHALOS |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*procNyWh,myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
132 |
MDS_WRITE_WHALOS |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*gloNyWh,myThid) |
|
./pkg/mdsio/mdsio_write_whalos.F |
135 |
MDS_WRITE_WHALOS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
148 |
MDS_WRITE_WHALOS |
& OLx, OLy, 1, i2d, n2d, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
150 |
MDS_WRITE_WHALOS |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
153 |
MDS_WRITE_WHALOS |
& fld2d_procbuff_r4,myThid) |
|
./pkg/mdsio/mdsio_write_whalos.F |
158 |
MDS_WRITE_WHALOS |
& OLx, OLy, 1, i2d, n2d, 0, 0, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
160 |
MDS_WRITE_WHALOS |
CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_write_whalos.F |
163 |
MDS_WRITE_WHALOS |
& fld2d_procbuff_r8,myThid) |
|
./pkg/mdsio/mdsio_writelocal.F |
121 |
MDS_WRITELOCAL |
INTEGER myThid, ith, nthLoop |
|
./pkg/mdsio/mdsio_writelocal.F |
150 |
MDS_WRITELOCAL |
myThid = MAX(myThArg,1) |
|
./pkg/mdsio/mdsio_writelocal.F |
158 |
MDS_WRITELOCAL |
IF ( myThid.EQ.1 ) iAmDoingIO = .TRUE. |
|
./pkg/mdsio/mdsio_writelocal.F |
170 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
174 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
183 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
187 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
190 |
MDS_WRITELOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
199 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
204 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
207 |
MDS_WRITELOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
211 |
MDS_WRITELOCAL |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
218 |
MDS_WRITELOCAL |
IF ( nthLoop.GT.1 ) CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
225 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
228 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
232 |
MDS_WRITELOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
239 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
242 |
MDS_WRITELOCAL |
I 0, 0, nNz, 1, nNz, biArg, bjArg, .FALSE., myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
246 |
MDS_WRITELOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
253 |
MDS_WRITELOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
260 |
MDS_WRITELOCAL |
IF ( nthLoop.GT.1 ) CALL BAR2( myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
269 |
MDS_WRITELOCAL |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
274 |
MDS_WRITELOCAL |
length_of_rec = MDS_RECLEN( filePrec, sNx, myThid ) |
|
./pkg/mdsio/mdsio_writelocal.F |
355 |
MDS_WRITELOCAL |
length_of_rec = MDS_RECLEN( filePrec, sNx*sNy*nNz, myThid ) |
|
./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_writevec_loc.F |
110 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
113 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
122 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
125 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
128 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
131 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
153 |
MDS_WRITEVEC_LOC |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
168 |
MDS_WRITEVEC_LOC |
length_of_rec=MDS_RECLEN( filePrec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
190 |
MDS_WRITEVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
193 |
MDS_WRITEVEC_LOC |
I filePrec, dUnit, iRec, nSize, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
197 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
19 |
MDS_WRITEVEC_LOC |
I myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
203 |
MDS_WRITEVEC_LOC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
246 |
MDS_WRITEVEC_LOC |
I 0, dummyRL, oneRL, irecord, myIter, myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
249 |
MDS_WRITEVEC_LOC |
_END_MASTER( myThid ) |
|
./pkg/mdsio/mdsio_writevec_loc.F |
71 |
MDS_WRITEVEC_LOC |
INTEGER myThid |
|
./pkg/mdsio/mdsio_writevec_loc.F |
99 |
MDS_WRITEVEC_LOC |
_BEGIN_MASTER( myThid ) |
|
./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 |
262 |
CALC_R_STAR |
_EXCH_XY_RL( rStarFacC, myThid ) |
|
./model/src/calc_r_star.F |
263 |
CALC_R_STAR |
CALL EXCH_UV_XY_RL(rStarFacW,rStarFacS,.FALSE.,myThid) |
|
./model/src/calc_r_star.F |
267 |
CALC_R_STAR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/calc_r_star.F |
268 |
CALC_R_STAR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/calc_r_star.F |
339 |
CALC_R_STAR |
IF (debugMode) CALL DEBUG_LEAVE('CALC_R_STAR',myThid) |
|
./model/src/calc_r_star.F |
41 |
CALC_R_STAR |
INTEGER myThid |
|
./model/src/calc_r_star.F |
76 |
CALC_R_STAR |
IF (debugMode) CALL DEBUG_ENTER('CALC_R_STAR',myThid) |
|
./model/src/calc_r_star.F |
79 |
CALC_R_STAR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/calc_r_star.F |
80 |
CALC_R_STAR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mnc/mnc_cw_citer.F |
106 |
MNC_CW_SET_CITER |
integer igroup, iflag, ival_curr, ival_next, myThid |
|
./pkg/mnc/mnc_cw_citer.F |
120 |
MNC_CW_SET_CITER |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
|
./pkg/mnc/mnc_cw_citer.F |
144 |
MNC_CW_SET_CITER |
& iflag, ival_curr, ival_next, myThid ) |
|
./pkg/mnc/mnc_cw_citer.F |
159 |
MNC_CW_GET_CITER |
I myThid ) |
|
./pkg/mnc/mnc_cw_citer.F |
15 |
MNC_CW_CITER_SETG |
I myThid ) |
|
./pkg/mnc/mnc_cw_citer.F |
170 |
MNC_CW_GET_CITER |
integer igroup, iflag, ival_curr, ival_next, myThid |
|
./pkg/mnc/mnc_cw_citer.F |
184 |
MNC_CW_GET_CITER |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
|
./pkg/mnc/mnc_cw_citer.F |
202 |
MNC_CW_GET_CITER |
& iflag, ival_curr, ival_next, myThid ) |
|
./pkg/mnc/mnc_cw_citer.F |
25 |
MNC_CW_CITER_SETG |
integer igroup, iflag, ival_curr, ival_next, myThid |
|
./pkg/mnc/mnc_cw_citer.F |
65 |
MNC_CW_CITER_GETG |
I myThid ) |
|
./pkg/mnc/mnc_cw_citer.F |
75 |
MNC_CW_CITER_GETG |
integer igroup, iflag, ival_curr, ival_next, myThid |
|
./pkg/mnc/mnc_cw_citer.F |
95 |
MNC_CW_SET_CITER |
I myThid ) |
|
./pkg/mnc/mnc_cw_cvars.F |
17 |
MNC_CW_WRITE_CVAR |
I myThid ) |
|
./pkg/mnc/mnc_cw_cvars.F |
410 |
MNC_CW_WRITE_CVAR |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
421 |
MNC_CW_WRITE_CVAR |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
429 |
MNC_CW_WRITE_CVAR |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
42 |
MNC_CW_WRITE_CVAR |
integer myThid |
|
./pkg/mnc/mnc_cw_cvars.F |
437 |
MNC_CW_WRITE_CVAR |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
445 |
MNC_CW_WRITE_CVAR |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
448 |
MNC_CW_WRITE_CVAR |
CALL MNC_FILE_ENDDEF(fname, myThid) |
|
./pkg/mnc/mnc_cw_cvars.F |
458 |
MNC_CW_WRITE_CVAR |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_cw_init.F |
13 |
MNC_CW_INIT |
I myThid ) |
|
./pkg/mnc/mnc_cw_init.F |
243 |
MNC_CW_INIT |
& dim, dn, ib, ie, myThid) |
|
./pkg/mnc/mnc_cw_init.F |
46 |
MNC_CW_INIT |
integer myThid |
|
./pkg/mnc/mnc_cw_missingvals.F |
15 |
MNC_CW_VATTR_MISSING |
I myThid ) |
|
./pkg/mnc/mnc_cw_missingvals.F |
26 |
MNC_CW_VATTR_MISSING |
integer myThid, iflag |
|
./pkg/mnc/mnc_cw_missingvals.F |
44 |
MNC_CW_VATTR_MISSING |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
100 |
MNC_CW_SET_GATTR |
& 4*exch2_nNeighbours(tnum), exch2_pij(1,1,tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
102 |
MNC_CW_SET_GATTR |
& exch2_nNeighbours(tnum), exch2_oi(1,tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
104 |
MNC_CW_SET_GATTR |
& exch2_nNeighbours(tnum), exch2_oj(1,tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
107 |
MNC_CW_SET_GATTR |
& 'exch2_isNedge', 1, exch2_isNedge(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
109 |
MNC_CW_SET_GATTR |
& 'exch2_isSedge', 1, exch2_isSedge(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
111 |
MNC_CW_SET_GATTR |
& 'exch2_isEedge', 1, exch2_isEedge(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
113 |
MNC_CW_SET_GATTR |
& 'exch2_isWedge', 1, exch2_isWedge(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
116 |
MNC_CW_SET_GATTR |
& 'exch2_myFace', 1, exch2_myFace(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
118 |
MNC_CW_SET_GATTR |
& 'exch2_txGlobalo', 1, exch2_txGlobalo(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
120 |
MNC_CW_SET_GATTR |
& 'exch2_tyGlobalo', 1, exch2_tyGlobalo(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
122 |
MNC_CW_SET_GATTR |
& 'exch2_tBasex', 1, exch2_tBasex(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
124 |
MNC_CW_SET_GATTR |
& 'exch2_tBasey', 1, exch2_tBasey(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
128 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'sNx', 1, sNx, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
129 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'sNy', 1, sNy, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
130 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'OLx', 1, OLx, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
131 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'OLy', 1, OLy, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
132 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'nSx', 1, nSx, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
133 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'nSy', 1, nSy, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
134 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'nPx', 1, nPx, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
135 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'nPy', 1, nPy, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
136 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'Nx', 1, Nx, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
137 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'Ny', 1, Ny, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
138 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname, 'Nr', 1, Nr, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
14 |
MNC_CW_SET_GATTR |
I myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
36 |
MNC_CW_SET_GATTR |
integer myThid, bi,bj, tnum |
|
./pkg/mnc/mnc_cw_model_attr.F |
43 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
49 |
MNC_CW_SET_GATTR |
& the_run_name, myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
55 |
MNC_CW_SET_GATTR |
& myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
60 |
MNC_CW_SET_GATTR |
& myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
65 |
MNC_CW_SET_GATTR |
& myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
70 |
MNC_CW_SET_GATTR |
& myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
74 |
MNC_CW_SET_GATTR |
& 'http://mitgcm.org', myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
76 |
MNC_CW_SET_GATTR |
& MNC_TAG_ID, myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
78 |
MNC_CW_SET_GATTR |
& 1, 0.9D0, myThid ) |
|
./pkg/mnc/mnc_cw_model_attr.F |
81 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname,'tile_number', 1, tnum, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
82 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname,'bi', 1, bi, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
83 |
MNC_CW_SET_GATTR |
CALL MNC_FILE_ADD_ATTR_INT(fname,'bj', 1, bj, myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
94 |
MNC_CW_SET_GATTR |
& 'exch2_nNeighbours', 1, exch2_nNeighbours(tnum), myThid) |
|
./pkg/mnc/mnc_cw_model_attr.F |
97 |
MNC_CW_SET_GATTR |
& exch2_neighbourId(1,tnum), myThid) |
|
./pkg/mnc/mnc_cw_udim.F |
102 |
MNC_CW_GET_UDIM |
integer nudim, myThid |
|
./pkg/mnc/mnc_cw_udim.F |
115 |
MNC_CW_GET_UDIM |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
|
./pkg/mnc/mnc_cw_udim.F |
14 |
MNC_CW_SET_UDIM |
I myThid ) |
|
./pkg/mnc/mnc_cw_udim.F |
36 |
MNC_CW_SET_UDIM |
integer nudim, myThid |
|
./pkg/mnc/mnc_cw_udim.F |
50 |
MNC_CW_SET_UDIM |
CALL MNC_GET_IND(MNC_MAX_ID, fgname, mnc_cw_fgnm, indfg, myThid) |
|
./pkg/mnc/mnc_cw_udim.F |
53 |
MNC_CW_SET_UDIM |
& MNC_MAX_ID, mnc_cw_fgnm, 'mnc_cw_fgnm', indfg, myThid) |
|
./pkg/mnc/mnc_cw_udim.F |
90 |
MNC_CW_GET_UDIM |
I myThid ) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
100 |
MNC_CW_WRITE_GRID_INFO |
& 'y cell center separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
102 |
MNC_CW_WRITE_GRID_INFO |
& 'x cell face separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
104 |
MNC_CW_WRITE_GRID_INFO |
& 'y cell face separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
106 |
MNC_CW_WRITE_GRID_INFO |
& 'x cell face separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
108 |
MNC_CW_WRITE_GRID_INFO |
& 'y cell face separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
110 |
MNC_CW_WRITE_GRID_INFO |
& 'x v-velocity separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
112 |
MNC_CW_WRITE_GRID_INFO |
& 'y u-velocity separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
114 |
MNC_CW_WRITE_GRID_INFO |
& 'r-face area',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
116 |
MNC_CW_WRITE_GRID_INFO |
& '',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
118 |
MNC_CW_WRITE_GRID_INFO |
& '',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
120 |
MNC_CW_WRITE_GRID_INFO |
& '',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
122 |
MNC_CW_WRITE_GRID_INFO |
& 'Coriolis f',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
124 |
MNC_CW_WRITE_GRID_INFO |
& 'Coriolis f',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
126 |
MNC_CW_WRITE_GRID_INFO |
& 'base of fluid in r-units',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
128 |
MNC_CW_WRITE_GRID_INFO |
& 'surface reference (at rest,myThid) position',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
130 |
MNC_CW_WRITE_GRID_INFO |
& 'C-facing vertical fraction of open cell',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
132 |
MNC_CW_WRITE_GRID_INFO |
& 'W-facing vertical fraction of open cell',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
134 |
MNC_CW_WRITE_GRID_INFO |
& 'S-facing vertical fraction of open cell',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
137 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_SET_UDIM(bfname(nf:nl), 0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
138 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rC',rC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
139 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rF',rF,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
13 |
MNC_CW_WRITE_GRID_INFO |
I myThid ) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
140 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'drC',drC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
141 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'drF',drF,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
142 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'xC',xC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
143 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'yC',yC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
144 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'xG',xG,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
145 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'yG',yG,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
146 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dxC',dxC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
147 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyC',dyC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
148 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dxF',dxF,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
149 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyF',dyF,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
150 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dxG',dxG,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
151 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyG',dyG,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
152 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dxV',dxV,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
153 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'dyU',dyU,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
154 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rA',rA,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
155 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rAw',rAw,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
156 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rAs',rAs,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
157 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'rAz',rAz,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
158 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'fCori',fCori,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
159 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'fCoriG',fCoriG,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
160 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'R_low',R_low,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
161 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'Ro_surf',Ro_surf,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
162 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'HFacC',HFacC,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
163 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'HFacW',HFacW,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
164 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_RS_W('D',bfname(nf:nl),0,0,'HFacS',HFacS,myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
177 |
MNC_CW_WRITE_GRID_COORD |
I myThid ) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
189 |
MNC_CW_WRITE_GRID_COORD |
integer myThid |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
193 |
MNC_CW_WRITE_GRID_COORD |
_BEGIN_MASTER( myThid ) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
195 |
MNC_CW_WRITE_GRID_COORD |
CALL MNC_CW_SET_UDIM(fname, 0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
196 |
MNC_CW_WRITE_GRID_COORD |
CALL MNC_CW_RS_W('R',fname,0,0,'XC',xC, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
197 |
MNC_CW_WRITE_GRID_COORD |
CALL MNC_CW_RS_W('R',fname,0,0,'YC',yC, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
198 |
MNC_CW_WRITE_GRID_COORD |
CALL MNC_CW_RS_W('R',fname,0,0,'XG',xG, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
199 |
MNC_CW_WRITE_GRID_COORD |
CALL MNC_CW_RS_W('R',fname,0,0,'YG',yG, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
216 |
MNC_CW_WRITE_GRID_COORD |
_END_MASTER(myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
33 |
MNC_CW_WRITE_GRID_INFO |
integer myThid |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
52 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rC', '-_-_--__C__-', 0,0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
53 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rF', '-_-_--__I__-', 0,0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
54 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('drC', '-_-_--__C__-', 0,0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
55 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('drF', '-_-_--__C__-', 0,0, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
57 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('xC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
58 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('yC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
59 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('xG', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
60 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('yG', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
61 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dxC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
62 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dyC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
63 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dxF', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
64 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dyF', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
65 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dxG', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
66 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dyG', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
67 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dxV', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
68 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('dyU', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
69 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rA', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
70 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rAw', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
71 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rAs', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
72 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('rAz', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
73 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('fCori', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
74 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('fCoriG', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
75 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('R_low', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
76 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('Ro_surf', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
77 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('HFacC', 'Cen_xy_Hn__C__-', 4,5, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
78 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('HFacW', 'Cen_xy_Hn__C__-', 4,5, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
79 |
MNC_CW_WRITE_GRID_INFO |
CALL MNC_CW_ADD_VNAME('HFacS', 'Cen_xy_Hn__C__-', 4,5, myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
82 |
MNC_CW_WRITE_GRID_INFO |
& 'r of cell center',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
84 |
MNC_CW_WRITE_GRID_INFO |
& 'r of cell face',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
86 |
MNC_CW_WRITE_GRID_INFO |
& 'r cell center separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
88 |
MNC_CW_WRITE_GRID_INFO |
& 'r cell face separation',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
90 |
MNC_CW_WRITE_GRID_INFO |
& 'x of cell center',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
92 |
MNC_CW_WRITE_GRID_INFO |
& 'y of cell center',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
94 |
MNC_CW_WRITE_GRID_INFO |
& 'x of cell corner',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
96 |
MNC_CW_WRITE_GRID_INFO |
& 'y of cell corner',myThid) |
|
./pkg/mnc/mnc_cw_write_grid_info.F |
98 |
MNC_CW_WRITE_GRID_INFO |
& 'x cell center separation',myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
107 |
MNC_CW_DEL_GNAME |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
121 |
MNC_CW_DEL_GNAME |
CALL MNC_GET_IND(MNC_MAX_ID, name, mnc_cw_gname, indg, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
137 |
MNC_CW_DUMP |
SUBROUTINE MNC_CW_DUMP( myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
151 |
MNC_CW_DUMP |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
160 |
MNC_CW_DUMP |
_BEGIN_MASTER(myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
246 |
MNC_CW_DUMP |
_END_MASTER(myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
260 |
MNC_CW_APPEND_VNAME |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
271 |
MNC_CW_APPEND_VNAME |
integer myThid, bi_dim, bj_dim |
|
./pkg/mnc/mnc_cwrapper.F |
279 |
MNC_CW_APPEND_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
281 |
MNC_CW_APPEND_VNAME |
CALL MNC_CW_ADD_VNAME(vname, gname, bi_dim, bj_dim, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
297 |
MNC_CW_ADD_VNAME |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
316 |
MNC_CW_ADD_VNAME |
integer myThid, bi_dim, bj_dim |
|
./pkg/mnc/mnc_cwrapper.F |
333 |
MNC_CW_ADD_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
341 |
MNC_CW_ADD_VNAME |
& 'mnc_cw_vname', indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
344 |
MNC_CW_ADD_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, gname, mnc_cw_gname, indg, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
34 |
MNC_CW_ADD_GNAME |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
362 |
MNC_CW_ADD_VNAME |
CALL MNC_CW_ADD_VATTR_TEXT(vname,1,'mitgcm_grid',gname, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
375 |
MNC_CW_DEL_VNAME |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
386 |
MNC_CW_DEL_VNAME |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
394 |
MNC_CW_DEL_VNAME |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
414 |
MNC_CW_ADD_VATTR_TEXT |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
423 |
MNC_CW_ADD_VATTR_TEXT |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
431 |
MNC_CW_ADD_VATTR_TEXT |
& tname, ' ', ' ', tval, ival, dval, myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
440 |
MNC_CW_ADD_VATTR_INT |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
449 |
MNC_CW_ADD_VATTR_INT |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
456 |
MNC_CW_ADD_VATTR_INT |
& ' ', iname, ' ', ' ', ival, dval, myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
45 |
MNC_CW_ADD_GNAME |
integer myThid, ndim |
|
./pkg/mnc/mnc_cwrapper.F |
465 |
MNC_CW_ADD_VATTR_DBL |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
474 |
MNC_CW_ADD_VATTR_DBL |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
481 |
MNC_CW_ADD_VATTR_DBL |
& ' ', ' ', dname, ' ', ival, dval, myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
494 |
MNC_CW_ADD_VATTR_ANY |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
504 |
MNC_CW_ADD_VATTR_ANY |
integer myThid |
|
./pkg/mnc/mnc_cwrapper.F |
524 |
MNC_CW_ADD_VATTR_ANY |
CALL MNC_GET_IND(MNC_MAX_ID, vname, mnc_cw_vname, indv, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
544 |
MNC_CW_ADD_VATTR_ANY |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
562 |
MNC_CW_ADD_VATTR_ANY |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
608 |
MNC_CW_GET_TILE_NUM |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
622 |
MNC_CW_GET_TILE_NUM |
integer myThid, bi,bj, uniq_tnum |
|
./pkg/mnc/mnc_cwrapper.F |
62 |
MNC_CW_ADD_GNAME |
CALL MNC_GET_IND(MNC_MAX_ID, name, mnc_cw_gname, indg, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
658 |
MNC_CW_GET_FACE_NUM |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
672 |
MNC_CW_GET_FACE_NUM |
integer myThid, bi,bj, uniq_fnum |
|
./pkg/mnc/mnc_cwrapper.F |
697 |
MNC_CW_GET_XYFO |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
70 |
MNC_CW_ADD_GNAME |
& 'mnc_cw_gname', indg, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
711 |
MNC_CW_GET_XYFO |
integer myThid, bi,bj, ixoff,iyoff |
|
./pkg/mnc/mnc_cwrapper.F |
748 |
MNC_CW_FILE_AORC |
I myThid ) |
|
./pkg/mnc/mnc_cwrapper.F |
761 |
MNC_CW_FILE_AORC |
integer myThid, indf, lbi, lbj, uniq_tnum |
|
./pkg/mnc/mnc_cwrapper.F |
769 |
MNC_CW_FILE_AORC |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
775 |
MNC_CW_FILE_AORC |
CALL MNC_FILE_TRY_READ(fname, ierr, indf, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
778 |
MNC_CW_FILE_AORC |
CALL MNC_FILE_OPEN(fname, 0, indf, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
782 |
MNC_CW_FILE_AORC |
CALL MNC_CW_SET_GATTR(fname, lbi,lbj, uniq_tnum, myThid) |
|
./pkg/mnc/mnc_cwrapper.F |
96 |
MNC_CW_DEL_GNAME |
I myThid ) |
|
./pkg/mnc/mnc_dim.F |
101 |
MNC_DIM_INIT_ALL_CV |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_dim.F |
136 |
MNC_DIM_INIT_ALL_CV |
& 'mnc_d_names', indd, myThid) |
|
./pkg/mnc/mnc_dim.F |
144 |
MNC_DIM_INIT_ALL_CV |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_dim.F |
148 |
MNC_DIM_INIT_ALL_CV |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_dim.F |
154 |
MNC_DIM_INIT_ALL_CV |
& mnc_f_info(indf,2), idd, bi, bj, myThid) |
|
./pkg/mnc/mnc_dim.F |
15 |
MNC_DIM_INIT |
I myThid ) |
|
./pkg/mnc/mnc_dim.F |
177 |
MNC_DIM_UNLIM_SIZE |
I myThid ) |
|
./pkg/mnc/mnc_dim.F |
189 |
MNC_DIM_UNLIM_SIZE |
integer myThid, unlim_sz |
|
./pkg/mnc/mnc_dim.F |
203 |
MNC_DIM_UNLIM_SIZE |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_dim.F |
21 |
MNC_DIM_INIT |
integer myThid, dlen |
|
./pkg/mnc/mnc_dim.F |
221 |
MNC_DIM_UNLIM_SIZE |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_dim.F |
25 |
MNC_DIM_INIT |
CALL MNC_DIM_INIT_ALL(fname, dname, dlen, 'Y', myThid) |
|
./pkg/mnc/mnc_dim.F |
40 |
MNC_DIM_INIT_ALL |
I myThid ) |
|
./pkg/mnc/mnc_dim.F |
49 |
MNC_DIM_INIT_ALL |
integer myThid, dlen |
|
./pkg/mnc/mnc_dim.F |
54 |
MNC_DIM_INIT_ALL |
CALL MNC_DIM_INIT_ALL_CV(fname,dname,dlen,doWrite,-1,-1,myThid) |
|
./pkg/mnc/mnc_dim.F |
70 |
MNC_DIM_INIT_ALL_CV |
I myThid ) |
|
./pkg/mnc/mnc_dim.F |
82 |
MNC_DIM_INIT_ALL_CV |
integer myThid, dlen, bi,bj |
|
./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 |
204 |
CALC_SURF_DR |
_GLOBAL_SUM_RL( adjust_nb_pt , myThid ) |
|
./model/src/calc_surf_dr.F |
206 |
CALC_SURF_DR |
_GLOBAL_SUM_RL( adjust_volum , myThid ) |
|
./model/src/calc_surf_dr.F |
207 |
CALC_SURF_DR |
_BEGIN_MASTER( myThid ) |
|
./model/src/calc_surf_dr.F |
211 |
CALC_SURF_DR |
_END_MASTER( myThid ) |
|
./model/src/calc_surf_dr.F |
214 |
CALC_SURF_DR |
_EXCH_XY_RS(hFac_surfC, myThid ) |
|
./model/src/calc_surf_dr.F |
215 |
CALC_SURF_DR |
CALL EXCH_UV_XY_RS(hFac_surfW,hFac_surfS,.FALSE.,myThid) |
|
./model/src/calc_surf_dr.F |
39 |
CALC_SURF_DR |
INTEGER myThid |
|
./model/src/calc_surf_dr.F |
66 |
CALC_SURF_DR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/calc_surf_dr.F |
67 |
CALC_SURF_DR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./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_dump.F |
11 |
MNC_DUMP |
SUBROUTINE MNC_DUMP( myThid ) |
|
./pkg/mnc/mnc_dump.F |
18 |
MNC_DUMP |
INTEGER myThid |
|
./pkg/mnc/mnc_dump.F |
20 |
MNC_DUMP |
CALL MNC_DUMP_ALL(5, 20, myThid) |
|
./pkg/mnc/mnc_dump.F |
29 |
MNC_DUMP_ALL |
SUBROUTINE MNC_DUMP_ALL( n_id, n_items, myThid ) |
|
./pkg/mnc/mnc_dump.F |
39 |
MNC_DUMP_ALL |
integer n_id, n_items, myThid |
|
./pkg/mnc/mnc_file.F |
120 |
MNC_FILE_ADD_ATTR_STR |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
129 |
MNC_FILE_ADD_ATTR_STR |
integer myThid |
|
./pkg/mnc/mnc_file.F |
136 |
MNC_FILE_ADD_ATTR_STR |
& sval, 0, 0.0D0, sZero, 0, myThid ) |
|
./pkg/mnc/mnc_file.F |
13 |
MNC_FILE_CREATE |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
150 |
MNC_FILE_ADD_ATTR_DBL |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
159 |
MNC_FILE_ADD_ATTR_DBL |
integer myThid, len |
|
./pkg/mnc/mnc_file.F |
167 |
MNC_FILE_ADD_ATTR_DBL |
& ' ', len, dval, sZero, 0, myThid ) |
|
./pkg/mnc/mnc_file.F |
181 |
MNC_FILE_ADD_ATTR_REAL |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
190 |
MNC_FILE_ADD_ATTR_REAL |
integer myThid, len |
|
./pkg/mnc/mnc_file.F |
196 |
MNC_FILE_ADD_ATTR_REAL |
& ' ', len, 0.0D0, rval, 0, myThid ) |
|
./pkg/mnc/mnc_file.F |
210 |
MNC_FILE_ADD_ATTR_INT |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
219 |
MNC_FILE_ADD_ATTR_INT |
integer myThid, len, ival |
|
./pkg/mnc/mnc_file.F |
226 |
MNC_FILE_ADD_ATTR_INT |
& ' ', len, 0.0D0, sZero, ival, myThid ) |
|
./pkg/mnc/mnc_file.F |
22 |
MNC_FILE_CREATE |
integer myThid |
|
./pkg/mnc/mnc_file.F |
239 |
MNC_FILE_ADD_ATTR_ANY |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
251 |
MNC_FILE_ADD_ATTR_ANY |
integer myThid, atype, len, iv |
|
./pkg/mnc/mnc_file.F |
266 |
MNC_FILE_ADD_ATTR_ANY |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
277 |
MNC_FILE_ADD_ATTR_ANY |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_file.F |
288 |
MNC_FILE_ADD_ATTR_ANY |
& myThid) |
|
./pkg/mnc/mnc_file.F |
293 |
MNC_FILE_ADD_ATTR_ANY |
& myThid) |
|
./pkg/mnc/mnc_file.F |
298 |
MNC_FILE_ADD_ATTR_ANY |
& myThid) |
|
./pkg/mnc/mnc_file.F |
29 |
MNC_FILE_CREATE |
CALL MNC_FILE_OPEN(fname, 0, indf, myThid) |
|
./pkg/mnc/mnc_file.F |
303 |
MNC_FILE_ADD_ATTR_ANY |
& myThid) |
|
./pkg/mnc/mnc_file.F |
322 |
MNC_FILE_CLOSE |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
334 |
MNC_FILE_CLOSE |
integer myThid |
|
./pkg/mnc/mnc_file.F |
348 |
MNC_FILE_CLOSE |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_file.F |
358 |
MNC_FILE_CLOSE |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
411 |
MNC_FILE_CLOSE_ALL_MATCHING |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
423 |
MNC_FILE_CLOSE_ALL_MATCHING |
integer myThid |
|
./pkg/mnc/mnc_file.F |
438 |
MNC_FILE_CLOSE_ALL_MATCHING |
CALL MNC_FILE_CLOSE(mnc_f_names(i), myThid) |
|
./pkg/mnc/mnc_file.F |
43 |
MNC_FILE_OPEN |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
452 |
MNC_FILE_CLOSE_ALL |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
464 |
MNC_FILE_CLOSE_ALL |
integer myThid |
|
./pkg/mnc/mnc_file.F |
480 |
MNC_FILE_CLOSE_ALL |
CALL MNC_FILE_CLOSE(mnc_f_names(i), myThid) |
|
./pkg/mnc/mnc_file.F |
495 |
MNC_FILE_REDEF |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
507 |
MNC_FILE_REDEF |
integer myThid |
|
./pkg/mnc/mnc_file.F |
519 |
MNC_FILE_REDEF |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
534 |
MNC_FILE_REDEF |
& 'entering define mode in S/R MNC_FILE_REDEF', myThid) |
|
./pkg/mnc/mnc_file.F |
548 |
MNC_FILE_ENDDEF |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
55 |
MNC_FILE_OPEN |
integer myThid,indf |
|
./pkg/mnc/mnc_file.F |
560 |
MNC_FILE_ENDDEF |
integer myThid |
|
./pkg/mnc/mnc_file.F |
572 |
MNC_FILE_ENDDEF |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, ind, myThid) |
|
./pkg/mnc/mnc_file.F |
587 |
MNC_FILE_ENDDEF |
& 'ending define mode in S/R MNC_FILE_ENDDEF', myThid) |
|
./pkg/mnc/mnc_file.F |
601 |
MNC_FILE_READALL |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
612 |
MNC_FILE_READALL |
integer myThid |
|
./pkg/mnc/mnc_file.F |
625 |
MNC_FILE_READALL |
CALL MNC_FILE_TRY_READ(fname, ierr, indf, myThid) |
|
./pkg/mnc/mnc_file.F |
628 |
MNC_FILE_READALL |
CALL MNC_HANDLE_ERR(ierr, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
642 |
MNC_FILE_TRY_READ |
I myThid ) |
|
./pkg/mnc/mnc_file.F |
654 |
MNC_FILE_TRY_READ |
integer myThid, ierr, indf |
|
./pkg/mnc/mnc_file.F |
679 |
MNC_FILE_TRY_READ |
& 'mnc_f_names', indf, myThid) |
|
./pkg/mnc/mnc_file.F |
687 |
MNC_FILE_TRY_READ |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
695 |
MNC_FILE_TRY_READ |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
702 |
MNC_FILE_TRY_READ |
CALL MNC_DIM_INIT_ALL(fname,name(ns:ne),dlen,'N', myThid) |
|
./pkg/mnc/mnc_file.F |
70 |
MNC_FILE_OPEN |
CALL MNC_GET_IND(MNC_MAX_FID, fname,mnc_f_names,indf,myThid) |
|
./pkg/mnc/mnc_file.F |
722 |
MNC_FILE_TRY_READ |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
732 |
MNC_FILE_TRY_READ |
CALL MNC_GRID_INIT_ALL(fname, name, ndv, dnames, indg, myThid) |
|
./pkg/mnc/mnc_file.F |
736 |
MNC_FILE_TRY_READ |
& 'mnc_v_names', indv,myThid) |
|
./pkg/mnc/mnc_file.F |
83 |
MNC_FILE_OPEN |
CALL MNC_HANDLE_ERR(err, msgbuf, myThid) |
|
./pkg/mnc/mnc_file.F |
88 |
MNC_FILE_OPEN |
CALL MNC_FILE_READALL(fname, myThid) |
|
./pkg/mnc/mnc_file.F |
99 |
MNC_FILE_OPEN |
& 'mnc_f_names', indf, myThid) |
|
./pkg/mnc/mnc_grid.F |
116 |
MNC_GRID_INIT_ALL |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_grid.F |
169 |
MNC_GRID_INIT_ALL |
& 'mnc_g_names', indg, myThid) |
|
./pkg/mnc/mnc_grid.F |
16 |
MNC_GRID_INIT |
I myThid ) |
|
./pkg/mnc/mnc_grid.F |
226 |
MNC_GRID_GET_DIMIND |
I myThid ) |
|
./pkg/mnc/mnc_grid.F |
236 |
MNC_GRID_GET_DIMIND |
integer indf, ind_fg_ids, myThid |
|
./pkg/mnc/mnc_grid.F |
25 |
MNC_GRID_INIT |
integer myThid, ndim |
|
./pkg/mnc/mnc_grid.F |
33 |
MNC_GRID_INIT |
CALL MNC_GRID_INIT_ALL(fname, gname, ndim, dnames, ind, myThid) |
|
./pkg/mnc/mnc_grid.F |
49 |
MNC_GRID_INIT_ALL |
I myThid ) |
|
./pkg/mnc/mnc_grid.F |
66 |
MNC_GRID_INIT_ALL |
integer myThid, ndim, ind |
|
./pkg/mnc/mnc_grid.F |
88 |
MNC_GRID_INIT_ALL |
CALL MNC_GET_IND(MNC_MAX_FID,file_name,mnc_f_names,indf,myThid) |
|
./pkg/mnc/mnc_init.F |
11 |
MNC_INIT |
SUBROUTINE MNC_INIT( myThid ) |
|
./pkg/mnc/mnc_init.F |
26 |
MNC_INIT |
integer myThid |
|
./pkg/mnc/mnc_readparms.F |
129 |
MNC_READPARMS |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/mnc/mnc_readparms.F |
132 |
MNC_READPARMS |
& ku, myThid ) |
|
./pkg/mnc/mnc_readparms.F |
142 |
MNC_READPARMS |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/mnc/mnc_readparms.F |
16 |
MNC_READPARMS |
SUBROUTINE MNC_READPARMS( myThid ) |
|
./pkg/mnc/mnc_readparms.F |
171 |
MNC_READPARMS |
CALL MNC_SET_OUTDIR(myThid) |
|
./pkg/mnc/mnc_readparms.F |
188 |
MNC_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mnc/mnc_readparms.F |
194 |
MNC_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mnc/mnc_readparms.F |
200 |
MNC_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/mnc/mnc_readparms.F |
211 |
MNC_SET_OUTDIR |
SUBROUTINE MNC_SET_OUTDIR( myThid ) |
|
./pkg/mnc/mnc_readparms.F |
225 |
MNC_SET_OUTDIR |
integer myThid |
|
./pkg/mnc/mnc_readparms.F |
33 |
MNC_READPARMS |
INTEGER myThid |
|
./pkg/mnc/mnc_readparms.F |
58 |
MNC_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/mnc/mnc_readparms.F |
62 |
MNC_READPARMS |
_END_MASTER(myThid) |
|
./pkg/mnc/mnc_readparms.F |
71 |
MNC_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/mnc/mnc_readparms.F |
75 |
MNC_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mnc/mnc_readparms.F |
79 |
MNC_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/mnc/mnc_readparms.F |
81 |
MNC_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/mnc/mnc_update_time.F |
12 |
MNC_UPDATE_TIME |
I myTime, myIter, myThid ) |
|
./pkg/mnc/mnc_update_time.F |
29 |
MNC_UPDATE_TIME |
INTEGER myThid |
|
./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 ) |
|
./pkg/mnc/mnc_utils.F |
107 |
MNC_GET_IND |
CALL PRINT_ERROR(msgbuf(1:lenm), myThid) |
|
./pkg/mnc/mnc_utils.F |
136 |
MNC_GET_NEXT_EMPTY_IND |
I myThid ) |
|
./pkg/mnc/mnc_utils.F |
146 |
MNC_GET_NEXT_EMPTY_IND |
integer myThid, nt |
|
./pkg/mnc/mnc_utils.F |
172 |
MNC_GET_NEXT_EMPTY_IND |
CALL PRINT_ERROR( msgbuf, myThid ) |
|
./pkg/mnc/mnc_utils.F |
177 |
MNC_GET_NEXT_EMPTY_IND |
CALL PRINT_ERROR( msgbuf, myThid ) |
|
./pkg/mnc/mnc_utils.F |
194 |
MNC_GET_FVINDS |
I myThid ) |
|
./pkg/mnc/mnc_utils.F |
205 |
MNC_GET_FVINDS |
INTEGER myThid, fid, indf, ind_fv_ids |
|
./pkg/mnc/mnc_utils.F |
20 |
MNC_HANDLE_ERR |
SUBROUTINE MNC_HANDLE_ERR( status, msg, myThid ) |
|
./pkg/mnc/mnc_utils.F |
220 |
MNC_GET_FVINDS |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_utils.F |
262 |
MNC_CHK_VTYP_R_NCVAR |
I myThid ) |
|
./pkg/mnc/mnc_utils.F |
269 |
MNC_CHK_VTYP_R_NCVAR |
INTEGER myThid, ind_vt, indf, ind_fv_ids, indu, ires |
|
./pkg/mnc/mnc_utils.F |
302 |
MNC_CHK_VTYP_R_NCVAR |
CALL PRINT_ERROR(msgbuf, myThid) |
|
./pkg/mnc/mnc_utils.F |
315 |
MNC_CHK_VTYP_R_NCVAR |
CALL PRINT_ERROR(msgbuf, myThid) |
|
./pkg/mnc/mnc_utils.F |
35 |
MNC_HANDLE_ERR |
INTEGER myThid, status |
|
./pkg/mnc/mnc_utils.F |
79 |
MNC_GET_IND |
I myThid ) |
|
./pkg/mnc/mnc_utils.F |
89 |
MNC_GET_IND |
integer myThid, nt |
|
./pkg/mnc/mnc_var.F |
104 |
MNC_VAR_INIT_INT |
INTEGER irv,myThid |
|
./pkg/mnc/mnc_var.F |
107 |
MNC_VAR_INIT_INT |
CALL MNC_VAR_INIT_ANY( fname,gname,vname, NF_INT, irv,myThid ) |
|
./pkg/mnc/mnc_var.F |
123 |
MNC_VAR_INIT_ANY |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
137 |
MNC_VAR_INIT_ANY |
INTEGER irv,myThid |
|
./pkg/mnc/mnc_var.F |
157 |
MNC_VAR_INIT_ANY |
CALL MNC_GET_IND(MNC_MAX_FID, fname, mnc_f_names, indf, myThid) |
|
./pkg/mnc/mnc_var.F |
162 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
173 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
182 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
204 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
218 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
231 |
MNC_VAR_INIT_ANY |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_var.F |
236 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mnc/mnc_var.F |
239 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mnc/mnc_var.F |
242 |
MNC_VAR_INIT_ANY |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mnc/mnc_var.F |
245 |
MNC_VAR_INIT_ANY |
CALL MNC_HANDLE_ERR(err, msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
250 |
MNC_VAR_INIT_ANY |
& indv, myThid) |
|
./pkg/mnc/mnc_var.F |
272 |
MNC_VAR_ADD_ATTR_STR |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
282 |
MNC_VAR_ADD_ATTR_STR |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
292 |
MNC_VAR_ADD_ATTR_STR |
& 1, sval, 0, dZero, sZero, iZero, myThid ) |
|
./pkg/mnc/mnc_var.F |
307 |
MNC_VAR_ADD_ATTR_DBL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
319 |
MNC_VAR_ADD_ATTR_DBL |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
327 |
MNC_VAR_ADD_ATTR_DBL |
& 2, ' ', nv, dval, sZero, iZero, myThid ) |
|
./pkg/mnc/mnc_var.F |
343 |
MNC_VAR_ADD_ATTR_REAL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
355 |
MNC_VAR_ADD_ATTR_REAL |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
35 |
MNC_VAR_INIT_DBL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
363 |
MNC_VAR_ADD_ATTR_REAL |
& 3, ' ', nv, dZero, rval, iZero, myThid ) |
|
./pkg/mnc/mnc_var.F |
378 |
MNC_VAR_ADD_ATTR_INT |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
390 |
MNC_VAR_ADD_ATTR_INT |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
398 |
MNC_VAR_ADD_ATTR_INT |
& 4, ' ', nv, dZero, sZero, ival, myThid ) |
|
./pkg/mnc/mnc_var.F |
413 |
MNC_VAR_ADD_ATTR_ANY |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
432 |
MNC_VAR_ADD_ATTR_ANY |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
450 |
MNC_VAR_ADD_ATTR_ANY |
CALL MNC_GET_FVINDS(fname, vname, indf, ind_fv_ids, myThid) |
|
./pkg/mnc/mnc_var.F |
455 |
MNC_VAR_ADD_ATTR_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
462 |
MNC_VAR_ADD_ATTR_ANY |
CALL MNC_FILE_REDEF(fname, myThid) |
|
./pkg/mnc/mnc_var.F |
46 |
MNC_VAR_INIT_DBL |
INTEGER irv,myThid |
|
./pkg/mnc/mnc_var.F |
475 |
MNC_VAR_ADD_ATTR_ANY |
CALL PRINT_ERROR(msgBuf(1:n), myThid) |
|
./pkg/mnc/mnc_var.F |
480 |
MNC_VAR_ADD_ATTR_ANY |
CALL MNC_HANDLE_ERR(err, msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
491 |
MNC_VAR_WRITE_DBL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
497 |
MNC_VAR_WRITE_DBL |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
49 |
MNC_VAR_INIT_DBL |
CALL MNC_VAR_INIT_ANY( fname,gname,vname, NF_DOUBLE, irv,myThid ) |
|
./pkg/mnc/mnc_var.F |
507 |
MNC_VAR_WRITE_DBL |
& var, dummyR4, dummyI, myThid ) |
|
./pkg/mnc/mnc_var.F |
518 |
MNC_VAR_WRITE_REAL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
524 |
MNC_VAR_WRITE_REAL |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
534 |
MNC_VAR_WRITE_REAL |
& dummyR8, var, dummyI, myThid ) |
|
./pkg/mnc/mnc_var.F |
545 |
MNC_VAR_WRITE_INT |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
551 |
MNC_VAR_WRITE_INT |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
561 |
MNC_VAR_WRITE_INT |
& dummyR8, dummyR4, var, myThid ) |
|
./pkg/mnc/mnc_var.F |
573 |
MNC_VAR_APPEND_DBL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
579 |
MNC_VAR_APPEND_DBL |
INTEGER append, myThid |
|
./pkg/mnc/mnc_var.F |
589 |
MNC_VAR_APPEND_DBL |
& var, dummyR4, dummyI, myThid ) |
|
./pkg/mnc/mnc_var.F |
601 |
MNC_VAR_APPEND_REAL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
607 |
MNC_VAR_APPEND_REAL |
INTEGER append, myThid |
|
./pkg/mnc/mnc_var.F |
617 |
MNC_VAR_APPEND_REAL |
& dummyR8, var, dummyI, myThid ) |
|
./pkg/mnc/mnc_var.F |
629 |
MNC_VAR_APPEND_INT |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
635 |
MNC_VAR_APPEND_INT |
INTEGER append, myThid |
|
./pkg/mnc/mnc_var.F |
645 |
MNC_VAR_APPEND_INT |
& dummyR8, dummyR4, var, myThid ) |
|
./pkg/mnc/mnc_var.F |
64 |
MNC_VAR_INIT_REAL |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
660 |
MNC_VAR_WRITE_ANY |
I myThid ) |
|
./pkg/mnc/mnc_var.F |
674 |
MNC_VAR_WRITE_ANY |
INTEGER myThid |
|
./pkg/mnc/mnc_var.F |
689 |
MNC_VAR_WRITE_ANY |
CALL MNC_GET_FVINDS(fname, vname, indf, ind_fv_ids, myThid) |
|
./pkg/mnc/mnc_var.F |
694 |
MNC_VAR_WRITE_ANY |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
717 |
MNC_VAR_WRITE_ANY |
CALL MNC_HANDLE_ERR(err, msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
726 |
MNC_VAR_WRITE_ANY |
CALL MNC_FILE_ENDDEF(fname, myThid) |
|
./pkg/mnc/mnc_var.F |
737 |
MNC_VAR_WRITE_ANY |
CALL PRINT_ERROR(msgBuf(1:n), myThid) |
|
./pkg/mnc/mnc_var.F |
742 |
MNC_VAR_WRITE_ANY |
CALL MNC_HANDLE_ERR(err, msgBuf, myThid) |
|
./pkg/mnc/mnc_var.F |
75 |
MNC_VAR_INIT_REAL |
INTEGER irv,myThid |
|
./pkg/mnc/mnc_var.F |
78 |
MNC_VAR_INIT_REAL |
CALL MNC_VAR_INIT_ANY( fname,gname,vname, NF_FLOAT, irv,myThid ) |
|
./pkg/mnc/mnc_var.F |
93 |
MNC_VAR_INIT_INT |
I myThid ) |
|
./model/src/calc_viscosity.F |
107 |
CALC_VISCOSITY |
I myThid) |
|
./model/src/calc_viscosity.F |
13 |
CALC_VISCOSITY |
I myThid ) |
|
./model/src/calc_viscosity.F |
42 |
CALC_VISCOSITY |
INTEGER myThid |
|
./model/src/calc_viscosity.F |
71 |
CALC_VISCOSITY |
I myThid) |
|
./model/src/calc_viscosity.F |
80 |
CALC_VISCOSITY |
I myThid) |
|
./model/src/calc_viscosity.F |
89 |
CALC_VISCOSITY |
I myThid) |
|
./model/src/calc_viscosity.F |
98 |
CALC_VISCOSITY |
I myThid) |
|
./pkg/mom_common/mom_calc_3d_strain.F |
13 |
MOM_CALC_3D_STRAIN |
I bi, bj, myThid ) |
|
./pkg/mom_common/mom_calc_3d_strain.F |
32 |
MOM_CALC_3D_STRAIN |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_absvort3.F |
10 |
MOM_CALC_ABSVORT3 |
I myThid) |
|
./pkg/mom_common/mom_calc_absvort3.F |
27 |
MOM_CALC_ABSVORT3 |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_hdiv.F |
10 |
MOM_CALC_HDIV |
I myThid ) |
|
./pkg/mom_common/mom_calc_hdiv.F |
28 |
MOM_CALC_HDIV |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_hfacz.F |
16 |
MOM_CALC_HFACZ |
I myThid ) |
|
./pkg/mom_common/mom_calc_hfacz.F |
44 |
MOM_CALC_HFACZ |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_hfacz.F |
87 |
MOM_CALC_HFACZ |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_common/mom_calc_hfacz.F |
88 |
MOM_CALC_HFACZ |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/mom_common/mom_calc_hfacz.F |
89 |
MOM_CALC_HFACZ |
act2 = bj - myByLo(myThid) |
|
./pkg/mom_common/mom_calc_hfacz.F |
90 |
MOM_CALC_HFACZ |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/mom_common/mom_calc_hfacz.F |
91 |
MOM_CALC_HFACZ |
act3 = myThid - 1 |
|
./pkg/mom_common/mom_calc_ke.F |
14 |
MOM_CALC_KE |
I myThid) |
|
./pkg/mom_common/mom_calc_ke.F |
39 |
MOM_CALC_KE |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_relvort3.F |
11 |
MOM_CALC_RELVORT3 |
I myThid ) |
|
./pkg/mom_common/mom_calc_relvort3.F |
34 |
MOM_CALC_RELVORT3 |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_smag_3d.F |
16 |
MOM_CALC_SMAG_3D |
I k, bi, bj, myThid ) |
|
./pkg/mom_common/mom_calc_smag_3d.F |
58 |
MOM_CALC_SMAG_3D |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_strain.F |
14 |
MOM_CALC_STRAIN |
I myThid ) |
|
./pkg/mom_common/mom_calc_strain.F |
42 |
MOM_CALC_STRAIN |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_tension.F |
14 |
MOM_CALC_TENSION |
I myThid ) |
|
./pkg/mom_common/mom_calc_tension.F |
38 |
MOM_CALC_TENSION |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_visc.F |
102 |
MOM_CALC_VISC |
INTEGER myThid |
|
./pkg/mom_common/mom_calc_visc.F |
148 |
MOM_CALC_VISC |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
149 |
MOM_CALC_VISC |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/mom_common/mom_calc_visc.F |
150 |
MOM_CALC_VISC |
act2 = bj - myByLo(myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
151 |
MOM_CALC_VISC |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/mom_common/mom_calc_visc.F |
152 |
MOM_CALC_VISC |
act3 = myThid - 1 |
|
./pkg/mom_common/mom_calc_visc.F |
18 |
MOM_CALC_VISC |
I myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
264 |
MOM_CALC_VISC |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_common/mom_calc_visc.F |
277 |
MOM_CALC_VISC |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_common/mom_calc_visc.F |
593 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_D,'VISCAHD ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
594 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_D,'VISCA4D ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
595 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_Z,'VISCAHZ ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
596 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_Z,'VISCA4Z ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
598 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_DMax,'VAHDMAX ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
599 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_DMax,'VA4DMAX ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
600 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_ZMax,'VAHZMAX ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
601 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_ZMax,'VA4ZMAX ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
603 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_DMin,'VAHDMIN ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
604 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_DMin,'VA4DMIN ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
605 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_ZMin,'VAHZMIN ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
606 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_ZMin,'VA4ZMIN ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
608 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_DLth,'VAHDLTH ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
609 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_DLth,'VA4DLTH ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
610 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_ZLth,'VAHZLTH ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
611 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_ZLth,'VA4ZLTH ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
614 |
MOM_CALC_VISC |
& k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
616 |
MOM_CALC_VISC |
& k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
618 |
MOM_CALC_VISC |
& k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
620 |
MOM_CALC_VISC |
& k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
622 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_DSmg,'VAHDSMAG',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
623 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_DSmg,'VA4DSMAG',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
624 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscAh_ZSmg,'VAHZSMAG',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_calc_visc.F |
625 |
MOM_CALC_VISC |
CALL DIAGNOSTICS_FILL(viscA4_ZSmg,'VA4ZSMAG',k,1,2,bi,bj,myThid) |
|
./model/src/calc_wsurf_tr.F |
102 |
CALC_WSURF_TR |
_END_MASTER( myThid ) |
|
./model/src/calc_wsurf_tr.F |
10 |
CALC_WSURF_TR |
I myTime, myIter, myThid ) |
|
./model/src/calc_wsurf_tr.F |
42 |
CALC_WSURF_TR |
INTEGER myThid |
|
./model/src/calc_wsurf_tr.F |
64 |
CALC_WSURF_TR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/calc_wsurf_tr.F |
65 |
CALC_WSURF_TR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/calc_wsurf_tr.F |
94 |
CALC_WSURF_TR |
CALL GLOBAL_SUM_TILE_RL( wT_Tile, wT_Mean, myThid ) |
|
./model/src/calc_wsurf_tr.F |
95 |
CALC_WSURF_TR |
CALL GLOBAL_SUM_TILE_RL( wS_Tile, wS_Mean, myThid ) |
|
./model/src/calc_wsurf_tr.F |
99 |
CALC_WSURF_TR |
_BEGIN_MASTER( myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
101 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
108 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
115 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
122 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
129 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
136 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
143 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
150 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
157 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
164 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
171 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
178 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
185 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
192 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
199 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
206 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
213 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
220 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
227 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
236 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
244 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
251 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
258 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
25 |
MOM_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/mom_common/mom_diagnostics_init.F |
265 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
276 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
282 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
288 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
294 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
301 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
307 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
314 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
320 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
327 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
333 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
340 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
346 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
353 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
359 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
367 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
373 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
381 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
388 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
403 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
409 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
415 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
432 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
438 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
444 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
460 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
466 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
472 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
488 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
494 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
500 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
507 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
516 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
522 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
528 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
52 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
535 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
59 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
66 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
73 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
80 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
87 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
94 |
MOM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mom_common/mom_diagnostics_init.F |
9 |
MOM_DIAGNOSTICS_INIT |
SUBROUTINE MOM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/mom_common/mom_hdissip.F |
12 |
MOM_HDISSIP |
I myThid ) |
|
./pkg/mom_common/mom_hdissip.F |
38 |
MOM_HDISSIP |
INTEGER myThid |
|
./pkg/mom_common/mom_init_fixed.F |
11 |
MOM_INIT_FIXED |
SUBROUTINE MOM_INIT_FIXED( myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
143 |
MOM_INIT_FIXED |
CALL READ_FLD_XYZ_RL(viscAhDfile,' ',viscAhDfld,0,myThid) |
|
./pkg/mom_common/mom_init_fixed.F |
144 |
MOM_INIT_FIXED |
CALL EXCH_3D_RL( viscAhDfld, Nr, myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
147 |
MOM_INIT_FIXED |
CALL READ_FLD_XYZ_RL(viscAhZfile,' ',viscAhZfld,0,myThid) |
|
./pkg/mom_common/mom_init_fixed.F |
148 |
MOM_INIT_FIXED |
CALL EXCH_Z_3D_RL( viscAhZfld, Nr, myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
153 |
MOM_INIT_FIXED |
CALL READ_FLD_XYZ_RL(viscA4Dfile,' ',viscA4Dfld,0,myThid) |
|
./pkg/mom_common/mom_init_fixed.F |
154 |
MOM_INIT_FIXED |
CALL EXCH_3D_RL( viscA4Dfld, Nr, myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
157 |
MOM_INIT_FIXED |
CALL READ_FLD_XYZ_RL(viscA4Zfile,' ',viscA4Zfld,0,myThid) |
|
./pkg/mom_common/mom_init_fixed.F |
158 |
MOM_INIT_FIXED |
CALL EXCH_Z_3D_RL( viscA4Zfld, Nr, myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
164 |
MOM_INIT_FIXED |
CALL MOM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/mom_common/mom_init_fixed.F |
28 |
MOM_INIT_FIXED |
INTEGER myThid |
|
./pkg/mom_common/mom_init_fixed.F |
42 |
MOM_INIT_FIXED |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/mom_common/mom_init_fixed.F |
43 |
MOM_INIT_FIXED |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
14 |
MOM_QUASIHYDROSTATIC |
I myThid ) |
|
./pkg/mom_common/mom_quasihydrostatic.F |
41 |
MOM_QUASIHYDROSTATIC |
INTEGER myThid |
|
./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_bottomdrag.F |
17 |
MOM_U_BOTTOMDRAG |
I myThid ) |
|
./pkg/mom_common/mom_u_bottomdrag.F |
195 |
MOM_U_BOTTOMDRAG |
CALL DIAGNOSTICS_FILL(uDragTerms,'UBotDrag',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_u_bottomdrag.F |
48 |
MOM_U_BOTTOMDRAG |
INTEGER myThid |
|
./pkg/mom_common/mom_u_coriolis_nh.F |
13 |
MOM_U_CORIOLIS_NH |
I myThid ) |
|
./pkg/mom_common/mom_u_coriolis_nh.F |
36 |
MOM_U_CORIOLIS_NH |
INTEGER 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 |
245 |
MOM_U_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/mom_common/mom_u_implicit_r.F |
276 |
MOM_U_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/mom_common/mom_u_implicit_r.F |
285 |
MOM_U_IMPLICIT_R |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./pkg/mom_common/mom_u_implicit_r.F |
306 |
MOM_U_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(vf,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/mom_common/mom_u_implicit_r.F |
35 |
MOM_U_IMPLICIT_R |
INTEGER myIter, myThid |
|
./pkg/mom_common/mom_u_metric_nh.F |
14 |
MOM_U_METRIC_NH |
I myThid ) |
|
./pkg/mom_common/mom_u_metric_nh.F |
38 |
MOM_U_METRIC_NH |
INTEGER myThid |
|
./pkg/mom_common/mom_u_rviscflux.F |
14 |
MOM_U_RVISCFLUX |
I myThid) |
|
./pkg/mom_common/mom_u_rviscflux.F |
39 |
MOM_U_RVISCFLUX |
INTEGER myThid |
|
./model/src/cg2d.F |
117 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
118 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
130 |
CG2D |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg2d.F |
133 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
134 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
147 |
CG2D |
CALL EXCH_XY_RL( cg2d_x, myThid ) |
|
./model/src/cg2d.F |
150 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
151 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
189 |
CG2D |
CALL EXCH_S3D_RL( cg2d_r, 1, myThid ) |
|
./model/src/cg2d.F |
191 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL(localBuf, err_sq, 0, 0, myThid) |
|
./model/src/cg2d.F |
192 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL(cg2d_b, sumRHS, OLx, OLy, myThid) |
|
./model/src/cg2d.F |
194 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d.F |
195 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg2d.F |
206 |
CG2D |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg2d.F |
20 |
CG2D |
I myThid ) |
|
./model/src/cg2d.F |
210 |
CG2D |
_END_MASTER( myThid ) |
|
./model/src/cg2d.F |
220 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
221 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
250 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL( localBuf,eta_qrN,0,0,myThid ) |
|
./model/src/cg2d.F |
252 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg2d.F |
261 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
262 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
273 |
CG2D |
CALL EXCH_S3D_RL( cg2d_s, 1, myThid ) |
|
./model/src/cg2d.F |
277 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
278 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
302 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL(localBuf, alpha, 0, 0, myThid) |
|
./model/src/cg2d.F |
304 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( alphaTile, alpha, myThid ) |
|
./model/src/cg2d.F |
314 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
315 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
334 |
CG2D |
CALL GLOBAL_SUM_SINGLECPU_RL(localBuf, err_sq, 0, 0, myThid) |
|
./model/src/cg2d.F |
336 |
CG2D |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d.F |
343 |
CG2D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg2d.F |
351 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
352 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
362 |
CG2D |
CALL EXCH_S3D_RL( cg2d_r, 1, myThid ) |
|
./model/src/cg2d.F |
369 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
370 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
382 |
CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d.F |
383 |
CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d.F |
73 |
CG2D |
INTEGER myThid |
|
./pkg/mom_common/mom_u_sidedrag.F |
152 |
MOM_U_SIDEDRAG |
CALL DIAGNOSTICS_FILL(uDragTerms,'USidDrag',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_u_sidedrag.F |
16 |
MOM_U_SIDEDRAG |
I myThid ) |
|
./pkg/mom_common/mom_u_sidedrag.F |
46 |
MOM_U_SIDEDRAG |
INTEGER myThid |
|
./pkg/mom_common/mom_uv_smag_3d.F |
17 |
MOM_UV_SMAG_3D |
I iMin,iMax,jMin,jMax, k, bi, bj, myThid ) |
|
./pkg/mom_common/mom_uv_smag_3d.F |
45 |
MOM_UV_SMAG_3D |
INTEGER 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_bottomdrag.F |
17 |
MOM_V_BOTTOMDRAG |
I myThid ) |
|
./pkg/mom_common/mom_v_bottomdrag.F |
195 |
MOM_V_BOTTOMDRAG |
CALL DIAGNOSTICS_FILL(vDragTerms,'VBotDrag',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_v_bottomdrag.F |
48 |
MOM_V_BOTTOMDRAG |
INTEGER myThid |
|
./pkg/mom_common/mom_v_coriolis_nh.F |
13 |
MOM_V_CORIOLIS_NH |
I myThid ) |
|
./pkg/mom_common/mom_v_coriolis_nh.F |
36 |
MOM_V_CORIOLIS_NH |
INTEGER 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 |
245 |
MOM_V_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/mom_common/mom_v_implicit_r.F |
276 |
MOM_V_IMPLICIT_R |
I bi, bj, myThid ) |
|
./pkg/mom_common/mom_v_implicit_r.F |
285 |
MOM_V_IMPLICIT_R |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./pkg/mom_common/mom_v_implicit_r.F |
306 |
MOM_V_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(vf,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/mom_common/mom_v_implicit_r.F |
35 |
MOM_V_IMPLICIT_R |
INTEGER myIter, myThid |
|
./pkg/mom_common/mom_v_metric_nh.F |
14 |
MOM_V_METRIC_NH |
I myThid ) |
|
./pkg/mom_common/mom_v_metric_nh.F |
38 |
MOM_V_METRIC_NH |
INTEGER myThid |
|
./pkg/mom_common/mom_v_rviscflux.F |
14 |
MOM_V_RVISCFLUX |
I myThid) |
|
./pkg/mom_common/mom_v_rviscflux.F |
39 |
MOM_V_RVISCFLUX |
INTEGER myThid |
|
./pkg/mom_common/mom_v_sidedrag.F |
139 |
MOM_V_SIDEDRAG |
CALL DIAGNOSTICS_FILL(vDragTerms,'VSidDrag',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_v_sidedrag.F |
16 |
MOM_V_SIDEDRAG |
I myThid ) |
|
./pkg/mom_common/mom_v_sidedrag.F |
46 |
MOM_V_SIDEDRAG |
INTEGER myThid |
|
./pkg/mom_common/mom_w_coriolis_nh.F |
14 |
MOM_W_CORIOLIS_NH |
I myThid ) |
|
./pkg/mom_common/mom_w_coriolis_nh.F |
38 |
MOM_W_CORIOLIS_NH |
INTEGER myThid |
|
./model/src/cg2d_ex0.F |
106 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
107 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
134 |
CG2D_EX0 |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg2d_ex0.F |
137 |
CG2D_EX0 |
CALL EXCH_XY_RL( cg2d_x, myThid ) |
|
./model/src/cg2d_ex0.F |
142 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
143 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
183 |
CG2D_EX0 |
CALL EXCH_S3D_RL( cg2d_r, 1, myThid ) |
|
./model/src/cg2d_ex0.F |
184 |
CG2D_EX0 |
_GLOBAL_MAX_RL( err_sq, myThid ) |
|
./model/src/cg2d_ex0.F |
185 |
CG2D_EX0 |
_GLOBAL_MAX_RL( sumRHS, myThid ) |
|
./model/src/cg2d_ex0.F |
190 |
CG2D_EX0 |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg2d_ex0.F |
194 |
CG2D_EX0 |
_END_MASTER( myThid ) |
|
./model/src/cg2d_ex0.F |
204 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
205 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
20 |
CG2D_EX0 |
I myThid ) |
|
./model/src/cg2d_ex0.F |
241 |
CG2D_EX0 |
I EXCH_IGNORE_CORNERS, bi, bj, myThid ) |
|
./model/src/cg2d_ex0.F |
281 |
CG2D_EX0 |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg2d_ex0.F |
299 |
CG2D_EX0 |
I EXCH_IGNORE_CORNERS, bi, bj, myThid ) |
|
./model/src/cg2d_ex0.F |
314 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
315 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
331 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
332 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
345 |
CG2D_EX0 |
_GLOBAL_MAX_RL( err_sq, myThid ) |
|
./model/src/cg2d_ex0.F |
349 |
CG2D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_ex0.F |
350 |
CG2D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_ex0.F |
358 |
CG2D_EX0 |
_GLOBAL_MAX_RL( alpha, myThid ) |
|
./model/src/cg2d_ex0.F |
361 |
CG2D_EX0 |
_GLOBAL_MAX_RL( alpha, myThid ) |
|
./model/src/cg2d_ex0.F |
364 |
CG2D_EX0 |
_GLOBAL_MAX_RL( alpha, myThid ) |
|
./model/src/cg2d_ex0.F |
65 |
CG2D_EX0 |
INTEGER myThid |
|
./pkg/mom_common/mom_w_metric_nh.F |
14 |
MOM_W_METRIC_NH |
I myThid ) |
|
./pkg/mom_common/mom_w_metric_nh.F |
38 |
MOM_W_METRIC_NH |
INTEGER myThid |
|
./pkg/mom_common/mom_w_sidedrag.F |
136 |
MOM_W_SIDEDRAG |
CALL DIAGNOSTICS_FILL(gwSideDrag,'WSidDrag',k,1,2,bi,bj,myThid) |
|
./pkg/mom_common/mom_w_sidedrag.F |
16 |
MOM_W_SIDEDRAG |
I myThid) |
|
./pkg/mom_common/mom_w_sidedrag.F |
49 |
MOM_W_SIDEDRAG |
INTEGER myThid |
|
./pkg/mom_common/mom_w_smag_3d.F |
16 |
MOM_W_SMAG_3D |
I iMin,iMax,jMin,jMax, k, bi, bj, myThid ) |
|
./pkg/mom_common/mom_w_smag_3d.F |
48 |
MOM_W_SMAG_3D |
INTEGER 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 |
183 |
MOM_FLUXFORM |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
184 |
MOM_FLUXFORM |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/mom_fluxform/mom_fluxform.F |
185 |
MOM_FLUXFORM |
act2 = bj - myByLo(myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
186 |
MOM_FLUXFORM |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/mom_fluxform/mom_fluxform.F |
187 |
MOM_FLUXFORM |
act3 = myThid - 1 |
|
./pkg/mom_fluxform/mom_fluxform.F |
265 |
MOM_FLUXFORM |
CALL MOM_CALC_HFACZ( bi,bj,k,hFacZ,r_hFacZ,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
308 |
MOM_FLUXFORM |
CALL MOM_CALC_KE( bi,bj,k,2,uFld,vFld,KE,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
310 |
MOM_FLUXFORM |
CALL MOM_CALC_HDIV( bi,bj,k,2,uFld,vFld,hDiv,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
311 |
MOM_FLUXFORM |
CALL MOM_CALC_RELVORT3( bi,bj,k,uFld,vFld,hFacZ,vort3,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
312 |
MOM_FLUXFORM |
CALL MOM_CALC_TENSION( bi,bj,k,uFld,vFld,tension,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
313 |
MOM_FLUXFORM |
CALL MOM_CALC_STRAIN( bi,bj,k,uFld,vFld,hFacZ,strain,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
324 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(hDiv, 'momHDiv ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
325 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(vort3, 'momVort3',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
326 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(tension,'Tension ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
327 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(strain, 'Strain ',k,1,2,bi,bj,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 |
363 |
MOM_FLUXFORM |
O fVerUkm, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
366 |
MOM_FLUXFORM |
O fVerVkm, 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 |
401 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
414 |
MOM_FLUXFORM |
O fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
416 |
MOM_FLUXFORM |
O fMer,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
419 |
MOM_FLUXFORM |
O fVerUkp, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
423 |
MOM_FLUXFORM |
CALL MOM_U_ADV_UU( bi,bj,k,uTrans,uFld,fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
427 |
MOM_FLUXFORM |
CALL MOM_U_ADV_VU( bi,bj,k,vTrans,uFld,fMer,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
433 |
MOM_FLUXFORM |
O fVerUkp, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
456 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Um ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
457 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fMer, 'ADVy_Um ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
458 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fVerUkm,'ADVrE_Um',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
46 |
MOM_FLUXFORM |
I myTime, myIter, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
516 |
MOM_FLUXFORM |
O v4f, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
520 |
MOM_FLUXFORM |
I viscAh_D,viscA4_D,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
524 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
528 |
MOM_FLUXFORM |
CALL MOM_U_RVISCFLUX( bi,bj, k, uVel,kappaRU,fVrUp,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
529 |
MOM_FLUXFORM |
CALL MOM_U_RVISCFLUX( bi,bj,k+1,uVel,kappaRU,fVrDw,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
554 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fZon, 'VISCx_Um',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
555 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fMer, 'VISCy_Um',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
557 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(fVrUp,'VISrE_Um',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
569 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
581 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
594 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
615 |
MOM_FLUXFORM |
CALL MOM_U_METRIC_NH( bi,bj,k,uFld,wVel,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
624 |
MOM_FLUXFORM |
CALL MOM_U_METRIC_SPHERE( bi,bj,k,uFld,vFld,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
633 |
MOM_FLUXFORM |
CALL MOM_U_METRIC_CYLINDER( bi,bj,k,uFld,vFld,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
649 |
MOM_FLUXFORM |
O fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
651 |
MOM_FLUXFORM |
O fMer,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
653 |
MOM_FLUXFORM |
O fVerVkp, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
657 |
MOM_FLUXFORM |
CALL MOM_V_ADV_UV( bi,bj,k,uTrans,vFld,fZon,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
661 |
MOM_FLUXFORM |
CALL MOM_V_ADV_VV( bi,bj,k,vTrans,vFld,fMer,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
666 |
MOM_FLUXFORM |
O fVerVkp, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
689 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fZon, 'ADVx_Vm ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
690 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL( fMer, 'ADVy_Vm ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
691 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fVerVkm,'ADVrE_Vm',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
748 |
MOM_FLUXFORM |
O v4f, myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
752 |
MOM_FLUXFORM |
I viscAh_Z,viscA4_Z,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
756 |
MOM_FLUXFORM |
I viscAh_D,viscA4_D,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
760 |
MOM_FLUXFORM |
CALL MOM_V_RVISCFLUX( bi,bj, k, vVel,KappaRV,fVrUp,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
761 |
MOM_FLUXFORM |
CALL MOM_V_RVISCFLUX( bi,bj,k+1,vVel,KappaRV,fVrDw,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
786 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fZon, 'VISCx_Vm',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
787 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(fMer, 'VISCy_Vm',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
789 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(fVrUp,'VISrE_Vm',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
801 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
813 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
826 |
MOM_FLUXFORM |
I myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
847 |
MOM_FLUXFORM |
CALL MOM_V_METRIC_NH( bi,bj,k,vFld,wVel,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
856 |
MOM_FLUXFORM |
CALL MOM_V_METRIC_SPHERE( bi,bj,k,uFld,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
865 |
MOM_FLUXFORM |
CALL MOM_V_METRIC_CYLINDER( bi,bj,k,uFld,vFld,mT,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
877 |
MOM_FLUXFORM |
CALL MOM_U_CORIOLIS( bi,bj,k,vFld,cf,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
885 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(cf,'Um_Cori ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
887 |
MOM_FLUXFORM |
CALL MOM_V_CORIOLIS( bi,bj,k,uFld,cf,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
895 |
MOM_FLUXFORM |
& CALL DIAGNOSTICS_FILL(cf,'Vm_Cori ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
901 |
MOM_FLUXFORM |
CALL MOM_U_CORIOLIS_NH( bi,bj,k,wVel,cf,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
909 |
MOM_FLUXFORM |
CALL MOM_V_CORIOLIS_NH( bi,bj,k,wVel,cf,myThid ) |
|
./pkg/mom_fluxform/mom_fluxform.F |
930 |
MOM_FLUXFORM |
CALL DIAGNOSTICS_FILL(KE, 'momKE ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
932 |
MOM_FLUXFORM |
& 'Um_Advec',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
934 |
MOM_FLUXFORM |
& 'Vm_Advec',k,1,2,bi,bj,myThid) |
|
./pkg/mom_fluxform/mom_fluxform.F |
98 |
MOM_FLUXFORM |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_adv_uu.F |
14 |
MOM_U_ADV_UU |
I myThid) |
|
./pkg/mom_fluxform/mom_u_adv_uu.F |
38 |
MOM_U_ADV_UU |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_adv_vu.F |
14 |
MOM_U_ADV_VU |
I myThid) |
|
./pkg/mom_fluxform/mom_u_adv_vu.F |
38 |
MOM_U_ADV_VU |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_adv_wu.F |
14 |
MOM_U_ADV_WU |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_adv_wu.F |
40 |
MOM_U_ADV_WU |
INTEGER myThid |
|
./model/src/cg2d_nsa.F |
119 |
CG2D_NSA |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/cg2d_nsa.F |
124 |
CG2D_NSA |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/cg2d_nsa.F |
127 |
CG2D_NSA |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/cg2d_nsa.F |
133 |
CG2D_NSA |
act1 = myThid - 1 |
|
./model/src/cg2d_nsa.F |
147 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
148 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
161 |
CG2D_NSA |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg2d_nsa.F |
164 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
165 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
179 |
CG2D_NSA |
CALL EXCH_XY_RL( cg2d_x, myThid ) |
|
./model/src/cg2d_nsa.F |
186 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
187 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
19 |
CG2D_NSA |
I myThid ) |
|
./model/src/cg2d_nsa.F |
213 |
CG2D_NSA |
CALL EXCH_XY_RL ( cg2d_r, myThid ) |
|
./model/src/cg2d_nsa.F |
214 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d_nsa.F |
215 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg2d_nsa.F |
225 |
CG2D_NSA |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg2d_nsa.F |
229 |
CG2D_NSA |
_END_MASTER( myThid ) |
|
./model/src/cg2d_nsa.F |
256 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
257 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
274 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg2d_nsa.F |
286 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
287 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
300 |
CG2D_NSA |
CALL EXCH_XY_RL ( cg2d_s, myThid ) |
|
./model/src/cg2d_nsa.F |
309 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
310 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
326 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( alphaTile, alphaSum, myThid ) |
|
./model/src/cg2d_nsa.F |
336 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
337 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
351 |
CG2D_NSA |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d_nsa.F |
357 |
CG2D_NSA |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg2d_nsa.F |
362 |
CG2D_NSA |
CALL EXCH_XY_RL ( cg2d_r, myThid ) |
|
./model/src/cg2d_nsa.F |
371 |
CG2D_NSA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_nsa.F |
372 |
CG2D_NSA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_nsa.F |
80 |
CG2D_NSA |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_coriolis.F |
13 |
MOM_U_CORIOLIS |
I myThid) |
|
./pkg/mom_fluxform/mom_u_coriolis.F |
36 |
MOM_U_CORIOLIS |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_del2u.F |
14 |
MOM_U_DEL2U |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_del2u.F |
38 |
MOM_U_DEL2U |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_metric_cylinder.F |
14 |
MOM_U_METRIC_CYLINDER |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_metric_cylinder.F |
38 |
MOM_U_METRIC_CYLINDER |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_metric_sphere.F |
14 |
MOM_U_METRIC_SPHERE |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_metric_sphere.F |
38 |
MOM_U_METRIC_SPHERE |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_xviscflux.F |
15 |
MOM_U_XVISCFLUX |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_xviscflux.F |
42 |
MOM_U_XVISCFLUX |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
15 |
MOM_U_YVISCFLUX |
I myThid ) |
|
./pkg/mom_fluxform/mom_u_yviscflux.F |
43 |
MOM_U_YVISCFLUX |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_uv_boundary.F |
14 |
MOM_UV_BOUNDARY |
I myTime, myIter, myThid ) |
|
./pkg/mom_fluxform/mom_uv_boundary.F |
43 |
MOM_UV_BOUNDARY |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_adv_uv.F |
14 |
MOM_V_ADV_UV |
I myThid) |
|
./pkg/mom_fluxform/mom_v_adv_uv.F |
38 |
MOM_V_ADV_UV |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_adv_vv.F |
14 |
MOM_V_ADV_VV |
I myThid) |
|
./pkg/mom_fluxform/mom_v_adv_vv.F |
38 |
MOM_V_ADV_VV |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_adv_wv.F |
15 |
MOM_V_ADV_WV |
I myThid) |
|
./pkg/mom_fluxform/mom_v_adv_wv.F |
41 |
MOM_V_ADV_WV |
INTEGER myThid |
|
./model/src/cg2d_sr.F |
122 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
123 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
135 |
CG2D_SR |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg2d_sr.F |
138 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
139 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
152 |
CG2D_SR |
CALL EXCH_XY_RL( cg2d_x, myThid ) |
|
./model/src/cg2d_sr.F |
155 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
156 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
191 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_r, 1, myThid ) |
|
./model/src/cg2d_sr.F |
193 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg2d_sr.F |
194 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d_sr.F |
206 |
CG2D_SR |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg2d_sr.F |
20 |
CG2D_SR |
I myThid ) |
|
./model/src/cg2d_sr.F |
210 |
CG2D_SR |
_END_MASTER( myThid ) |
|
./model/src/cg2d_sr.F |
218 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
219 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
240 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_s, 1, myThid ) |
|
./model/src/cg2d_sr.F |
241 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg2d_sr.F |
247 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
248 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
268 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( alphaTile, alpha, myThid ) |
|
./model/src/cg2d_sr.F |
274 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
275 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
286 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_r,1, myThid ) |
|
./model/src/cg2d_sr.F |
295 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
296 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
313 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_y, 1, myThid ) |
|
./model/src/cg2d_sr.F |
319 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
320 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
352 |
CG2D_SR |
CALL GLOBAL_VEC_SUM_R8( 3, 3, sumPhi, myThid ) |
|
./model/src/cg2d_sr.F |
363 |
CG2D_SR |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg2d_sr.F |
371 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
372 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
388 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
389 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
406 |
CG2D_SR |
CALL EXCH_S3D_RL( cg2d_r, 1, myThid ) |
|
./model/src/cg2d_sr.F |
409 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
410 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
420 |
CG2D_SR |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg2d_sr.F |
425 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
426 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
438 |
CG2D_SR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg2d_sr.F |
439 |
CG2D_SR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg2d_sr.F |
77 |
CG2D_SR |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_coriolis.F |
13 |
MOM_V_CORIOLIS |
I myThid) |
|
./pkg/mom_fluxform/mom_v_coriolis.F |
36 |
MOM_V_CORIOLIS |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_del2v.F |
14 |
MOM_V_DEL2V |
I myThid ) |
|
./pkg/mom_fluxform/mom_v_del2v.F |
38 |
MOM_V_DEL2V |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_metric_cylinder.F |
14 |
MOM_V_METRIC_CYLINDER |
I myThid ) |
|
./pkg/mom_fluxform/mom_v_metric_cylinder.F |
38 |
MOM_V_METRIC_CYLINDER |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_metric_sphere.F |
14 |
MOM_V_METRIC_SPHERE |
I myThid ) |
|
./pkg/mom_fluxform/mom_v_metric_sphere.F |
36 |
MOM_V_METRIC_SPHERE |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
15 |
MOM_V_XVISCFLUX |
I myThid ) |
|
./pkg/mom_fluxform/mom_v_xviscflux.F |
43 |
MOM_V_XVISCFLUX |
INTEGER myThid |
|
./pkg/mom_fluxform/mom_v_yviscflux.F |
15 |
MOM_V_YVISCFLUX |
I myThid ) |
|
./pkg/mom_fluxform/mom_v_yviscflux.F |
42 |
MOM_V_YVISCFLUX |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vecinv.F |
150 |
MOM_VECINV |
act1 = bi - myBxLo(myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
151 |
MOM_VECINV |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/mom_vecinv/mom_vecinv.F |
152 |
MOM_VECINV |
act2 = bj - myByLo(myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
153 |
MOM_VECINV |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/mom_vecinv/mom_vecinv.F |
154 |
MOM_VECINV |
act3 = myThid - 1 |
|
./pkg/mom_vecinv/mom_vecinv.F |
174 |
MOM_VECINV |
CALL MNC_CW_SET_UDIM('mom_vi', -1, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
175 |
MOM_VECINV |
CALL MNC_CW_RL_W_S('D','mom_vi',0,0,'T',myTime,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
176 |
MOM_VECINV |
CALL MNC_CW_SET_UDIM('mom_vi', 0, myThid) |
|
./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 |
242 |
MOM_VECINV |
CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
271 |
MOM_VECINV |
CALL MOM_CALC_KE(bi,bj,k,selectKEscheme,uFld,vFld,KE,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
273 |
MOM_VECINV |
CALL MOM_CALC_RELVORT3(bi,bj,k,uFld,vFld,hFacZ,vort3,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
330 |
MOM_VECINV |
CALL MOM_CALC_HDIV(bi,bj,k,2,uFld,vFld,hDiv,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
333 |
MOM_VECINV |
CALL MOM_CALC_TENSION( bi,bj,k,uFld,vFld,tension,myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
334 |
MOM_VECINV |
CALL MOM_CALC_STRAIN( bi,bj,k,uFld,vFld,hFacZ,strain,myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
372 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
399 |
MOM_VECINV |
I myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
406 |
MOM_VECINV |
CALL MOM_CALC_HDIV(bi,bj,k,2,del2u,del2v,dStar,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
408 |
MOM_VECINV |
& del2u,del2v,hFacZ,zStar,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
432 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
440 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
448 |
MOM_VECINV |
CALL MOM_U_RVISCFLUX(bi,bj,k+1,uVel,kappaRU,vrF,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
482 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
495 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
507 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
521 |
MOM_VECINV |
CALL MOM_V_RVISCFLUX(bi,bj,k+1,vVel,kappaRV,vrF,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
553 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
566 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
578 |
MOM_VECINV |
I myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
598 |
MOM_VECINV |
& CALL MOM_CALC_ABSVORT3(bi,bj,k,vort3,omega3,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
615 |
MOM_VECINV |
& uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
618 |
MOM_VECINV |
& vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
621 |
MOM_VECINV |
& uCf,vCf,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 |
637 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
639 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
645 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(uCf,'Um_Cori ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
646 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(vCf,'Vm_Cori ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
672 |
MOM_VECINV |
& uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
677 |
MOM_VECINV |
& uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
681 |
MOM_VECINV |
& uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
685 |
MOM_VECINV |
& uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
697 |
MOM_VECINV |
& vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
702 |
MOM_VECINV |
& vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
706 |
MOM_VECINV |
& vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
710 |
MOM_VECINV |
& vCf,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 |
733 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
735 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
743 |
MOM_VECINV |
& Nr, k, bi, bj, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
745 |
MOM_VECINV |
& Nr, k, bi, bj, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
750 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(uCf,'Um_AdvZ3',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
751 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(vCf,'Vm_AdvZ3',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
757 |
MOM_VECINV |
CALL MOM_VI_U_VERTSHEAR(bi,bj,k,uVel,wVel,uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
763 |
MOM_VECINV |
CALL MOM_VI_V_VERTSHEAR(bi,bj,k,vVel,wVel,vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
771 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(uCf,'Um_AdvRe',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
772 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(vCf,'Vm_AdvRe',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
778 |
MOM_VECINV |
CALL MOM_VI_U_GRAD_KE(bi,bj,k,KE,uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
784 |
MOM_VECINV |
CALL MOM_VI_V_GRAD_KE(bi,bj,k,KE,vCf,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 |
798 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
800 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
810 |
MOM_VECINV |
CALL MOM_U_CORIOLIS_NH(bi,bj,k,wVel,uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
818 |
MOM_VECINV |
CALL MOM_V_CORIOLIS_NH(bi,bj,k,wVel,vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
829 |
MOM_VECINV |
CALL MOM_U_METRIC_NH(bi,bj,k,uFld,wVel,uCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
835 |
MOM_VECINV |
CALL MOM_V_METRIC_NH(bi,bj,k,vFld,wVel,vCf,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
857 |
MOM_VECINV |
& guDiss,gvDiss, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/mom_vecinv/mom_vecinv.F |
85 |
MOM_VECINV |
INTEGER myThid |
|
./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) |
|
./pkg/mom_vecinv/mom_vecinv.F |
886 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
888 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
890 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
892 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
894 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
896 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
898 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
900 |
MOM_VECINV |
& offsets, myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
907 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(vort3BC,'momVort3',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
908 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(KE, 'momKE ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
910 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(hDiv, 'momHDiv ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
913 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(tension, 'Tension ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
914 |
MOM_VECINV |
CALL DIAGNOSTICS_FILL(strainBC,'Strain ',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
917 |
MOM_VECINV |
& 'Um_Advec',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vecinv.F |
919 |
MOM_VECINV |
& 'Vm_Advec',k,1,2,bi,bj,myThid) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
10 |
MOM_VI_CORIOLIS |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_coriolis.F |
31 |
MOM_VI_CORIOLIS |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
10 |
MOM_VI_DEL2UV |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
110 |
MOM_VI_DEL2UV |
& hDiv, bi,bj, myThid ) |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
28 |
MOM_VI_DEL2UV |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_del2uv.F |
85 |
MOM_VI_DEL2UV |
& hDiv, bi,bj, myThid ) |
|
./model/src/cg3d.F |
138 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
139 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
151 |
CG3D |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg3d.F |
154 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
155 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
168 |
CG3D |
_EXCH_XYZ_RL( cg3d_x, myThid ) |
|
./model/src/cg3d.F |
171 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
172 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
20 |
CG3D |
I myIter, myThid ) |
|
./model/src/cg3d.F |
239 |
CG3D |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d.F |
240 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./model/src/cg3d.F |
241 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg3d.F |
244 |
CG3D |
I 'cg3d_r_I', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d.F |
252 |
CG3D |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg3d.F |
256 |
CG3D |
_END_MASTER( myThid ) |
|
./model/src/cg3d.F |
270 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
271 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
331 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./model/src/cg3d.F |
339 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
340 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
354 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
355 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
471 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( alphaTile, alpha, myThid ) |
|
./model/src/cg3d.F |
480 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
481 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
502 |
CG3D |
CALL GLOBAL_SUM_TILE_RL( errTile, err_sq, myThid ) |
|
./model/src/cg3d.F |
508 |
CG3D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg3d.F |
512 |
CG3D |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d.F |
519 |
CG3D |
I 'cg3d_r_F', 'I10', 1, Nr, cg3d_r, myIter, myThid ) |
|
./model/src/cg3d.F |
523 |
CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d.F |
524 |
CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d.F |
75 |
CG3D |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
12 |
MOM_VI_HDISSIP |
I myThid ) |
|
./pkg/mom_vecinv/mom_vi_hdissip.F |
39 |
MOM_VI_HDISSIP |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
14 |
MOM_VI_U_CORIOLIS |
I myThid ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
184 |
MOM_VI_U_CORIOLIS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis.F |
42 |
MOM_VI_U_CORIOLIS |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
14 |
MOM_VI_U_CORIOLIS_C4 |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
212 |
MOM_VI_U_CORIOLIS_C4 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F |
45 |
MOM_VI_U_CORIOLIS_C4 |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_u_grad_ke.F |
10 |
MOM_VI_U_GRAD_KE |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_u_grad_ke.F |
26 |
MOM_VI_U_GRAD_KE |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
10 |
MOM_VI_U_VERTSHEAR |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_u_vertshear.F |
28 |
MOM_VI_U_VERTSHEAR |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
14 |
MOM_VI_V_CORIOLIS |
I myThid ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
184 |
MOM_VI_V_CORIOLIS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis.F |
42 |
MOM_VI_V_CORIOLIS |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
14 |
MOM_VI_V_CORIOLIS_C4 |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
212 |
MOM_VI_V_CORIOLIS_C4 |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F |
45 |
MOM_VI_V_CORIOLIS_C4 |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_v_grad_ke.F |
10 |
MOM_VI_V_GRAD_KE |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_v_grad_ke.F |
26 |
MOM_VI_V_GRAD_KE |
INTEGER myThid |
|
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
10 |
MOM_VI_V_VERTSHEAR |
I myThid) |
|
./pkg/mom_vecinv/mom_vi_v_vertshear.F |
28 |
MOM_VI_V_VERTSHEAR |
INTEGER myThid |
|
./model/src/cg3d_ex0.F |
127 |
CG3D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d_ex0.F |
128 |
CG3D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d_ex0.F |
156 |
CG3D_EX0 |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./model/src/cg3d_ex0.F |
159 |
CG3D_EX0 |
_EXCH_XYZ_RL( cg3d_x, myThid ) |
|
./model/src/cg3d_ex0.F |
164 |
CG3D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d_ex0.F |
165 |
CG3D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d_ex0.F |
20 |
CG3D_EX0 |
I myIter, myThid ) |
|
./model/src/cg3d_ex0.F |
234 |
CG3D_EX0 |
CALL EXCH_S3D_RL( cg3d_r, Nr, myThid ) |
|
./model/src/cg3d_ex0.F |
235 |
CG3D_EX0 |
_GLOBAL_MAX_RL( err_sq, myThid ) |
|
./model/src/cg3d_ex0.F |
236 |
CG3D_EX0 |
_GLOBAL_MAX_RL( sumRHS, 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 |
245 |
CG3D_EX0 |
_BEGIN_MASTER( myThid ) |
|
./model/src/cg3d_ex0.F |
249 |
CG3D_EX0 |
_END_MASTER( myThid ) |
|
./model/src/cg3d_ex0.F |
259 |
CG3D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d_ex0.F |
260 |
CG3D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d_ex0.F |
480 |
CG3D_EX0 |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/cg3d_ex0.F |
487 |
CG3D_EX0 |
I EXCH_IGNORE_CORNERS, bi, bj, 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 |
507 |
CG3D_EX0 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/cg3d_ex0.F |
508 |
CG3D_EX0 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/cg3d_ex0.F |
522 |
CG3D_EX0 |
_GLOBAL_MAX_RL( err_sq, myThid ) |
|
./model/src/cg3d_ex0.F |
525 |
CG3D_EX0 |
_GLOBAL_MAX_RL( alpha, myThid ) |
|
./model/src/cg3d_ex0.F |
67 |
CG3D_EX0 |
INTEGER myThid |
|
./pkg/monitor/mon_advcfl.F |
13 |
MON_ADVCFL |
I myThid ) |
|
./pkg/monitor/mon_advcfl.F |
29 |
MON_ADVCFL |
INTEGER myThid |
|
./pkg/monitor/mon_advcfl.F |
38 |
MON_ADVCFL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_advcfl.F |
39 |
MON_ADVCFL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_advcfl.F |
50 |
MON_ADVCFL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_advcfl.F |
52 |
MON_ADVCFL |
CALL MON_OUT_RL( label, theMax, mon_foot_max ,myThid) |
|
./pkg/monitor/mon_advcflw.F |
13 |
MON_ADVCFLW |
I myThid ) |
|
./pkg/monitor/mon_advcflw.F |
29 |
MON_ADVCFLW |
INTEGER myThid |
|
./pkg/monitor/mon_advcflw.F |
38 |
MON_ADVCFLW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_advcflw.F |
39 |
MON_ADVCFLW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_advcflw.F |
50 |
MON_ADVCFLW |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_advcflw.F |
52 |
MON_ADVCFLW |
CALL MON_OUT_RL( label, theMax, mon_foot_max ,myThid) |
|
./pkg/monitor/mon_advcflw2.F |
13 |
MON_ADVCFLW2 |
I myThid ) |
|
./pkg/monitor/mon_advcflw2.F |
31 |
MON_ADVCFLW2 |
INTEGER myThid |
|
./pkg/monitor/mon_advcflw2.F |
40 |
MON_ADVCFLW2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_advcflw2.F |
41 |
MON_ADVCFLW2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_advcflw2.F |
54 |
MON_ADVCFLW2 |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_advcflw2.F |
56 |
MON_ADVCFLW2 |
CALL MON_OUT_RL( label, theMax, mon_foot_max ,myThid) |
|
./pkg/monitor/mon_calc_advcfl.F |
131 |
MON_CALC_ADVCFL_GLOB |
I maxCFL, myIter, myThid ) |
|
./pkg/monitor/mon_calc_advcfl.F |
150 |
MON_CALC_ADVCFL_GLOB |
INTEGER myThid |
|
./pkg/monitor/mon_calc_advcfl.F |
160 |
MON_CALC_ADVCFL_GLOB |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_calc_advcfl.F |
161 |
MON_CALC_ADVCFL_GLOB |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_calc_advcfl.F |
167 |
MON_CALC_ADVCFL_GLOB |
_GLOBAL_MAX_RL( uCFL, myThid ) |
|
./pkg/monitor/mon_calc_advcfl.F |
168 |
MON_CALC_ADVCFL_GLOB |
_GLOBAL_MAX_RL( vCFL, myThid ) |
|
./pkg/monitor/mon_calc_advcfl.F |
169 |
MON_CALC_ADVCFL_GLOB |
_GLOBAL_MAX_RL( wCFL, myThid ) |
|
./pkg/monitor/mon_calc_advcfl.F |
172 |
MON_CALC_ADVCFL_GLOB |
_BEGIN_MASTER(myThid) |
|
./pkg/monitor/mon_calc_advcfl.F |
176 |
MON_CALC_ADVCFL_GLOB |
_END_MASTER(myThid) |
|
./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_calc_stats_rl.F |
114 |
MON_CALC_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileNbPt, theNbPt, myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
115 |
MON_CALC_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileDel2, theDel2, myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
116 |
MON_CALC_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileVol , theVol , myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
117 |
MON_CALC_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
130 |
MON_CALC_STATS_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/monitor/mon_calc_stats_rl.F |
133 |
MON_CALC_STATS_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_calc_stats_rl.F |
135 |
MON_CALC_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rl.F |
136 |
MON_CALC_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rl.F |
14 |
MON_CALC_STATS_RL |
I myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
154 |
MON_CALC_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/monitor/mon_calc_stats_rl.F |
32 |
MON_CALC_STATS_RL |
INTEGER myThid |
|
./pkg/monitor/mon_calc_stats_rl.F |
61 |
MON_CALC_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rl.F |
62 |
MON_CALC_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
114 |
MON_CALC_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileNbPt, theNbPt, myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
115 |
MON_CALC_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileDel2, theDel2, myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
116 |
MON_CALC_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileVol , theVol , myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
117 |
MON_CALC_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
130 |
MON_CALC_STATS_RS |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
133 |
MON_CALC_STATS_RS |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
135 |
MON_CALC_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
136 |
MON_CALC_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
14 |
MON_CALC_STATS_RS |
I myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
154 |
MON_CALC_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/monitor/mon_calc_stats_rs.F |
32 |
MON_CALC_STATS_RS |
INTEGER myThid |
|
./pkg/monitor/mon_calc_stats_rs.F |
61 |
MON_CALC_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_calc_stats_rs.F |
62 |
MON_CALC_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_init.F |
11 |
MON_INIT |
SUBROUTINE MON_INIT( myThid ) |
|
./pkg/monitor/mon_init.F |
24 |
MON_INIT |
INTEGER myThid |
|
./pkg/monitor/mon_init.F |
36 |
MON_INIT |
CALL MON_SET_IOUNIT( standardMessageUnit, myThid ) |
|
./pkg/monitor/mon_init.F |
37 |
MON_INIT |
CALL MON_SET_PREF ( mon_string_none , myThid ) |
|
./pkg/monitor/mon_init.F |
39 |
MON_INIT |
_BEGIN_MASTER(myThid) |
|
./pkg/monitor/mon_init.F |
53 |
MON_INIT |
_END_MASTER(myThid) |
|
./pkg/monitor/mon_ke.F |
12 |
MON_KE |
I myIter, myThid ) |
|
./pkg/monitor/mon_ke.F |
156 |
MON_KE |
_GLOBAL_SUM_RL(numPnts,myThid) |
|
./pkg/monitor/mon_ke.F |
157 |
MON_KE |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_ke.F |
158 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean , myThid ) |
|
./pkg/monitor/mon_ke.F |
159 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tileVol , theVol , myThid ) |
|
./pkg/monitor/mon_ke.F |
160 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tileVlAv, theVolMean, myThid ) |
|
./pkg/monitor/mon_ke.F |
161 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tilePEav, potEnMean , myThid ) |
|
./pkg/monitor/mon_ke.F |
170 |
MON_KE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_ke.F |
171 |
MON_KE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_ke.F |
29 |
MON_KE |
INTEGER myIter, myThid |
|
./pkg/monitor/mon_ke.F |
312 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tileAMu , totAMu, myThid ) |
|
./pkg/monitor/mon_ke.F |
313 |
MON_KE |
CALL GLOBAL_SUM_TILE_RL( tileAMs , totAMs, myThid ) |
|
./pkg/monitor/mon_ke.F |
316 |
MON_KE |
CALL MON_SET_PREF('am',myThid) |
|
./pkg/monitor/mon_ke.F |
322 |
MON_KE |
& '_eta_mean', myThid ) |
|
./pkg/monitor/mon_ke.F |
324 |
MON_KE |
& '_uZo_mean', myThid ) |
|
./pkg/monitor/mon_ke.F |
327 |
MON_KE |
& '_tot_mean', myThid ) |
|
./pkg/monitor/mon_ke.F |
332 |
MON_KE |
CALL MON_SET_PREF('pe_b',myThid) |
|
./pkg/monitor/mon_ke.F |
334 |
MON_KE |
& mon_foot_mean,myThid) |
|
./pkg/monitor/mon_ke.F |
337 |
MON_KE |
CALL MON_SET_PREF('ke',myThid) |
|
./pkg/monitor/mon_ke.F |
338 |
MON_KE |
CALL MON_OUT_RL(mon_string_none,theMax,mon_foot_max,myThid) |
|
./pkg/monitor/mon_ke.F |
341 |
MON_KE |
& mon_foot_mean,myThid) |
|
./pkg/monitor/mon_ke.F |
343 |
MON_KE |
& mon_foot_vol,myThid) |
|
./pkg/monitor/mon_ke.F |
64 |
MON_KE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_ke.F |
65 |
MON_KE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_out.F |
109 |
MON_OUT_ALL |
INTEGER myThid |
|
./pkg/monitor/mon_out.F |
11 |
MON_OUT_I |
SUBROUTINE MON_OUT_I( pref, value, foot, myThid ) |
|
./pkg/monitor/mon_out.F |
130 |
MON_OUT_ALL |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/mon_out.F |
216 |
MON_OUT_ALL |
& mon_vname, '-_-_--__-__t', 0,0, myThid) |
|
./pkg/monitor/mon_out.F |
219 |
MON_OUT_ALL |
& 'I',mon_fname,1,1,mon_vname, ivarr, myThid) |
|
./pkg/monitor/mon_out.F |
222 |
MON_OUT_ALL |
& 'D',mon_fname,1,1,mon_vname, dvarr, myThid) |
|
./pkg/monitor/mon_out.F |
23 |
MON_OUT_I |
INTEGER myThid |
|
./pkg/monitor/mon_out.F |
26 |
MON_OUT_I |
CALL MON_OUT_ALL(pref, foot, 1, value, 0.0d0, myThid) |
|
./pkg/monitor/mon_out.F |
35 |
MON_OUT_RS |
SUBROUTINE MON_OUT_RS( pref, value, foot, myThid ) |
|
./pkg/monitor/mon_out.F |
47 |
MON_OUT_RS |
INTEGER myThid |
|
./pkg/monitor/mon_out.F |
52 |
MON_OUT_RS |
CALL MON_OUT_ALL(pref, foot, 2, 0, dtmp, myThid) |
|
./pkg/monitor/mon_out.F |
61 |
MON_OUT_RL |
SUBROUTINE MON_OUT_RL( pref, value, foot, myThid ) |
|
./pkg/monitor/mon_out.F |
73 |
MON_OUT_RL |
INTEGER myThid |
|
./pkg/monitor/mon_out.F |
78 |
MON_OUT_RL |
CALL MON_OUT_ALL(pref, foot, 2, 0, dtmp, myThid) |
|
./pkg/monitor/mon_out.F |
90 |
MON_OUT_ALL |
I myThid ) |
|
./model/src/check_pickup.F |
100 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
113 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
123 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
129 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
136 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
143 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
149 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
14 |
CHECK_PICKUP |
I myIter, myThid ) |
|
./model/src/check_pickup.F |
161 |
CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/check_pickup.F |
171 |
CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/check_pickup.F |
203 |
CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/check_pickup.F |
213 |
CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/check_pickup.F |
218 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
226 |
CHECK_PICKUP |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
230 |
CHECK_PICKUP |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
236 |
CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./model/src/check_pickup.F |
41 |
CHECK_PICKUP |
INTEGER myThid |
|
./model/src/check_pickup.F |
58 |
CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./model/src/check_pickup.F |
73 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/check_pickup.F |
91 |
CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/monitor/mon_printstats_rl.F |
14 |
MON_PRINTSTATS_RL |
I myThid ) |
|
./pkg/monitor/mon_printstats_rl.F |
34 |
MON_PRINTSTATS_RL |
INTEGER myThid |
|
./pkg/monitor/mon_printstats_rl.F |
47 |
MON_PRINTSTATS_RL |
I myThid ) |
|
./pkg/monitor/mon_printstats_rl.F |
49 |
MON_PRINTSTATS_RL |
CALL MON_OUT_RL( arrName, theMax, mon_foot_max ,myThid) |
|
./pkg/monitor/mon_printstats_rl.F |
50 |
MON_PRINTSTATS_RL |
CALL MON_OUT_RL( arrName, theMin, mon_foot_min ,myThid) |
|
./pkg/monitor/mon_printstats_rl.F |
51 |
MON_PRINTSTATS_RL |
CALL MON_OUT_RL( arrName, theMean, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_printstats_rl.F |
52 |
MON_PRINTSTATS_RL |
CALL MON_OUT_RL( arrName, theSD, mon_foot_sd ,myThid) |
|
./pkg/monitor/mon_printstats_rl.F |
53 |
MON_PRINTSTATS_RL |
CALL MON_OUT_RL( arrName, theDel2, mon_foot_del2 ,myThid) |
|
./pkg/monitor/mon_printstats_rs.F |
13 |
MON_PRINTSTATS_RS |
I myThid ) |
|
./pkg/monitor/mon_printstats_rs.F |
29 |
MON_PRINTSTATS_RS |
INTEGER myThid |
|
./pkg/monitor/mon_printstats_rs.F |
41 |
MON_PRINTSTATS_RS |
I myThid ) |
|
./pkg/monitor/mon_printstats_rs.F |
43 |
MON_PRINTSTATS_RS |
CALL MON_OUT_RL( arrName, theMax, mon_foot_max ,myThid) |
|
./pkg/monitor/mon_printstats_rs.F |
44 |
MON_PRINTSTATS_RS |
CALL MON_OUT_RL( arrName, theMin, mon_foot_min ,myThid) |
|
./pkg/monitor/mon_printstats_rs.F |
45 |
MON_PRINTSTATS_RS |
CALL MON_OUT_RL( arrName, theMean, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_printstats_rs.F |
46 |
MON_PRINTSTATS_RS |
CALL MON_OUT_RL( arrName, theSD, mon_foot_sd ,myThid) |
|
./pkg/monitor/mon_set_iounit.F |
11 |
MON_SET_IOUNIT |
SUBROUTINE MON_SET_IOUNIT( monUnit, myThid ) |
|
./pkg/monitor/mon_set_iounit.F |
26 |
MON_SET_IOUNIT |
INTEGER myThid |
|
./pkg/monitor/mon_set_iounit.F |
30 |
MON_SET_IOUNIT |
CALL BAR2( myThid ) |
|
./pkg/monitor/mon_set_iounit.F |
33 |
MON_SET_IOUNIT |
_BEGIN_MASTER(myThid) |
|
./pkg/monitor/mon_set_iounit.F |
35 |
MON_SET_IOUNIT |
_END_MASTER(myThid) |
|
./pkg/monitor/mon_set_iounit.F |
38 |
MON_SET_IOUNIT |
CALL BAR2( myThid ) |
|
./pkg/monitor/mon_set_pref.F |
11 |
MON_SET_PREF |
SUBROUTINE MON_SET_PREF( prefString, myThid ) |
|
./pkg/monitor/mon_set_pref.F |
28 |
MON_SET_PREF |
INTEGER myThid |
|
./pkg/monitor/mon_set_pref.F |
38 |
MON_SET_PREF |
CALL BAR2( myThid ) |
|
./pkg/monitor/mon_set_pref.F |
41 |
MON_SET_PREF |
_BEGIN_MASTER(myThid) |
|
./pkg/monitor/mon_set_pref.F |
50 |
MON_SET_PREF |
_END_MASTER(myThid) |
|
./pkg/monitor/mon_set_pref.F |
53 |
MON_SET_PREF |
CALL BAR2( myThid ) |
|
./pkg/monitor/mon_solution.F |
13 |
MON_SOLUTION |
I myTime, myIter, myThid ) |
|
./pkg/monitor/mon_solution.F |
31 |
MON_SOLUTION |
INTEGER myThid |
|
./pkg/monitor/mon_solution.F |
47 |
MON_SOLUTION |
I myThid ) |
|
./pkg/monitor/mon_solution.F |
51 |
MON_SOLUTION |
_BEGIN_MASTER(myThid) |
|
./pkg/monitor/mon_solution.F |
54 |
MON_SOLUTION |
CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/monitor/mon_solution.F |
57 |
MON_SOLUTION |
CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/monitor/mon_solution.F |
60 |
MON_SOLUTION |
CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/monitor/mon_solution.F |
61 |
MON_SOLUTION |
_END_MASTER(myThid) |
|
./pkg/monitor/mon_solution.F |
63 |
MON_SOLUTION |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
125 |
MON_STATS_LATBND_RL |
CALL GLOBAL_SUM_TILE_RL( tileVol(1,1,n) , theVol(n) , myThid ) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
126 |
MON_STATS_LATBND_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean(1,1,n), theMean(n), myThid ) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
127 |
MON_STATS_LATBND_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar(1,1,n) , theVar(n) , myThid ) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
137 |
MON_STATS_LATBND_RL |
_GLOBAL_MAX_RL(theMin(n), myThid) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
140 |
MON_STATS_LATBND_RL |
_GLOBAL_MAX_RL(theMax(n), myThid) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
15 |
MON_STATS_LATBND_RL |
I myThid ) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
45 |
MON_STATS_LATBND_RL |
INTEGER myThid |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
67 |
MON_STATS_LATBND_RL |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
70 |
MON_STATS_LATBND_RL |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
91 |
MON_STATS_LATBND_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_stats_latbnd_rl.F |
92 |
MON_STATS_LATBND_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_stats_rl.F |
107 |
MON_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileDel2, theDel2, myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
108 |
MON_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileVol , theVol , myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
109 |
MON_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
110 |
MON_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
112 |
MON_STATS_RL |
_GLOBAL_SUM_RL(tmpVal,myThid) |
|
./pkg/monitor/mon_stats_rl.F |
125 |
MON_STATS_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/monitor/mon_stats_rl.F |
128 |
MON_STATS_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_stats_rl.F |
130 |
MON_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_stats_rl.F |
131 |
MON_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_stats_rl.F |
14 |
MON_STATS_RL |
I myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
151 |
MON_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/monitor/mon_stats_rl.F |
31 |
MON_STATS_RL |
INTEGER myThid |
|
./pkg/monitor/mon_stats_rl.F |
61 |
MON_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_stats_rl.F |
62 |
MON_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_stats_rs.F |
116 |
MON_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/monitor/mon_stats_rs.F |
14 |
MON_STATS_RS |
I myThid ) |
|
./pkg/monitor/mon_stats_rs.F |
28 |
MON_STATS_RS |
INTEGER myThid |
|
./pkg/monitor/mon_stats_rs.F |
49 |
MON_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_stats_rs.F |
50 |
MON_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_stats_rs.F |
80 |
MON_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/monitor/mon_stats_rs.F |
81 |
MON_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/monitor/mon_stats_rs.F |
83 |
MON_STATS_RS |
_GLOBAL_SUM_RL(tmpVal,myThid) |
|
./pkg/monitor/mon_stats_rs.F |
92 |
MON_STATS_RS |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/monitor/mon_stats_rs.F |
95 |
MON_STATS_RS |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/monitor/mon_stats_rs.F |
97 |
MON_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_stats_rs.F |
98 |
MON_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_surfcor.F |
12 |
MON_SURFCOR |
I myThid ) |
|
./pkg/monitor/mon_surfcor.F |
177 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/monitor/mon_surfcor.F |
178 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tile_wT , wT_Mean, myThid ) |
|
./pkg/monitor/mon_surfcor.F |
179 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tile_wS , wS_Mean, myThid ) |
|
./pkg/monitor/mon_surfcor.F |
181 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tileWHeat , wT_Heat , myThid ) |
|
./pkg/monitor/mon_surfcor.F |
182 |
MON_SURFCOR |
CALL GLOBAL_SUM_TILE_RL( tileTh2pe , theta2PE, myThid ) |
|
./pkg/monitor/mon_surfcor.F |
195 |
MON_SURFCOR |
CALL MON_SET_PREF('surfExpan',myThid) |
|
./pkg/monitor/mon_surfcor.F |
196 |
MON_SURFCOR |
CALL MON_OUT_RL( '_theta', wT_Mean, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_surfcor.F |
197 |
MON_SURFCOR |
CALL MON_OUT_RL( '_salt' , wS_Mean, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_surfcor.F |
199 |
MON_SURFCOR |
CALL MON_OUT_RL( '_Heat' , wT_Heat, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_surfcor.F |
200 |
MON_SURFCOR |
CALL MON_SET_PREF('En_Budget',myThid) |
|
./pkg/monitor/mon_surfcor.F |
201 |
MON_SURFCOR |
CALL MON_OUT_RL('_T2PE',theta2PE, mon_foot_mean ,myThid) |
|
./pkg/monitor/mon_surfcor.F |
50 |
MON_SURFCOR |
INTEGER myThid |
|
./pkg/monitor/mon_surfcor.F |
75 |
MON_SURFCOR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_surfcor.F |
76 |
MON_SURFCOR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/monitor/mon_vort3.F |
12 |
MON_VORT3 |
I myIter, myThid ) |
|
./pkg/monitor/mon_vort3.F |
31 |
MON_VORT3 |
INTEGER myIter, myThid |
|
./pkg/monitor/mon_vort3.F |
321 |
MON_VORT3 |
_GLOBAL_MAX_RL(theMin, myThid) |
|
./pkg/monitor/mon_vort3.F |
322 |
MON_VORT3 |
_GLOBAL_MAX_RL(theMax, myThid) |
|
./pkg/monitor/mon_vort3.F |
330 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/monitor/mon_vort3.F |
331 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileVol, theVol, myThid ) |
|
./pkg/monitor/mon_vort3.F |
332 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileSum, theMean, myThid ) |
|
./pkg/monitor/mon_vort3.F |
333 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileVar, theVar, myThid ) |
|
./pkg/monitor/mon_vort3.F |
334 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileVSum, volMean, myThid ) |
|
./pkg/monitor/mon_vort3.F |
335 |
MON_VORT3 |
CALL GLOBAL_SUM_TILE_RL( tileVSq, volVar, myThid ) |
|
./pkg/monitor/mon_vort3.F |
351 |
MON_VORT3 |
CALL MON_SET_PREF('vort',myThid) |
|
./pkg/monitor/mon_vort3.F |
352 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,theMin, '_r_min', myThid) |
|
./pkg/monitor/mon_vort3.F |
353 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,theMax, '_r_max', myThid) |
|
./pkg/monitor/mon_vort3.F |
354 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,theMean,'_a_mean', myThid) |
|
./pkg/monitor/mon_vort3.F |
355 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,theVar, '_a_sd', myThid) |
|
./pkg/monitor/mon_vort3.F |
356 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,volMean,'_p_mean', myThid) |
|
./pkg/monitor/mon_vort3.F |
357 |
MON_VORT3 |
CALL MON_OUT_RL(mon_string_none,theSD, '_p_sd', myThid) |
|
./pkg/monitor/mon_vort3.F |
71 |
MON_VORT3 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/monitor/mon_vort3.F |
72 |
MON_VORT3 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/config_check.F |
1001 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
1005 |
CONFIG_CHECK |
_END_MASTER(myThid) |
|
./model/src/config_check.F |
1009 |
CONFIG_CHECK |
_BEGIN_MASTER(myThid) |
|
./model/src/config_check.F |
1012 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
1016 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
1019 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
1020 |
CONFIG_CHECK |
_END_MASTER(myThid) |
|
./model/src/config_check.F |
104 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
107 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
116 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
121 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
130 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
133 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
13 |
CONFIG_CHECK |
SUBROUTINE CONFIG_CHECK( myThid ) |
|
./model/src/config_check.F |
142 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
145 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
151 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
154 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
160 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
163 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
171 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
174 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
180 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
183 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
192 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
195 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
204 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
207 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
213 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
216 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
225 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
234 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
237 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
246 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
249 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
258 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
261 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
270 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
273 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
282 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
285 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
293 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
296 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
304 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
307 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
318 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
321 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
324 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
330 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
333 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
336 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
346 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
349 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
34 |
CONFIG_CHECK |
INTEGER myThid |
|
./model/src/config_check.F |
356 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
359 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
369 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
372 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
381 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
384 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
394 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
397 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
407 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
410 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
420 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
423 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
439 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
448 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
44 |
CONFIG_CHECK |
_BEGIN_MASTER(myThid) |
|
./model/src/config_check.F |
456 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
466 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
472 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
480 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
486 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
48 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
496 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
502 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
512 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
51 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
521 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
52 |
CONFIG_CHECK |
_END_MASTER(myThid) |
|
./model/src/config_check.F |
530 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
538 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
545 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
548 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
555 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
558 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
565 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
568 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
56 |
CONFIG_CHECK |
_BEGIN_MASTER(myThid) |
|
./model/src/config_check.F |
575 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
578 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
585 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
588 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
595 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
598 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
608 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
615 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
621 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
627 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
633 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
646 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
650 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
658 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
661 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
670 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
674 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
67 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
682 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
685 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
694 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
698 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
705 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
708 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
70 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
714 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
717 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
724 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
728 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
736 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
743 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
751 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
754 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
762 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
765 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
772 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
775 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
782 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
790 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
794 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
800 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
808 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
812 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
818 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
81 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
822 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
830 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
839 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
844 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
851 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
858 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
867 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
86 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
882 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
886 |
CONFIG_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_check.F |
890 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
894 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
902 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
908 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
914 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
91 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
922 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
928 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
931 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
937 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
940 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
946 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
952 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
95 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
962 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
969 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
978 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
986 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/config_check.F |
994 |
CONFIG_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
15 |
MON_WRITESTATS_RL |
I myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
35 |
MON_WRITESTATS_RL |
INTEGER myThid |
|
./pkg/monitor/mon_writestats_rl.F |
48 |
MON_WRITESTATS_RL |
I myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
57 |
MON_WRITESTATS_RL |
CALL MON_OUT_RL( arrName, theMax, mon_foot_max, myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
58 |
MON_WRITESTATS_RL |
CALL MON_OUT_RL( arrName, theMin, mon_foot_min, myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
59 |
MON_WRITESTATS_RL |
CALL MON_OUT_RL( arrName, theMean, mon_foot_mean, myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
60 |
MON_WRITESTATS_RL |
CALL MON_OUT_RL( arrName, theSD, mon_foot_sd, myThid ) |
|
./pkg/monitor/mon_writestats_rl.F |
61 |
MON_WRITESTATS_RL |
CALL MON_OUT_RL( arrName, theDel2, mon_foot_del2, myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
15 |
MON_WRITESTATS_RS |
I myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
35 |
MON_WRITESTATS_RS |
INTEGER myThid |
|
./pkg/monitor/mon_writestats_rs.F |
48 |
MON_WRITESTATS_RS |
I myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
57 |
MON_WRITESTATS_RS |
CALL MON_OUT_RL( arrName, theMax, mon_foot_max, myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
58 |
MON_WRITESTATS_RS |
CALL MON_OUT_RL( arrName, theMin, mon_foot_min, myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
59 |
MON_WRITESTATS_RS |
CALL MON_OUT_RL( arrName, theMean, mon_foot_mean, myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
60 |
MON_WRITESTATS_RS |
CALL MON_OUT_RL( arrName, theSD, mon_foot_sd, myThid ) |
|
./pkg/monitor/mon_writestats_rs.F |
61 |
MON_WRITESTATS_RS |
CALL MON_OUT_RL( arrName, theDel2, mon_foot_del2, myThid ) |
|
./pkg/monitor/monitor.F |
102 |
MONITOR |
CALL MON_SET_PREF( 'time', myThid ) |
|
./pkg/monitor/monitor.F |
103 |
MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid ) |
|
./pkg/monitor/monitor.F |
104 |
MONITOR |
CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid ) |
|
./pkg/monitor/monitor.F |
108 |
MONITOR |
CALL MON_SET_PREF( 'dynstat', myThid ) |
|
./pkg/monitor/monitor.F |
110 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
112 |
MONITOR |
& hFacW, maskInW, rAw, thickFacC, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
114 |
MONITOR |
& hFacS, maskInS, rAs, thickFacC, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
116 |
MONITOR |
& maskC, maskInC, rA , thickFacF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
118 |
MONITOR |
& hFacC, maskInC, rA , thickFacC, statsTemp, myThid ) |
|
./pkg/monitor/monitor.F |
120 |
MONITOR |
& hFacC, maskInC, rA , thickFacC, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
12 |
MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/monitor/monitor.F |
131 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
133 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
138 |
MONITOR |
CALL MON_SET_PREF( 'forcing', myThid ) |
|
./pkg/monitor/monitor.F |
140 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
142 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
144 |
MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
146 |
MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
148 |
MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor.F |
153 |
MONITOR |
CALL MON_SET_PREF( 'trAdv_CFL', myThid ) |
|
./pkg/monitor/monitor.F |
154 |
MONITOR |
CALL MON_OUT_RL( '_u', mon_trAdvCFL(1), mon_foot_max,myThid ) |
|
./pkg/monitor/monitor.F |
155 |
MONITOR |
CALL MON_OUT_RL( '_v', mon_trAdvCFL(2), mon_foot_max,myThid ) |
|
./pkg/monitor/monitor.F |
156 |
MONITOR |
CALL MON_OUT_RL( '_w', mon_trAdvCFL(3), mon_foot_max,myThid ) |
|
./pkg/monitor/monitor.F |
160 |
MONITOR |
CALL MON_SET_PREF( 'advcfl', myThid ) |
|
./pkg/monitor/monitor.F |
162 |
MONITOR |
CALL MON_ADVCFL( '_uvel', uVel, recip_dxC, dT, myThid ) |
|
./pkg/monitor/monitor.F |
163 |
MONITOR |
CALL MON_ADVCFL( '_vvel', vVel, recip_dyC, dT, myThid ) |
|
./pkg/monitor/monitor.F |
164 |
MONITOR |
CALL MON_ADVCFLW( '_wvel', wVel, recip_drC, dT, myThid ) |
|
./pkg/monitor/monitor.F |
166 |
MONITOR |
& recip_drF, dT, 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 |
175 |
MONITOR |
IF ( monitorSelect.GE.2 ) CALL MON_SURFCOR( myThid ) |
|
./pkg/monitor/monitor.F |
178 |
MONITOR |
CALL MON_SOLUTION( statsTemp, myTime, myIter, myThid ) |
|
./pkg/monitor/monitor.F |
181 |
MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/monitor.F |
34 |
MONITOR |
INTEGER myThid |
|
./pkg/monitor/monitor.F |
53 |
MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/monitor.F |
70 |
MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/monitor/monitor.F |
71 |
MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/monitor/monitor.F |
73 |
MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/monitor/monitor.F |
74 |
MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/monitor/monitor_ad.F |
111 |
ADMONITOR |
CALL MON_SET_PREF('ad_time',myThid) |
|
./pkg/monitor/monitor_ad.F |
112 |
ADMONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/monitor/monitor_ad.F |
113 |
ADMONITOR |
CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid) |
|
./pkg/monitor/monitor_ad.F |
116 |
ADMONITOR |
CALL MON_SET_PREF('ad_dynstat',myThid) |
|
./pkg/monitor/monitor_ad.F |
119 |
ADMONITOR |
CALL ADEXCH_3D_RL( adEtaN, 1 , myThid ) |
|
./pkg/monitor/monitor_ad.F |
120 |
ADMONITOR |
CALL ADEXCH_UV_3D_RL( aduVel, advVel, .TRUE., Nr, myThid ) |
|
./pkg/monitor/monitor_ad.F |
121 |
ADMONITOR |
CALL ADEXCH_3D_RL( adwVel, Nr, myThid ) |
|
./pkg/monitor/monitor_ad.F |
122 |
ADMONITOR |
CALL ADEXCH_3D_RL( adTheta, Nr, myThid ) |
|
./pkg/monitor/monitor_ad.F |
123 |
ADMONITOR |
CALL ADEXCH_3D_RL( adSalt, Nr, myThid ) |
|
./pkg/monitor/monitor_ad.F |
128 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
130 |
ADMONITOR |
& hFacW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
132 |
ADMONITOR |
& hFacS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
134 |
ADMONITOR |
& maskC, maskInC, rA , drC, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
136 |
ADMONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
138 |
ADMONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
145 |
ADMONITOR |
& '_adsst', maskInC, maskInC, rA, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
147 |
ADMONITOR |
& '_adsss', maskInC, maskInC, rA, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
151 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( dumRS, adEtaN, var2Du, 1 , 12, myThid ) |
|
./pkg/monitor/monitor_ad.F |
153 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
156 |
ADMONITOR |
& var3Du, var3Dv, Nr, 34, myThid ) |
|
./pkg/monitor/monitor_ad.F |
158 |
ADMONITOR |
& hFacW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
160 |
ADMONITOR |
& hFacS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
162 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( dumRS, adwVel, var3Du, Nr, 12, myThid ) |
|
./pkg/monitor/monitor_ad.F |
164 |
ADMONITOR |
& maskC, maskInC, rA , drC, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
165 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( dumRS, adTheta,var3Du, Nr, 12, myThid ) |
|
./pkg/monitor/monitor_ad.F |
166 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( dumRS, adSalt, var3Dv, Nr, 12, myThid ) |
|
./pkg/monitor/monitor_ad.F |
168 |
ADMONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
170 |
ADMONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
177 |
ADMONITOR |
& '_adsst', maskInC, maskInC, rA, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
179 |
ADMONITOR |
& '_adsss', maskInC, maskInC, rA, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
185 |
ADMONITOR |
CALL MON_SET_PREF('ad_forcing',myThid) |
|
./pkg/monitor/monitor_ad.F |
188 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
191 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
194 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
196 |
ADMONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
198 |
ADMONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
19 |
ADMONITOR |
I myTime, myIter, myThid ) |
|
./pkg/monitor/monitor_ad.F |
201 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( adQnet, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/monitor/monitor_ad.F |
203 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
205 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( adQsw, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/monitor/monitor_ad.F |
207 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
209 |
ADMONITOR |
CALL COPY_ADVAR_OUTP( adEmPmR,dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/monitor/monitor_ad.F |
211 |
ADMONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
213 |
ADMONITOR |
& var2Du, var2Dv, 1, 33, myThid ) |
|
./pkg/monitor/monitor_ad.F |
215 |
ADMONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
217 |
ADMONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_ad.F |
222 |
ADMONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./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 |
43 |
ADMONITOR |
INTEGER myThid |
|
./pkg/monitor/monitor_ad.F |
68 |
ADMONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/monitor_ad.F |
85 |
ADMONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/monitor/monitor_ad.F |
86 |
ADMONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/monitor/monitor_ad.F |
88 |
ADMONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/monitor/monitor_ad.F |
89 |
ADMONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/monitor/monitor_g.F |
107 |
G_MONITOR |
CALL MON_SET_PREF('g__time',myThid) |
|
./pkg/monitor/monitor_g.F |
108 |
G_MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/monitor/monitor_g.F |
109 |
G_MONITOR |
CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid) |
|
./pkg/monitor/monitor_g.F |
112 |
G_MONITOR |
CALL MON_SET_PREF('g__dynstat',myThid) |
|
./pkg/monitor/monitor_g.F |
115 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
117 |
G_MONITOR |
& hFacW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
119 |
G_MONITOR |
& hFacS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
121 |
G_MONITOR |
& maskC, maskInC, rA , drC, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
123 |
G_MONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
125 |
G_MONITOR |
& hFacC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
131 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
133 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
138 |
G_MONITOR |
CALL MON_SET_PREF('g__forcing',myThid) |
|
./pkg/monitor/monitor_g.F |
140 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
143 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
146 |
G_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
148 |
G_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
150 |
G_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/monitor/monitor_g.F |
154 |
G_MONITOR |
CALL MON_SET_PREF('g__g_vcfl',myThid) |
|
./pkg/monitor/monitor_g.F |
156 |
G_MONITOR |
CALL MON_ADVCFL( '_g_uvel', g_uVel,recip_dxC,dT,myThid ) |
|
./pkg/monitor/monitor_g.F |
157 |
G_MONITOR |
CALL MON_ADVCFL( '_g_vvel', g_vVel,recip_dyC,dT,myThid ) |
|
./pkg/monitor/monitor_g.F |
158 |
G_MONITOR |
CALL MON_ADVCFLW( '_g_wvel',g_wVel,recip_drC,dT,myThid ) |
|
./pkg/monitor/monitor_g.F |
160 |
G_MONITOR |
& recip_drF,dT,myThid ) |
|
./pkg/monitor/monitor_g.F |
163 |
G_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/monitor_g.F |
19 |
G_MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/monitor/monitor_g.F |
44 |
G_MONITOR |
INTEGER myThid |
|
./pkg/monitor/monitor_g.F |
64 |
G_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/monitor/monitor_g.F |
81 |
G_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/monitor/monitor_g.F |
82 |
G_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/monitor/monitor_g.F |
84 |
G_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/monitor/monitor_g.F |
85 |
G_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/my82/my82_calc.F |
100 |
MY82_CALC |
I myTime, myThid ) |
|
./pkg/my82/my82_calc.F |
11 |
MY82_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./pkg/my82/my82_calc.F |
51 |
MY82_CALC |
INTEGER myThid |
|
./pkg/my82/my82_calc_diff.F |
39 |
MY82_CALC_DIFF |
INTEGER myThid |
|
./pkg/my82/my82_calc_diff.F |
9 |
MY82_CALC_DIFF |
I myThid) |
|
./model/src/config_summary.F |
102 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
104 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
18 |
CONFIG_SUMMARY |
SUBROUTINE CONFIG_SUMMARY( myThid ) |
|
./model/src/config_summary.F |
261 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
265 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
268 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
273 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
279 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
280 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
366 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
372 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
373 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
438 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
444 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
445 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
454 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
460 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
461 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
480 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
486 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
488 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
491 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
494 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
497 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
503 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
51 |
CONFIG_SUMMARY |
INTEGER myThid |
|
./model/src/config_summary.F |
592 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
598 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
601 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
603 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
604 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
614 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
617 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
620 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
623 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
626 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
629 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
632 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
639 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
642 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
644 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
666 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
669 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
671 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
75 |
CONFIG_SUMMARY |
_BEGIN_MASTER(myThid) |
|
./model/src/config_summary.F |
782 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
785 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
787 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
91 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
93 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
96 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
978 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
980 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
983 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
985 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/config_summary.F |
987 |
CONFIG_SUMMARY |
_END_MASTER(myThid) |
|
./model/src/config_summary.F |
99 |
CONFIG_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/my82/my82_calc_visc.F |
31 |
MY82_CALC_VISC |
INTEGER myThid |
|
./pkg/my82/my82_calc_visc.F |
8 |
MY82_CALC_VISC |
I myThid) |
|
./pkg/my82/my82_check.F |
20 |
MY82_CHECK |
INTEGER myThid |
|
./pkg/my82/my82_check.F |
5 |
MY82_CHECK |
SUBROUTINE MY82_CHECK( myThid ) |
|
./pkg/my82/my82_diagnostics_init.F |
27 |
MY82_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/my82/my82_diagnostics_init.F |
52 |
MY82_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/my82/my82_diagnostics_init.F |
59 |
MY82_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/my82/my82_diagnostics_init.F |
66 |
MY82_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/my82/my82_diagnostics_init.F |
9 |
MY82_DIAGNOSTICS_INIT |
SUBROUTINE MY82_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/my82/my82_init_fixed.F |
29 |
MY82_INIT_FIXED |
INTEGER myThid |
|
./pkg/my82/my82_init_fixed.F |
39 |
MY82_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/my82/my82_init_fixed.F |
41 |
MY82_INIT_FIXED |
& myThid) |
|
./pkg/my82/my82_init_fixed.F |
43 |
MY82_INIT_FIXED |
& 'MY_vertical_eddy_viscosity_coefficient', myThid) |
|
./pkg/my82/my82_init_fixed.F |
45 |
MY82_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/my82/my82_init_fixed.F |
48 |
MY82_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/my82/my82_init_fixed.F |
50 |
MY82_INIT_FIXED |
& myThid) |
|
./pkg/my82/my82_init_fixed.F |
53 |
MY82_INIT_FIXED |
& myThid) |
|
./pkg/my82/my82_init_fixed.F |
55 |
MY82_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/my82/my82_init_fixed.F |
58 |
MY82_INIT_FIXED |
& 3,4, myThid) |
|
./pkg/my82/my82_init_fixed.F |
60 |
MY82_INIT_FIXED |
& myThid) |
|
./pkg/my82/my82_init_fixed.F |
62 |
MY82_INIT_FIXED |
& 'MY_boundary_layer_depth', myThid) |
|
./pkg/my82/my82_init_fixed.F |
64 |
MY82_INIT_FIXED |
& 'coordinates','XC YC iter', myThid) |
|
./pkg/my82/my82_init_fixed.F |
70 |
MY82_INIT_FIXED |
CALL MY82_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/my82/my82_init_fixed.F |
9 |
MY82_INIT_FIXED |
SUBROUTINE MY82_INIT_FIXED( myThid ) |
|
./pkg/my82/my82_init_varia.F |
24 |
MY82_INIT_VARIA |
INTEGER myThid |
|
./pkg/my82/my82_init_varia.F |
48 |
MY82_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/my82/my82_init_varia.F |
49 |
MY82_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/my82/my82_init_varia.F |
6 |
MY82_INIT_VARIA |
SUBROUTINE MY82_INIT_VARIA( myThid ) |
|
./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 |
114 |
MY82_OUTPUT |
CALL MNC_CW_SET_UDIM('my_state', -1, myThid) |
|
./pkg/my82/my82_output.F |
115 |
MY82_OUTPUT |
CALL MNC_CW_RL_W_S('D','my_state',0,0,'T',myTime,myThid) |
|
./pkg/my82/my82_output.F |
116 |
MY82_OUTPUT |
CALL MNC_CW_SET_UDIM('my_state', 0, 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 |
119 |
MY82_OUTPUT |
& 'MYviscAr', MYviscAr, myThid) |
|
./pkg/my82/my82_output.F |
121 |
MY82_OUTPUT |
& 'MYdiffKr', MYdiffKr, myThid) |
|
./pkg/my82/my82_output.F |
123 |
MY82_OUTPUT |
& 'MYhbl', MYhbl, myThid) |
|
./pkg/my82/my82_output.F |
138 |
MY82_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/my82/my82_output.F |
139 |
MY82_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/my82/my82_output.F |
140 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
141 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
142 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYhbltave, 1 , bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
150 |
MY82_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/my82/my82_output.F |
151 |
MY82_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/my82/my82_output.F |
153 |
MY82_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
155 |
MY82_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
157 |
MY82_OUTPUT |
& 1 , DDTT, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
170 |
MY82_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/my82/my82_output.F |
171 |
MY82_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/my82/my82_output.F |
173 |
MY82_OUTPUT |
& MY_timeAve, Nr, bi,bj,myThid) |
|
./pkg/my82/my82_output.F |
175 |
MY82_OUTPUT |
& MY_timeAve, Nr, bi,bj,myThid) |
|
./pkg/my82/my82_output.F |
177 |
MY82_OUTPUT |
& MY_timeAve, 1 , bi,bj,myThid) |
|
./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 |
203 |
MY82_OUTPUT |
CALL MNC_CW_SET_UDIM('my_timeave', -1, myThid) |
|
./pkg/my82/my82_output.F |
204 |
MY82_OUTPUT |
CALL MNC_CW_RL_W_S('D','my_timeave',0,0,'T',myTime,myThid) |
|
./pkg/my82/my82_output.F |
205 |
MY82_OUTPUT |
CALL MNC_CW_SET_UDIM('my_timeave', 0, 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 |
208 |
MY82_OUTPUT |
& 'MYviscAr', MYviscArTave, myThid) |
|
./pkg/my82/my82_output.F |
210 |
MY82_OUTPUT |
& 'MYdiffKr', MYdiffKrTave, myThid) |
|
./pkg/my82/my82_output.F |
212 |
MY82_OUTPUT |
& 'MYhbl', MYhblTave, myThid) |
|
./pkg/my82/my82_output.F |
217 |
MY82_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/my82/my82_output.F |
218 |
MY82_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/my82/my82_output.F |
219 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
220 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
221 |
MY82_OUTPUT |
CALL TIMEAVE_RESET( MYhbltave, 1 , bi, bj, myThid ) |
|
./pkg/my82/my82_output.F |
237 |
MY82_OUTPUT |
CALL DIAGNOSTICS_FILL(MYviscAr,'MYVISCAR',0,Nr,0,1,1,myThid) |
|
./pkg/my82/my82_output.F |
238 |
MY82_OUTPUT |
CALL DIAGNOSTICS_FILL(MYdiffKr,'MYDIFFKR',0,Nr,0,1,1,myThid) |
|
./pkg/my82/my82_output.F |
239 |
MY82_OUTPUT |
CALL DIAGNOSTICS_FILL(MYhbl ,'MYHBL ',0,1 ,0,1,1,myThid) |
|
./pkg/my82/my82_output.F |
60 |
MY82_OUTPUT |
INTEGER myThid |
|
./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 ) |
|
./pkg/my82/my82_readparms.F |
10 |
MY82_READPARMS |
SUBROUTINE MY82_READPARMS( myThid ) |
|
./pkg/my82/my82_readparms.F |
24 |
MY82_READPARMS |
INTEGER myThid |
|
./pkg/my82/my82_readparms.F |
51 |
MY82_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/my82/my82_readparms.F |
56 |
MY82_READPARMS |
_END_MASTER(myThid) |
|
./pkg/my82/my82_readparms.F |
75 |
MY82_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/my82/my82_readparms.F |
82 |
MY82_READPARMS |
I myThid ) |
|
./pkg/my82/my82_readparms.F |
95 |
MY82_READPARMS |
_END_MASTER(myThid) |
|
./pkg/my82/my82_ri_number.F |
13 |
MY82_RI_NUMBER |
I myTime, myThid ) |
|
./pkg/my82/my82_ri_number.F |
46 |
MY82_RI_NUMBER |
INTEGER myThid |
|
./pkg/my82/my82_ri_number.F |
93 |
MY82_RI_NUMBER |
I Km1, bi, bj, myThid ) |
|
./pkg/my82/my82_ri_number.F |
98 |
MY82_RI_NUMBER |
I K, bi, bj, myThid ) |
|
./model/src/convective_adjustment.F |
100 |
CONVECTIVE_ADJUSTMENT |
act1 = bi - myBxLo(myThid) |
|
./model/src/convective_adjustment.F |
101 |
CONVECTIVE_ADJUSTMENT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/convective_adjustment.F |
102 |
CONVECTIVE_ADJUSTMENT |
act2 = bj - myByLo(myThid) |
|
./model/src/convective_adjustment.F |
103 |
CONVECTIVE_ADJUSTMENT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/convective_adjustment.F |
104 |
CONVECTIVE_ADJUSTMENT |
act3 = myThid - 1 |
|
./model/src/convective_adjustment.F |
14 |
CONVECTIVE_ADJUSTMENT |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/convective_adjustment.F |
153 |
CONVECTIVE_ADJUSTMENT |
I K-1, bi, bj, myThid ) |
|
./model/src/convective_adjustment.F |
167 |
CONVECTIVE_ADJUSTMENT |
I K, bi, bj, myThid ) |
|
./model/src/convective_adjustment.F |
185 |
CONVECTIVE_ADJUSTMENT |
I myThid) |
|
./model/src/convective_adjustment.F |
191 |
CONVECTIVE_ADJUSTMENT |
I myThid) |
|
./model/src/convective_adjustment.F |
197 |
CONVECTIVE_ADJUSTMENT |
I myThid) |
|
./model/src/convective_adjustment.F |
203 |
CONVECTIVE_ADJUSTMENT |
I bi,bj,k,weightA,weightB,myThid) |
|
./model/src/convective_adjustment.F |
213 |
CONVECTIVE_ADJUSTMENT |
I Nr, deltaTClock, bi, bj, myThid) |
|
./model/src/convective_adjustment.F |
220 |
CONVECTIVE_ADJUSTMENT |
I 0, Nr, 2, bi, bj, myThid ) |
|
./model/src/convective_adjustment.F |
47 |
CONVECTIVE_ADJUSTMENT |
INTEGER myThid |
|
./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_calc_rhs.F |
38 |
MYPACKAGE_CALC_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/mypackage/mypackage_calc_rhs.F |
39 |
MYPACKAGE_CALC_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/mypackage/mypackage_check.F |
11 |
MYPACKAGE_CHECK |
SUBROUTINE MYPACKAGE_CHECK( myThid ) |
|
./pkg/mypackage/mypackage_check.F |
25 |
MYPACKAGE_CHECK |
INTEGER myThid |
|
./pkg/mypackage/mypackage_check.F |
33 |
MYPACKAGE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/mypackage/mypackage_check.F |
77 |
MYPACKAGE_CHECK |
_END_MASTER(myThid) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
106 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
115 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
11 |
MYPACKAGE_DIAGNOSTICS_INIT |
SUBROUTINE MYPACKAGE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
124 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
132 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
133 |
MYPACKAGE_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, 3, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
24 |
MYPACKAGE_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
53 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
60 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
69 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
78 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
85 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
92 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_init.F |
99 |
MYPACKAGE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, 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_diagnostics_state.F |
44 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0,Nr, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_state.F |
46 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0,Nr, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_state.F |
48 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0,Nr, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_state.F |
50 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0,Nr, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_state.F |
55 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_diagnostics_state.F |
57 |
MYPACKAGE_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/mypackage/mypackage_init_fixed.F |
11 |
MYPACKAGE_INIT_FIXED |
SUBROUTINE MYPACKAGE_INIT_FIXED( myThid ) |
|
./pkg/mypackage/mypackage_init_fixed.F |
25 |
MYPACKAGE_INIT_FIXED |
INTEGER myThid |
|
./pkg/mypackage/mypackage_init_fixed.F |
33 |
MYPACKAGE_INIT_FIXED |
CALL MYPACKAGE_MNC_INIT( myThid ) |
|
./pkg/mypackage/mypackage_init_fixed.F |
39 |
MYPACKAGE_INIT_FIXED |
CALL MYPACKAGE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
104 |
MYPACKAGE_INIT_VARIA |
& .TRUE., Nr, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
108 |
MYPACKAGE_INIT_VARIA |
& .TRUE., Nr, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
116 |
MYPACKAGE_INIT_VARIA |
& myPa_Surf1, 0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
117 |
MYPACKAGE_INIT_VARIA |
CALL EXCH_XY_RL( myPa_Surf1, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
11 |
MYPACKAGE_INIT_VARIA |
SUBROUTINE MYPACKAGE_INIT_VARIA( myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
121 |
MYPACKAGE_INIT_VARIA |
& myPa_Surf2, 0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
122 |
MYPACKAGE_INIT_VARIA |
CALL EXCH_XY_RL( myPa_Surf2, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
128 |
MYPACKAGE_INIT_VARIA |
CALL MYPACKAGE_READ_PICKUP( nIter0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
26 |
MYPACKAGE_INIT_VARIA |
INTEGER myThid |
|
./pkg/mypackage/mypackage_init_varia.F |
35 |
MYPACKAGE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/mypackage/mypackage_init_varia.F |
36 |
MYPACKAGE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/mypackage/mypackage_init_varia.F |
83 |
MYPACKAGE_INIT_VARIA |
& myPa_StatScal1, 0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
84 |
MYPACKAGE_INIT_VARIA |
CALL EXCH_3D_RL( myPa_StatScal1, Nr, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
88 |
MYPACKAGE_INIT_VARIA |
& myPa_StatScal2, 0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
89 |
MYPACKAGE_INIT_VARIA |
CALL EXCH_3D_RL( myPa_StatScal2, Nr, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
94 |
MYPACKAGE_INIT_VARIA |
& myPa_StatVelU, 0, myThid ) |
|
./pkg/mypackage/mypackage_init_varia.F |
98 |
MYPACKAGE_INIT_VARIA |
& myPa_StatVelV, 0, myThid ) |
|
./pkg/mypackage/mypackage_mnc_init.F |
11 |
MYPACKAGE_MNC_INIT |
SUBROUTINE MYPACKAGE_MNC_INIT( myThid ) |
|
./pkg/mypackage/mypackage_mnc_init.F |
24 |
MYPACKAGE_MNC_INIT |
INTEGER myThid |
|
./pkg/mypackage/mypackage_mnc_init.F |
33 |
MYPACKAGE_MNC_INIT |
& 'Cen_xy_Hn__L__t', 4,5,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
35 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
37 |
MYPACKAGE_MNC_INIT |
& 'scalar state variable myPa_StatScal1',myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
40 |
MYPACKAGE_MNC_INIT |
& 'Cen_xy_Hn__L__t', 4,5,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
42 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
44 |
MYPACKAGE_MNC_INIT |
& 'scalar state variable myPa_StatScal2',myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
47 |
MYPACKAGE_MNC_INIT |
& 'U_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
49 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
51 |
MYPACKAGE_MNC_INIT |
& 'uVel-type state variable myPa_StatVelU',myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
54 |
MYPACKAGE_MNC_INIT |
& 'V_xy_Hn__C__t', 4,5,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
56 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
58 |
MYPACKAGE_MNC_INIT |
& 'vVel-type state variable myPa_StatVelV',myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
61 |
MYPACKAGE_MNC_INIT |
& 'Cen_xy_Hn__-__t', 3,4,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
63 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
65 |
MYPACKAGE_MNC_INIT |
& 'Surface scalar field myPa_Surf1',myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
68 |
MYPACKAGE_MNC_INIT |
& 'Cen_xy_Hn__-__t', 3,4,myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
70 |
MYPACKAGE_MNC_INIT |
& 'units','[unit]', myThid) |
|
./pkg/mypackage/mypackage_mnc_init.F |
72 |
MYPACKAGE_MNC_INIT |
& 'Surface scalar field myPa_Surf2',myThid) |
|
./pkg/mypackage/mypackage_read_pickup.F |
104 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
109 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
11 |
MYPACKAGE_READ_PICKUP |
SUBROUTINE MYPACKAGE_READ_PICKUP( myIter, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
120 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
121 |
MYPACKAGE_READ_PICKUP |
CALL ALL_PROC_DIE( 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 |
167 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
168 |
MYPACKAGE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
176 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
178 |
MYPACKAGE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
184 |
MYPACKAGE_READ_PICKUP |
CALL EXCH_3D_RL( myPa_StatScal1, Nr, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
185 |
MYPACKAGE_READ_PICKUP |
CALL EXCH_3D_RL( myPa_StatScal2, Nr, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
188 |
MYPACKAGE_READ_PICKUP |
& .TRUE., Nr, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
192 |
MYPACKAGE_READ_PICKUP |
& .TRUE., Nr, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
196 |
MYPACKAGE_READ_PICKUP |
CALL EXCH_XY_RL( myPa_Surf1, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
197 |
MYPACKAGE_READ_PICKUP |
CALL EXCH_XY_RL( myPa_Surf2, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
27 |
MYPACKAGE_READ_PICKUP |
INTEGER myThid |
|
./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_read_pickup.F |
73 |
MYPACKAGE_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
78 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
81 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
85 |
MYPACKAGE_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
94 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
98 |
MYPACKAGE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/mypackage/mypackage_read_pickup.F |
99 |
MYPACKAGE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mypackage/mypackage_readparms.F |
114 |
MYPACKAGE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/mypackage/mypackage_readparms.F |
11 |
MYPACKAGE_READPARMS |
SUBROUTINE MYPACKAGE_READPARMS( myThid ) |
|
./pkg/mypackage/mypackage_readparms.F |
24 |
MYPACKAGE_READPARMS |
INTEGER myThid |
|
./pkg/mypackage/mypackage_readparms.F |
50 |
MYPACKAGE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/mypackage/mypackage_readparms.F |
54 |
MYPACKAGE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/mypackage/mypackage_readparms.F |
58 |
MYPACKAGE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/mypackage/mypackage_readparms.F |
91 |
MYPACKAGE_READPARMS |
I myThid ) |
|
./pkg/mypackage/mypackage_tendency_apply.F |
117 |
MYPACKAGE_TENDENCY_APPLY_V |
INTEGER myThid |
|
./pkg/mypackage/mypackage_tendency_apply.F |
156 |
MYPACKAGE_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/mypackage/mypackage_tendency_apply.F |
184 |
MYPACKAGE_TENDENCY_APPLY_T |
INTEGER myThid |
|
./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 |
241 |
MYPACKAGE_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/mypackage/mypackage_tendency_apply.F |
49 |
MYPACKAGE_TENDENCY_APPLY_U |
INTEGER myThid |
|
./pkg/mypackage/mypackage_tendency_apply.F |
88 |
MYPACKAGE_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
|
./model/src/convective_adjustment_ini.F |
100 |
CONVECTIVE_ADJUSTMENT_INI |
act1 = bi - myBxLo(myThid) |
|
./model/src/convective_adjustment_ini.F |
101 |
CONVECTIVE_ADJUSTMENT_INI |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/convective_adjustment_ini.F |
102 |
CONVECTIVE_ADJUSTMENT_INI |
act2 = bj - myByLo(myThid) |
|
./model/src/convective_adjustment_ini.F |
103 |
CONVECTIVE_ADJUSTMENT_INI |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/convective_adjustment_ini.F |
104 |
CONVECTIVE_ADJUSTMENT_INI |
act3 = myThid - 1 |
|
./model/src/convective_adjustment_ini.F |
14 |
CONVECTIVE_ADJUSTMENT_INI |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/convective_adjustment_ini.F |
153 |
CONVECTIVE_ADJUSTMENT_INI |
I K-1, bi, bj, myThid ) |
|
./model/src/convective_adjustment_ini.F |
167 |
CONVECTIVE_ADJUSTMENT_INI |
I K, bi, bj, myThid ) |
|
./model/src/convective_adjustment_ini.F |
183 |
CONVECTIVE_ADJUSTMENT_INI |
I myThid) |
|
./model/src/convective_adjustment_ini.F |
189 |
CONVECTIVE_ADJUSTMENT_INI |
I myThid) |
|
./model/src/convective_adjustment_ini.F |
195 |
CONVECTIVE_ADJUSTMENT_INI |
I myThid) |
|
./model/src/convective_adjustment_ini.F |
201 |
CONVECTIVE_ADJUSTMENT_INI |
I bi,bj,k,weightA,weightB,myThid) |
|
./model/src/convective_adjustment_ini.F |
51 |
CONVECTIVE_ADJUSTMENT_INI |
INTEGER myThid |
|
./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 |
120 |
MYPACKAGE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_write_pickup.F |
123 |
MYPACKAGE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/mypackage/mypackage_write_pickup.F |
124 |
MYPACKAGE_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/mypackage/mypackage_write_pickup.F |
141 |
MYPACKAGE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/mypackage/mypackage_write_pickup.F |
33 |
MYPACKAGE_WRITE_PICKUP |
INTEGER myThid |
|
./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 ) |
|
./model/src/convective_weights.F |
12 |
CONVECTIVE_WEIGHTS |
I myThid ) |
|
./model/src/convective_weights.F |
47 |
CONVECTIVE_WEIGHTS |
INTEGER myThid |
|
./pkg/obcs/obcs_add_tides.F |
11 |
OBCS_ADD_TIDES |
SUBROUTINE OBCS_ADD_TIDES( myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_add_tides.F |
138 |
OBCS_ADD_TIDES |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_ADD_TIDES',myThid) |
|
./pkg/obcs/obcs_add_tides.F |
37 |
OBCS_ADD_TIDES |
INTEGER myThid |
|
./pkg/obcs/obcs_add_tides.F |
55 |
OBCS_ADD_TIDES |
IF (debugMode) CALL DEBUG_ENTER('OBCS_ADD_TIDES',myThid) |
|
./pkg/obcs/obcs_add_tides.F |
59 |
OBCS_ADD_TIDES |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_add_tides.F |
60 |
OBCS_ADD_TIDES |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_adjust_uvice.F |
11 |
OBCS_ADJUST_UVICE |
I myThid ) |
|
./pkg/obcs/obcs_adjust_uvice.F |
242 |
OBCS_ADJUST_UVICE |
CALL EXCH_UV_XY_RL( uFld, vFld, .TRUE., myThid ) |
|
./pkg/obcs/obcs_adjust_uvice.F |
33 |
OBCS_ADJUST_UVICE |
INTEGER myThid |
|
./pkg/obcs/obcs_adjust_uvice.F |
44 |
OBCS_ADJUST_UVICE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_adjust_uvice.F |
45 |
OBCS_ADJUST_UVICE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_apply_eta.F |
11 |
OBCS_APPLY_ETA |
I myThid ) |
|
./pkg/obcs/obcs_apply_eta.F |
39 |
OBCS_APPLY_ETA |
INTEGER myThid |
|
./pkg/obcs/obcs_apply_ptracer.F |
12 |
OBCS_APPLY_PTRACER |
I myThid ) |
|
./pkg/obcs/obcs_apply_ptracer.F |
45 |
OBCS_APPLY_PTRACER |
INTEGER myThid |
|
./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_seaice.F |
13 |
OBCS_APPLY_SEAICE |
SUBROUTINE OBCS_APPLY_SEAICE( myThid ) |
|
./pkg/obcs/obcs_apply_seaice.F |
293 |
OBCS_APPLY_SEAICE |
CALL OBCS_SEAICE_SPONGE_A( myThid ) |
|
./pkg/obcs/obcs_apply_seaice.F |
294 |
OBCS_APPLY_SEAICE |
CALL OBCS_SEAICE_SPONGE_H( myThid ) |
|
./pkg/obcs/obcs_apply_seaice.F |
39 |
OBCS_APPLY_SEAICE |
INTEGER myThid |
|
./pkg/obcs/obcs_apply_seaice.F |
54 |
OBCS_APPLY_SEAICE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_apply_seaice.F |
55 |
OBCS_APPLY_SEAICE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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_ts.F |
12 |
OBCS_APPLY_TS |
I myThid ) |
|
./pkg/obcs/obcs_apply_ts.F |
43 |
OBCS_APPLY_TS |
INTEGER myThid |
|
./model/src/convectively_mixtracer.F |
12 |
CONVECTIVELY_MIXTRACER |
I myThid ) |
|
./model/src/convectively_mixtracer.F |
35 |
CONVECTIVELY_MIXTRACER |
INTEGER myThid |
|
./pkg/obcs/obcs_apply_uv.F |
11 |
OBCS_APPLY_UV |
I myThid ) |
|
./pkg/obcs/obcs_apply_uv.F |
42 |
OBCS_APPLY_UV |
INTEGER myThid |
|
./pkg/obcs/obcs_apply_uvice.F |
14 |
OBCS_APPLY_UVICE |
I myThid ) |
|
./pkg/obcs/obcs_apply_uvice.F |
205 |
OBCS_APPLY_UVICE |
CALL EXCH_UV_XY_RL( uFld, vFld,.TRUE.,myThid) |
|
./pkg/obcs/obcs_apply_uvice.F |
44 |
OBCS_APPLY_UVICE |
INTEGER myThid |
|
./pkg/obcs/obcs_apply_uvice.F |
71 |
OBCS_APPLY_UVICE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_apply_uvice.F |
72 |
OBCS_APPLY_UVICE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_apply_w.F |
11 |
OBCS_APPLY_W |
I myThid ) |
|
./pkg/obcs/obcs_apply_w.F |
41 |
OBCS_APPLY_W |
INTEGER myThid |
|
./pkg/obcs/obcs_balance_flow.F |
11 |
OBCS_BALANCE_FLOW |
SUBROUTINE OBCS_BALANCE_FLOW( myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
121 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaE, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
123 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowE, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
128 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
139 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
140 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
170 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaW, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
172 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowW, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
177 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
188 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
189 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
219 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaN, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
221 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowN, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
226 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
237 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
238 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
268 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileArea, areaS, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
270 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileFlow, flowS, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
275 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
286 |
OBCS_BALANCE_FLOW |
IF ( flag ) CALL GLOBAL_SUM_TILE_RL( tileAreaOB, areaOB, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
288 |
OBCS_BALANCE_FLOW |
CALL GLOBAL_SUM_TILE_RL( tileInFlow, inFlow, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
293 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
306 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
310 |
OBCS_BALANCE_FLOW |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_balance_flow.F |
320 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
321 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
340 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
341 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
34 |
OBCS_BALANCE_FLOW |
INTEGER myThid |
|
./pkg/obcs/obcs_balance_flow.F |
360 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
361 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
380 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
381 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
399 |
OBCS_BALANCE_FLOW |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_BALANCE_FLOW',myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
72 |
OBCS_BALANCE_FLOW |
IF (debugMode) CALL DEBUG_ENTER('OBCS_BALANCE_FLOW',myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
79 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
80 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
90 |
OBCS_BALANCE_FLOW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_balance_flow.F |
91 |
OBCS_BALANCE_FLOW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_calc.F |
12 |
OBCS_CALC |
& myThid ) |
|
./pkg/obcs/obcs_calc.F |
140 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_MSG('OBCS_CALC: West',myThid) |
|
./pkg/obcs/obcs_calc.F |
147 |
OBCS_CALC |
& myThid ) |
|
./pkg/obcs/obcs_calc.F |
190 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_MSG('OBCS_CALC: North',myThid) |
|
./pkg/obcs/obcs_calc.F |
197 |
OBCS_CALC |
& myThid ) |
|
./pkg/obcs/obcs_calc.F |
224 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_MSG('OBCS_CALC: South',myThid) |
|
./pkg/obcs/obcs_calc.F |
231 |
OBCS_CALC |
& myThid ) |
|
./pkg/obcs/obcs_calc.F |
271 |
OBCS_CALC |
& CALL DEBUG_MSG('OBCS_CALC: East, pTracers',myThid) |
|
./pkg/obcs/obcs_calc.F |
276 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
279 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
303 |
OBCS_CALC |
& CALL DEBUG_MSG('OBCS_CALC: West, pTracers',myThid) |
|
./pkg/obcs/obcs_calc.F |
308 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
311 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
335 |
OBCS_CALC |
& CALL DEBUG_MSG('OBCS_CALC: North, pTracers',myThid) |
|
./pkg/obcs/obcs_calc.F |
340 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
343 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
367 |
OBCS_CALC |
& CALL DEBUG_MSG('OBCS_CALC: South, pTracers',myThid) |
|
./pkg/obcs/obcs_calc.F |
372 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
375 |
OBCS_CALC |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_calc.F |
406 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_CALL('OBCS_PRESCRIBE_READ',myThid) |
|
./pkg/obcs/obcs_calc.F |
408 |
OBCS_CALC |
CALL OBCS_PRESCRIBE_READ( futureTime, futureIter, myThid ) |
|
./pkg/obcs/obcs_calc.F |
421 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_CALL('OBCS_CALC_STEVENS',myThid) |
|
./pkg/obcs/obcs_calc.F |
423 |
OBCS_CALC |
CALL OBCS_CALC_STEVENS( futureTime, futureIter, myThid ) |
|
./pkg/obcs/obcs_calc.F |
429 |
OBCS_CALC |
CALL OBCS_BALANCE_FLOW( futureTime, futureIter, myThid ) |
|
./pkg/obcs/obcs_calc.F |
435 |
OBCS_CALC |
CALL OBCS_ADD_TIDES( futureTime, futureIter, myThid ) |
|
./pkg/obcs/obcs_calc.F |
440 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_CALC',myThid) |
|
./pkg/obcs/obcs_calc.F |
51 |
OBCS_CALC |
INTEGER myThid |
|
./pkg/obcs/obcs_calc.F |
71 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_ENTER('OBCS_CALC',myThid) |
|
./pkg/obcs/obcs_calc.F |
74 |
OBCS_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_calc.F |
75 |
OBCS_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_calc.F |
80 |
OBCS_CALC |
CALL NEST_CHILD_RECV ( myThid ) |
|
./pkg/obcs/obcs_calc.F |
90 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_MSG('OBCS_CALC: East',myThid) |
|
./pkg/obcs/obcs_calc.F |
97 |
OBCS_CALC |
& myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
1004 |
OBCS_STEVENS_SAVE_TRACERS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
1035 |
OBCS_STEVENS_SAVE_TRACERS |
INTEGER myThid |
|
./pkg/obcs/obcs_calc_stevens.F |
1045 |
OBCS_STEVENS_SAVE_TRACERS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
1046 |
OBCS_STEVENS_SAVE_TRACERS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
132 |
OBCS_CALC_STEVENS |
IF (debugMode) CALL DEBUG_ENTER('OBCS_CALC_STEVENS',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
144 |
OBCS_CALC_STEVENS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
145 |
OBCS_CALC_STEVENS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
148 |
OBCS_CALC_STEVENS |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
149 |
OBCS_CALC_STEVENS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/obcs/obcs_calc_stevens.F |
150 |
OBCS_CALC_STEVENS |
act2 = bj - myByLo(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
151 |
OBCS_CALC_STEVENS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/obcs/obcs_calc_stevens.F |
152 |
OBCS_CALC_STEVENS |
act3 = myThid - 1 |
|
./pkg/obcs/obcs_calc_stevens.F |
170 |
OBCS_CALC_STEVENS |
& CALL DEBUG_MSG('OBCS_CALC_STEVENS: East',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
21 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
256 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
264 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
297 |
OBCS_CALC_STEVENS |
& CALL DEBUG_MSG('OBCS_CALC_STEVENS: West',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
383 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
391 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
408 |
OBCS_CALC_STEVENS |
& CALL DEBUG_MSG('OBCS_CALC_STEVENS: North',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
494 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
502 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
520 |
OBCS_CALC_STEVENS |
& CALL DEBUG_MSG('OBCS_CALC_STEVENS: South',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
606 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
614 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
627 |
OBCS_CALC_STEVENS |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
631 |
OBCS_CALC_STEVENS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
632 |
OBCS_CALC_STEVENS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
657 |
OBCS_CALC_STEVENS |
_GLOBAL_SUM_RL( uPhase, myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
658 |
OBCS_CALC_STEVENS |
_GLOBAL_SUM_RL( vPhase, myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
666 |
OBCS_CALC_STEVENS |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_CALC_STEVENS',myThid) |
|
./pkg/obcs/obcs_calc_stevens.F |
682 |
OBCS_STEVENS_CALC_TRACER_EAST |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
702 |
OBCS_STEVENS_CALC_TRACER_EAST |
INTEGER myThid |
|
./pkg/obcs/obcs_calc_stevens.F |
763 |
OBCS_STEVENS_CALC_TRACER_WEST |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
783 |
OBCS_STEVENS_CALC_TRACER_WEST |
INTEGER myThid |
|
./pkg/obcs/obcs_calc_stevens.F |
845 |
OBCS_STEVENS_CALC_TRACER_NORTH |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
865 |
OBCS_STEVENS_CALC_TRACER_NORTH |
INTEGER myThid |
|
./pkg/obcs/obcs_calc_stevens.F |
927 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
I myThid ) |
|
./pkg/obcs/obcs_calc_stevens.F |
92 |
OBCS_CALC_STEVENS |
INTEGER myThid |
|
./pkg/obcs/obcs_calc_stevens.F |
947 |
OBCS_STEVENS_CALC_TRACER_SOUTH |
INTEGER myThid |
|
./pkg/obcs/obcs_check.F |
122 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
124 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
128 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
132 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
136 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
144 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
146 |
OBCS_CHECK |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
153 |
OBCS_CHECK |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_check.F |
160 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
163 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
171 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
174 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
182 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
185 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
193 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
196 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
202 |
OBCS_CHECK |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
203 |
OBCS_CHECK |
CALL GLOBAL_SUM_INT( errCount, myThid ) |
|
./pkg/obcs/obcs_check.F |
207 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
208 |
OBCS_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/obcs/obcs_check.F |
214 |
OBCS_CHECK |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_check.F |
221 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
228 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
234 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
237 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
247 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
253 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
259 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
266 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
274 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
277 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
285 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
291 |
OBCS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
295 |
OBCS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
301 |
OBCS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
305 |
OBCS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
325 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
328 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
337 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
340 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
349 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
352 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
361 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
364 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
36 |
OBCS_CHECK |
INTEGER myThid |
|
./pkg/obcs/obcs_check.F |
373 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
376 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
385 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
388 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
399 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
408 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
415 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
418 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
430 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
433 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
442 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
448 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
450 |
OBCS_CHECK |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
458 |
OBCS_CHECK |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_check.F |
459 |
OBCS_CHECK |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_check.F |
466 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
470 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
478 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
482 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
490 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
494 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
502 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
506 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
517 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
521 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
529 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
533 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
541 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
545 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
553 |
OBCS_CHECK |
IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
557 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
565 |
OBCS_CHECK |
CALL GLOBAL_SUM_INT( errCount, myThid ) |
|
./pkg/obcs/obcs_check.F |
569 |
OBCS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_check.F |
570 |
OBCS_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/obcs/obcs_check.F |
573 |
OBCS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
576 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
577 |
OBCS_CHECK |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
61 |
OBCS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_check.F |
64 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
67 |
OBCS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check.F |
9 |
OBCS_CHECK |
SUBROUTINE OBCS_CHECK( myThid ) |
|
./pkg/obcs/obcs_check_depths.F |
102 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/obcs/obcs_check_depths.F |
111 |
OBCS_CHECK_DEPTHS |
CALL GLOBAL_SUM_INT( ichanged, myThid ) |
|
./pkg/obcs/obcs_check_depths.F |
113 |
OBCS_CHECK_DEPTHS |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_check_depths.F |
117 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check_depths.F |
125 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_check_depths.F |
126 |
OBCS_CHECK_DEPTHS |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_check_depths.F |
26 |
OBCS_CHECK_DEPTHS |
INTEGER myThid |
|
./pkg/obcs/obcs_check_depths.F |
39 |
OBCS_CHECK_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_check_depths.F |
40 |
OBCS_CHECK_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_check_depths.F |
53 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/obcs/obcs_check_depths.F |
69 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/obcs/obcs_check_depths.F |
6 |
OBCS_CHECK_DEPTHS |
SUBROUTINE OBCS_CHECK_DEPTHS( myThid ) |
|
./pkg/obcs/obcs_check_depths.F |
85 |
OBCS_CHECK_DEPTHS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/obcs/obcs_copy_tracer.F |
12 |
OBCS_COPY_TRACER |
I kSiz, bi, bj, myThid ) |
|
./pkg/obcs/obcs_copy_tracer.F |
45 |
OBCS_COPY_TRACER |
INTEGER myThid |
|
./pkg/obcs/obcs_copy_uv_n.F |
12 |
OBCS_COPY_UV_N |
I kSiz, bi, bj, myThid ) |
|
./pkg/obcs/obcs_copy_uv_n.F |
43 |
OBCS_COPY_UV_N |
INTEGER myThid |
|
./model/src/correction_step.F |
12 |
CORRECTION_STEP |
I myTime, myIter, myThid ) |
|
./model/src/correction_step.F |
47 |
CORRECTION_STEP |
INTEGER myThid |
|
./pkg/obcs/obcs_diag_balance.F |
111 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
112 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
134 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
135 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
14 |
OBCS_DIAG_BALANCE |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
156 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
157 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
183 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileAreaOB(1,1,n), areaOB(n), myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
185 |
OBCS_DIAG_BALANCE |
CALL GLOBAL_SUM_TILE_RL( tileInFlow(1,1,n), inFlow(n), myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
191 |
OBCS_DIAG_BALANCE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_diag_balance.F |
200 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
201 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
288 |
OBCS_DIAG_BALANCE |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_DIAG_BALANCE',myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
49 |
OBCS_DIAG_BALANCE |
INTEGER myThid |
|
./pkg/obcs/obcs_diag_balance.F |
73 |
OBCS_DIAG_BALANCE |
IF (debugMode) CALL DEBUG_ENTER('OBCS_DIAG_BALANCE',myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
80 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
81 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
89 |
OBCS_DIAG_BALANCE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_diag_balance.F |
90 |
OBCS_DIAG_BALANCE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_exchanges.F |
30 |
OBCS_EXCHANGES |
INTEGER myThid |
|
./pkg/obcs/obcs_exchanges.F |
43 |
OBCS_EXCHANGES |
CALL EXCH_UV_XYZ_RL( gU, gV, .TRUE., myThid ) |
|
./pkg/obcs/obcs_exchanges.F |
6 |
OBCS_EXCHANGES |
SUBROUTINE OBCS_EXCHANGES( myThid ) |
|
./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 |
271 |
OBCS_EXF_READ_XZ |
INTEGER myThid |
|
./pkg/obcs/obcs_exf_load.F |
294 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
300 |
OBCS_EXF_READ_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
310 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
313 |
OBCS_EXF_READ_XZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
317 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
321 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
325 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
326 |
OBCS_EXF_READ_XZ |
_END_MASTER( myThid ) |
|
./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 |
380 |
OBCS_EXF_READ_XZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
390 |
OBCS_EXF_READ_XZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
393 |
OBCS_EXF_READ_XZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
397 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
401 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
405 |
OBCS_EXF_READ_XZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
406 |
OBCS_EXF_READ_XZ |
_END_MASTER( myThid ) |
|
./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 |
50 |
OBCS_EXF_LOAD |
INTEGER myThid |
|
./pkg/obcs/obcs_exf_load.F |
546 |
OBCS_EXF_READ_YZ |
INTEGER myThid |
|
./pkg/obcs/obcs_exf_load.F |
569 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
575 |
OBCS_EXF_READ_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
585 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
588 |
OBCS_EXF_READ_YZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
592 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
596 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
600 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
601 |
OBCS_EXF_READ_YZ |
_END_MASTER( myThid ) |
|
./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 |
655 |
OBCS_EXF_READ_YZ |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
665 |
OBCS_EXF_READ_YZ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
668 |
OBCS_EXF_READ_YZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
672 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
676 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
680 |
OBCS_EXF_READ_YZ |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_exf_load.F |
681 |
OBCS_EXF_READ_YZ |
_END_MASTER( myThid ) |
|
./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 |
105 |
OBCS_FIELDS_LOAD |
I deltaTclock, myTime, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
107 |
OBCS_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
108 |
OBCS_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
112 |
OBCS_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
117 |
OBCS_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
139 |
OBCS_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
144 |
OBCS_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./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 |
334 |
OBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
335 |
OBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
359 |
OBCS_FIELDS_LOAD |
& SQUEEZE_RIGHT,myThid) |
|
./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 |
515 |
OBCS_FIELDS_LOAD |
& OBEu, OBEu0, OBEu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
517 |
OBCS_FIELDS_LOAD |
& OBEv, OBEv0, OBEv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
519 |
OBCS_FIELDS_LOAD |
& OBEt, OBEt0, OBEt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
521 |
OBCS_FIELDS_LOAD |
& OBEs, OBEs0, OBEs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
524 |
OBCS_FIELDS_LOAD |
& OBEw, OBEw0, OBEw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
528 |
OBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
529 |
OBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
541 |
OBCS_FIELDS_LOAD |
& OBWu, OBWu0, OBWu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
543 |
OBCS_FIELDS_LOAD |
& OBWv, OBWv0, OBWv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
545 |
OBCS_FIELDS_LOAD |
& OBWt, OBWt0, OBWt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
547 |
OBCS_FIELDS_LOAD |
& OBWs, OBWs0, OBWs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
550 |
OBCS_FIELDS_LOAD |
& OBWw, OBWw0, OBWw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
554 |
OBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
555 |
OBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
567 |
OBCS_FIELDS_LOAD |
& OBNu, OBNu0, OBNu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
569 |
OBCS_FIELDS_LOAD |
& OBNv, OBNv0, OBNv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
571 |
OBCS_FIELDS_LOAD |
& OBNt, OBNt0, OBNt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
573 |
OBCS_FIELDS_LOAD |
& OBNs, OBNs0, OBNs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
576 |
OBCS_FIELDS_LOAD |
& OBNw, OBNw0, OBNw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
580 |
OBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
581 |
OBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
593 |
OBCS_FIELDS_LOAD |
& OBSu, OBSu0, OBSu1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
595 |
OBCS_FIELDS_LOAD |
& OBSv, OBSv0, OBSv1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
597 |
OBCS_FIELDS_LOAD |
& OBSt, OBSt0, OBSt1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
599 |
OBCS_FIELDS_LOAD |
& OBSs, OBSs0, OBSs1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
602 |
OBCS_FIELDS_LOAD |
& OBSw, OBSw0, OBSw1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
606 |
OBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
607 |
OBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
626 |
OBCS_FIELDS_LOAD |
I OBEptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
633 |
OBCS_FIELDS_LOAD |
I OBWptr1(1-Oly,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
640 |
OBCS_FIELDS_LOAD |
I OBNptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
647 |
OBCS_FIELDS_LOAD |
I OBSptr1(1-Olx,1,1,1,iTr), aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
664 |
OBCS_TIME_INTERP_XZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
688 |
OBCS_TIME_INTERP_XZ |
INTEGER myThid |
|
./pkg/obcs/obcs_fields_load.F |
695 |
OBCS_TIME_INTERP_XZ |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
696 |
OBCS_TIME_INTERP_XZ |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
715 |
OBCS_TIME_INTERP_YZ |
I fld0, fld1, aWght, bWght, myThid ) |
|
./pkg/obcs/obcs_fields_load.F |
739 |
OBCS_TIME_INTERP_YZ |
INTEGER myThid |
|
./pkg/obcs/obcs_fields_load.F |
746 |
OBCS_TIME_INTERP_YZ |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
747 |
OBCS_TIME_INTERP_YZ |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_fields_load.F |
74 |
OBCS_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/obcs/obcs_init_fixed.F |
11 |
OBCS_INIT_FIXED |
SUBROUTINE OBCS_INIT_FIXED( myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
122 |
OBCS_INIT_FIXED |
& 0, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
124 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
125 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
139 |
OBCS_INIT_FIXED |
_EXCH_XY_RS( OBCS_insideMask, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
144 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
145 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
169 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
173 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
174 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
187 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
189 |
OBCS_INIT_FIXED |
IF ( flag ) CALL PRINT_ERROR( errMsg, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
194 |
OBCS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
210 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
212 |
OBCS_INIT_FIXED |
IF ( flag ) CALL PRINT_ERROR( errMsg, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
217 |
OBCS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
233 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
235 |
OBCS_INIT_FIXED |
IF ( flag ) CALL PRINT_ERROR( errMsg, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
240 |
OBCS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
256 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
258 |
OBCS_INIT_FIXED |
IF ( flag ) CALL PRINT_ERROR( errMsg, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
263 |
OBCS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
273 |
OBCS_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
286 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
287 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
32 |
OBCS_INIT_FIXED |
INTEGER myThid |
|
./pkg/obcs/obcs_init_fixed.F |
382 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
383 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
404 |
OBCS_INIT_FIXED |
CALL OBCS_SET_CONNECT( myThid ) |
|
./pkg/obcs/obcs_init_fixed.F |
407 |
OBCS_INIT_FIXED |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_INIT_FIXED',myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
53 |
OBCS_INIT_FIXED |
IF (debugMode) CALL DEBUG_ENTER('OBCS_INIT_FIXED',myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
58 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
59 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
71 |
OBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_fixed.F |
72 |
OBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
350 |
OBCS_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('ORLANSKI_INIT',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
352 |
OBCS_INIT_VARIABLES |
CALL ORLANSKI_INIT(bi, bj, myThid) |
|
./pkg/obcs/obcs_init_variables.F |
360 |
OBCS_INIT_VARIABLES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
361 |
OBCS_INIT_VARIABLES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
389 |
OBCS_INIT_VARIABLES |
& (OBNamFile,fp,tidalComponents,OBNam,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
391 |
OBCS_INIT_VARIABLES |
& (OBNphFile,fp,tidalComponents,OBNph,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
395 |
OBCS_INIT_VARIABLES |
& (OBSamFile,fp,tidalComponents,OBSam,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
397 |
OBCS_INIT_VARIABLES |
& (OBSphFile,fp,tidalComponents,OBSph,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
39 |
OBCS_INIT_VARIABLES |
INTEGER myThid |
|
./pkg/obcs/obcs_init_variables.F |
401 |
OBCS_INIT_VARIABLES |
& (OBEamFile,fp,tidalComponents,OBEam,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
403 |
OBCS_INIT_VARIABLES |
& (OBEphFile,fp,tidalComponents,OBEph,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
407 |
OBCS_INIT_VARIABLES |
& (OBWamFile,fp,tidalComponents,OBWam,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
409 |
OBCS_INIT_VARIABLES |
& (OBWphFile,fp,tidalComponents,OBWph,1,nIter0,myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
417 |
OBCS_INIT_VARIABLES |
CALL OBCS_READ_PICKUP( nIter0, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
424 |
OBCS_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
427 |
OBCS_INIT_VARIABLES |
& uVel, vVel, wVel, theta, salt, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
433 |
OBCS_INIT_VARIABLES |
& CALL DEBUG_CALL('OBCS_APPLY_UV + OBCS_APPLY_TS',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
435 |
OBCS_INIT_VARIABLES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
436 |
OBCS_INIT_VARIABLES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
437 |
OBCS_INIT_VARIABLES |
CALL OBCS_APPLY_UV( bi, bj, 0, uVel, vVel, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
438 |
OBCS_INIT_VARIABLES |
CALL OBCS_APPLY_TS( bi, bj, 0, theta, salt, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
447 |
OBCS_INIT_VARIABLES |
& CALL DEBUG_CALL('EXCHANGES in OBCS_INIT_VARIABLES',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
449 |
OBCS_INIT_VARIABLES |
CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./pkg/obcs/obcs_init_variables.F |
450 |
OBCS_INIT_VARIABLES |
_EXCH_XYZ_RL( theta, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
451 |
OBCS_INIT_VARIABLES |
_EXCH_XYZ_RL( salt , myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
463 |
OBCS_INIT_VARIABLES |
CALL OBCS_PRESCRIBE_READ( startTime, nIter0, myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
476 |
OBCS_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('OBCS_APPLY_PTRACER',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
479 |
OBCS_INIT_VARIABLES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
480 |
OBCS_INIT_VARIABLES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
484 |
OBCS_INIT_VARIABLES |
I myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
496 |
OBCS_INIT_VARIABLES |
& 'PTRACERS EXCHANGES in OBCS_INIT_VARIABLES',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
498 |
OBCS_INIT_VARIABLES |
CALL PTRACERS_FIELDS_BLOCKING_EXCH( myThid ) |
|
./pkg/obcs/obcs_init_variables.F |
511 |
OBCS_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_INIT_VARIABLES',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
54 |
OBCS_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_ENTER('OBCS_INIT_VARIABLES',myThid) |
|
./pkg/obcs/obcs_init_variables.F |
59 |
OBCS_INIT_VARIABLES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
60 |
OBCS_INIT_VARIABLES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_init_variables.F |
9 |
OBCS_INIT_VARIABLES |
SUBROUTINE OBCS_INIT_VARIABLES( myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
103 |
OBCS_MON_STATS_EW_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
104 |
OBCS_MON_STATS_EW_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
140 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
143 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
144 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
152 |
OBCS_MON_STATS_EW_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
155 |
OBCS_MON_STATS_EW_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
175 |
OBCS_MON_STATS_EW_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
176 |
OBCS_MON_STATS_EW_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
213 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
216 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
217 |
OBCS_MON_STATS_EW_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
21 |
OBCS_MON_STATS_EW_RL |
I myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
225 |
OBCS_MON_STATS_EW_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
228 |
OBCS_MON_STATS_EW_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
253 |
OBCS_MON_STATS_NS_RL |
I myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
296 |
OBCS_MON_STATS_NS_RL |
INTEGER myThid |
|
./pkg/obcs/obcs_mon_stats.F |
335 |
OBCS_MON_STATS_NS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
336 |
OBCS_MON_STATS_NS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
372 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
375 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
376 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
384 |
OBCS_MON_STATS_NS_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
387 |
OBCS_MON_STATS_NS_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
407 |
OBCS_MON_STATS_NS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
408 |
OBCS_MON_STATS_NS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
445 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileArea, theArea, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
448 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
449 |
OBCS_MON_STATS_NS_RL |
CALL GLOBAL_SUM_TILE_RL( tileVar , theVar , myThid ) |
|
./pkg/obcs/obcs_mon_stats.F |
457 |
OBCS_MON_STATS_NS_RL |
_GLOBAL_MAX_RL(theMin,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
460 |
OBCS_MON_STATS_NS_RL |
_GLOBAL_MAX_RL(theMax,myThid) |
|
./pkg/obcs/obcs_mon_stats.F |
64 |
OBCS_MON_STATS_EW_RL |
INTEGER myThid |
|
./pkg/obcs/obcs_monitor.F |
102 |
OBCS_MONITOR |
CALL MON_SET_PREF('obc_',myThid) |
|
./pkg/obcs/obcs_monitor.F |
112 |
OBCS_MONITOR |
I myThid ) |
|
./pkg/obcs/obcs_monitor.F |
118 |
OBCS_MONITOR |
I myThid ) |
|
./pkg/obcs/obcs_monitor.F |
122 |
OBCS_MONITOR |
I 3, myIter, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
134 |
OBCS_MONITOR |
I myThid ) |
|
./pkg/obcs/obcs_monitor.F |
140 |
OBCS_MONITOR |
I myThid ) |
|
./pkg/obcs/obcs_monitor.F |
144 |
OBCS_MONITOR |
I 0, myIter, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
156 |
OBCS_MONITOR |
I myThid ) |
|
./pkg/obcs/obcs_monitor.F |
162 |
OBCS_MONITOR |
I 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 |
171 |
OBCS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/obcs/obcs_monitor.F |
195 |
OBCS_MONITOR |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_MONITOR',myThid) |
|
./pkg/obcs/obcs_monitor.F |
214 |
OBCS_MON_WRITESTATS |
I prtSelect, myIter, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
238 |
OBCS_MON_WRITESTATS |
INTEGER myThid |
|
./pkg/obcs/obcs_monitor.F |
261 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMax, mon_foot_max, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
262 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMin, mon_foot_min, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
263 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMean, mon_foot_mean, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
264 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theSD, mon_foot_sd, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
266 |
OBCS_MON_WRITESTATS |
& CALL MON_OUT_RL( fldName, arrStats(1,j), '_Int', myThid ) |
|
./pkg/obcs/obcs_monitor.F |
279 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMax, mon_foot_max, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
280 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMin, mon_foot_min, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
281 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMean, mon_foot_mean, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
282 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theSD, mon_foot_sd, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
284 |
OBCS_MON_WRITESTATS |
& CALL MON_OUT_RL( fldName, arrStats(1,j), '_Int', myThid ) |
|
./pkg/obcs/obcs_monitor.F |
297 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMax, mon_foot_max, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
298 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMin, mon_foot_min, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
299 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMean, mon_foot_mean, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
300 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theSD, mon_foot_sd, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
302 |
OBCS_MON_WRITESTATS |
& CALL MON_OUT_RL( fldName, arrStats(1,j), '_Int', myThid ) |
|
./pkg/obcs/obcs_monitor.F |
315 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMax, mon_foot_max, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
316 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMin, mon_foot_min, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
317 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theMean, mon_foot_mean, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
318 |
OBCS_MON_WRITESTATS |
CALL MON_OUT_RL( fldName, theSD, mon_foot_sd, myThid ) |
|
./pkg/obcs/obcs_monitor.F |
320 |
OBCS_MON_WRITESTATS |
& CALL MON_OUT_RL( fldName, arrStats(1,j), '_Int', myThid ) |
|
./pkg/obcs/obcs_monitor.F |
42 |
OBCS_MONITOR |
INTEGER myThid |
|
./pkg/obcs/obcs_monitor.F |
63 |
OBCS_MONITOR |
IF (debugMode) CALL DEBUG_ENTER('OBCS_MONITOR',myThid) |
|
./pkg/obcs/obcs_monitor.F |
69 |
OBCS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/obcs/obcs_monitor.F |
97 |
OBCS_MONITOR |
CALL MON_SET_PREF('obc_time_',myThid) |
|
./pkg/obcs/obcs_monitor.F |
98 |
OBCS_MONITOR |
CALL MON_OUT_I( 'tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/obcs/obcs_monitor.F |
99 |
OBCS_MONITOR |
CALL MON_OUT_RL('secondsf', myTime,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 |
34 |
OBCS_OUTPUT |
INTEGER myThid |
|
./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_prescribe_read.F |
10 |
OBCS_PRESCRIBE_READ |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_prescribe_read.F |
36 |
OBCS_PRESCRIBE_READ |
INTEGER myThid |
|
./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 |
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 |
33 |
OBCS_READ_PICKUP |
INTEGER myThid |
|
./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_readparms.F |
206 |
OBCS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_readparms.F |
210 |
OBCS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_readparms.F |
214 |
OBCS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_readparms.F |
363 |
OBCS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/obcs/obcs_readparms.F |
367 |
OBCS_READPARMS |
I myThid ) |
|
./pkg/obcs/obcs_readparms.F |
378 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
381 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
42 |
OBCS_READPARMS |
INTEGER myThid |
|
./pkg/obcs/obcs_readparms.F |
439 |
OBCS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/obcs/obcs_readparms.F |
452 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
455 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
473 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
489 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
505 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
521 |
OBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
544 |
OBCS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
549 |
OBCS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
554 |
OBCS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
559 |
OBCS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
564 |
OBCS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_readparms.F |
699 |
OBCS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_readparms.F |
9 |
OBCS_READPARMS |
SUBROUTINE OBCS_READPARMS( myThid ) |
|
./pkg/obcs/obcs_save_uv_n.F |
11 |
OBCS_SAVE_UV_N |
I myThid ) |
|
./pkg/obcs/obcs_save_uv_n.F |
46 |
OBCS_SAVE_UV_N |
INTEGER myThid |
|
./pkg/obcs/obcs_seaice_sponge.F |
16 |
OBCS_SEAICE_SPONGE_A |
SUBROUTINE OBCS_SEAICE_SPONGE_A( myThid ) |
|
./pkg/obcs/obcs_seaice_sponge.F |
173 |
OBCS_SEAICE_SPONGE_H |
SUBROUTINE OBCS_SEAICE_SPONGE_H( myThid ) |
|
./pkg/obcs/obcs_seaice_sponge.F |
197 |
OBCS_SEAICE_SPONGE_H |
INTEGER myThid |
|
./pkg/obcs/obcs_seaice_sponge.F |
207 |
OBCS_SEAICE_SPONGE_H |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
208 |
OBCS_SEAICE_SPONGE_H |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
330 |
OBCS_SEAICE_SPONGE_SL |
SUBROUTINE OBCS_SEAICE_SPONGE_SL( myThid ) |
|
./pkg/obcs/obcs_seaice_sponge.F |
354 |
OBCS_SEAICE_SPONGE_SL |
INTEGER myThid |
|
./pkg/obcs/obcs_seaice_sponge.F |
364 |
OBCS_SEAICE_SPONGE_SL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
365 |
OBCS_SEAICE_SPONGE_SL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
40 |
OBCS_SEAICE_SPONGE_A |
INTEGER myThid |
|
./pkg/obcs/obcs_seaice_sponge.F |
487 |
OBCS_SEAICE_SPONGE_SN |
SUBROUTINE OBCS_SEAICE_SPONGE_SN( myThid ) |
|
./pkg/obcs/obcs_seaice_sponge.F |
50 |
OBCS_SEAICE_SPONGE_A |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
511 |
OBCS_SEAICE_SPONGE_SN |
INTEGER myThid |
|
./pkg/obcs/obcs_seaice_sponge.F |
51 |
OBCS_SEAICE_SPONGE_A |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
521 |
OBCS_SEAICE_SPONGE_SN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/obcs/obcs_seaice_sponge.F |
522 |
OBCS_SEAICE_SPONGE_SN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
101 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
105 |
OBCS_SET_CONNECT |
CALL READ_REC_XZ_RS( OBSconnectFile, fp,Nr, tmpXZ, 1,0,myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
106 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
118 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
11 |
OBCS_SET_CONNECT |
SUBROUTINE OBCS_SET_CONNECT( myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
122 |
OBCS_SET_CONNECT |
CALL READ_REC_YZ_RS( OBEconnectFile, fp,Nr, tmpYZ, 1,0,myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
123 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
135 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
139 |
OBCS_SET_CONNECT |
CALL READ_REC_YZ_RS( OBWconnectFile, fp,Nr, tmpYZ, 1,0,myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
140 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
152 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
157 |
OBCS_SET_CONNECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
158 |
OBCS_SET_CONNECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
177 |
OBCS_SET_CONNECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
178 |
OBCS_SET_CONNECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
215 |
OBCS_SET_CONNECT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
228 |
OBCS_SET_CONNECT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
234 |
OBCS_SET_CONNECT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
245 |
OBCS_SET_CONNECT |
_GLOBAL_MAX_RL( tmpRL, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
252 |
OBCS_SET_CONNECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
253 |
OBCS_SET_CONNECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
259 |
OBCS_SET_CONNECT |
_GLOBAL_MAX_RL( tmpRL, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
270 |
OBCS_SET_CONNECT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
274 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
278 |
OBCS_SET_CONNECT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
284 |
OBCS_SET_CONNECT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
286 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
290 |
OBCS_SET_CONNECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
291 |
OBCS_SET_CONNECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
324 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
326 |
OBCS_SET_CONNECT |
_END_MASTER(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
32 |
OBCS_SET_CONNECT |
INTEGER myThid |
|
./pkg/obcs/obcs_set_connect.F |
334 |
OBCS_SET_CONNECT |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_SET_CONNECT',myThid) |
|
./pkg/obcs/obcs_set_connect.F |
54 |
OBCS_SET_CONNECT |
IF (debugMode) CALL DEBUG_ENTER('OBCS_SET_CONNECT',myThid) |
|
./pkg/obcs/obcs_set_connect.F |
58 |
OBCS_SET_CONNECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
59 |
OBCS_SET_CONNECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/obcs/obcs_set_connect.F |
88 |
OBCS_SET_CONNECT |
CALL READ_REC_XZ_RS( OBNconnectFile, fp,Nr, tmpXZ, 1,0,myThid ) |
|
./pkg/obcs/obcs_set_connect.F |
89 |
OBCS_SET_CONNECT |
_BEGIN_MASTER(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 |
243 |
OBCS_SPONGE_V |
INTEGER myThid |
|
./pkg/obcs/obcs_sponge.F |
407 |
OBCS_SPONGE_T |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_sponge.F |
441 |
OBCS_SPONGE_T |
INTEGER myThid |
|
./pkg/obcs/obcs_sponge.F |
453 |
OBCS_SPONGE_T |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
454 |
OBCS_SPONGE_T |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/obcs/obcs_sponge.F |
455 |
OBCS_SPONGE_T |
act2 = bj - myByLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
456 |
OBCS_SPONGE_T |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/obcs/obcs_sponge.F |
457 |
OBCS_SPONGE_T |
act3 = myThid - 1 |
|
./pkg/obcs/obcs_sponge.F |
49 |
OBCS_SPONGE_U |
INTEGER myThid |
|
./pkg/obcs/obcs_sponge.F |
639 |
OBCS_SPONGE_S |
I myTime, myIter, myThid ) |
|
./pkg/obcs/obcs_sponge.F |
673 |
OBCS_SPONGE_S |
INTEGER myThid |
|
./pkg/obcs/obcs_sponge.F |
685 |
OBCS_SPONGE_S |
act1 = bi - myBxLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
686 |
OBCS_SPONGE_S |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/obcs/obcs_sponge.F |
687 |
OBCS_SPONGE_S |
act2 = bj - myByLo(myThid) |
|
./pkg/obcs/obcs_sponge.F |
688 |
OBCS_SPONGE_S |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/obcs/obcs_sponge.F |
689 |
OBCS_SPONGE_S |
act3 = myThid - 1 |
|
./pkg/obcs/obcs_u1_adv_tracer.F |
15 |
OBCS_U1_ADV_TRACER |
I myThid ) |
|
./pkg/obcs/obcs_u1_adv_tracer.F |
56 |
OBCS_U1_ADV_TRACER |
INTEGER myThid |
|
./pkg/obcs/obcs_u1_adv_tracer.F |
85 |
OBCS_U1_ADV_TRACER |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./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 |
37 |
OBCS_WRITE_PICKUP |
INTEGER myThid |
|
./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) |
|
./pkg/obcs/orlanski_east.F |
87 |
ORLANSKI_EAST |
INTEGER myThid |
|
./pkg/obcs/orlanski_east.F |
9 |
ORLANSKI_EAST |
I myThid ) |
|
./pkg/obcs/orlanski_init.F |
25 |
ORLANSKI_INIT |
INTEGER bi, bj, myThid |
|
./pkg/obcs/orlanski_init.F |
6 |
ORLANSKI_INIT |
SUBROUTINE ORLANSKI_INIT(bi, bj, 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/obcs/orlanski_north.F |
78 |
ORLANSKI_NORTH |
INTEGER myThid |
|
./pkg/obcs/orlanski_north.F |
8 |
ORLANSKI_NORTH |
I myThid ) |
|
./pkg/obcs/orlanski_south.F |
78 |
ORLANSKI_SOUTH |
INTEGER myThid |
|
./pkg/obcs/orlanski_south.F |
8 |
ORLANSKI_SOUTH |
I myThid ) |
|
./pkg/obcs/orlanski_west.F |
89 |
ORLANSKI_WEST |
INTEGER myThid |
|
./pkg/obcs/orlanski_west.F |
9 |
ORLANSKI_WEST |
I myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
102 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
105 |
CPL_DIAGNOSTICS_FILL |
IF ( DIAGNOSTICS_IS_ON('CPL_Qic1',myThid) .OR. |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
106 |
CPL_DIAGNOSTICS_FILL |
& DIAGNOSTICS_IS_ON('CPL_Qic2',myThid) ) THEN |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
107 |
CPL_DIAGNOSTICS_FILL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
108 |
CPL_DIAGNOSTICS_FILL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
119 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 2,bi,bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
123 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 2,bi,bj, 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 |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
51 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
53 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
55 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
57 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
59 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
61 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
63 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
65 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
69 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
75 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
79 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
81 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
88 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_fill.F |
98 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
100 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
107 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
115 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
11 |
CPL_DIAGNOSTICS_INIT |
SUBROUTINE CPL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
124 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
131 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
138 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
147 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
157 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
165 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
172 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
179 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
25 |
CPL_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
57 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
64 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
71 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
79 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
86 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ocn_compon_interf/cpl_diagnostics_init.F |
93 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
10 |
CPL_EXCH_CONFIGS |
SUBROUTINE CPL_EXCH_CONFIGS( myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
44 |
CPL_EXCH_CONFIGS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
57 |
CPL_EXCH_CONFIGS |
CALL OCN_EXPORT_OCNCONFIG( myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
62 |
CPL_EXCH_CONFIGS |
CALL OCN_IMPORT_ATMCONFIG( myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
68 |
CPL_EXCH_CONFIGS |
I myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
71 |
CPL_EXCH_CONFIGS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/cpl_exch_configs.F |
73 |
CPL_EXCH_CONFIGS |
_END_MASTER( myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
101 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceFreez',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
106 |
DIAGS_OCEANIC_SURF_FLUX |
& 'surForcT',0, 1,0,1,1,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 |
111 |
DIAGS_OCEANIC_SURF_FLUX |
& 'surForcS',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
116 |
DIAGS_OCEANIC_SURF_FLUX |
& DIAGNOSTICS_IS_ON('TFLUX ',myThid) ) THEN |
|
./model/src/diags_oceanic_surf_flux.F |
117 |
DIAGS_OCEANIC_SURF_FLUX |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/diags_oceanic_surf_flux.F |
118 |
DIAGS_OCEANIC_SURF_FLUX |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/diags_oceanic_surf_flux.F |
142 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'TFLUX ',0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
145 |
DIAGS_OCEANIC_SURF_FLUX |
CALL LAYERS_FILL( tmp1k, 1, 'SUR', 0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
152 |
DIAGS_OCEANIC_SURF_FLUX |
& DIAGNOSTICS_IS_ON('SFLUX ',myThid) ) THEN |
|
./model/src/diags_oceanic_surf_flux.F |
153 |
DIAGS_OCEANIC_SURF_FLUX |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/diags_oceanic_surf_flux.F |
154 |
DIAGS_OCEANIC_SURF_FLUX |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/diags_oceanic_surf_flux.F |
176 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL( tmp1k,'SFLUX ',0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
179 |
DIAGS_OCEANIC_SURF_FLUX |
CALL LAYERS_FILL( tmp1k, 2, 'SUR', 0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
38 |
DIAGS_OCEANIC_SURF_FLUX |
INTEGER myThid |
|
./model/src/diags_oceanic_surf_flux.F |
64 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceFWflx',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
69 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceSflux',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
74 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceQnet ',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
79 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceQsw ',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
84 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceTAUX ',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
88 |
DIAGS_OCEANIC_SURF_FLUX |
& 'oceTAUY ',0, 1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
92 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL_RS( sIceLoad,'sIceLoad',0,1,0,1,1,myThid ) |
|
./model/src/diags_oceanic_surf_flux.F |
96 |
DIAGS_OCEANIC_SURF_FLUX |
CALL DIAGNOSTICS_FILL_RS( pLoad, 'atmPload',0,1,0,1,1,myThid ) |
|
./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 |
40 |
CPL_EXPORT_IMPORT_DATA |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_export_import_data.F |
56 |
CPL_EXPORT_IMPORT_DATA |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/cpl_export_import_data.F |
60 |
CPL_EXPORT_IMPORT_DATA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_export_import_data.F |
61 |
CPL_EXPORT_IMPORT_DATA |
_END_MASTER( myThid ) |
|
./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 |
76 |
CPL_EXPORT_IMPORT_DATA |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/cpl_export_import_data.F |
80 |
CPL_EXPORT_IMPORT_DATA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_export_import_data.F |
81 |
CPL_EXPORT_IMPORT_DATA |
_END_MASTER( myThid ) |
|
./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_import_cplparms.F |
10 |
CPL_IMPORT_CPLPARMS |
SUBROUTINE CPL_IMPORT_CPLPARMS( myThid ) |
|
./pkg/ocn_compon_interf/cpl_import_cplparms.F |
32 |
CPL_IMPORT_CPLPARMS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_import_cplparms.F |
45 |
CPL_IMPORT_CPLPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/cpl_import_cplparms.F |
86 |
CPL_IMPORT_CPLPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_import_cplparms.F |
89 |
CPL_IMPORT_CPLPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_import_cplparms.F |
92 |
CPL_IMPORT_CPLPARMS |
_END_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
100 |
CPL_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
101 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( SLPtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
102 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( HFtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
103 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( QSWtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
104 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( TXtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
105 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( TYtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
106 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( FWtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
107 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( SFxtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
108 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( SICtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
109 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( MXLtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
110 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( SSTtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
111 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( SSStave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
112 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( vSqtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
114 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( aCO2tave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
115 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( sWSpdtave,1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
116 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( iceftave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
117 |
CPL_INI_VARS |
CALL TIMEAVE_RESET( fCO2tave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
38 |
CPL_INI_VARS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
47 |
CPL_INI_VARS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
48 |
CPL_INI_VARS |
DO bi=myBxLo(myThid),myByLo(myThid) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
93 |
CPL_INI_VARS |
CALL OCN_CPL_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
99 |
CPL_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_ini_vars.F |
9 |
CPL_INI_VARS |
SUBROUTINE CPL_INI_VARS( myThid ) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
100 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('sWSpdtave','units','m/s',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
102 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('iceftave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
104 |
CPL_INIT_FIXED |
& 'ocean seaice fraction', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
105 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('iceftave','units','non-dim',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
107 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('fCO2tave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
109 |
CPL_INIT_FIXED |
& 'ocean CO2 flux -> atm', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
110 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('fCO2tave','units','mol/m2/s',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
117 |
CPL_INIT_FIXED |
CALL CPL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
11 |
CPL_INIT_FIXED |
SUBROUTINE CPL_INIT_FIXED( myThid ) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
23 |
CPL_INIT_FIXED |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
29 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('SLPtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
31 |
CPL_INIT_FIXED |
& 'Atmospheric Sea-Level pressure', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
32 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('SLPtave','units','N/m2', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
34 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('HFtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
36 |
CPL_INIT_FIXED |
& 'Net surface heat-flux', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
37 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('HFtave','units','W/m2', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
39 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('QSWtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
41 |
CPL_INIT_FIXED |
& '', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
42 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('QSWtave','units','W/m2', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
44 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('TXtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
46 |
CPL_INIT_FIXED |
& 'surface stress in X', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
47 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('TXtave','units','N/m2', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
49 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('TYtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
51 |
CPL_INIT_FIXED |
& 'surface stress in Y', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
52 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('TYtave','units','N/m2', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
54 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('FWtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
56 |
CPL_INIT_FIXED |
& 'Net fresh water flux', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
58 |
CPL_INIT_FIXED |
& 'equals E-P-R', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
59 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('FWtave','units','kg/m^2/s', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
61 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('SFxtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
63 |
CPL_INIT_FIXED |
& 'salt flux from sea-ice', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
65 |
CPL_INIT_FIXED |
& myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
67 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('SICtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
69 |
CPL_INIT_FIXED |
& 'sea-ice mass', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
70 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('SICtave','units','kg/m^2',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
72 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('MXLtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
74 |
CPL_INIT_FIXED |
& 'Ocean mixed-layer depth', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
75 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('MXLtave','units','m', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
77 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('SSTtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
79 |
CPL_INIT_FIXED |
& 'ocean surface temperature', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
80 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('SSTtave','units','degC', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
82 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('SSStave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
84 |
CPL_INIT_FIXED |
& 'ocean surface salinity', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
85 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('SSStave','units','psu', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
87 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('vSqtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
89 |
CPL_INIT_FIXED |
& 'ocean surface velocity square', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
90 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('vSqtave','units','m^2/s^2',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
92 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('aCO2tave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
94 |
CPL_INIT_FIXED |
& 'atm CO2 level', myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
95 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('aCO2tave','units','parts',myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
97 |
CPL_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('sWSpdtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ocn_compon_interf/cpl_init_fixed.F |
99 |
CPL_INIT_FIXED |
& 'surface wind speed', 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 |
125 |
CPL_OUTPUT |
CALL MNC_CW_SET_UDIM('cpl_tave', -1, myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
126 |
CPL_OUTPUT |
CALL MNC_CW_RL_W_S('D','cpl_tave',0,0,'T',myTime,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
127 |
CPL_OUTPUT |
CALL MNC_CW_SET_UDIM('cpl_tave', 0, 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 |
130 |
CPL_OUTPUT |
& 'SLPtave',SLPtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
132 |
CPL_OUTPUT |
& 'HFtave',HFtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
134 |
CPL_OUTPUT |
& 'QSWtave',QSWtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
136 |
CPL_OUTPUT |
& 'TXtave',TXtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
138 |
CPL_OUTPUT |
& 'TYtave',TYtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
140 |
CPL_OUTPUT |
& 'FWtave',FWtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
142 |
CPL_OUTPUT |
& 'SFxtave',SFxtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
144 |
CPL_OUTPUT |
& 'SICtave',SICtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
146 |
CPL_OUTPUT |
& 'MXLtave',MXLtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
148 |
CPL_OUTPUT |
& 'SSTtave',SSTtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
150 |
CPL_OUTPUT |
& 'SSStave',SSStave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
152 |
CPL_OUTPUT |
& 'vSqtave',vSqtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
156 |
CPL_OUTPUT |
& 'aCO2tave',aCO2tave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
158 |
CPL_OUTPUT |
& 'sWSpdtave',sWSpdtave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
160 |
CPL_OUTPUT |
& 'iceftave',iceftave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
162 |
CPL_OUTPUT |
& 'fCO2tave',fCO2tave,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
169 |
CPL_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
170 |
CPL_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
171 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( SLPtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
172 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( HFtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
173 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( QSWtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
174 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( TXtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
175 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( TYtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
176 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( FWtave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
177 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( SFxtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
178 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( SICtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
179 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( MXLtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
180 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( SSTtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
181 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( SSStave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
182 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( vSqtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
185 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( aCO2tave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
186 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( sWSpdtave, 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
187 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( iceftave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
188 |
CPL_OUTPUT |
CALL TIMEAVE_RESET( fCO2tave , 1, bi, bj, myThid ) |
|
./pkg/ocn_compon_interf/cpl_output.F |
37 |
CPL_OUTPUT |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_output.F |
64 |
CPL_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
65 |
CPL_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
66 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(SLPtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
67 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(HFtave ,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
68 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(QSWtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
69 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(TXtave ,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
70 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(TYtave ,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
71 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(FWtave ,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
72 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(SFxtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
73 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(SICtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
74 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(MXLtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
75 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(SSTtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
76 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(SSStave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
77 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(vSqtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
80 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(aCO2tave, CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
81 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(sWSpdtave,CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
82 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(iceftave, CPL_timeAve,1,bi,bj,myThid) |
|
./pkg/ocn_compon_interf/cpl_output.F |
83 |
CPL_OUTPUT |
CALL TIMEAVE_NORMALIZE(fCO2tave, CPL_timeAve,1,bi,bj,myThid) |
|
./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_readparms.F |
136 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
139 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
149 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
152 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
160 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
163 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
171 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
174 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
182 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
185 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
195 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
198 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
208 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
212 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
217 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
227 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
230 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
238 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
241 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
247 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
250 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
256 |
CPL_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
260 |
CPL_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
265 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
268 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
276 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
279 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
302 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
304 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
306 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
308 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
312 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
315 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
339 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
342 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
36 |
CPL_READPARMS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
388 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
390 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
392 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
396 |
CPL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
82 |
CPL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
89 |
CPL_READPARMS |
O iUnit, myThid ) |
|
./pkg/ocn_compon_interf/cpl_readparms.F |
9 |
CPL_READPARMS |
SUBROUTINE CPL_READPARMS( 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 |
43 |
CPL_WRITE_PICKUP |
INTEGER myThid |
|
./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 |
172 |
OCN_APPLY_IMPORT |
& _EXCH_XY_RS( pLoad, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
174 |
OCN_APPLY_IMPORT |
IF ( useImportSIce ) _EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
176 |
OCN_APPLY_IMPORT |
_EXCH_XY_RS( phi0surf, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
180 |
OCN_APPLY_IMPORT |
& _EXCH_XY_RS( pLoad, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
183 |
OCN_APPLY_IMPORT |
IF ( useImportFW ) _EXCH_XY_RS( EmPmR, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
185 |
OCN_APPLY_IMPORT |
IF ( useImportTau ) CALL EXCH_UV_XY_RS(fu,fv,.TRUE.,myThid) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
186 |
OCN_APPLY_IMPORT |
IF ( useImportFW ) _EXCH_XY_RS( saltFlux, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
187 |
OCN_APPLY_IMPORT |
IF ( useImportHFlx ) _EXCH_XY_RS( Qnet , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
189 |
OCN_APPLY_IMPORT |
IF ( useImportHFlx ) _EXCH_XY_RS( Qsw , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
193 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( iceMask , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
194 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( iceHeight , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
195 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( snowHeight, myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
196 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( Qice1 , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
197 |
OCN_APPLY_IMPORT |
_EXCH_XY_RL( Qice2 , myThid ) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
43 |
OCN_APPLY_IMPORT |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
51 |
OCN_APPLY_IMPORT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_apply_import.F |
52 |
OCN_APPLY_IMPORT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/diags_phi_hyd.F |
125 |
DIAGS_PHI_HYD |
CALL DIAGNOSTICS_FILL(phiHydCstR,'PHIHYDcR',k,1,2,bi,bj,myThid) |
|
./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_check_cplconfig.F |
106 |
OCN_CHECK_CPLCONFIG |
_END_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
12 |
OCN_CHECK_CPLCONFIG |
I myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
42 |
OCN_CHECK_CPLCONFIG |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
53 |
OCN_CHECK_CPLCONFIG |
CALL WRITE_FLD_XY_RL( 'Atm_Land', ' ', landMask, 0, myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
58 |
OCN_CHECK_CPLCONFIG |
& 1, myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
62 |
OCN_CHECK_CPLCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
68 |
OCN_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
90 |
OCN_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
93 |
OCN_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/ocn_check_cplconfig.F |
96 |
OCN_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
35 |
OCN_CPL_DIAGS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
53 |
OCN_CPL_DIAGS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_cpl_diags.F |
54 |
OCN_CPL_DIAGS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
38 |
OCN_CPL_READ_PICKUP |
INTEGER myThid |
|
./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 |
97 |
OCN_CPL_READ_PICKUP |
_EXCH_XY_RL( fluxCO2cpl, 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 |
42 |
OCN_EXPORT_DATA |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_export_data.F |
58 |
OCN_EXPORT_DATA |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_data.F |
62 |
OCN_EXPORT_DATA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_data.F |
63 |
OCN_EXPORT_DATA |
_END_MASTER( myThid ) |
|
./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 |
36 |
OCN_EXPORT_FIELDS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_export_fields.F |
49 |
OCN_EXPORT_FIELDS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_fields.F |
90 |
OCN_EXPORT_FIELDS |
_END_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
10 |
OCN_EXPORT_OCNCONFIG |
SUBROUTINE OCN_EXPORT_OCNCONFIG( myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
34 |
OCN_EXPORT_OCNCONFIG |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
41 |
OCN_EXPORT_OCNCONFIG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
42 |
OCN_EXPORT_OCNCONFIG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
53 |
OCN_EXPORT_OCNCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_export_ocnconfig.F |
64 |
OCN_EXPORT_OCNCONFIG |
_END_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
10 |
OCN_IMPORT_ATMCONFIG |
SUBROUTINE OCN_IMPORT_ATMCONFIG( myThid ) |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
33 |
OCN_IMPORT_ATMCONFIG |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
42 |
OCN_IMPORT_ATMCONFIG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
43 |
OCN_IMPORT_ATMCONFIG |
DO bi=myBxLo(myThid),myByLo(myThid) |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
54 |
OCN_IMPORT_ATMCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_import_atmconfig.F |
61 |
OCN_IMPORT_ATMCONFIG |
_END_MASTER( myThid ) |
|
./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 |
145 |
OCN_IMPORT_FIELDS |
_END_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_import_fields.F |
36 |
OCN_IMPORT_FIELDS |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_import_fields.F |
47 |
OCN_IMPORT_FIELDS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
48 |
OCN_STORE_MY_DATA |
INTEGER myThid |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
61 |
OCN_STORE_MY_DATA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ocn_compon_interf/ocn_store_my_data.F |
62 |
OCN_STORE_MY_DATA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./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_check.F |
104 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
109 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
114 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
121 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
128 |
OFFLINE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_check.F |
130 |
OFFLINE_CHECK |
_END_MASTER(myThid) |
|
./pkg/offline/offline_check.F |
17 |
OFFLINE_CHECK |
SUBROUTINE OFFLINE_CHECK( myThid ) |
|
./pkg/offline/offline_check.F |
32 |
OFFLINE_CHECK |
INTEGER myThid |
|
./pkg/offline/offline_check.F |
41 |
OFFLINE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_check.F |
45 |
OFFLINE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_check.F |
80 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
87 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
93 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_check.F |
99 |
OFFLINE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_fields_load.F |
100 |
OFFLINE_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_fields_load.F |
105 |
OFFLINE_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/offline/offline_fields_load.F |
126 |
OFFLINE_FIELDS_LOAD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_fields_load.F |
133 |
OFFLINE_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_fields_load.F |
138 |
OFFLINE_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./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 |
172 |
OFFLINE_FIELDS_LOAD |
CALL EXCH_UV_XYZ_RS( uvel0, vvel0, .TRUE., myThid ) |
|
./pkg/offline/offline_fields_load.F |
173 |
OFFLINE_FIELDS_LOAD |
CALL EXCH_UV_XYZ_RS( uvel1, vvel1, .TRUE., 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 |
185 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(wvel0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
186 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(wvel1, 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 |
198 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(tave0 , myThid ) |
|
./pkg/offline/offline_fields_load.F |
199 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(tave1 , 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 |
211 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(save0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
212 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(save1, 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 |
237 |
OFFLINE_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RS( gmkx0, gmky0, .FALSE., Nr, myThid ) |
|
./pkg/offline/offline_fields_load.F |
238 |
OFFLINE_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RS( gmkx1, gmky1, .FALSE., Nr, 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 |
250 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(gmkz0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
251 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(gmkz1, 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 |
264 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(conv0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
265 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(conv1, 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 |
278 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(kdfs0 , myThid ) |
|
./pkg/offline/offline_fields_load.F |
279 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(kdfs1 , 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 |
293 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(kght0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
294 |
OFFLINE_FIELDS_LOAD |
_EXCH_XYZ_RS(kght1, 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 |
322 |
OFFLINE_FIELDS_LOAD |
_EXCH_XY_RS(sflx0, myThid ) |
|
./pkg/offline/offline_fields_load.F |
323 |
OFFLINE_FIELDS_LOAD |
_EXCH_XY_RS(sflx1, myThid ) |
|
./pkg/offline/offline_fields_load.F |
342 |
OFFLINE_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
343 |
OFFLINE_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
352 |
OFFLINE_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
353 |
OFFLINE_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
363 |
OFFLINE_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
364 |
OFFLINE_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/offline/offline_fields_load.F |
58 |
OFFLINE_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/offline/offline_fields_load.F |
94 |
OFFLINE_FIELDS_LOAD |
I deltaToffline, locTime, myThid ) |
|
./pkg/offline/offline_fields_load.F |
96 |
OFFLINE_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/offline/offline_fields_load.F |
97 |
OFFLINE_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./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 |
50 |
OFFLINE_GET_DIFFUS |
INTEGER myThid |
|
./pkg/offline/offline_get_diffus.F |
71 |
OFFLINE_GET_DIFFUS |
I deltaToffline, locTime, myThid ) |
|
./pkg/offline/offline_get_diffus.F |
75 |
OFFLINE_GET_DIFFUS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/offline/offline_get_diffus.F |
76 |
OFFLINE_GET_DIFFUS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/offline/offline_init_varia.F |
22 |
OFFLINE_INIT_VARIA |
INTEGER myThid |
|
./pkg/offline/offline_init_varia.F |
29 |
OFFLINE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/offline/offline_init_varia.F |
30 |
OFFLINE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/offline/offline_init_varia.F |
77 |
OFFLINE_INIT_VARIA |
CALL OFFLINE_FIELDS_LOAD( startTime, nIter0, myThid ) |
|
./pkg/offline/offline_init_varia.F |
7 |
OFFLINE_INIT_VARIA |
SUBROUTINE OFFLINE_INIT_VARIA( myThid ) |
|
./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 |
158 |
DIAGS_RHO_G |
& 0, Nr, 0, 1, 1, myThid ) |
|
./model/src/diags_rho.F |
161 |
DIAGS_RHO_G |
& 'RHOANOSQ', 0, Nr, 0, 1, 1, myThid ) |
|
./model/src/diags_rho.F |
163 |
DIAGS_RHO_G |
IF ( DIAGNOSTICS_IS_ON('URHOMASS',myThid) ) THEN |
|
./model/src/diags_rho.F |
164 |
DIAGS_RHO_G |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/diags_rho.F |
165 |
DIAGS_RHO_G |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/diags_rho.F |
174 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_FILL(tmpFld,'URHOMASS',k,1,2,bi,bj,myThid) |
|
./model/src/diags_rho.F |
180 |
DIAGS_RHO_G |
IF ( DIAGNOSTICS_IS_ON('VRHOMASS',myThid) ) THEN |
|
./model/src/diags_rho.F |
181 |
DIAGS_RHO_G |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/diags_rho.F |
182 |
DIAGS_RHO_G |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/diags_rho.F |
191 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_FILL(tmpFld,'VRHOMASS',k,1,2,bi,bj,myThid) |
|
./model/src/diags_rho.F |
197 |
DIAGS_RHO_G |
IF ( DIAGNOSTICS_IS_ON('WRHOMASS',myThid) ) THEN |
|
./model/src/diags_rho.F |
198 |
DIAGS_RHO_G |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/diags_rho.F |
199 |
DIAGS_RHO_G |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/diags_rho.F |
19 |
DIAGS_RHO_L |
I myTime, myIter, myThid ) |
|
./model/src/diags_rho.F |
216 |
DIAGS_RHO_G |
CALL DIAGNOSTICS_FILL(tmpFld,'WRHOMASS',k,1,2,bi,bj,myThid) |
|
./model/src/diags_rho.F |
54 |
DIAGS_RHO_L |
INTEGER myIter, myThid |
|
./model/src/diags_rho.F |
77 |
DIAGS_RHO_L |
CALL DIAGNOSTICS_FILL(tmpFld,'WdRHO_P ',k,1,2,bi,bj,myThid) |
|
./model/src/diags_rho.F |
78 |
DIAGS_RHO_L |
IF ( k.EQ.2 ) CALL DIAGNOSTICS_COUNT('WdRHO_P ',bi,bj,myThid) |
|
./model/src/diags_rho.F |
90 |
DIAGS_RHO_L |
CALL DIAGNOSTICS_FILL(tmpFld,'WdRHOdP ',k,1,2,bi,bj,myThid) |
|
./model/src/diags_rho.F |
91 |
DIAGS_RHO_L |
IF ( k.EQ.2 ) CALL DIAGNOSTICS_COUNT('WdRHOdP ',bi,bj,myThid) |
|
./pkg/offline/offline_readparms.F |
105 |
OFFLINE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_readparms.F |
120 |
OFFLINE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_readparms.F |
123 |
OFFLINE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_readparms.F |
129 |
OFFLINE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_readparms.F |
132 |
OFFLINE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/offline/offline_readparms.F |
144 |
OFFLINE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/offline/offline_readparms.F |
23 |
OFFLINE_READPARMS |
INTEGER myThid |
|
./pkg/offline/offline_readparms.F |
51 |
OFFLINE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_readparms.F |
55 |
OFFLINE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/offline/offline_readparms.F |
59 |
OFFLINE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_readparms.F |
63 |
OFFLINE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_readparms.F |
68 |
OFFLINE_READPARMS |
I myThid ) |
|
./pkg/offline/offline_readparms.F |
6 |
OFFLINE_READPARMS |
SUBROUTINE OFFLINE_READPARMS( myThid ) |
|
./pkg/offline/offline_reset_parms.F |
21 |
OFFLINE_RESET_PARMS |
INTEGER myThid |
|
./pkg/offline/offline_reset_parms.F |
32 |
OFFLINE_RESET_PARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/offline/offline_reset_parms.F |
38 |
OFFLINE_RESET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_reset_parms.F |
58 |
OFFLINE_RESET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_reset_parms.F |
60 |
OFFLINE_RESET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_reset_parms.F |
69 |
OFFLINE_RESET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_reset_parms.F |
71 |
OFFLINE_RESET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/offline/offline_reset_parms.F |
76 |
OFFLINE_RESET_PARMS |
_END_MASTER(myThid) |
|
./pkg/offline/offline_reset_parms.F |
7 |
OFFLINE_RESET_PARMS |
SUBROUTINE OFFLINE_RESET_PARMS( myThid ) |
|
./pkg/openad/ad_s_mds_reclen.F |
25 |
OAD_S_MDS_RECLEN |
integer myThid |
|
./pkg/openad/ad_s_mds_reclen.F |
40 |
OAD_S_MDS_RECLEN |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/openad/ad_s_mds_reclen.F |
43 |
OAD_S_MDS_RECLEN |
call PRINT_ERROR( msgbuf, myThid ) |
|
./pkg/openad/ad_s_mds_reclen.F |
6 |
OAD_S_MDS_RECLEN |
subroutine OAD_S_MDS_RECLEN( filePrec, nnn, myThid, reclen ) |
|
./pkg/openad/externalDummies.F |
104 |
GLOBAL_SUM_TILE_RL |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
10 |
DUMMY_IN_STEPPING |
SUBROUTINE DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
|
./pkg/openad/externalDummies.F |
118 |
CG2D |
I myThid ) |
|
./pkg/openad/externalDummies.F |
131 |
CG2D |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
150 |
STREAMICE_CG_SOLVE |
I myThid ) |
|
./pkg/openad/externalDummies.F |
158 |
STREAMICE_CG_SOLVE |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
187 |
STREAMICE_INVERT_SURF_FORTHICK |
I myThid) |
|
./pkg/openad/externalDummies.F |
19 |
DUMMY_IN_STEPPING |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
200 |
STREAMICE_INVERT_SURF_FORTHICK |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
212 |
STREAMICE_SMOOTH_ADJOINT_FIELD |
I myThid) |
|
./pkg/openad/externalDummies.F |
219 |
STREAMICE_SMOOTH_ADJOINT_FIELD |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
225 |
STREAMICE_SMOOTH_ADJOINT_FIELD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/openad/externalDummies.F |
226 |
STREAMICE_SMOOTH_ADJOINT_FIELD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/openad/externalDummies.F |
250 |
ACTIVE_READ_XYZ |
I myThid, |
|
./pkg/openad/externalDummies.F |
262 |
ACTIVE_READ_XYZ |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
279 |
ACTIVE_READ_XY |
I myThid, |
|
./pkg/openad/externalDummies.F |
28 |
EXCH1_RL |
I cornerMode, myThid ) |
|
./pkg/openad/externalDummies.F |
291 |
ACTIVE_READ_XY |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
306 |
ACTIVE_WRITE_XY |
I myThid, |
|
./pkg/openad/externalDummies.F |
318 |
ACTIVE_WRITE_XY |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
41 |
EXCH1_RL |
INTEGER myThid |
|
./pkg/openad/externalDummies.F |
96 |
GLOBAL_SUM_TILE_RL |
I myThid ) |
|
./pkg/openad/inner_do_loop.F |
203 |
INNER_DO_LOOP |
INTEGER myThid |
|
./pkg/openad/inner_do_loop.F |
215 |
INNER_DO_LOOP |
IF (debugMode) CALL DEBUG_ENTER('INNER_DO_LOOP',myThid) |
|
./pkg/openad/inner_do_loop.F |
226 |
INNER_DO_LOOP |
IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid) |
|
./pkg/openad/inner_do_loop.F |
230 |
INNER_DO_LOOP |
CALL TIMER_START('FORWARD_STEP_ATM2D [INNER_DO_LOOP]',myThid) |
|
./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 |
236 |
INNER_DO_LOOP |
CALL TIMER_STOP ('FORWARD_STEP_ATM2D [INNER_DO_LOOP]',myThid) |
|
./pkg/openad/inner_do_loop.F |
238 |
INNER_DO_LOOP |
CALL TIMER_START('FORWARD_STEP [INNER_DO_LOOP]',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 |
244 |
INNER_DO_LOOP |
CALL TIMER_STOP ('FORWARD_STEP [INNER_DO_LOOP]',myThid) |
|
./pkg/openad/inner_do_loop.F |
254 |
INNER_DO_LOOP |
IF (debugMode) CALL DEBUG_LEAVE('INNER_DO_LOOP',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 |
104 |
DO_ATMOSPHERIC_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_atmospheric_phys.F |
105 |
DO_ATMOSPHERIC_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/do_atmospheric_phys.F |
120 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_START('FIZHI [DO_ATMOSPHERIC_PHYS]',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 |
127 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_STOP ('FIZHI [DO_ATMOSPHERIC_PHYS]',myThid) |
|
./model/src/do_atmospheric_phys.F |
134 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_START('ATM_PHYS_DRIVER [DO_ATMOSPHERIC_PHYS]',myThid) |
|
./model/src/do_atmospheric_phys.F |
135 |
DO_ATMOSPHERIC_PHYS |
CALL ATM_PHYS_DRIVER( myTime, myIter, myThid ) |
|
./model/src/do_atmospheric_phys.F |
136 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_STOP( 'ATM_PHYS_DRIVER [DO_ATMOSPHERIC_PHYS]',myThid) |
|
./model/src/do_atmospheric_phys.F |
13 |
DO_ATMOSPHERIC_PHYS |
SUBROUTINE DO_ATMOSPHERIC_PHYS(myTime, myIter, myThid) |
|
./model/src/do_atmospheric_phys.F |
144 |
DO_ATMOSPHERIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('AIM_DO_PHYSICS',myThid) |
|
./model/src/do_atmospheric_phys.F |
146 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_START('AIM_DO_PHYSICS [DO_ATMOSPHERIC_PHYS]',myThid) |
|
./model/src/do_atmospheric_phys.F |
147 |
DO_ATMOSPHERIC_PHYS |
CALL AIM_DO_PHYSICS( myTime, myIter, myThid ) |
|
./model/src/do_atmospheric_phys.F |
148 |
DO_ATMOSPHERIC_PHYS |
CALL TIMER_STOP( 'AIM_DO_PHYSICS [DO_ATMOSPHERIC_PHYS]',myThid) |
|
./model/src/do_atmospheric_phys.F |
153 |
DO_ATMOSPHERIC_PHYS |
IF (debugMode) CALL DEBUG_LEAVE('DO_ATMOSPHERIC_PHYS',myThid) |
|
./model/src/do_atmospheric_phys.F |
57 |
DO_ATMOSPHERIC_PHYS |
INTEGER myThid |
|
./model/src/do_atmospheric_phys.F |
69 |
DO_ATMOSPHERIC_PHYS |
IF (debugMode) CALL DEBUG_ENTER('DO_ATMOSPHERIC_PHYS',myThid) |
|
./model/src/do_atmospheric_phys.F |
77 |
DO_ATMOSPHERIC_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_atmospheric_phys.F |
78 |
DO_ATMOSPHERIC_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/openad/openad_dumpAdjoint.F |
103 |
OPENAD_DUMPADJOINT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/openad/openad_dumpAdjoint.F |
27 |
OPENAD_DUMPADJOINT |
SUBROUTINE OPENAD_DUMPADJOINT( myTime, myIter, myThid ) |
|
./pkg/openad/openad_dumpAdjoint.F |
93 |
OPENAD_DUMPADJOINT |
INTEGER myThid |
|
./pkg/openad/the_model_main.F |
214 |
THE_MODEL_MAIN |
SUBROUTINE THE_MODEL_MAIN(myThid) |
|
./pkg/openad/the_model_main.F |
291 |
THE_MODEL_MAIN |
INTEGER myThid |
|
./pkg/openad/the_model_main.F |
349 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_ENTER('THE_MODEL_MAIN',myThid) |
|
./pkg/openad/the_model_main.F |
353 |
THE_MODEL_MAIN |
CALL TIMER_CONTROL('','INIT','THE_MODEL_MAIN',myThid) |
|
./pkg/openad/the_model_main.F |
356 |
THE_MODEL_MAIN |
CALL TIMER_START('ALL [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
359 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid) |
|
./pkg/openad/the_model_main.F |
362 |
THE_MODEL_MAIN |
CALL TIMER_START('INITIALISE_FIXED [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
365 |
THE_MODEL_MAIN |
CALL OPENAD_INITIALISE_FIXED( myThid ) |
|
./pkg/openad/the_model_main.F |
367 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('INITIALISE_FIXED [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
385 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_UNPACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
386 |
THE_MODEL_MAIN |
CALL CTRL_UNPACK( .TRUE. , myThid ) |
|
./pkg/openad/the_model_main.F |
387 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_UNPACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
395 |
THE_MODEL_MAIN |
CALL COST_DEPENDENT_INIT ( myThid ) |
|
./pkg/openad/the_model_main.F |
401 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('G_THE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
403 |
THE_MODEL_MAIN |
CALL TIMER_START('G_THE_MAIN_LOOP [TANGENT RUN]',myThid) |
|
./pkg/openad/the_model_main.F |
404 |
THE_MODEL_MAIN |
CALL G_THE_MAIN_LOOP ( myTime, myIter, myThid ) |
|
./pkg/openad/the_model_main.F |
405 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('G_THE_MAIN_LOOP [TANGENT RUN]',myThid) |
|
./pkg/openad/the_model_main.F |
415 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('MDTHE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
417 |
THE_MODEL_MAIN |
CALL TIMER_START('MDTHE_MAIN_LOOP [MD RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
418 |
THE_MODEL_MAIN |
CALL MDTHE_MAIN_LOOP ( myTime, myIter, myThid ) |
|
./pkg/openad/the_model_main.F |
419 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('MDTHE_MAIN_LOOP [MD RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
420 |
THE_MODEL_MAIN |
CALL COST_FINAL_STORE ( myThid, lastdiva ) |
|
./pkg/openad/the_model_main.F |
423 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
425 |
THE_MODEL_MAIN |
CALL TIMER_START('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
426 |
THE_MODEL_MAIN |
CALL ADTHE_MAIN_LOOP ( myThid ) |
|
./pkg/openad/the_model_main.F |
427 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
428 |
THE_MODEL_MAIN |
CALL COST_FINAL_RESTORE ( myThid, lastdiva ) |
|
./pkg/openad/the_model_main.F |
434 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
436 |
THE_MODEL_MAIN |
CALL TIMER_START('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
437 |
THE_MODEL_MAIN |
CALL ADTHE_MAIN_LOOP ( myThid ) |
|
./pkg/openad/the_model_main.F |
438 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./pkg/openad/the_model_main.F |
442 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
444 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP (F) [THE_MODEL_MAIN]',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 |
449 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP (F) [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
450 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP (A) [THE_MODEL_MAIN]',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 |
582 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP (A) [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
591 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
594 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
595 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./pkg/openad/the_model_main.F |
596 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
609 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
610 |
THE_MODEL_MAIN |
CALL CTRL_PACK( .FALSE. , myThid ) |
|
./pkg/openad/the_model_main.F |
611 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
614 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
615 |
THE_MODEL_MAIN |
CALL CTRL_PACK( .TRUE. , myThid ) |
|
./pkg/openad/the_model_main.F |
616 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
625 |
THE_MODEL_MAIN |
CALL TIMER_START('GRDCHK_MAIN [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
626 |
THE_MODEL_MAIN |
CALL GRDCHK_MAIN( myThid ) |
|
./pkg/openad/the_model_main.F |
627 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('GRDCHK_MAIN [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
634 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid) |
|
./pkg/openad/the_model_main.F |
637 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
638 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./pkg/openad/the_model_main.F |
639 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
650 |
THE_MODEL_MAIN |
_BEGIN_MASTER( myThid ) |
|
./pkg/openad/the_model_main.F |
651 |
THE_MODEL_MAIN |
CALL MNC_FILE_CLOSE_ALL( myThid ) |
|
./pkg/openad/the_model_main.F |
652 |
THE_MODEL_MAIN |
_END_MASTER( myThid ) |
|
./pkg/openad/the_model_main.F |
657 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ALL [THE_MODEL_MAIN]',myThid) |
|
./pkg/openad/the_model_main.F |
660 |
THE_MODEL_MAIN |
IF ( myThid .EQ. 1 ) THEN |
|
./pkg/openad/the_model_main.F |
661 |
THE_MODEL_MAIN |
CALL TIMER_PRINTALL( myThid ) |
|
./pkg/openad/the_model_main.F |
666 |
THE_MODEL_MAIN |
CALL BAR_CHECK( 9, myThid ) |
|
./pkg/openad/the_model_main.F |
669 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_LEAVE('THE_MODEL_MAIN',myThid) |
|
./pkg/opps/opps_calc.F |
139 |
OPPS_CALC |
Dd(k)=STATE1(Pd(k,2),Pd(k,1),i,j,k,bi,bj,myThid) |
|
./pkg/opps/opps_calc.F |
177 |
OPPS_CALC |
D1=STATE1( Pd(k2,2), Pd(k2,1),i,j,k2+1,bi,bj,myThid) |
|
./pkg/opps/opps_calc.F |
179 |
OPPS_CALC |
& i,j,k2+1,bi,bj,myThid) |
|
./pkg/opps/opps_calc.F |
22 |
OPPS_CALC |
I I, J, bi, bj, myTime, myIter, myThid ) |
|
./pkg/opps/opps_calc.F |
233 |
OPPS_CALC |
Dd(k2+1)=STATE1(Pd(k2+1,2),Pd(k2+1,1),i,j,k2+1,bi,bj,myThid) |
|
./pkg/opps/opps_calc.F |
440 |
OPPS_CALC |
_RL FUNCTION STATE1( sLoc, tLoc, i, j, kRef, bi, bj, myThid ) |
|
./pkg/opps/opps_calc.F |
466 |
OPPS_CALC |
INTEGER i, j, kRef, bi, bj, myThid |
|
./pkg/opps/opps_calc.F |
510 |
OPPS_CALC |
CALL FIND_RHO_SCALAR( tLoc, sLoc, pLoc, rhoLoc, myThid ) |
|
./pkg/opps/opps_calc.F |
82 |
OPPS_CALC |
INTEGER myThid, myIter |
|
./pkg/opps/opps_check.F |
20 |
OPPS_CHECK |
INTEGER myThid |
|
./pkg/opps/opps_check.F |
5 |
OPPS_CHECK |
SUBROUTINE OPPS_CHECK( myThid ) |
|
./pkg/opps/opps_init.F |
24 |
OPPS_INIT |
INTEGER myThid |
|
./pkg/opps/opps_init.F |
37 |
OPPS_INIT |
do bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/opps/opps_init.F |
38 |
OPPS_INIT |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/opps/opps_init.F |
6 |
OPPS_INIT |
SUBROUTINE OPPS_INIT( myThid ) |
|
./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 |
164 |
OPPS_INTERFACE |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/opps/opps_interface.F |
167 |
OPPS_INTERFACE |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/opps/opps_interface.F |
55 |
OPPS_INTERFACE |
INTEGER myThid |
|
./model/src/do_fields_blocking_exchanges.F |
100 |
DO_FIELDS_BLOCKING_EXCHANGES |
& CALL PTRACERS_FIELDS_BLOCKING_EXCH(myThid) |
|
./model/src/do_fields_blocking_exchanges.F |
107 |
DO_FIELDS_BLOCKING_EXCHANGES |
& CALL GGL90_EXCHANGES(myThid) |
|
./model/src/do_fields_blocking_exchanges.F |
10 |
DO_FIELDS_BLOCKING_EXCHANGES |
SUBROUTINE DO_FIELDS_BLOCKING_EXCHANGES(myThid) |
|
./model/src/do_fields_blocking_exchanges.F |
43 |
DO_FIELDS_BLOCKING_EXCHANGES |
INTEGER myThid |
|
./model/src/do_fields_blocking_exchanges.F |
57 |
DO_FIELDS_BLOCKING_EXCHANGES |
& CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./model/src/do_fields_blocking_exchanges.F |
59 |
DO_FIELDS_BLOCKING_EXCHANGES |
& _EXCH_XYZ_RL( wVel , myThid ) |
|
./model/src/do_fields_blocking_exchanges.F |
64 |
DO_FIELDS_BLOCKING_EXCHANGES |
_EXCH_XYZ_RL( theta, myThid ) |
|
./model/src/do_fields_blocking_exchanges.F |
65 |
DO_FIELDS_BLOCKING_EXCHANGES |
_EXCH_XYZ_RL( salt , myThid ) |
|
./model/src/do_fields_blocking_exchanges.F |
82 |
DO_FIELDS_BLOCKING_EXCHANGES |
& CALL GAD_SOM_EXCHANGES( myThid ) |
|
./model/src/do_fields_blocking_exchanges.F |
86 |
DO_FIELDS_BLOCKING_EXCHANGES |
CALL EXCH_UV_DGRID_3D_RL( uVelD,vVelD, .TRUE., Nr, myThid ) |
|
./model/src/do_fields_blocking_exchanges.F |
89 |
DO_FIELDS_BLOCKING_EXCHANGES |
& _EXCH_XYZ_RL( totPhiHyd , myThid ) |
|
./pkg/opps/opps_output.F |
102 |
OPPS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/opps/opps_output.F |
103 |
OPPS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/opps/opps_output.F |
104 |
OPPS_OUTPUT |
CALL TIMEAVE_RESET( OPPSconvCountTave, Nr, bi, bj, myThid ) |
|
./pkg/opps/opps_output.F |
112 |
OPPS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/opps/opps_output.F |
113 |
OPPS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/opps/opps_output.F |
115 |
OPPS_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/opps/opps_output.F |
128 |
OPPS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/opps/opps_output.F |
129 |
OPPS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/opps/opps_output.F |
131 |
OPPS_OUTPUT |
& OPPS_timeAve, Nr, bi, bj, myThid ) |
|
./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 |
145 |
OPPS_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/opps/opps_output.F |
146 |
OPPS_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/opps/opps_output.F |
147 |
OPPS_OUTPUT |
CALL TIMEAVE_RESET( OPPSconvCountTave, Nr, bi, bj, myThid ) |
|
./pkg/opps/opps_output.F |
57 |
OPPS_OUTPUT |
INTEGER myThid |
|
./pkg/opps/opps_output.F |
9 |
OPPS_OUTPUT |
SUBROUTINE OPPS_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/opps/opps_readparms.F |
104 |
OPPS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/opps/opps_readparms.F |
10 |
OPPS_READPARMS |
SUBROUTINE OPPS_READPARMS( myThid ) |
|
./pkg/opps/opps_readparms.F |
24 |
OPPS_READPARMS |
INTEGER myThid |
|
./pkg/opps/opps_readparms.F |
56 |
OPPS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/opps/opps_readparms.F |
61 |
OPPS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/opps/opps_readparms.F |
84 |
OPPS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/opps/opps_readparms.F |
91 |
OPPS_READPARMS |
I myThid ) |
|
./pkg/pp81/pp81_calc.F |
11 |
PP81_CALC |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./pkg/pp81/pp81_calc.F |
53 |
PP81_CALC |
INTEGER myThid |
|
./pkg/pp81/pp81_calc.F |
74 |
PP81_CALC |
I myTime, myThid ) |
|
./pkg/pp81/pp81_calc_diff.F |
41 |
PP81_CALC_DIFF |
INTEGER myThid |
|
./pkg/pp81/pp81_calc_diff.F |
9 |
PP81_CALC_DIFF |
I myThid) |
|
./pkg/pp81/pp81_calc_visc.F |
34 |
PP81_CALC_VISC |
INTEGER myThid |
|
./pkg/pp81/pp81_calc_visc.F |
8 |
PP81_CALC_VISC |
I myThid) |
|
./pkg/pp81/pp81_check.F |
20 |
PP81_CHECK |
INTEGER myThid |
|
./pkg/pp81/pp81_check.F |
5 |
PP81_CHECK |
SUBROUTINE PP81_CHECK( myThid ) |
|
./pkg/pp81/pp81_diagnostics_init.F |
26 |
PP81_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/pp81/pp81_diagnostics_init.F |
51 |
PP81_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/pp81/pp81_diagnostics_init.F |
58 |
PP81_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/pp81/pp81_diagnostics_init.F |
9 |
PP81_DIAGNOSTICS_INIT |
SUBROUTINE PP81_DIAGNOSTICS_INIT( myThid ) |
|
./model/src/do_oceanic_phys.F |
1001 |
DO_OCEANIC_PHYS |
CALL TIMER_START('KPP_CALC [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
1003 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1004 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP ('KPP_CALC [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
1008 |
DO_OCEANIC_PHYS |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1017 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('PP81_CALC',myThid) |
|
./model/src/do_oceanic_phys.F |
1020 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1028 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('KL10_CALC',myThid) |
|
./model/src/do_oceanic_phys.F |
1031 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1039 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('MY82_CALC',myThid) |
|
./model/src/do_oceanic_phys.F |
1042 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1054 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('GGL90_CALC',myThid) |
|
./model/src/do_oceanic_phys.F |
1056 |
DO_OCEANIC_PHYS |
CALL TIMER_START('GGL90_CALC [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
1058 |
DO_OCEANIC_PHYS |
I bi, bj, sigmaR, myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
1059 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP ('GGL90_CALC [DO_OCEANIC_PHYS]', 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 |
1069 |
DO_OCEANIC_PHYS |
I Nr, deltaTClock, bi, bj, myThid) |
|
./model/src/do_oceanic_phys.F |
1092 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('GMREDI_CALC_TENSOR',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 |
1135 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('OFFLINE_GET_DIFFUS',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 |
1163 |
DO_OCEANIC_PHYS |
CALL KPP_DO_EXCH( 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 |
1178 |
DO_OCEANIC_PHYS |
& 0, Nr, 0, 1, 1, myThid ) |
|
./model/src/do_oceanic_phys.F |
1182 |
DO_OCEANIC_PHYS |
& CALL SALT_PLUME_DIAGNOSTICS_FILL(bi,bj,myThid) |
|
./model/src/do_oceanic_phys.F |
1187 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_LEAVE('DO_OCEANIC_PHYS',myThid) |
|
./model/src/do_oceanic_phys.F |
197 |
DO_OCEANIC_PHYS |
INTEGER myThid |
|
./model/src/do_oceanic_phys.F |
234 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_ENTER('DO_OCEANIC_PHYS',myThid) |
|
./model/src/do_oceanic_phys.F |
240 |
DO_OCEANIC_PHYS |
IF ( DIAGNOSTICS_IS_ON('MXLDEPTH',myThid) ) |
|
./model/src/do_oceanic_phys.F |
242 |
DO_OCEANIC_PHYS |
IF ( DIAGNOSTICS_IS_ON('DRHODR ',myThid) ) |
|
./model/src/do_oceanic_phys.F |
244 |
DO_OCEANIC_PHYS |
IF ( DIAGNOSTICS_IS_ON('WdRHO_P ',myThid) ) |
|
./model/src/do_oceanic_phys.F |
246 |
DO_OCEANIC_PHYS |
IF ( DIAGNOSTICS_IS_ON('WdRHOdP ',myThid) ) |
|
./model/src/do_oceanic_phys.F |
271 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('OBCS_CALC',myThid) |
|
./model/src/do_oceanic_phys.F |
274 |
DO_OCEANIC_PHYS |
I uVel, vVel, wVel, theta, salt, myThid ) |
|
./model/src/do_oceanic_phys.F |
282 |
DO_OCEANIC_PHYS |
CALL OCN_APPLY_IMPORT( .TRUE., myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
288 |
DO_OCEANIC_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_oceanic_phys.F |
289 |
DO_OCEANIC_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/do_oceanic_phys.F |
301 |
DO_OCEANIC_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_oceanic_phys.F |
302 |
DO_OCEANIC_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/do_oceanic_phys.F |
321 |
DO_OCEANIC_PHYS |
CALL FRAZIL_CALC_RHS( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
359 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('THSICE_MAIN',myThid) |
|
./model/src/do_oceanic_phys.F |
363 |
DO_OCEANIC_PHYS |
CALL TIMER_START('THSICE_MAIN [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
364 |
DO_OCEANIC_PHYS |
CALL THSICE_MAIN( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
365 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP( 'THSICE_MAIN [DO_OCEANIC_PHYS]', 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 |
473 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('SEAICE_MODEL',myThid) |
|
./model/src/do_oceanic_phys.F |
475 |
DO_OCEANIC_PHYS |
CALL TIMER_START('SEAICE_MODEL [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
476 |
DO_OCEANIC_PHYS |
CALL SEAICE_MODEL( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
477 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP ('SEAICE_MODEL [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
479 |
DO_OCEANIC_PHYS |
CALL SEAICE_COST_SENSI ( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
489 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('OCN_EXPORT_DATA',myThid) |
|
./model/src/do_oceanic_phys.F |
491 |
DO_OCEANIC_PHYS |
CALL TIMER_START('OCN_EXPORT_DATA [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
492 |
DO_OCEANIC_PHYS |
CALL OCN_EXPORT_DATA( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
493 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP ('OCN_EXPORT_DATA [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
525 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('THSICE_MAIN',myThid) |
|
./model/src/do_oceanic_phys.F |
529 |
DO_OCEANIC_PHYS |
CALL TIMER_START('THSICE_MAIN [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
530 |
DO_OCEANIC_PHYS |
CALL THSICE_MAIN( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
531 |
DO_OCEANIC_PHYS |
CALL TIMER_STOP( 'THSICE_MAIN [DO_OCEANIC_PHYS]', myThid) |
|
./model/src/do_oceanic_phys.F |
539 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('SHELFICE_THERMODYNAMICS',myThid) |
|
./model/src/do_oceanic_phys.F |
550 |
DO_OCEANIC_PHYS |
& myThid) |
|
./model/src/do_oceanic_phys.F |
551 |
DO_OCEANIC_PHYS |
CALL SHELFICE_THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
553 |
DO_OCEANIC_PHYS |
& myThid) |
|
./model/src/do_oceanic_phys.F |
560 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('ICEFRONT_THERMODYNAMICS',myThid) |
|
./model/src/do_oceanic_phys.F |
565 |
DO_OCEANIC_PHYS |
& myThid) |
|
./model/src/do_oceanic_phys.F |
566 |
DO_OCEANIC_PHYS |
CALL ICEFRONT_THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
568 |
DO_OCEANIC_PHYS |
& 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 |
604 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FORCING_SURF',myThid) |
|
./model/src/do_oceanic_phys.F |
608 |
DO_OCEANIC_PHYS |
I myTime, myIter, myThid ) |
|
./model/src/do_oceanic_phys.F |
614 |
DO_OCEANIC_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_oceanic_phys.F |
619 |
DO_OCEANIC_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/do_oceanic_phys.F |
622 |
DO_OCEANIC_PHYS |
act1 = bi - myBxLo(myThid) |
|
./model/src/do_oceanic_phys.F |
623 |
DO_OCEANIC_PHYS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/do_oceanic_phys.F |
624 |
DO_OCEANIC_PHYS |
act2 = bj - myByLo(myThid) |
|
./model/src/do_oceanic_phys.F |
625 |
DO_OCEANIC_PHYS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/do_oceanic_phys.F |
626 |
DO_OCEANIC_PHYS |
act3 = myThid - 1 |
|
./model/src/do_oceanic_phys.F |
761 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('FIND_RHO_2D (xNr)',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 |
797 |
DO_OCEANIC_PHYS |
I k, bi, bj, myThid ) |
|
./model/src/do_oceanic_phys.F |
827 |
DO_OCEANIC_PHYS |
CALL DEBUG_MSG(msgBuf(1:43),myThid) |
|
./model/src/do_oceanic_phys.F |
869 |
DO_OCEANIC_PHYS |
I k-1, bi, bj, myThid ) |
|
./model/src/do_oceanic_phys.F |
872 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('GRAD_SIGMA',myThid) |
|
./model/src/do_oceanic_phys.F |
884 |
DO_OCEANIC_PHYS |
I myThid ) |
|
./model/src/do_oceanic_phys.F |
898 |
DO_OCEANIC_PHYS |
CALL ZERO_ADJ_LOC( Nr, sigmaX, myThid) |
|
./model/src/do_oceanic_phys.F |
899 |
DO_OCEANIC_PHYS |
CALL ZERO_ADJ_LOC( Nr, sigmaY, myThid) |
|
./model/src/do_oceanic_phys.F |
900 |
DO_OCEANIC_PHYS |
CALL ZERO_ADJ_LOC( Nr, sigmaR, myThid) |
|
./model/src/do_oceanic_phys.F |
908 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('CALC_IVDC',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 ) |
|
./model/src/do_oceanic_phys.F |
969 |
DO_OCEANIC_PHYS |
& 2, bi, bj, myThid) |
|
./model/src/do_oceanic_phys.F |
999 |
DO_OCEANIC_PHYS |
IF (debugMode) CALL DEBUG_CALL('KPP_CALC',myThid) |
|
./pkg/pp81/pp81_init_fixed.F |
29 |
PP81_INIT_FIXED |
INTEGER myThid |
|
./pkg/pp81/pp81_init_fixed.F |
60 |
PP81_INIT_FIXED |
CALL PP81_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/pp81/pp81_init_fixed.F |
9 |
PP81_INIT_FIXED |
SUBROUTINE PP81_INIT_FIXED( myThid ) |
|
./pkg/pp81/pp81_init_varia.F |
24 |
PP81_INIT_VARIA |
INTEGER myThid |
|
./pkg/pp81/pp81_init_varia.F |
37 |
PP81_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/pp81/pp81_init_varia.F |
38 |
PP81_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/pp81/pp81_init_varia.F |
6 |
PP81_INIT_VARIA |
SUBROUTINE PP81_INIT_VARIA( myThid ) |
|
./pkg/pp81/pp81_output.F |
106 |
PP81_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/pp81/pp81_output.F |
107 |
PP81_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/pp81/pp81_output.F |
108 |
PP81_OUTPUT |
CALL TIMEAVE_RESET( PPviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
109 |
PP81_OUTPUT |
CALL TIMEAVE_RESET( PPdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
117 |
PP81_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/pp81/pp81_output.F |
118 |
PP81_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/pp81/pp81_output.F |
120 |
PP81_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
122 |
PP81_OUTPUT |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
135 |
PP81_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/pp81/pp81_output.F |
136 |
PP81_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/pp81/pp81_output.F |
138 |
PP81_OUTPUT |
& PP_timeAve, Nr, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
140 |
PP81_OUTPUT |
& PP_timeAve, Nr, bi, bj, myThid ) |
|
./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 |
156 |
PP81_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/pp81/pp81_output.F |
157 |
PP81_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/pp81/pp81_output.F |
158 |
PP81_OUTPUT |
CALL TIMEAVE_RESET( PPviscArtave, Nr, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
159 |
PP81_OUTPUT |
CALL TIMEAVE_RESET( PPdiffKrtave, Nr, bi, bj, myThid ) |
|
./pkg/pp81/pp81_output.F |
175 |
PP81_OUTPUT |
CALL DIAGNOSTICS_FILL(PPviscAr,'PPviscAr',0,Nr,0,1,1,myThid) |
|
./pkg/pp81/pp81_output.F |
176 |
PP81_OUTPUT |
CALL DIAGNOSTICS_FILL(PPdiffKr,'PPdiffKr',0,Nr,0,1,1,myThid) |
|
./pkg/pp81/pp81_output.F |
57 |
PP81_OUTPUT |
INTEGER myThid |
|
./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 ) |
|
./pkg/pp81/pp81_readparms.F |
101 |
PP81_READPARMS |
_END_MASTER(myThid) |
|
./pkg/pp81/pp81_readparms.F |
10 |
PP81_READPARMS |
SUBROUTINE PP81_READPARMS( myThid ) |
|
./pkg/pp81/pp81_readparms.F |
24 |
PP81_READPARMS |
INTEGER myThid |
|
./pkg/pp81/pp81_readparms.F |
54 |
PP81_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/pp81/pp81_readparms.F |
59 |
PP81_READPARMS |
_END_MASTER(myThid) |
|
./pkg/pp81/pp81_readparms.F |
81 |
PP81_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/pp81/pp81_readparms.F |
88 |
PP81_READPARMS |
I myThid ) |
|
./pkg/pp81/pp81_ri_number.F |
102 |
PP81_RI_NUMBER |
I K, bi, bj, myThid ) |
|
./pkg/pp81/pp81_ri_number.F |
13 |
PP81_RI_NUMBER |
I myTime, myThid ) |
|
./pkg/pp81/pp81_ri_number.F |
48 |
PP81_RI_NUMBER |
INTEGER myThid |
|
./pkg/pp81/pp81_ri_number.F |
97 |
PP81_RI_NUMBER |
I Km1, bi, bj, myThid ) |
|
./model/src/do_stagger_fields_exchanges.F |
32 |
DO_STAGGER_FIELDS_EXCHANGES |
INTEGER myThid |
|
./model/src/do_stagger_fields_exchanges.F |
42 |
DO_STAGGER_FIELDS_EXCHANGES |
& CALL EXCH_UV_3D_RL( uVel, vVel, .TRUE., Nr, myThid ) |
|
./model/src/do_stagger_fields_exchanges.F |
45 |
DO_STAGGER_FIELDS_EXCHANGES |
& CALL EXCH_3D_RL( wVel, Nr, myThid ) |
|
./model/src/do_stagger_fields_exchanges.F |
52 |
DO_STAGGER_FIELDS_EXCHANGES |
CALL EXCH_SM_3D_RL( theta, .FALSE., Nr, myThid ) |
|
./model/src/do_stagger_fields_exchanges.F |
53 |
DO_STAGGER_FIELDS_EXCHANGES |
CALL EXCH_SM_3D_RL( salt , .FALSE., Nr, myThid ) |
|
./model/src/do_stagger_fields_exchanges.F |
9 |
DO_STAGGER_FIELDS_EXCHANGES |
SUBROUTINE DO_STAGGER_FIELDS_EXCHANGES(myTime, myIter, myThid) |
|
./pkg/profiles/cost_profiles.F |
15 |
COST_PROFILES |
SUBROUTINE COST_PROFILES( myiter, mytime, myThid ) |
|
./pkg/profiles/cost_profiles.F |
200 |
COST_PROFILES |
& ProfDepthNo(num_file,bi,bj),prof_data1D,bi,bj,myThid) |
|
./pkg/profiles/cost_profiles.F |
205 |
COST_PROFILES |
& prof_weights1D,bi,bj,myThid) |
|
./pkg/profiles/cost_profiles.F |
249 |
COST_PROFILES |
_GLOBAL_MAX_RL( NAVGBINRL, myThid ) |
|
./pkg/profiles/cost_profiles.F |
253 |
COST_PROFILES |
_GLOBAL_SUM_RL (tmpr6, myThid) |
|
./pkg/profiles/cost_profiles.F |
274 |
COST_PROFILES |
_GLOBAL_SUM_RL (tmpr6, myThid) |
|
./pkg/profiles/cost_profiles.F |
278 |
COST_PROFILES |
_GLOBAL_SUM_RL (tmpr9, myThid) |
|
./pkg/profiles/cost_profiles.F |
282 |
COST_PROFILES |
_GLOBAL_SUM_RL (tmpr7, myThid) |
|
./pkg/profiles/cost_profiles.F |
286 |
COST_PROFILES |
_GLOBAL_SUM_RL (tmpr8, myThid) |
|
./pkg/profiles/cost_profiles.F |
483 |
COST_PROFILES |
& ProfDepthNo(num_file,bi,bj),prof_data1D,bi,bj,myThid) |
|
./pkg/profiles/cost_profiles.F |
488 |
COST_PROFILES |
& prof_weights1D,bi,bj,myThid) |
|
./pkg/profiles/cost_profiles.F |
632 |
COST_PROFILES |
CALL GLOBAL_SUM_TILE_RL( objf_prof_tile, objf_prof_glo, myThid ) |
|
./pkg/profiles/cost_profiles.F |
633 |
COST_PROFILES |
CALL GLOBAL_SUM_TILE_RL( num_prof_tile, num_prof_glo, myThid ) |
|
./pkg/profiles/cost_profiles.F |
658 |
COST_PROFILES |
& objf_prof_mean_glo, myThid ) |
|
./pkg/profiles/cost_profiles.F |
660 |
COST_PROFILES |
& num_prof_mean_glo, myThid ) |
|
./pkg/profiles/profiles_findunit.F |
22 |
PROFILES_FINDUNIT |
INTEGER myThid |
|
./pkg/profiles/profiles_findunit.F |
45 |
PROFILES_FINDUNIT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/profiles/profiles_findunit.F |
48 |
PROFILES_FINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/profiles/profiles_findunit.F |
49 |
PROFILES_FINDUNIT |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_findunit.F |
63 |
PROFILES_FINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/profiles/profiles_findunit.F |
64 |
PROFILES_FINDUNIT |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_findunit.F |
6 |
PROFILES_FINDUNIT |
SUBROUTINE PROFILES_FINDUNIT( ioUnit, myThid ) |
|
./pkg/profiles/profiles_ini_io.F |
11 |
PROFILES_INI_IO |
SUBROUTINE PROFILES_INI_IO( myThid ) |
|
./pkg/profiles/profiles_ini_io.F |
30 |
PROFILES_INI_IO |
INTEGER myThid |
|
./pkg/profiles/profiles_ini_io.F |
42 |
PROFILES_INI_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/profiles/profiles_ini_io.F |
63 |
PROFILES_INI_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/profiles/profiles_ini_io.F |
67 |
PROFILES_INI_IO |
_END_MASTER( myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
112 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
115 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
116 |
PROFILES_INIT_FIXED |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
14 |
PROFILES_INIT_FIXED |
SUBROUTINE PROFILES_INIT_FIXED( myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
234 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
256 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
274 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
322 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
343 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
35 |
PROFILES_INIT_FIXED |
integer myThid |
|
./pkg/profiles/profiles_init_fixed.F |
547 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
560 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
571 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
582 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
599 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
687 |
PROFILES_INIT_FIXED |
& bi,bj,myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
697 |
PROFILES_INIT_FIXED |
& bi,bj, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
720 |
PROFILES_INIT_FIXED |
& bi,bj,myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
737 |
PROFILES_INIT_FIXED |
& bi,bj, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
843 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
858 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
922 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
926 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
929 |
PROFILES_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/profiles/profiles_init_fixed.F |
939 |
PROFILES_INIT_FIXED |
_GLOBAL_MAX_RL( NLEVELCOMBRL, myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
947 |
PROFILES_INIT_FIXED |
CALL GLOBAL_SUM_INT( stopProfiles , myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
949 |
PROFILES_INIT_FIXED |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
953 |
PROFILES_INIT_FIXED |
CALL GLOBAL_SUM_INT( stopGenericGrid , myThid ) |
|
./pkg/profiles/profiles_init_fixed.F |
955 |
PROFILES_INIT_FIXED |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_init_ncfile.F |
14 |
PROFILES_INIT_NCFILE |
& Zlength,bi,bj,myThid) |
|
./pkg/profiles/profiles_init_ncfile.F |
30 |
PROFILES_INIT_NCFILE |
integer myThid,bi,bj,err,vecid(2), length, Zlength |
|
./pkg/profiles/profiles_inloop.F |
16 |
PROFILES_INLOOP |
SUBROUTINE PROFILES_INLOOP(mytime,myThid ) |
|
./pkg/profiles/profiles_inloop.F |
41 |
PROFILES_INLOOP |
integer myThid |
|
./pkg/profiles/profiles_inloop.F |
88 |
PROFILES_INLOOP |
& num_file,mytime,bi,bj,myThid) |
|
./pkg/profiles/profiles_interp.F |
155 |
PROFILES_INTERP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_interp.F |
168 |
PROFILES_INTERP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_interp.F |
27 |
PROFILES_INTERP |
I 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 |
43 |
DO_STATEVARS_DIAGS |
INTEGER myThid |
|
./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 ) |
|
./pkg/profiles/profiles_readparms.F |
125 |
PROFILES_READPARMS |
I myThid ) |
|
./pkg/profiles/profiles_readparms.F |
169 |
PROFILES_READPARMS |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/profiles/profiles_readparms.F |
196 |
PROFILES_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/profiles/profiles_readparms.F |
203 |
PROFILES_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/profiles/profiles_readparms.F |
33 |
PROFILES_READPARMS |
integer myThid |
|
./pkg/profiles/profiles_readparms.F |
6 |
PROFILES_READPARMS |
subroutine PROFILES_READPARMS( myThid ) |
|
./pkg/profiles/profiles_readparms.F |
71 |
PROFILES_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/profiles/profiles_readparms.F |
75 |
PROFILES_READPARMS |
_END_MASTER(myThid) |
|
./pkg/profiles/profiles_readparms.F |
79 |
PROFILES_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/profiles/profiles_readvector.F |
13 |
PROFILES_READVECTOR |
& vec_loc_length, vec_loc , bi,bj, myThid) |
|
./pkg/profiles/profiles_readvector.F |
30 |
PROFILES_READVECTOR |
integer irec, fNb, myThid,err,varid1,tmpprofno |
|
./eesupp/src/all_proc_die.F |
103 |
ALL_PROC_DIE |
_END_MASTER(myThid) |
|
./eesupp/src/all_proc_die.F |
45 |
ALL_PROC_DIE |
INTEGER myThid |
|
./eesupp/src/all_proc_die.F |
51 |
ALL_PROC_DIE |
myThid = MAX(myThArg,1) |
|
./eesupp/src/all_proc_die.F |
54 |
ALL_PROC_DIE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/all_proc_die.F |
56 |
ALL_PROC_DIE |
_BEGIN_MASTER(myThid) |
|
./eesupp/src/all_proc_die.F |
63 |
ALL_PROC_DIE |
CALL MDS_FLUSH( errorMessageUnit, myThid ) |
|
./eesupp/src/all_proc_die.F |
65 |
ALL_PROC_DIE |
CALL MDS_FLUSH( standardMessageUnit, myThid ) |
|
./eesupp/src/all_proc_die.F |
85 |
ALL_PROC_DIE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/do_statevars_tave.F |
11 |
DO_STATEVARS_TAVE |
SUBROUTINE DO_STATEVARS_TAVE( myTime, myIter, myThid ) |
|
./model/src/do_statevars_tave.F |
41 |
DO_STATEVARS_TAVE |
INTEGER myThid |
|
./model/src/do_statevars_tave.F |
51 |
DO_STATEVARS_TAVE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/do_statevars_tave.F |
52 |
DO_STATEVARS_TAVE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
48 |
PTRACERS_AD_DUMP |
INTEGER myThid |
|
./pkg/ptracers/ptracers_ad_dump.F |
70 |
PTRACERS_AD_DUMP |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/ptracers/ptracers_ad_dump.F |
76 |
PTRACERS_AD_DUMP |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_ad_dump.F |
90 |
PTRACERS_AD_DUMP |
& adptracer(1-OLx,1-OLy,1,1,1,ip), 1, myThid ) |
|
./pkg/ptracers/ptracers_ad_dump.F |
94 |
PTRACERS_AD_DUMP |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', 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 |
46 |
PTRACERS_APPLY_FORCING |
INTEGER myThid |
|
./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 |
43 |
PTRACERS_CALC_WSURF_TR |
INTEGER myThid |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
60 |
PTRACERS_CALC_WSURF_TR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
61 |
PTRACERS_CALC_WSURF_TR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
81 |
PTRACERS_CALC_WSURF_TR |
& myThid ) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
86 |
PTRACERS_CALC_WSURF_TR |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_calc_wsurf_tr.F |
90 |
PTRACERS_CALC_WSURF_TR |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_check.F |
101 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
12 |
PTRACERS_CHECK |
SUBROUTINE PTRACERS_CHECK( myThid ) |
|
./pkg/ptracers/ptracers_check.F |
147 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
155 |
PTRACERS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
159 |
PTRACERS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
163 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
166 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
175 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
178 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
186 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/ptracers/ptracers_check.F |
189 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/ptracers/ptracers_check.F |
197 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
200 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
206 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
209 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
215 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
218 |
PTRACERS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
223 |
PTRACERS_CHECK |
_END_MASTER(myThid) |
|
./pkg/ptracers/ptracers_check.F |
28 |
PTRACERS_CHECK |
INTEGER myThid |
|
./pkg/ptracers/ptracers_check.F |
42 |
PTRACERS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/ptracers/ptracers_check.F |
46 |
PTRACERS_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check.F |
51 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/ptracers/ptracers_check.F |
53 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/ptracers/ptracers_check.F |
55 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid ) |
|
./pkg/ptracers/ptracers_check.F |
99 |
PTRACERS_CHECK |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
102 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
107 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
120 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
130 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
135 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
13 |
PTRACERS_CHECK_PICKUP |
I myIter, myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
140 |
PTRACERS_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
39 |
PTRACERS_CHECK_PICKUP |
INTEGER myThid |
|
./pkg/ptracers/ptracers_check_pickup.F |
58 |
PTRACERS_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_check_pickup.F |
87 |
PTRACERS_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_convect.F |
13 |
PTRACERS_CONVECT |
SUBROUTINE PTRACERS_CONVECT( bi,bj,k,weightA,weightB,myThid ) |
|
./pkg/ptracers/ptracers_convect.F |
39 |
PTRACERS_CONVECT |
INTEGER myThid |
|
./pkg/ptracers/ptracers_convect.F |
58 |
PTRACERS_CONVECT |
act1 = bi - myBxLo(myThid) |
|
./pkg/ptracers/ptracers_convect.F |
59 |
PTRACERS_CONVECT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/ptracers/ptracers_convect.F |
60 |
PTRACERS_CONVECT |
act2 = bj - myByLo(myThid) |
|
./pkg/ptracers/ptracers_convect.F |
61 |
PTRACERS_CONVECT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/ptracers/ptracers_convect.F |
62 |
PTRACERS_CONVECT |
act3 = myThid - 1 |
|
./pkg/ptracers/ptracers_convect.F |
78 |
PTRACERS_CONVECT |
I myThid ) |
|
./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 |
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 |
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 |
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 |
96 |
DO_THE_MODEL_IO |
INTEGER myThid |
|
./pkg/ptracers/ptracers_debug.F |
11 |
PTRACERS_DEBUG |
I myThid ) |
|
./pkg/ptracers/ptracers_debug.F |
26 |
PTRACERS_DEBUG |
INTEGER myThid |
|
./pkg/ptracers/ptracers_debug.F |
45 |
PTRACERS_DEBUG |
& strng, myThid ) |
|
./pkg/ptracers/ptracers_debug.F |
48 |
PTRACERS_DEBUG |
& strng, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
102 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
104 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'.m/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
111 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
119 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
121 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//wUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
127 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
131 |
PTRACERS_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
132 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
138 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
145 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
150 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
158 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
165 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
172 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
180 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
187 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
194 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
201 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
211 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//flxUnits, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
213 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
221 |
PTRACERS_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trcUnits//'/s', myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
223 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
234 |
PTRACERS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
27 |
PTRACERS_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/ptracers/ptracers_diagnostics_init.F |
9 |
PTRACERS_DIAGNOSTICS_INIT |
SUBROUTINE PTRACERS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
103 |
PTRACERS_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( dummy, diagName, 0,Nr,0,1,1,myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
108 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
109 |
PTRACERS_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
10 |
PTRACERS_DIAGNOSTICS_STATE |
SUBROUTINE PTRACERS_DIAGNOSTICS_STATE(myTime, myIter, myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
110 |
PTRACERS_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
136 |
PTRACERS_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( dummy, diagName, 0,Nr,0,1,1,myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
141 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
142 |
PTRACERS_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
143 |
PTRACERS_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
168 |
PTRACERS_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( dummy, diagName, 0,Nr,0,1,1,myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
32 |
PTRACERS_DIAGNOSTICS_STATE |
INTEGER myThid |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
71 |
PTRACERS_DIAGNOSTICS_STATE |
& 0,Nr,0,1,1,myThid ) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
75 |
PTRACERS_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
76 |
PTRACERS_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_diagnostics_state.F |
77 |
PTRACERS_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_dyn_state_mod.F |
21 |
PTRACERS_INIT_FIXED_DYNAMIC |
& myThid ) |
|
./pkg/ptracers/ptracers_dyn_state_mod.F |
29 |
PTRACERS_INIT_FIXED_DYNAMIC |
INTEGER myThid |
|
./pkg/ptracers/ptracers_fields_blocking_exch.F |
11 |
PTRACERS_FIELDS_BLOCKING_EXCH |
SUBROUTINE PTRACERS_FIELDS_BLOCKING_EXCH( myThid ) |
|
./pkg/ptracers/ptracers_fields_blocking_exch.F |
29 |
PTRACERS_FIELDS_BLOCKING_EXCH |
INTEGER myThid |
|
./pkg/ptracers/ptracers_fields_blocking_exch.F |
51 |
PTRACERS_FIELDS_BLOCKING_EXCH |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_fields_blocking_exch.F |
55 |
PTRACERS_FIELDS_BLOCKING_EXCH |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_forcing_surf.F |
105 |
PTRACERS_FORCING_SURF |
CALL DIAGNOSTICS_FILL(add2EmP,'Add2EmP ',0,1,2,bi,bj,myThid) |
|
./pkg/ptracers/ptracers_forcing_surf.F |
13 |
PTRACERS_FORCING_SURF |
I myTime,myIter,myThid ) |
|
./pkg/ptracers/ptracers_forcing_surf.F |
44 |
PTRACERS_FORCING_SURF |
INTEGER myThid |
|
./pkg/ptracers/ptracers_init_fixed.F |
103 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
106 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
109 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
11 |
PTRACERS_INIT_FIXED |
SUBROUTINE PTRACERS_INIT_FIXED( myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
130 |
PTRACERS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
139 |
PTRACERS_INIT_FIXED |
& myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
146 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
151 |
PTRACERS_INIT_FIXED |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
159 |
PTRACERS_INIT_FIXED |
CALL PTRACERS_MNC_INIT( myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
165 |
PTRACERS_INIT_FIXED |
CALL PTRACERS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
27 |
PTRACERS_INIT_FIXED |
INTEGER myThid |
|
./pkg/ptracers/ptracers_init_fixed.F |
46 |
PTRACERS_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
67 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_fixed.F |
70 |
PTRACERS_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
104 |
PTRACERS_INIT_VARIA |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),0,myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
105 |
PTRACERS_INIT_VARIA |
_EXCH_XYZ_RL(pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
112 |
PTRACERS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
113 |
PTRACERS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
12 |
PTRACERS_INIT_VARIA |
SUBROUTINE PTRACERS_INIT_VARIA( myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
131 |
PTRACERS_INIT_VARIA |
CALL PTRACERS_READ_PICKUP( nIter0, myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
32 |
PTRACERS_INIT_VARIA |
INTEGER myThid |
|
./pkg/ptracers/ptracers_init_varia.F |
46 |
PTRACERS_INIT_VARIA |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
51 |
PTRACERS_INIT_VARIA |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_init_varia.F |
58 |
PTRACERS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_init_varia.F |
59 |
PTRACERS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
166 |
PTRACERS_INTEGRATE |
diagSufx = GAD_DIAG_SUFX( GAD_TR, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
168 |
PTRACERS_INTEGRATE |
diagForcing = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
171 |
PTRACERS_INTEGRATE |
& diagAB_tend = DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
178 |
PTRACERS_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
179 |
PTRACERS_INTEGRATE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/ptracers/ptracers_integrate.F |
17 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
180 |
PTRACERS_INTEGRATE |
act2 = bj - myByLo(myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
181 |
PTRACERS_INTEGRATE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/ptracers/ptracers_integrate.F |
182 |
PTRACERS_INTEGRATE |
act3 = myThid - 1 |
|
./pkg/ptracers/ptracers_integrate.F |
200 |
PTRACERS_INTEGRATE |
I PTRACERS_startAB(iTracer), iterNb, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
224 |
PTRACERS_INTEGRATE |
I myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
235 |
PTRACERS_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
246 |
PTRACERS_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
252 |
PTRACERS_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
262 |
PTRACERS_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
291 |
PTRACERS_INTEGRATE |
I k, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
303 |
PTRACERS_INTEGRATE |
I iTracer, myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
307 |
PTRACERS_INTEGRATE |
CALL DIAGNOSTICS_FILL(gTrForc,diagName,k,1,2,bi,bj,myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
332 |
PTRACERS_INTEGRATE |
I myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
355 |
PTRACERS_INTEGRATE |
I PTRACERS_startAB(iTracer), iterNb, myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
359 |
PTRACERS_INTEGRATE |
CALL DIAGNOSTICS_FILL(gTr_AB,diagName,k,1,2,bi,bj,myThid) |
|
./pkg/ptracers/ptracers_integrate.F |
379 |
PTRACERS_INTEGRATE |
I myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
384 |
PTRACERS_INTEGRATE |
I 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 |
458 |
PTRACERS_INTEGRATE |
I 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 |
482 |
PTRACERS_INTEGRATE |
I myThid ) |
|
./pkg/ptracers/ptracers_integrate.F |
60 |
PTRACERS_INTEGRATE |
INTEGER myThid |
|
./model/src/do_write_pickup.F |
102 |
DO_WRITE_PICKUP |
_BEGIN_MASTER(myThid) |
|
./model/src/do_write_pickup.F |
108 |
DO_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/do_write_pickup.F |
114 |
DO_WRITE_PICKUP |
_END_MASTER(myThid) |
|
./model/src/do_write_pickup.F |
120 |
DO_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/do_write_pickup.F |
13 |
DO_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./model/src/do_write_pickup.F |
45 |
DO_WRITE_PICKUP |
INTEGER myThid |
|
./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 |
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_mnc_init.F |
11 |
PTRACERS_MNC_INIT |
SUBROUTINE PTRACERS_MNC_INIT( myThid ) |
|
./pkg/ptracers/ptracers_mnc_init.F |
25 |
PTRACERS_MNC_INIT |
INTEGER myThid |
|
./pkg/ptracers/ptracers_mnc_init.F |
56 |
PTRACERS_MNC_INIT |
& PTRACERS_names(ii),'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/ptracers/ptracers_mnc_init.F |
58 |
PTRACERS_MNC_INIT |
CALL MNC_CW_ADD_VNAME(name,'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/ptracers/ptracers_mnc_init.F |
64 |
PTRACERS_MNC_INIT |
& 'long_name',PTRACERS_long_names(ii),myThid) |
|
./pkg/ptracers/ptracers_mnc_init.F |
71 |
PTRACERS_MNC_INIT |
& PTRACERS_units(ii),myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
105 |
PTRACERS_MONITOR |
CALL MON_SET_PREF('trctime',myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
106 |
PTRACERS_MONITOR |
CALL MON_OUT_I( '_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
107 |
PTRACERS_MONITOR |
CALL MON_OUT_RL('_secondsf', myTime,mon_string_none,myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
110 |
PTRACERS_MONITOR |
CALL MON_SET_PREF('trcstat_',myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
116 |
PTRACERS_MONITOR |
& hFacC, maskInC, rA ,drF, dummyRL, myThid ) |
|
./pkg/ptracers/ptracers_monitor.F |
11 |
PTRACERS_MONITOR |
I myIter, myTime, myThid ) |
|
./pkg/ptracers/ptracers_monitor.F |
120 |
PTRACERS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/ptracers/ptracers_monitor.F |
35 |
PTRACERS_MONITOR |
INTEGER myThid |
|
./pkg/ptracers/ptracers_monitor.F |
61 |
PTRACERS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/ptracers/ptracers_monitor.F |
75 |
PTRACERS_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
76 |
PTRACERS_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
78 |
PTRACERS_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/ptracers/ptracers_monitor.F |
79 |
PTRACERS_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
108 |
ADPTRACERS_MONITOR |
CALL MON_SET_PREF('ad_trcstat_',myThid) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
113 |
ADPTRACERS_MONITOR |
& hFacC, maskInC, rA ,drF, dummyRL, myThid ) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
117 |
ADPTRACERS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/ptracers/ptracers_monitor_ad.F |
14 |
ADPTRACERS_MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
41 |
ADPTRACERS_MONITOR |
INTEGER myThid |
|
./pkg/ptracers/ptracers_monitor_ad.F |
69 |
ADPTRACERS_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/ptracers/ptracers_monitor_ad.F |
83 |
ADPTRACERS_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
84 |
ADPTRACERS_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
86 |
ADPTRACERS_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/ptracers/ptracers_monitor_ad.F |
87 |
ADPTRACERS_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/ptracers/ptracers_output.F |
11 |
PTRACERS_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_output.F |
30 |
PTRACERS_OUTPUT |
INTEGER myThid |
|
./pkg/ptracers/ptracers_output.F |
38 |
PTRACERS_OUTPUT |
CALL PTRACERS_WRITE_STATE( myTime, myIter, myThid ) |
|
./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 |
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 |
123 |
PTRACERS_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
128 |
PTRACERS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
131 |
PTRACERS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
134 |
PTRACERS_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
143 |
PTRACERS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
147 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
152 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
157 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
162 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
165 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
179 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
181 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
197 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
199 |
PTRACERS_READ_PICKUP |
& Nr, 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 |
218 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
220 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
231 |
PTRACERS_READ_PICKUP |
& nj, prec, Nr, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
233 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
245 |
PTRACERS_READ_PICKUP |
& nj, prec, Nr, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
247 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
259 |
PTRACERS_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
263 |
PTRACERS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
269 |
PTRACERS_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
289 |
PTRACERS_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
300 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
301 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( fn, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
309 |
PTRACERS_READ_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
320 |
PTRACERS_READ_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
323 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
32 |
PTRACERS_READ_PICKUP |
INTEGER myThid |
|
./pkg/ptracers/ptracers_read_pickup.F |
330 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
335 |
PTRACERS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
73 |
PTRACERS_READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/ptracers/ptracers_read_pickup.F |
74 |
PTRACERS_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, 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_read_pickup.F |
78 |
PTRACERS_READ_PICKUP |
& gpTrNm1(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_pickup.F |
80 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
82 |
PTRACERS_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 2, myThid) |
|
./pkg/ptracers/ptracers_read_pickup.F |
85 |
PTRACERS_READ_PICKUP |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_read_pickup.F |
87 |
PTRACERS_READ_PICKUP |
& Nr, myThid ) |
|
./pkg/ptracers/ptracers_read_pickup.F |
97 |
PTRACERS_READ_PICKUP |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/ptracers/ptracers_readparms.F |
101 |
PTRACERS_READPARMS |
I PTRACERS_num, myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
11 |
PTRACERS_READPARMS |
SUBROUTINE PTRACERS_READPARMS( myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
162 |
PTRACERS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
166 |
PTRACERS_READPARMS |
I myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
171 |
PTRACERS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
186 |
PTRACERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
209 |
PTRACERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
232 |
PTRACERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
235 |
PTRACERS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_readparms.F |
279 |
PTRACERS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ptracers/ptracers_readparms.F |
31 |
PTRACERS_READPARMS |
INTEGER myThid |
|
./pkg/ptracers/ptracers_readparms.F |
88 |
PTRACERS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ptracers/ptracers_readparms.F |
92 |
PTRACERS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ptracers/ptracers_readparms.F |
96 |
PTRACERS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
109 |
PTRACERS_RESET |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
113 |
PTRACERS_RESET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
114 |
PTRACERS_RESET |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
115 |
PTRACERS_RESET |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
116 |
PTRACERS_RESET |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
12 |
PTRACERS_RESET |
SUBROUTINE PTRACERS_RESET( myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
133 |
PTRACERS_RESET |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
136 |
PTRACERS_RESET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
137 |
PTRACERS_RESET |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
33 |
PTRACERS_RESET |
INTEGER myThid |
|
./pkg/ptracers/ptracers_reset.F |
61 |
PTRACERS_RESET |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
66 |
PTRACERS_RESET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
67 |
PTRACERS_RESET |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_reset.F |
70 |
PTRACERS_RESET |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
71 |
PTRACERS_RESET |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
88 |
PTRACERS_RESET |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),0,myThid) |
|
./pkg/ptracers/ptracers_reset.F |
89 |
PTRACERS_RESET |
_EXCH_XYZ_RL(pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_reset.F |
93 |
PTRACERS_RESET |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_reset.F |
94 |
PTRACERS_RESET |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_set_iolabel.F |
29 |
PTRACERS_SET_IOLABEL |
I nbLbl, myThid ) |
|
./pkg/ptracers/ptracers_set_iolabel.F |
52 |
PTRACERS_SET_IOLABEL |
INTEGER myThid |
|
./pkg/ptracers/ptracers_switch_onoff.F |
11 |
PTRACERS_SWITCH_ONOFF |
I myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_switch_onoff.F |
31 |
PTRACERS_SWITCH_ONOFF |
INTEGER myThid |
|
./pkg/ptracers/ptracers_switch_onoff.F |
45 |
PTRACERS_SWITCH_ONOFF |
_BEGIN_MASTER(myThid) |
|
./pkg/ptracers/ptracers_switch_onoff.F |
55 |
PTRACERS_SWITCH_ONOFF |
_END_MASTER(myThid) |
|
./pkg/ptracers/ptracers_timeave.F |
10 |
PTRACERS_TIMEAVE |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_timeave.F |
42 |
PTRACERS_TIMEAVE |
INTEGER myThid |
|
./pkg/ptracers/ptracers_timeave.F |
62 |
PTRACERS_TIMEAVE |
& 1 , bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_timeave.F |
64 |
PTRACERS_TIMEAVE |
& Nr, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_timeave.F |
84 |
PTRACERS_TIMEAVE |
& Nr, DDTT, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_timeave.F |
96 |
PTRACERS_TIMEAVE |
& 1, deltaTclock, bi, bj, myThid ) |
|
./model/src/dynamics.F |
110 |
DYNAMICS |
INTEGER myThid |
|
./model/src/dynamics.F |
21 |
DYNAMICS |
SUBROUTINE DYNAMICS(myTime, myIter, myThid) |
|
./model/src/dynamics.F |
244 |
DYNAMICS |
IF (debugMode) CALL DEBUG_ENTER( 'DYNAMICS', myThid ) |
|
./model/src/dynamics.F |
250 |
DYNAMICS |
& dPhiHydDiagIsOn = DIAGNOSTICS_IS_ON( 'Um_dPHdx', myThid ) |
|
./model/src/dynamics.F |
251 |
DYNAMICS |
& .OR. DIAGNOSTICS_IS_ON( 'Vm_dPHdy', myThid ) |
|
./model/src/dynamics.F |
257 |
DYNAMICS |
CALL CALC_EP_FORCING(myThid) |
|
./model/src/dynamics.F |
261 |
DYNAMICS |
CALL DUMMY_IN_DYNAMICS( myTime, myIter, myThid ) |
|
./model/src/dynamics.F |
269 |
DYNAMICS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/dynamics.F |
279 |
DYNAMICS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/dynamics.F |
282 |
DYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./model/src/dynamics.F |
283 |
DYNAMICS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/dynamics.F |
284 |
DYNAMICS |
act2 = bj - myByLo(myThid) |
|
./model/src/dynamics.F |
285 |
DYNAMICS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/dynamics.F |
286 |
DYNAMICS |
act3 = myThid - 1 |
|
./model/src/dynamics.F |
354 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
386 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
394 |
DYNAMICS |
I bi, bj, myThid ) |
|
./model/src/dynamics.F |
412 |
DYNAMICS |
I Nr, bi, bj, myThid ) |
|
./model/src/dynamics.F |
417 |
DYNAMICS |
CALL CALC_EDDY_STRESS(bi,bj,myThid) |
|
./model/src/dynamics.F |
486 |
DYNAMICS |
I myTime, myIter, myThid ) |
|
./model/src/dynamics.F |
491 |
DYNAMICS |
& 'Um_dPHdx', k, 1, 2, bi, bj, myThid ) |
|
./model/src/dynamics.F |
493 |
DYNAMICS |
& 'Vm_dPHdy', k, 1, 2, bi, bj, 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 |
552 |
DYNAMICS |
I k, bi, bj, myThid ) |
|
./model/src/dynamics.F |
557 |
DYNAMICS |
I iMin,iMax,jMin,jMax, k, bi, bj, 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 |
600 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
608 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
618 |
DYNAMICS |
I gU, gV, myThid ) |
|
./model/src/dynamics.F |
619 |
DYNAMICS |
CALL OBCS_APPLY_UV( bi, bj, 0, gU, gV, myThid ) |
|
./model/src/dynamics.F |
632 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
640 |
DYNAMICS |
I myThid ) |
|
./model/src/dynamics.F |
651 |
DYNAMICS |
IF (debugMode) CALL DEBUG_CALL('CALC_GW', myThid ) |
|
./model/src/dynamics.F |
653 |
DYNAMICS |
CALL TIMER_START('CALC_GW [DYNAMICS]',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 ) |
|
./model/src/dynamics.F |
663 |
DYNAMICS |
& CALL TIMER_STOP ('CALC_GW [DYNAMICS]',myThid) |
|
./model/src/dynamics.F |
674 |
DYNAMICS |
CALL OBCS_EXCHANGES( myThid ) |
|
./model/src/dynamics.F |
689 |
DYNAMICS |
CALL DIAGNOSTICS_FILL(totPhihyd,'PHIHYD ',0,Nr,0,1,1,myThid) |
|
./model/src/dynamics.F |
690 |
DYNAMICS |
CALL DIAGNOSTICS_FILL(phiHydLow,'PHIBOT ',0, 1,0,1,1,myThid) |
|
./model/src/dynamics.F |
694 |
DYNAMICS |
& 'PHIHYDSQ',0,Nr,0,1,1,myThid) |
|
./model/src/dynamics.F |
697 |
DYNAMICS |
& 'PHIBOTSQ',0, 1,0,1,1,myThid) |
|
./model/src/dynamics.F |
704 |
DYNAMICS |
CALL DEBUG_STATS_RL(1,EtaN,'EtaN (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
705 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,uVel,'Uvel (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
706 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,vVel,'Vvel (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
707 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,wVel,'Wvel (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
708 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,theta,'Theta (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
709 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,salt,'Salt (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
710 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gU,'Gu (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
711 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gV,'Gv (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
713 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,guNm1,'GuNm1 (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
714 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gvNm1,'GvNm1 (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
715 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gtNm1,'GtNm1 (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
716 |
DYNAMICS |
CALL DEBUG_STATS_RL(Nr,gsNm1,'GsNm1 (DYNAMICS)',myThid) |
|
./model/src/dynamics.F |
726 |
DYNAMICS |
CALL EXCH_UV_XYZ_RL(gU,gV,.TRUE.,myThid) |
|
./model/src/dynamics.F |
731 |
DYNAMICS |
IF (debugMode) CALL DEBUG_LEAVE( 'DYNAMICS', myThid ) |
|
./pkg/ptracers/ptracers_turnoff_io.F |
38 |
PTRACERS_TURNOFF_IO |
INTEGER myThid |
|
./pkg/ptracers/ptracers_turnoff_io.F |
46 |
PTRACERS_TURNOFF_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_turnoff_io.F |
54 |
PTRACERS_TURNOFF_IO |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_turnoff_io.F |
9 |
PTRACERS_TURNOFF_IO |
SUBROUTINE PTRACERS_TURNOFF_IO( seqFlag, 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 |
103 |
PTRACERS_WRITE_PICKUP |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
113 |
PTRACERS_WRITE_PICKUP |
& SQUEEZE_RIGHT, 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 |
164 |
PTRACERS_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
167 |
PTRACERS_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
178 |
PTRACERS_WRITE_PICKUP |
& j, myIter, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
194 |
PTRACERS_WRITE_PICKUP |
_BEGIN_MASTER(myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
198 |
PTRACERS_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
202 |
PTRACERS_WRITE_PICKUP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
203 |
PTRACERS_WRITE_PICKUP |
_END_MASTER(myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
210 |
PTRACERS_WRITE_PICKUP |
I iRec, myIter, myThid ) |
|
./pkg/ptracers/ptracers_write_pickup.F |
38 |
PTRACERS_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/ptracers/ptracers_write_pickup.F |
80 |
PTRACERS_WRITE_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
82 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./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 |
86 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
89 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
92 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, 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_pickup.F |
96 |
PTRACERS_WRITE_PICKUP |
& gpTrNm1(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
98 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 2, myThid) |
|
./pkg/ptracers/ptracers_write_pickup.F |
99 |
PTRACERS_WRITE_PICKUP |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, myThid) |
|
./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 |
31 |
PTRACERS_WRITE_STATE |
INTEGER myThid |
|
./pkg/ptracers/ptracers_write_state.F |
70 |
PTRACERS_WRITE_STATE |
CALL MNC_CW_SET_UDIM('ptracers', -1, myThid) |
|
./pkg/ptracers/ptracers_write_state.F |
71 |
PTRACERS_WRITE_STATE |
CALL MNC_CW_RL_W_S('D','ptracers',0,0,'T',myTime,myThid) |
|
./pkg/ptracers/ptracers_write_state.F |
72 |
PTRACERS_WRITE_STATE |
CALL MNC_CW_SET_UDIM('ptracers', 0, myThid) |
|
./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_state.F |
76 |
PTRACERS_WRITE_STATE |
& pTracer(1-OLx,1-OLy,1,1,1,iTracer),myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
101 |
PTRACERS_WRITE_TIMEAVE |
& ptracertave(1-OLx,1-OLy,1,1,1,iTr),myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
108 |
PTRACERS_WRITE_TIMEAVE |
& ptracerFluxtave(1-OLx,1-OLy,1,1,iTr),myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
10 |
PTRACERS_WRITE_TIMEAVE |
SUBROUTINE PTRACERS_WRITE_TIMEAVE( myTime, myIter, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
116 |
PTRACERS_WRITE_TIMEAVE |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./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 |
136 |
PTRACERS_WRITE_TIMEAVE |
endIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
142 |
PTRACERS_WRITE_TIMEAVE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
144 |
PTRACERS_WRITE_TIMEAVE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
146 |
PTRACERS_WRITE_TIMEAVE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
149 |
PTRACERS_WRITE_TIMEAVE |
_BEGIN_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
153 |
PTRACERS_WRITE_TIMEAVE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
156 |
PTRACERS_WRITE_TIMEAVE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
157 |
PTRACERS_WRITE_TIMEAVE |
_END_MASTER( myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
162 |
PTRACERS_WRITE_TIMEAVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
163 |
PTRACERS_WRITE_TIMEAVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
170 |
PTRACERS_WRITE_TIMEAVE |
CALL PTRACERS_TIMEAVE( myTime, nIter0, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
37 |
PTRACERS_WRITE_TIMEAVE |
INTEGER myThid |
|
./pkg/ptracers/ptracers_write_timeave.F |
64 |
PTRACERS_WRITE_TIMEAVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
65 |
PTRACERS_WRITE_TIMEAVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
70 |
PTRACERS_WRITE_TIMEAVE |
& ptracer_full, 1, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
73 |
PTRACERS_WRITE_TIMEAVE |
& ptracer_half, Nr, bi, bj, myThid ) |
|
./pkg/ptracers/ptracers_write_timeave.F |
87 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_SET_UDIM('ptr_tave', -1, myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
88 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_RL_W_S('D','ptr_tave',0,0,'T',myTime,myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
89 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_SET_UDIM('ptr_tave', 0, myThid) |
|
./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 |
92 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_SET_UDIM('ptr_flux_tave', -1, myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
94 |
PTRACERS_WRITE_TIMEAVE |
& myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
95 |
PTRACERS_WRITE_TIMEAVE |
CALL MNC_CW_SET_UDIM('ptr_flux_tave', 0, myThid) |
|
./pkg/ptracers/ptracers_write_timeave.F |
97 |
PTRACERS_WRITE_TIMEAVE |
& myThid) |
|
./pkg/ptracers/ptracers_zonal_filt_apply.F |
11 |
PTRACERS_ZONAL_FILT_APPLY |
I myThid ) |
|
./pkg/ptracers/ptracers_zonal_filt_apply.F |
33 |
PTRACERS_ZONAL_FILT_APPLY |
INTEGER myThid |
|
./pkg/ptracers/ptracers_zonal_filt_apply.F |
45 |
PTRACERS_ZONAL_FILT_APPLY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ptracers/ptracers_zonal_filt_apply.F |
46 |
PTRACERS_ZONAL_FILT_APPLY |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ptracers/ptracers_zonal_filt_apply.F |
50 |
PTRACERS_ZONAL_FILT_APPLY |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./model/src/external_fields_load.F |
109 |
EXTERNAL_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./model/src/external_fields_load.F |
10 |
EXTERNAL_FIELDS_LOAD |
SUBROUTINE EXTERNAL_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/external_fields_load.F |
114 |
EXTERNAL_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./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 |
147 |
EXTERNAL_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/external_fields_load.F |
148 |
EXTERNAL_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(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 |
185 |
EXTERNAL_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/external_fields_load.F |
186 |
EXTERNAL_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(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 |
208 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(SST0 , myThid ) |
|
./model/src/external_fields_load.F |
209 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(SST1 , myThid ) |
|
./model/src/external_fields_load.F |
210 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(SSS0 , myThid ) |
|
./model/src/external_fields_load.F |
211 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(SSS1 , myThid ) |
|
./model/src/external_fields_load.F |
212 |
EXTERNAL_FIELDS_LOAD |
CALL EXCH_UV_XY_RS(taux0,tauy0,.TRUE.,myThid) |
|
./model/src/external_fields_load.F |
213 |
EXTERNAL_FIELDS_LOAD |
CALL EXCH_UV_XY_RS(taux1,tauy1,.TRUE.,myThid) |
|
./model/src/external_fields_load.F |
214 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(Qnet0, myThid ) |
|
./model/src/external_fields_load.F |
215 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(Qnet1, myThid ) |
|
./model/src/external_fields_load.F |
216 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(EmPmR0, myThid ) |
|
./model/src/external_fields_load.F |
217 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(EmPmR1, myThid ) |
|
./model/src/external_fields_load.F |
218 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(saltFlux0, myThid ) |
|
./model/src/external_fields_load.F |
219 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(saltFlux1, myThid ) |
|
./model/src/external_fields_load.F |
221 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(Qsw0, myThid ) |
|
./model/src/external_fields_load.F |
222 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(Qsw1, myThid ) |
|
./model/src/external_fields_load.F |
225 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(pLoad0, myThid ) |
|
./model/src/external_fields_load.F |
226 |
EXTERNAL_FIELDS_LOAD |
_EXCH_XY_RS(pLoad1, myThid ) |
|
./model/src/external_fields_load.F |
230 |
EXTERNAL_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/external_fields_load.F |
231 |
EXTERNAL_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/external_fields_load.F |
240 |
EXTERNAL_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/external_fields_load.F |
241 |
EXTERNAL_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/external_fields_load.F |
325 |
EXTERNAL_FIELDS_LOAD |
_BEGIN_MASTER( myThid ) |
|
./model/src/external_fields_load.F |
334 |
EXTERNAL_FIELDS_LOAD |
_END_MASTER( myThid ) |
|
./model/src/external_fields_load.F |
54 |
EXTERNAL_FIELDS_LOAD |
INTEGER myThid |
|
./model/src/external_fields_load.F |
75 |
EXTERNAL_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./model/src/external_fields_load.F |
77 |
EXTERNAL_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./model/src/external_fields_load.F |
78 |
EXTERNAL_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./model/src/external_fields_load.F |
81 |
EXTERNAL_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./model/src/external_fields_load.F |
86 |
EXTERNAL_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/rbcs/rbcs_add_tendency.F |
13 |
RBCS_ADD_TENDENCY |
I myTime, myIter, myThid ) |
|
./pkg/rbcs/rbcs_add_tendency.F |
46 |
RBCS_ADD_TENDENCY |
INTEGER myThid |
|
./pkg/rbcs/rbcs_fields_load.F |
115 |
RBCS_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
120 |
RBCS_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./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 |
155 |
RBCS_FIELDS_LOAD |
CALL EXCH_UV_XYZ_RS( rbcu0, rbcv0, .TRUE., myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
156 |
RBCS_FIELDS_LOAD |
CALL EXCH_UV_XYZ_RS( rbcu1, rbcv1, .TRUE., 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 |
170 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbct0 , myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
171 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbct1 , 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 |
184 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcs0 , myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
185 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcs1 , 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 |
213 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcptr0(1-Olx,1-Oly,1,1,1,iTracer),myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
214 |
RBCS_FIELDS_LOAD |
CALL EXCH_XYZ_RS( rbcptr1(1-Olx,1-Oly,1,1,1,iTracer),myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
221 |
RBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
222 |
RBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
231 |
RBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
232 |
RBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
264 |
RBCS_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
265 |
RBCS_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
282 |
RBCS_FIELDS_LOAD |
CALL TIMER_STOP ('RBCS_FIELDS_LOAD [I/O]', myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
43 |
RBCS_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/rbcs/rbcs_fields_load.F |
67 |
RBCS_FIELDS_LOAD |
CALL TIMER_START('RBCS_FIELDS_LOAD [I/O]', myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
73 |
RBCS_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
74 |
RBCS_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
80 |
RBCS_FIELDS_LOAD |
I deltaTclock, locTime, myThid ) |
|
./pkg/rbcs/rbcs_fields_load.F |
83 |
RBCS_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
88 |
RBCS_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/rbcs/rbcs_fields_load.F |
8 |
RBCS_FIELDS_LOAD |
SUBROUTINE RBCS_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
104 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
108 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
116 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
120 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
126 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
131 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
138 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
142 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
148 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
153 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
166 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
171 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
177 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
182 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
189 |
RBCS_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
195 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
196 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
213 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
214 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
235 |
RBCS_INIT_FIXED |
& RBC_mask(1-OLx,1-OLy,1,1,1,irbc), 0, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
236 |
RBCS_INIT_FIXED |
CALL EXCH_XYZ_RS( RBC_mask(1-OLx,1-OLy,1,1,1,irbc), myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
238 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
239 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
253 |
RBCS_INIT_FIXED |
& RBC_mask(1-OLx,1-OLy,1,1,1,irbc), 0, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
260 |
RBCS_INIT_FIXED |
CALL READ_FLD_XYZ_RS(relaxMaskUFile,' ',RBC_maskU, 0, myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
262 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
263 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
277 |
RBCS_INIT_FIXED |
CALL READ_FLD_XYZ_RS(relaxMaskVFile,' ',RBC_maskV, 0, myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
279 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
280 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
294 |
RBCS_INIT_FIXED |
CALL EXCH_UV_XYZ_RS( RBC_maskU, RBC_maskV, .FALSE., myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
296 |
RBCS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
297 |
RBCS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
29 |
RBCS_INIT_FIXED |
INTEGER myThid |
|
./pkg/rbcs/rbcs_init_fixed.F |
311 |
RBCS_INIT_FIXED |
CALL WRITE_FLD_XYZ_RS('RBC_maskU',' ',RBC_maskU,0,myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
312 |
RBCS_INIT_FIXED |
CALL WRITE_FLD_XYZ_RS('RBC_maskV',' ',RBC_maskV,0,myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
317 |
RBCS_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
321 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
322 |
RBCS_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
51 |
RBCS_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_init_fixed.F |
55 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
59 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
68 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
73 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
79 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
7 |
RBCS_INIT_FIXED |
SUBROUTINE RBCS_INIT_FIXED( myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
83 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
93 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_fixed.F |
98 |
RBCS_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rbcs/rbcs_init_varia.F |
27 |
RBCS_INIT_VARIA |
INTEGER myThid |
|
./pkg/rbcs/rbcs_init_varia.F |
39 |
RBCS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_varia.F |
40 |
RBCS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_varia.F |
68 |
RBCS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/rbcs/rbcs_init_varia.F |
69 |
RBCS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/rbcs/rbcs_init_varia.F |
7 |
RBCS_INIT_VARIA |
SUBROUTINE RBCS_INIT_VARIA( myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
101 |
RBCS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_readparms.F |
10 |
RBCS_READPARMS |
SUBROUTINE RBCS_READPARMS( myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
146 |
RBCS_READPARMS |
I myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
178 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
181 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
190 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
193 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
200 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
203 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
211 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
214 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
218 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
221 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
228 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
234 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
240 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
246 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
255 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
264 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
267 |
RBCS_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rbcs/rbcs_readparms.F |
273 |
RBCS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/rbcs/rbcs_readparms.F |
28 |
RBCS_READPARMS |
INTEGER myThid |
|
./pkg/rbcs/rbcs_readparms.F |
93 |
RBCS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/rbcs/rbcs_readparms.F |
97 |
RBCS_READPARMS |
_END_MASTER(myThid) |
|
./model/src/external_forcing.F |
119 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
127 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
137 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
146 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
160 |
EXTERNAL_FORCING_V |
I myTime, myThid ) |
|
./model/src/external_forcing.F |
191 |
EXTERNAL_FORCING_V |
INTEGER myThid |
|
./model/src/external_forcing.F |
20 |
EXTERNAL_FORCING_U |
I myTime, myThid ) |
|
./model/src/external_forcing.F |
215 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
222 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
229 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
259 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
267 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
276 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
285 |
EXTERNAL_FORCING_V |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
299 |
EXTERNAL_FORCING_T |
I myTime, myThid ) |
|
./model/src/external_forcing.F |
331 |
EXTERNAL_FORCING_T |
INTEGER myThid |
|
./model/src/external_forcing.F |
368 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
375 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
382 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
493 |
EXTERNAL_FORCING_T |
& 'MoistCor', kc, 1, 3, bi,bj,myThid ) |
|
./model/src/external_forcing.F |
51 |
EXTERNAL_FORCING_U |
INTEGER myThid |
|
./model/src/external_forcing.F |
538 |
EXTERNAL_FORCING_T |
I myTime, 1, myThid ) |
|
./model/src/external_forcing.F |
561 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
569 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
576 |
EXTERNAL_FORCING_T |
I kLev, bi, bj, myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
584 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
592 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
601 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
609 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
617 |
EXTERNAL_FORCING_T |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
631 |
EXTERNAL_FORCING_S |
I myTime, myThid ) |
|
./model/src/external_forcing.F |
664 |
EXTERNAL_FORCING_S |
INTEGER myThid |
|
./model/src/external_forcing.F |
690 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
697 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
704 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
75 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
773 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
780 |
EXTERNAL_FORCING_S |
I kLev, bi, bj, myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
788 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
796 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
805 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
813 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
821 |
EXTERNAL_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
82 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./model/src/external_forcing.F |
89 |
EXTERNAL_FORCING_U |
I myTime, 0, myThid ) |
|
./pkg/regrid/regrid_check.F |
11 |
REGRID_CHECK |
SUBROUTINE REGRID_CHECK( myThid ) |
|
./pkg/regrid/regrid_check.F |
26 |
REGRID_CHECK |
INTEGER myThid |
|
./pkg/regrid/regrid_check.F |
40 |
REGRID_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/regrid/regrid_check.F |
48 |
REGRID_CHECK |
_END_MASTER(myThid) |
|
./pkg/regrid/regrid_init_fixed.F |
11 |
REGRID_INIT_FIXED |
SUBROUTINE REGRID_INIT_FIXED( myThid ) |
|
./pkg/regrid/regrid_init_fixed.F |
25 |
REGRID_INIT_FIXED |
INTEGER myThid |
|
./pkg/regrid/regrid_init_fixed.F |
32 |
REGRID_INIT_FIXED |
CALL REGRID_MNC_INIT( myThid ) |
|
./pkg/regrid/regrid_init_varia.F |
11 |
REGRID_INIT_VARIA |
SUBROUTINE REGRID_INIT_VARIA( myThid ) |
|
./pkg/regrid/regrid_init_varia.F |
158 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
184 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
195 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
197 |
REGRID_INIT_VARIA |
_END_MASTER( myThid ) |
|
./pkg/regrid/regrid_init_varia.F |
33 |
REGRID_INIT_VARIA |
INTEGER myThid |
|
./pkg/regrid/regrid_init_varia.F |
67 |
REGRID_INIT_VARIA |
_BEGIN_MASTER( myThid ) |
|
./pkg/regrid/regrid_init_varia.F |
72 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
76 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
80 |
REGRID_INIT_VARIA |
& SQUEEZE_RIGHT,myThid) |
|
./pkg/regrid/regrid_init_varia.F |
84 |
REGRID_INIT_VARIA |
CALL MDSFINDUNIT(iUnit, myThid) |
|
./pkg/regrid/regrid_init_varia.F |
86 |
REGRID_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/regrid/regrid_init_varia.F |
87 |
REGRID_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/regrid/regrid_mnc_init.F |
11 |
REGRID_MNC_INIT |
SUBROUTINE REGRID_MNC_INIT( myThid ) |
|
./pkg/regrid/regrid_mnc_init.F |
28 |
REGRID_MNC_INIT |
INTEGER myThid |
|
./pkg/regrid/regrid_readparms.F |
11 |
REGRID_READPARMS |
SUBROUTINE REGRID_READPARMS( myThid ) |
|
./pkg/regrid/regrid_readparms.F |
26 |
REGRID_READPARMS |
INTEGER myThid |
|
./pkg/regrid/regrid_readparms.F |
44 |
REGRID_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/regrid/regrid_readparms.F |
48 |
REGRID_READPARMS |
_END_MASTER(myThid) |
|
./pkg/regrid/regrid_readparms.F |
52 |
REGRID_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/regrid/regrid_readparms.F |
74 |
REGRID_READPARMS |
I myThid ) |
|
./pkg/regrid/regrid_readparms.F |
97 |
REGRID_READPARMS |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_check.F |
20 |
RUNCLOCK_CHECK |
INTEGER myThid |
|
./pkg/runclock/runclock_check.F |
36 |
RUNCLOCK_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/runclock/runclock_check.F |
39 |
RUNCLOCK_CHECK |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_check.F |
6 |
RUNCLOCK_CHECK |
SUBROUTINE RUNCLOCK_CHECK( myThid ) |
|
./pkg/runclock/runclock_continue.F |
101 |
NO PROCEDURE |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_continue.F |
28 |
NO PROCEDURE |
INTEGER myThid |
|
./pkg/runclock/runclock_continue.F |
42 |
NO PROCEDURE |
_BEGIN_MASTER(myThid) |
|
./pkg/runclock/runclock_continue.F |
45 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_continue.F |
47 |
NO PROCEDURE |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_continue.F |
55 |
NO PROCEDURE |
CALL GLOBAL_MAX_R8(tins,myThid) |
|
./pkg/runclock/runclock_continue.F |
69 |
NO PROCEDURE |
CALL GLOBAL_MAX_R8(ETmax,myThid) |
|
./pkg/runclock/runclock_continue.F |
74 |
NO PROCEDURE |
_BEGIN_MASTER(myThid) |
|
./pkg/runclock/runclock_continue.F |
93 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_continue.F |
97 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_continue.F |
9 |
NO PROCEDURE |
FUNCTION RUNCLOCK_CONTINUE( myThid ) |
|
./model/src/external_forcing_surf.F |
103 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( EmPmR, fixVal, 1, myThid ) |
|
./model/src/external_forcing_surf.F |
105 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qnet, fixVal, 1, myThid ) |
|
./model/src/external_forcing_surf.F |
107 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qsw, fixVal, 1, myThid ) |
|
./model/src/external_forcing_surf.F |
109 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( saltFlux, fixVal, 1, myThid ) |
|
./model/src/external_forcing_surf.F |
122 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/external_forcing_surf.F |
123 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/external_forcing_surf.F |
136 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/external_forcing_surf.F |
137 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/external_forcing_surf.F |
153 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./model/src/external_forcing_surf.F |
166 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/external_forcing_surf.F |
167 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/external_forcing_surf.F |
171 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./model/src/external_forcing_surf.F |
182 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/external_forcing_surf.F |
183 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/external_forcing_surf.F |
186 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./model/src/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/external_forcing_surf.F |
188 |
EXTERNAL_FORCING_SURF |
act2 = bj - myByLo(myThid) |
|
./model/src/external_forcing_surf.F |
189 |
EXTERNAL_FORCING_SURF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/external_forcing_surf.F |
190 |
EXTERNAL_FORCING_SURF |
act3 = myThid - 1 |
|
./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 |
53 |
EXTERNAL_FORCING_SURF |
INTEGER myThid |
|
./model/src/external_forcing_surf.F |
89 |
EXTERNAL_FORCING_SURF |
& 'EmPmR', myTime, myThid ) |
|
./model/src/external_forcing_surf.F |
93 |
EXTERNAL_FORCING_SURF |
& 'Qnet ', myTime, myThid ) |
|
./pkg/runclock/runclock_init.F |
27 |
RUNCLOCK_INIT |
INTEGER myThid |
|
./pkg/runclock/runclock_init.F |
38 |
RUNCLOCK_INIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_init.F |
48 |
RUNCLOCK_INIT |
CALL GLOBAL_MAX_R8(RC_start_tins,myThid) |
|
./pkg/runclock/runclock_init.F |
9 |
RUNCLOCK_INIT |
SUBROUTINE RUNCLOCK_INIT( myThid ) |
|
./pkg/runclock/runclock_readparms.F |
114 |
RUNCLOCK_READPARMS |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_readparms.F |
19 |
RUNCLOCK_READPARMS |
INTEGER myThid |
|
./pkg/runclock/runclock_readparms.F |
38 |
RUNCLOCK_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/runclock/runclock_readparms.F |
43 |
RUNCLOCK_READPARMS |
_END_MASTER(myThid) |
|
./pkg/runclock/runclock_readparms.F |
49 |
RUNCLOCK_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/runclock/runclock_readparms.F |
58 |
RUNCLOCK_READPARMS |
I myThid ) |
|
./pkg/runclock/runclock_readparms.F |
6 |
RUNCLOCK_READPARMS |
SUBROUTINE RUNCLOCK_READPARMS( myThid ) |
|
./pkg/runclock/runclock_readparms.F |
81 |
RUNCLOCK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_readparms.F |
85 |
RUNCLOCK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_readparms.F |
89 |
RUNCLOCK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_readparms.F |
93 |
RUNCLOCK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/runclock/runclock_readparms.F |
97 |
RUNCLOCK_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_fld_xy_rl.F |
18 |
READ_FLD_XY_RL |
INTEGER myThid |
|
./pkg/rw/read_fld_xy_rl.F |
52 |
READ_FLD_XY_RL |
I iRec, myThid ) |
|
./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 |
18 |
READ_FLD_XY_RS |
INTEGER myThid |
|
./pkg/rw/read_fld_xy_rs.F |
52 |
READ_FLD_XY_RS |
I iRec, myThid ) |
|
./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 |
18 |
READ_FLD_XYZ_RL |
INTEGER myThid |
|
./pkg/rw/read_fld_xyz_rl.F |
52 |
READ_FLD_XYZ_RL |
I iRec, myThid ) |
|
./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 |
18 |
READ_FLD_XYZ_RS |
INTEGER myThid |
|
./pkg/rw/read_fld_xyz_rs.F |
52 |
READ_FLD_XYZ_RS |
I iRec, myThid ) |
|
./pkg/rw/read_fld_xyz_rs.F |
6 |
READ_FLD_XYZ_RS |
SUBROUTINE READ_FLD_XYZ_RS( pref,suff,field,myIter,myThid) |
|
./model/src/find_alpha.F |
122 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
128 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
134 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
20 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
229 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
235 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
241 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
287 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
293 |
FIND_ALPHA |
I myThid ) |
|
./model/src/find_alpha.F |
350 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
379 |
FIND_BETA |
INTEGER myThid |
|
./model/src/find_alpha.F |
450 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
456 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
462 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
49 |
FIND_ALPHA |
INTEGER myThid |
|
./model/src/find_alpha.F |
543 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
549 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
555 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
594 |
FIND_BETA |
I myThid ) |
|
./model/src/find_alpha.F |
600 |
FIND_BETA |
I myThid ) |
|
./pkg/rw/read_glvec_rl.F |
12 |
READ_GLVEC_RL |
I sizArr, iRec, myThid ) |
|
./pkg/rw/read_glvec_rl.F |
32 |
READ_GLVEC_RL |
INTEGER myThid |
|
./pkg/rw/read_glvec_rl.F |
67 |
READ_GLVEC_RL |
I bi, bj, iRec, myThid ) |
|
./pkg/rw/read_glvec_rs.F |
12 |
READ_GLVEC_RS |
I sizArr, iRec, myThid ) |
|
./pkg/rw/read_glvec_rs.F |
32 |
READ_GLVEC_RS |
INTEGER myThid |
|
./pkg/rw/read_glvec_rs.F |
67 |
READ_GLVEC_RS |
I bi, bj, iRec, myThid ) |
|
./pkg/rw/read_mflds.F |
130 |
READ_MFLDS_SET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
131 |
READ_MFLDS_SET |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
136 |
READ_MFLDS_SET |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
162 |
READ_MFLDS_SET |
I useCurrentDir, myThid ) |
|
./pkg/rw/read_mflds.F |
178 |
READ_MFLDS_SET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
181 |
READ_MFLDS_SET |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
194 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
199 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
204 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
206 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
209 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
213 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
217 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
21 |
READ_MFLDS_INIT |
I myThid ) |
|
./pkg/rw/read_mflds.F |
221 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
224 |
READ_MFLDS_SET |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
228 |
READ_MFLDS_SET |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
245 |
READ_MFLDS_3D_RL |
I fPrec, nNz, myIter, myThid ) |
|
./pkg/rw/read_mflds.F |
275 |
READ_MFLDS_3D_RL |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
297 |
READ_MFLDS_3D_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
298 |
READ_MFLDS_3D_RL |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
304 |
READ_MFLDS_3D_RL |
prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1 |
|
./pkg/rw/read_mflds.F |
313 |
READ_MFLDS_3D_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
317 |
READ_MFLDS_3D_RL |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
323 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
332 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
341 |
READ_MFLDS_3D_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
34 |
READ_MFLDS_INIT |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
355 |
READ_MFLDS_3D_RL |
I nj, myThid ) |
|
./pkg/rw/read_mflds.F |
371 |
READ_MFLDS_LEV_RL |
I fPrec, kSiz, kLo, kHi, myIter, myThid ) |
|
./pkg/rw/read_mflds.F |
404 |
READ_MFLDS_LEV_RL |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
426 |
READ_MFLDS_LEV_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
427 |
READ_MFLDS_LEV_RL |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
433 |
READ_MFLDS_LEV_RL |
prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1 |
|
./pkg/rw/read_mflds.F |
442 |
READ_MFLDS_LEV_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
446 |
READ_MFLDS_LEV_RL |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
452 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
461 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
470 |
READ_MFLDS_LEV_RL |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
484 |
READ_MFLDS_LEV_RL |
I nj, myThid ) |
|
./pkg/rw/read_mflds.F |
500 |
READ_MFLDS_LEV_RS |
I fPrec, kSiz, kLo, kHi, myIter, myThid ) |
|
./pkg/rw/read_mflds.F |
533 |
READ_MFLDS_LEV_RS |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
555 |
READ_MFLDS_LEV_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
556 |
READ_MFLDS_LEV_RS |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
562 |
READ_MFLDS_LEV_RS |
prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1 |
|
./pkg/rw/read_mflds.F |
571 |
READ_MFLDS_LEV_RS |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
575 |
READ_MFLDS_LEV_RS |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
581 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
590 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
599 |
READ_MFLDS_LEV_RS |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
613 |
READ_MFLDS_LEV_RS |
I nj, myThid ) |
|
./pkg/rw/read_mflds.F |
628 |
READ_MFLDS_CHECK |
I myIter, myThid ) |
|
./pkg/rw/read_mflds.F |
655 |
READ_MFLDS_CHECK |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
65 |
READ_MFLDS_SET |
I fileDim3, myIter, myThid ) |
|
./pkg/rw/read_mflds.F |
673 |
READ_MFLDS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
674 |
READ_MFLDS_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
692 |
READ_MFLDS_CHECK |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
695 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
698 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
702 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
706 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
711 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
713 |
READ_MFLDS_CHECK |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
719 |
READ_MFLDS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/read_mflds.F |
720 |
READ_MFLDS_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/rw/read_mflds.F |
732 |
READ_MFLDS_CHECK |
prtMsg = debugLevel.GE.debLevA .AND. myThid.EQ.1 |
|
./pkg/rw/read_mflds.F |
736 |
READ_MFLDS_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/read_mflds.F |
746 |
READ_MFLDS_CHECK |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
749 |
READ_MFLDS_CHECK |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
763 |
READ_MFLDS_RENAME |
I myThid ) |
|
./pkg/rw/read_mflds.F |
783 |
READ_MFLDS_RENAME |
INTEGER myThid |
|
./pkg/rw/read_mflds.F |
817 |
READ_MFLDS_RENAME |
_BEGIN_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
819 |
READ_MFLDS_RENAME |
_END_MASTER( myThid ) |
|
./pkg/rw/read_mflds.F |
95 |
READ_MFLDS_SET |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
100 |
READ_REC_XY_RL |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
130 |
READ_REC_XY_RL |
I iRec, myThid ) |
|
./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 |
159 |
READ_REC_XYZ_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
190 |
READ_REC_XYZ_RS |
I iRec, myThid ) |
|
./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 |
219 |
READ_REC_XYZ_RL |
INTEGER myThid |
|
./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 |
250 |
READ_REC_XYZ_RL |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
262 |
READ_REC_3D_RS |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
285 |
READ_REC_3D_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
314 |
READ_REC_3D_RS |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
326 |
READ_REC_3D_RL |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
349 |
READ_REC_3D_RL |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
378 |
READ_REC_3D_RL |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
390 |
READ_REC_LEV_RS |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
414 |
READ_REC_LEV_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
41 |
READ_REC_XY_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
443 |
READ_REC_LEV_RS |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
455 |
READ_REC_LEV_RL |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
479 |
READ_REC_LEV_RL |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
508 |
READ_REC_LEV_RL |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
520 |
READ_REC_XZ_RS |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
541 |
READ_REC_XZ_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
569 |
READ_REC_XZ_RS |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
581 |
READ_REC_XZ_RL |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
603 |
READ_REC_XZ_RL |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
631 |
READ_REC_XZ_RL |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
643 |
READ_REC_YZ_RS |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
665 |
READ_REC_YZ_RS |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
694 |
READ_REC_YZ_RS |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
706 |
READ_REC_YZ_RL |
I iRec, myIter, myThid ) |
|
./pkg/rw/read_rec.F |
71 |
READ_REC_XY_RS |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
728 |
READ_REC_YZ_RL |
INTEGER myThid |
|
./pkg/rw/read_rec.F |
757 |
READ_REC_YZ_RL |
I iRec, myThid ) |
|
./pkg/rw/read_rec.F |
80 |
READ_REC_XY_RL |
SUBROUTINE READ_REC_XY_RL( fName,field,iRec,myIter,myThid ) |
|
./pkg/rw/rw_get_suffix.F |
12 |
RW_GET_SUFFIX |
I myTime, myIter, myThid ) |
|
./pkg/rw/rw_get_suffix.F |
32 |
RW_GET_SUFFIX |
INTEGER myThid |
|
./pkg/rw/write_fld_3d_rl.F |
20 |
WRITE_FLD_3D_RL |
INTEGER myThid |
|
./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 |
20 |
WRITE_FLD_3D_RS |
INTEGER myThid |
|
./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 |
41 |
WRITE_FLD_S3D_RL |
INTEGER myThid |
|
./pkg/rw/write_fld_s3d_rl.F |
65 |
WRITE_FLD_S3D_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/write_fld_s3d_rl.F |
71 |
WRITE_FLD_S3D_RL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/write_fld_s3d_rl.F |
87 |
WRITE_FLD_S3D_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/rw/write_fld_s3d_rl.F |
88 |
WRITE_FLD_S3D_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
41 |
WRITE_FLD_S3D_RS |
INTEGER myThid |
|
./pkg/rw/write_fld_s3d_rs.F |
65 |
WRITE_FLD_S3D_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/write_fld_s3d_rs.F |
71 |
WRITE_FLD_S3D_RS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/rw/write_fld_s3d_rs.F |
87 |
WRITE_FLD_S3D_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/rw/write_fld_s3d_rs.F |
88 |
WRITE_FLD_S3D_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/find_hyd_press_1d.F |
114 |
FIND_HYD_PRESS_1D |
O rhoLoc(k), myThid ) |
|
./model/src/find_hyd_press_1d.F |
13 |
FIND_HYD_PRESS_1D |
I belowCritNb, maxIterNb, myThid ) |
|
./model/src/find_hyd_press_1d.F |
141 |
FIND_HYD_PRESS_1D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/find_hyd_press_1d.F |
158 |
FIND_HYD_PRESS_1D |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/find_hyd_press_1d.F |
165 |
FIND_HYD_PRESS_1D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/find_hyd_press_1d.F |
46 |
FIND_HYD_PRESS_1D |
INTEGER myThid |
|
./model/src/find_hyd_press_1d.F |
70 |
FIND_HYD_PRESS_1D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/find_hyd_press_1d.F |
75 |
FIND_HYD_PRESS_1D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/find_hyd_press_1d.F |
80 |
FIND_HYD_PRESS_1D |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/rw/write_fld_xy_rl.F |
18 |
WRITE_FLD_XY_RL |
INTEGER myThid |
|
./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 |
18 |
WRITE_FLD_XY_RS |
INTEGER myThid |
|
./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 |
18 |
WRITE_FLD_XYZ_RL |
INTEGER myThid |
|
./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 |
18 |
WRITE_FLD_XYZ_RS |
INTEGER myThid |
|
./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 |
30 |
WRITE_GLVEC_RL |
INTEGER myThid |
|
./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 |
30 |
WRITE_GLVEC_RS |
INTEGER myThid |
|
./pkg/rw/write_glvec_rs.F |
66 |
WRITE_GLVEC_RS |
I bi, bj, iRec, myIter, myThid ) |
|
./pkg/rw/write_local_rl.F |
56 |
WRITE_LOCAL_RL |
INTEGER myThid |
|
./pkg/rw/write_local_rl.F |
81 |
WRITE_LOCAL_RL |
myThid = MAX(myThArg,1) |
|
./pkg/rw/write_local_rl.F |
86 |
WRITE_LOCAL_RL |
I iRec, myIter, myThid ) |
|
./pkg/rw/write_local_rs.F |
56 |
WRITE_LOCAL_RS |
INTEGER myThid |
|
./pkg/rw/write_local_rs.F |
81 |
WRITE_LOCAL_RS |
myThid = MAX(myThArg,1) |
|
./pkg/rw/write_local_rs.F |
86 |
WRITE_LOCAL_RS |
I iRec, myIter, myThid ) |
|
./pkg/rw/write_rec.F |
104 |
WRITE_REC_XY_RS |
INTEGER myThid |
|
./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 |
168 |
WRITE_REC_XY_RL |
INTEGER myThid |
|
./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 |
232 |
WRITE_REC_XYZ_RS |
INTEGER myThid |
|
./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 |
296 |
WRITE_REC_XYZ_RL |
INTEGER myThid |
|
./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 |
365 |
WRITE_REC_3D_RS |
INTEGER myThid |
|
./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 |
431 |
WRITE_REC_3D_RL |
INTEGER myThid |
|
./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 |
498 |
WRITE_REC_LEV_RS |
INTEGER myThid |
|
./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 |
565 |
WRITE_REC_LEV_RL |
INTEGER myThid |
|
./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 |
630 |
WRITE_REC_XZ_RS |
INTEGER myThid |
|
./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 |
696 |
WRITE_REC_XZ_RL |
INTEGER myThid |
|
./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 |
762 |
WRITE_REC_YZ_RS |
INTEGER myThid |
|
./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 |
829 |
WRITE_REC_YZ_RL |
INTEGER myThid |
|
./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 ) |
|
./model/src/find_rho.F |
1174 |
FIND_RHO_SCALAR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/find_rho.F |
1188 |
LOOK_FOR_NEG_SALINITY |
I k, bi, bj, myThid ) |
|
./model/src/find_rho.F |
1214 |
LOOK_FOR_NEG_SALINITY |
INTEGER myThid |
|
./model/src/find_rho.F |
1237 |
LOOK_FOR_NEG_SALINITY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/find_rho.F |
1241 |
LOOK_FOR_NEG_SALINITY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/find_rho.F |
156 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
162 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
168 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
191 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
197 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
203 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
220 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
226 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
243 |
FIND_RHO_2D |
I myThid ) |
|
./model/src/find_rho.F |
263 |
FIND_RHO_2D |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/find_rho.F |
278 |
FIND_RHOP0 |
I myThid ) |
|
./model/src/find_rho.F |
302 |
FIND_RHOP0 |
INTEGER myThid |
|
./model/src/find_rho.F |
31 |
FIND_RHO_2D |
I k, bi, bj, myThid ) |
|
./model/src/find_rho.F |
415 |
FIND_BULKMOD |
I myThid ) |
|
./model/src/find_rho.F |
441 |
FIND_BULKMOD |
INTEGER myThid |
|
./model/src/find_rho.F |
597 |
FIND_RHONUM |
I myThid ) |
|
./model/src/find_rho.F |
624 |
FIND_RHONUM |
INTEGER myThid |
|
./model/src/find_rho.F |
62 |
FIND_RHO_2D |
INTEGER myThid |
|
./model/src/find_rho.F |
663 |
FIND_RHODEN |
I myThid ) |
|
./model/src/find_rho.F |
690 |
FIND_RHODEN |
INTEGER myThid |
|
./model/src/find_rho.F |
746 |
FIND_RHOTEOS |
I myThid ) |
|
./model/src/find_rho.F |
774 |
FIND_RHOTEOS |
INTEGER myThid |
|
./model/src/find_rho.F |
836 |
FIND_RHO_SCALAR |
I myThid ) |
|
./model/src/find_rho.F |
857 |
FIND_RHO_SCALAR |
INTEGER myThid |
|
./model/src/find_rho.F |
91 |
FIND_RHO_2D |
I k, bi, bj, myThid ) |
|
./model/src/find_rho.F |
933 |
FIND_RHO_SCALAR |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/find_rho.F |
952 |
FIND_RHO_SCALAR |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/find_rho.F |
956 |
FIND_RHO_SCALAR |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/salt_plume/salt_plume_apply.F |
13 |
SALT_PLUME_APPLY |
I myTime, myIter, myThid ) |
|
./pkg/salt_plume/salt_plume_apply.F |
141 |
SALT_PLUME_APPLY |
diagSufx = GAD_DIAG_SUFX( trIdentity, myThid ) |
|
./pkg/salt_plume/salt_plume_apply.F |
144 |
SALT_PLUME_APPLY |
doDiagSPtend = DIAGNOSTICS_IS_ON(diagName,myThid) |
|
./pkg/salt_plume/salt_plume_apply.F |
235 |
SALT_PLUME_APPLY |
& CALL DIAGNOSTICS_FILL(plumetend, diagName, 0,Nr,2,bi,bj,myThid) |
|
./pkg/salt_plume/salt_plume_apply.F |
59 |
SALT_PLUME_APPLY |
INTEGER myIter, myThid |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
118 |
SALT_PLUME_CALC_DEPTH |
I K, bi, bj, 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 |
51 |
SALT_PLUME_CALC_DEPTH |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
67 |
SALT_PLUME_CALC_DEPTH |
act1 = bi - myBxLo(myThid) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
68 |
SALT_PLUME_CALC_DEPTH |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
69 |
SALT_PLUME_CALC_DEPTH |
act2 = bj - myByLo(myThid) |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
70 |
SALT_PLUME_CALC_DEPTH |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/salt_plume/salt_plume_calc_depth.F |
71 |
SALT_PLUME_CALC_DEPTH |
act3 = myThid - 1 |
|
./pkg/salt_plume/salt_plume_check.F |
22 |
SALT_PLUME_CHECK |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_check.F |
31 |
SALT_PLUME_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_check.F |
35 |
SALT_PLUME_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
42 |
SALT_PLUME_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
49 |
SALT_PLUME_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
56 |
SALT_PLUME_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
66 |
SALT_PLUME_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
75 |
SALT_PLUME_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_check.F |
80 |
SALT_PLUME_CHECK |
_END_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_check.F |
9 |
SALT_PLUME_CHECK |
SUBROUTINE SALT_PLUME_CHECK( myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
10 |
SALT_PLUME_DIAGNOSTICS_FILL |
I bi, bj, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
24 |
SALT_PLUME_DIAGNOSTICS_FILL |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
35 |
SALT_PLUME_DIAGNOSTICS_FILL |
& 'oceSPDep',0, 1,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
39 |
SALT_PLUME_DIAGNOSTICS_FILL |
& 'oceSPflx',0, 1,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
42 |
SALT_PLUME_DIAGNOSTICS_FILL |
& SPbrineVolFlux,'oceSPvol',0,1,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
44 |
SALT_PLUME_DIAGNOSTICS_FILL |
& SPforcS1,'SPforcS1',0,1,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
46 |
SALT_PLUME_DIAGNOSTICS_FILL |
& SPforcT1,'SPforcT1',0,1,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
48 |
SALT_PLUME_DIAGNOSTICS_FILL |
& dSPvolSurf2kLev, 'SPVsuf2k',0,Nr,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_fill.F |
50 |
SALT_PLUME_DIAGNOSTICS_FILL |
& dSPvolkLev2Above,'SPVk2m ',0,Nr,0,1,1,myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
102 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
110 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
118 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
126 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
134 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
142 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
20 |
SALT_PLUME_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
45 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
53 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
63 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
70 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
79 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
86 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
94 |
SALT_PLUME_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/salt_plume/salt_plume_diagnostics_init.F |
9 |
SALT_PLUME_DIAGNOSTICS_INIT |
SUBROUTINE SALT_PLUME_DIAGNOSTICS_INIT( myThid ) |
|
./eesupp/src/bar2.F |
107 |
BAR2 |
BAR2_barrierCount(1,myThid) = BAR2_barrierCount(1,myThid)+1 |
|
./eesupp/src/bar2.F |
123 |
BAR2 |
IF ( myThid .NE. 1 ) THEN |
|
./eesupp/src/bar2.F |
125 |
BAR2 |
BAR2_level(1,myThid) = BAR2_level(1,myThid)+1 |
|
./eesupp/src/bar2.F |
126 |
BAR2 |
myLevel = BAR2_level(1,myThid) |
|
./eesupp/src/bar2.F |
150 |
BAR2 |
BAR2_barrierCount(1,myThid) = BAR2_barrierCount(1,myThid)+1 |
|
./eesupp/src/bar2.F |
151 |
BAR2 |
BAR2_spinsCount(1,myThid) = BAR2_spinsCount(1,myThid)+spinCount |
|
./eesupp/src/bar2.F |
152 |
BAR2 |
BAR2_spinsMax (1,myThid) = MAX(BAR2_spinsMax(1,myThid),spinCount) |
|
./eesupp/src/bar2.F |
153 |
BAR2 |
BAR2_spinsMin (1,myThid) = MIN(BAR2_spinsMin(1,myThid),spinCount) |
|
./eesupp/src/bar2.F |
32 |
BAR2_INIT |
INTEGER myThid |
|
./eesupp/src/bar2.F |
42 |
BAR2_INIT |
BAR2_level(I,myThid) = 0 |
|
./eesupp/src/bar2.F |
43 |
BAR2_INIT |
BAR2_barrierCount(I,myThid) = 0 |
|
./eesupp/src/bar2.F |
44 |
BAR2_INIT |
BAR2_spinsCount(I,myThid) = 0 |
|
./eesupp/src/bar2.F |
45 |
BAR2_INIT |
BAR2_spinsCount(I,myThid) = 0 |
|
./eesupp/src/bar2.F |
46 |
BAR2_INIT |
BAR2_spinsMax (I,myThid) = 0 |
|
./eesupp/src/bar2.F |
47 |
BAR2_INIT |
BAR2_spinsMin (I,myThid) = 1000000000 |
|
./eesupp/src/bar2.F |
60 |
BAR2 |
SUBROUTINE BAR2( myThid ) |
|
./eesupp/src/bar2.F |
89 |
BAR2 |
INTEGER myThid |
|
./eesupp/src/bar2.F |
9 |
BAR2_INIT |
SUBROUTINE BAR2_INIT( myThid ) |
|
./model/src/forcing_surf_relax.F |
12 |
FORCING_SURF_RELAX |
I myTime, myIter, myThid ) |
|
./model/src/forcing_surf_relax.F |
171 |
FORCING_SURF_RELAX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/forcing_surf_relax.F |
172 |
FORCING_SURF_RELAX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/forcing_surf_relax.F |
183 |
FORCING_SURF_RELAX |
CALL GLOBAL_SUM_TILE_RL( sumTile, sumGlob, myThid ) |
|
./model/src/forcing_surf_relax.F |
186 |
FORCING_SURF_RELAX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/forcing_surf_relax.F |
187 |
FORCING_SURF_RELAX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/forcing_surf_relax.F |
197 |
FORCING_SURF_RELAX |
_BEGIN_MASTER( myThid ) |
|
./model/src/forcing_surf_relax.F |
201 |
FORCING_SURF_RELAX |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/forcing_surf_relax.F |
202 |
FORCING_SURF_RELAX |
_END_MASTER( myThid ) |
|
./model/src/forcing_surf_relax.F |
207 |
FORCING_SURF_RELAX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/forcing_surf_relax.F |
208 |
FORCING_SURF_RELAX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/forcing_surf_relax.F |
219 |
FORCING_SURF_RELAX |
CALL GLOBAL_SUM_TILE_RL( sumTile, sumGlob, myThid ) |
|
./model/src/forcing_surf_relax.F |
222 |
FORCING_SURF_RELAX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/forcing_surf_relax.F |
223 |
FORCING_SURF_RELAX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/forcing_surf_relax.F |
233 |
FORCING_SURF_RELAX |
_BEGIN_MASTER( myThid ) |
|
./model/src/forcing_surf_relax.F |
237 |
FORCING_SURF_RELAX |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/forcing_surf_relax.F |
238 |
FORCING_SURF_RELAX |
_END_MASTER( myThid ) |
|
./model/src/forcing_surf_relax.F |
250 |
FORCING_SURF_RELAX |
& 'TRELAX ', 0, 1, 0,1,1, myThid ) |
|
./model/src/forcing_surf_relax.F |
255 |
FORCING_SURF_RELAX |
& 'SRELAX ', 0, 1, 0,1,1, myThid ) |
|
./model/src/forcing_surf_relax.F |
47 |
FORCING_SURF_RELAX |
INTEGER myThid |
|
./model/src/forcing_surf_relax.F |
72 |
FORCING_SURF_RELAX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/forcing_surf_relax.F |
73 |
FORCING_SURF_RELAX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
41 |
SALT_PLUME_DO_EXCH |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_do_exch.F |
55 |
SALT_PLUME_DO_EXCH |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/salt_plume/salt_plume_do_exch.F |
56 |
SALT_PLUME_DO_EXCH |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/salt_plume/salt_plume_do_exch.F |
70 |
SALT_PLUME_DO_EXCH |
_EXCH_XY_RL( saltPlumeFlux, myThid ) |
|
./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 |
41 |
SALT_PLUME_FORCING_SURF |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_frac.F |
15 |
SALT_PLUME_FRAC |
I myTime, myIter, myThid ) |
|
./pkg/salt_plume/salt_plume_frac.F |
59 |
SALT_PLUME_FRAC |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_init_fixed.F |
22 |
SALT_PLUME_INIT_FIXED |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_init_fixed.F |
29 |
SALT_PLUME_INIT_FIXED |
CALL SALT_PLUME_MNC_INIT( myThid ) |
|
./pkg/salt_plume/salt_plume_init_fixed.F |
35 |
SALT_PLUME_INIT_FIXED |
CALL SALT_PLUME_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/salt_plume/salt_plume_init_fixed.F |
9 |
SALT_PLUME_INIT_FIXED |
SUBROUTINE SALT_PLUME_INIT_FIXED( myThid ) |
|
./pkg/salt_plume/salt_plume_init_varia.F |
22 |
SALT_PLUME_INIT_VARIA |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_init_varia.F |
34 |
SALT_PLUME_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/salt_plume/salt_plume_init_varia.F |
35 |
SALT_PLUME_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/salt_plume/salt_plume_init_varia.F |
9 |
SALT_PLUME_INIT_VARIA |
SUBROUTINE SALT_PLUME_INIT_VARIA( myThid ) |
|
./pkg/salt_plume/salt_plume_mnc_init.F |
22 |
SALT_PLUME_MNC_INIT |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_mnc_init.F |
31 |
SALT_PLUME_MNC_INIT |
& myThid) |
|
./pkg/salt_plume/salt_plume_mnc_init.F |
33 |
SALT_PLUME_MNC_INIT |
& 'psu.kg/m^2/s', myThid) |
|
./pkg/salt_plume/salt_plume_mnc_init.F |
35 |
SALT_PLUME_MNC_INIT |
& 'Net downward salt flux rejected during freezing', myThid) |
|
./pkg/salt_plume/salt_plume_mnc_init.F |
9 |
SALT_PLUME_MNC_INIT |
SUBROUTINE SALT_PLUME_MNC_INIT( myThid ) |
|
./pkg/salt_plume/salt_plume_readparms.F |
113 |
SALT_PLUME_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_readparms.F |
115 |
SALT_PLUME_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/salt_plume/salt_plume_readparms.F |
120 |
SALT_PLUME_READPARMS |
_END_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_readparms.F |
23 |
SALT_PLUME_READPARMS |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_readparms.F |
51 |
SALT_PLUME_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_readparms.F |
55 |
SALT_PLUME_READPARMS |
_END_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_readparms.F |
59 |
SALT_PLUME_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/salt_plume/salt_plume_readparms.F |
91 |
SALT_PLUME_READPARMS |
I myThid ) |
|
./pkg/salt_plume/salt_plume_readparms.F |
9 |
SALT_PLUME_READPARMS |
SUBROUTINE SALT_PLUME_READPARMS( myThid ) |
|
./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 |
143 |
SALT_PLUME_TENDENCY_APPLY_S |
I myTime, 1, myThid ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
162 |
SALT_PLUME_TENDENCY_APPLY_S |
& plumefrac,'PLUMEKB ',k,1,2,bi,bj,myThid ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
164 |
SALT_PLUME_TENDENCY_APPLY_S |
& plumetend,'oceSPtnd',k,1,2,bi,bj,myThid ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
44 |
SALT_PLUME_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
85 |
SALT_PLUME_TENDENCY_APPLY_S |
I myTime, 1, myThid ) |
|
./pkg/salt_plume/salt_plume_tendency_apply_s.F |
98 |
SALT_PLUME_TENDENCY_APPLY_S |
I myTime, 1, myThid ) |
|
./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 |
44 |
SALT_PLUME_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/salt_plume/salt_plume_tendency_apply_t.F |
72 |
SALT_PLUME_TENDENCY_APPLY_T |
& plumeEtend,'oceEPtnd',k,1,2,bi,bj,myThid ) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
106 |
SALT_PLUME_VOLFRAC |
I myTime, 1, myThid ) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
10 |
SALT_PLUME_VOLFRAC |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
181 |
SALT_PLUME_VOLFRAC |
& SPplumek,'PLUMEKB1',0,Nr,1,bi,bj,myThid ) |
|
./pkg/salt_plume/salt_plume_volfrac.F |
55 |
SALT_PLUME_VOLFRAC |
INTEGER myThid |
|
./model/src/forward_step.F |
1015 |
FORWARD_STEP |
& CALL DEBUG_CALL('DO_STAGGER_FIELDS_EXCH.',myThid) |
|
./model/src/forward_step.F |
1017 |
FORWARD_STEP |
CALL TIMER_START('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1018 |
FORWARD_STEP |
CALL DO_STAGGER_FIELDS_EXCHANGES( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1019 |
FORWARD_STEP |
CALL TIMER_STOP ('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1024 |
FORWARD_STEP |
CALL TIMER_START('DO_STATEVARS_DIAGS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1025 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 1, myIter, myThid ) |
|
./model/src/forward_step.F |
1026 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_STATEVARS_DIAGS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1034 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid) |
|
./model/src/forward_step.F |
1036 |
FORWARD_STEP |
CALL TIMER_START('THERMODYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1037 |
FORWARD_STEP |
CALL THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1038 |
FORWARD_STEP |
CALL TIMER_STOP ('THERMODYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1051 |
FORWARD_STEP |
CALL TIMER_START('TRC_CORRECTION_STEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1052 |
FORWARD_STEP |
CALL TRACERS_CORRECTION_STEP(myTime, myIter, myThid) |
|
./model/src/forward_step.F |
1053 |
FORWARD_STEP |
CALL TIMER_STOP ('TRC_CORRECTION_STEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1062 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid) |
|
./model/src/forward_step.F |
1064 |
FORWARD_STEP |
CALL TIMER_START('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1067 |
FORWARD_STEP |
CALL LONGSTEP_AVERAGE( myTimeBeg, myIterBeg, myThid ) |
|
./model/src/forward_step.F |
1068 |
FORWARD_STEP |
CALL TIMER_STOP ('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1072 |
FORWARD_STEP |
& CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid) |
|
./model/src/forward_step.F |
1075 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
1076 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1078 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
1105 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('GCHEM_FORCING_SEP',myThid) |
|
./model/src/forward_step.F |
1107 |
FORWARD_STEP |
CALL TIMER_START('GCHEM_FORCING_SEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1108 |
FORWARD_STEP |
CALL GCHEM_FORCING_SEP( myTime,myIter,myThid ) |
|
./model/src/forward_step.F |
1109 |
FORWARD_STEP |
CALL TIMER_STOP ('GCHEM_FORCING_SEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1119 |
FORWARD_STEP |
CALL TIMER_START('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1120 |
FORWARD_STEP |
CALL DO_FIELDS_BLOCKING_EXCHANGES( myThid ) |
|
./model/src/forward_step.F |
1121 |
FORWARD_STEP |
CALL TIMER_STOP ('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1125 |
FORWARD_STEP |
CALL TIMER_START('DO_STATEVARS_DIAGS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1126 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 2, myIter, myThid ) |
|
./model/src/forward_step.F |
1127 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_STATEVARS_DIAGS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1133 |
FORWARD_STEP |
CALL GRIDALT_UPDATE(myThid) |
|
./model/src/forward_step.F |
1139 |
FORWARD_STEP |
CALL TIMER_START('FIZHI [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1140 |
FORWARD_STEP |
CALL STEP_FIZHI_CORR ( myTime, myIter, myThid, dTtracerLev(1) ) |
|
./model/src/forward_step.F |
1141 |
FORWARD_STEP |
CALL TIMER_STOP ('FIZHI [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1148 |
FORWARD_STEP |
CALL TIMER_START('FLOATS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1149 |
FORWARD_STEP |
CALL FLT_MAIN( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1150 |
FORWARD_STEP |
CALL TIMER_STOP ('FLOATS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1156 |
FORWARD_STEP |
CALL TIMER_START('DO_STATEVARS_TAVE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1157 |
FORWARD_STEP |
CALL DO_STATEVARS_TAVE( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1158 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_STATEVARS_TAVE [FORWARD_STEP]',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 |
1176 |
FORWARD_STEP |
CALL TIMER_START('MONITOR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1177 |
FORWARD_STEP |
CALL MONITOR( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1178 |
FORWARD_STEP |
CALL TIMER_STOP ('MONITOR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1185 |
FORWARD_STEP |
CALL TIMER_START('COST_TILE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1186 |
FORWARD_STEP |
CALL COST_TILE ( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1187 |
FORWARD_STEP |
CALL TIMER_STOP ('COST_TILE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1192 |
FORWARD_STEP |
IF ( useECCO ) CALL ECCO_PHYS( myThid ) |
|
./model/src/forward_step.F |
1204 |
FORWARD_STEP |
CALL TIMER_START('DO_THE_MODEL_IO [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1205 |
FORWARD_STEP |
CALL DO_THE_MODEL_IO( modelEnd, myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1206 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_THE_MODEL_IO [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1211 |
FORWARD_STEP |
CALL TIMER_START('PTRACERS_RESET [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1212 |
FORWARD_STEP |
CALL PTRACERS_RESET( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1213 |
FORWARD_STEP |
CALL TIMER_STOP ('PTRACERS_RESET [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1218 |
FORWARD_STEP |
CALL TIMER_START('DO_WRITE_PICKUP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1219 |
FORWARD_STEP |
CALL DO_WRITE_PICKUP( modelEnd, myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
1220 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_WRITE_PICKUP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
1231 |
FORWARD_STEP |
CALL AUTODIFF_INADMODE_SET( myThid ) |
|
./model/src/forward_step.F |
1235 |
FORWARD_STEP |
CALL TIMER_START('SHOWFLOPS_INLOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/forward_step.F |
1236 |
FORWARD_STEP |
CALL SHOWFLOPS_INLOOP( iloop, myThid ) |
|
./model/src/forward_step.F |
1237 |
FORWARD_STEP |
CALL TIMER_STOP ('SHOWFLOPS_INLOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/forward_step.F |
1241 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_LEAVE('FORWARD_STEP',myThid) |
|
./model/src/forward_step.F |
380 |
FORWARD_STEP |
INTEGER myThid |
|
./model/src/forward_step.F |
395 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_ENTER('FORWARD_STEP',myThid) |
|
./model/src/forward_step.F |
399 |
FORWARD_STEP |
CALL AUTODIFF_INADMODE_UNSET( myThid ) |
|
./model/src/forward_step.F |
429 |
FORWARD_STEP |
CALL RESET_NLFS_VARS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
436 |
FORWARD_STEP |
CALL TIMER_START('UPDATE_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
437 |
FORWARD_STEP |
CALL UPDATE_R_STAR( .FALSE., myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
438 |
FORWARD_STEP |
CALL TIMER_STOP ('UPDATE_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
445 |
FORWARD_STEP |
CALL TIMER_START('UPDATE_SURF_DR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
446 |
FORWARD_STEP |
CALL UPDATE_SURF_DR( .FALSE., myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
447 |
FORWARD_STEP |
CALL TIMER_STOP ('UPDATE_SURF_DR [FORWARD_STEP]',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 |
472 |
FORWARD_STEP |
CALL TIMER_START('DO_STATEVARS_DIAGS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
473 |
FORWARD_STEP |
CALL DO_STATEVARS_DIAGS( myTime, 0, myIter, myThid ) |
|
./model/src/forward_step.F |
474 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_STATEVARS_DIAGS [FORWARD_STEP]',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 |
492 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('LOAD_FIELDS_DRIVER',myThid) |
|
./model/src/forward_step.F |
501 |
FORWARD_STEP |
CALL TIMER_START('LOAD_FIELDS_DRIVER [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
502 |
FORWARD_STEP |
CALL LOAD_FIELDS_DRIVER( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
503 |
FORWARD_STEP |
CALL TIMER_STOP ('LOAD_FIELDS_DRIVER [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
509 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('BULKF_FORCING',myThid) |
|
./model/src/forward_step.F |
511 |
FORWARD_STEP |
CALL TIMER_START('BULKF_FORCING [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
513 |
FORWARD_STEP |
CALL BULKF_FORCING( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
514 |
FORWARD_STEP |
CALL TIMER_STOP ('BULKF_FORCING [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
522 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('CHEAPAML',myThid) |
|
./model/src/forward_step.F |
524 |
FORWARD_STEP |
CALL TIMER_START('CHEAPAML [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
526 |
FORWARD_STEP |
CALL CHEAPAML( myTime, myIter,myThid ) |
|
./model/src/forward_step.F |
527 |
FORWARD_STEP |
CALL TIMER_STOP ('CHEAPAML [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
534 |
FORWARD_STEP |
CALL TIMER_START('CTRL_MAP_FORCING [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
535 |
FORWARD_STEP |
CALL CTRL_MAP_FORCING( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
536 |
FORWARD_STEP |
CALL TIMER_STOP ('CTRL_MAP_FORCING [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
541 |
FORWARD_STEP |
CALL DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
548 |
FORWARD_STEP |
CALL TIMER_START('CPL_EXPORT-IMPORT [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
549 |
FORWARD_STEP |
CALL CPL_EXPORT_IMPORT_DATA( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
550 |
FORWARD_STEP |
CALL TIMER_STOP ('CPL_EXPORT-IMPORT [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
555 |
FORWARD_STEP |
CALL TIMER_START('OASIS_PUT-GET [FORWARD_STEP]',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 |
560 |
FORWARD_STEP |
CALL TIMER_STOP ('OASIS_PUT-GET [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
567 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('EBM',myThid) |
|
./model/src/forward_step.F |
569 |
FORWARD_STEP |
CALL TIMER_START('EBM [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
570 |
FORWARD_STEP |
CALL EBM_DRIVER ( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
571 |
FORWARD_STEP |
CALL TIMER_STOP ('EBM [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
578 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('DO_ATMOSPHERIC_PHYS',myThid) |
|
./model/src/forward_step.F |
580 |
FORWARD_STEP |
CALL TIMER_START('DO_ATMOSPHERIC_PHYS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
581 |
FORWARD_STEP |
CALL DO_ATMOSPHERIC_PHYS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
582 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_ATMOSPHERIC_PHYS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
613 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('DO_OCEANIC_PHYS',myThid) |
|
./model/src/forward_step.F |
615 |
FORWARD_STEP |
CALL TIMER_START('DO_OCEANIC_PHYS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
616 |
FORWARD_STEP |
CALL DO_OCEANIC_PHYS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
617 |
FORWARD_STEP |
CALL TIMER_STOP ('DO_OCEANIC_PHYS [FORWARD_STEP]',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 |
661 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('GCHEM_CALC_TENDENCY',myThid) |
|
./model/src/forward_step.F |
663 |
FORWARD_STEP |
CALL TIMER_START('GCHEM_CALC_TENDENCY [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
664 |
FORWARD_STEP |
CALL GCHEM_CALC_TENDENCY( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
665 |
FORWARD_STEP |
CALL TIMER_STOP ('GCHEM_CALC_TENDENCY [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
733 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid) |
|
./model/src/forward_step.F |
735 |
FORWARD_STEP |
CALL TIMER_START('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
736 |
FORWARD_STEP |
CALL LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
737 |
FORWARD_STEP |
CALL TIMER_STOP ('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
741 |
FORWARD_STEP |
& CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid) |
|
./model/src/forward_step.F |
744 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
745 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
747 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
756 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('THERMODYNAMICS',myThid) |
|
./model/src/forward_step.F |
758 |
FORWARD_STEP |
CALL TIMER_START('THERMODYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
759 |
FORWARD_STEP |
CALL THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
760 |
FORWARD_STEP |
CALL TIMER_STOP ('THERMODYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
770 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('LONGSTEP_AVERAGE',myThid) |
|
./model/src/forward_step.F |
772 |
FORWARD_STEP |
CALL TIMER_START('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
773 |
FORWARD_STEP |
CALL LONGSTEP_AVERAGE( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
774 |
FORWARD_STEP |
CALL TIMER_STOP ('LONGSTEP_AVERAGE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
778 |
FORWARD_STEP |
& CALL DEBUG_CALL('LONGSTEP_THERMODYNAMICS',myThid) |
|
./model/src/forward_step.F |
781 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
782 |
FORWARD_STEP |
CALL LONGSTEP_THERMODYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
784 |
FORWARD_STEP |
& myThid) |
|
./model/src/forward_step.F |
790 |
FORWARD_STEP |
CALL TIMER_START('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
791 |
FORWARD_STEP |
CALL DO_STAGGER_FIELDS_EXCHANGES( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
792 |
FORWARD_STEP |
CALL TIMER_STOP ('BLOCKING_EXCHANGES [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
812 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('DYNAMICS',myThid) |
|
./model/src/forward_step.F |
814 |
FORWARD_STEP |
CALL TIMER_START('DYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
815 |
FORWARD_STEP |
CALL DYNAMICS( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
816 |
FORWARD_STEP |
CALL TIMER_STOP ('DYNAMICS [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
836 |
FORWARD_STEP |
CALL MNC_UPDATE_TIME( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
844 |
FORWARD_STEP |
IF (debugMode) CALL DEBUG_CALL('OFFLINE_FIELDS_LOAD',myThid) |
|
./model/src/forward_step.F |
846 |
FORWARD_STEP |
CALL TIMER_START('OFFLINE_FLDS_LOAD [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
847 |
FORWARD_STEP |
CALL OFFLINE_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
848 |
FORWARD_STEP |
CALL TIMER_STOP ('OFFLINE_FLDS_LOAD [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
861 |
FORWARD_STEP |
CALL TIMER_START('UPDATE_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
862 |
FORWARD_STEP |
CALL UPDATE_R_STAR( .TRUE., myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
863 |
FORWARD_STEP |
CALL TIMER_STOP ('UPDATE_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
867 |
FORWARD_STEP |
CALL UPDATE_SIGMA( etaH, myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
874 |
FORWARD_STEP |
CALL TIMER_START('UPDATE_SURF_DR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
875 |
FORWARD_STEP |
CALL UPDATE_SURF_DR( .TRUE., myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
876 |
FORWARD_STEP |
CALL TIMER_STOP ('UPDATE_SURF_DR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
896 |
FORWARD_STEP |
CALL TIMER_START('UPDATE_CG2D [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
897 |
FORWARD_STEP |
CALL UPDATE_CG2D( myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
898 |
FORWARD_STEP |
CALL TIMER_STOP ('UPDATE_CG2D [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
905 |
FORWARD_STEP |
CALL TIMER_START('SHAP_FILT_UV [FORWARD_STEP]',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 |
913 |
FORWARD_STEP |
CALL TIMER_STOP ('SHAP_FILT_UV [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
918 |
FORWARD_STEP |
CALL TIMER_START('ZONAL_FILT_UV [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
922 |
FORWARD_STEP |
CALL ZONAL_FILT_APPLY_UV( uVel, vVel, myThid ) |
|
./model/src/forward_step.F |
924 |
FORWARD_STEP |
CALL ZONAL_FILT_APPLY_UV( gU, gV, myThid ) |
|
./model/src/forward_step.F |
925 |
FORWARD_STEP |
CALL TIMER_STOP ('ZONAL_FILT_UV [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
941 |
FORWARD_STEP |
CALL TIMER_START('SOLVE_FOR_PRESSURE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
942 |
FORWARD_STEP |
CALL SOLVE_FOR_PRESSURE(myTime, myIter, myThid) |
|
./model/src/forward_step.F |
943 |
FORWARD_STEP |
CALL TIMER_STOP ('SOLVE_FOR_PRESSURE [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
957 |
FORWARD_STEP |
CALL TIMER_START('MOM_CORRECTION_STEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
958 |
FORWARD_STEP |
CALL MOMENTUM_CORRECTION_STEP(myTime, myIter, myThid) |
|
./model/src/forward_step.F |
959 |
FORWARD_STEP |
CALL TIMER_STOP ('MOM_CORRECTION_STEP [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
971 |
FORWARD_STEP |
CALL TIMER_START('INTEGR_CONTINUITY [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
972 |
FORWARD_STEP |
CALL INTEGR_CONTINUITY( uVel, vVel, myTime, myIter, myThid) |
|
./model/src/forward_step.F |
973 |
FORWARD_STEP |
CALL TIMER_STOP ('INTEGR_CONTINUITY [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
986 |
FORWARD_STEP |
CALL TIMER_START('CALC_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
987 |
FORWARD_STEP |
CALL CALC_R_STAR(etaH, myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
988 |
FORWARD_STEP |
CALL TIMER_STOP ('CALC_R_STAR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
996 |
FORWARD_STEP |
CALL TIMER_START('CALC_SURF_DR [FORWARD_STEP]',myThid) |
|
./model/src/forward_step.F |
997 |
FORWARD_STEP |
CALL CALC_SURF_DR(etaH, myTime, myIter, myThid ) |
|
./model/src/forward_step.F |
998 |
FORWARD_STEP |
CALL TIMER_STOP ('CALC_SURF_DR [FORWARD_STEP]',myThid) |
|
./pkg/sbo/sbo_calc.F |
13 |
SBO_CALC |
SUBROUTINE SBO_CALC( myTime, myIter, myThid ) |
|
./pkg/sbo/sbo_calc.F |
152 |
SBO_CALC |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_calc.F |
181 |
SBO_CALC |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_calc.F |
200 |
SBO_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
201 |
SBO_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
223 |
SBO_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
224 |
SBO_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
244 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_FWload , FWload , myThid ) |
|
./pkg/sbo/sbo_calc.F |
245 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_sboarea , sboarea , myThid ) |
|
./pkg/sbo/sbo_calc.F |
246 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_GCload , GCload , myThid ) |
|
./pkg/sbo/sbo_calc.F |
251 |
SBO_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
252 |
SBO_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
268 |
SBO_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
269 |
SBO_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
287 |
SBO_CALC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
288 |
SBO_CALC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/sbo/sbo_calc.F |
427 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_mass , mass , myThid ) |
|
./pkg/sbo/sbo_calc.F |
428 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xcom , xcom , myThid ) |
|
./pkg/sbo/sbo_calc.F |
429 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_ycom , ycom , myThid ) |
|
./pkg/sbo/sbo_calc.F |
430 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zcom , zcom , myThid ) |
|
./pkg/sbo/sbo_calc.F |
431 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xoamc , xoamc , myThid ) |
|
./pkg/sbo/sbo_calc.F |
432 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_yoamc , yoamc , myThid ) |
|
./pkg/sbo/sbo_calc.F |
433 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zoamc , zoamc , myThid ) |
|
./pkg/sbo/sbo_calc.F |
434 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xoamp , xoamp , myThid ) |
|
./pkg/sbo/sbo_calc.F |
435 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_yoamp , yoamp , myThid ) |
|
./pkg/sbo/sbo_calc.F |
436 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zoamp , zoamp , myThid ) |
|
./pkg/sbo/sbo_calc.F |
438 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xoamc_si , xoamc_si , myThid ) |
|
./pkg/sbo/sbo_calc.F |
439 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_yoamc_si , yoamc_si , myThid ) |
|
./pkg/sbo/sbo_calc.F |
440 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zoamc_si , zoamc_si , myThid ) |
|
./pkg/sbo/sbo_calc.F |
441 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_mass_si , mass_si , myThid ) |
|
./pkg/sbo/sbo_calc.F |
443 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_mass_fw , mass_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
444 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xcom_fw , xcom_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
445 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_ycom_fw , ycom_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
446 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zcom_fw , zcom_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
447 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_xoamp_fw , xoamp_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
448 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_yoamp_fw , yoamp_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
449 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_zoamp_fw , zoamp_fw , myThid ) |
|
./pkg/sbo/sbo_calc.F |
450 |
SBO_CALC |
CALL GLOBAL_SUM_TILE_RL( tile_mass_gc , mass_gc , myThid ) |
|
./pkg/sbo/sbo_calc.F |
454 |
SBO_CALC |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_calc.F |
473 |
SBO_CALC |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_calc.F |
86 |
SBO_CALC |
INTEGER myIter, myThid |
|
./pkg/sbo/sbo_check.F |
21 |
SBO_CHECK |
INTEGER myThid |
|
./pkg/sbo/sbo_check.F |
29 |
SBO_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_check.F |
33 |
SBO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_check.F |
38 |
SBO_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/sbo/sbo_check.F |
43 |
SBO_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/sbo/sbo_check.F |
47 |
SBO_CHECK |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_check.F |
6 |
SBO_CHECK |
SUBROUTINE SBO_CHECK( myThid ) |
|
./pkg/sbo/sbo_output.F |
102 |
SBO_OUTPUT |
I 0, 0, irecord, myIter, myThid ) |
|
./pkg/sbo/sbo_output.F |
103 |
SBO_OUTPUT |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_output.F |
10 |
SBO_OUTPUT |
SUBROUTINE SBO_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/sbo/sbo_output.F |
117 |
SBO_OUTPUT |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_output.F |
122 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
125 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
128 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
131 |
SBO_OUTPUT |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_output.F |
133 |
SBO_OUTPUT |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_output.F |
32 |
SBO_OUTPUT |
INTEGER myThid |
|
./pkg/sbo/sbo_output.F |
90 |
SBO_OUTPUT |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_output.F |
95 |
SBO_OUTPUT |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
105 |
SBO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
108 |
SBO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
10 |
SBO_READPARMS |
SUBROUTINE SBO_READPARMS( myThid ) |
|
./pkg/sbo/sbo_readparms.F |
116 |
SBO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
121 |
SBO_READPARMS |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_readparms.F |
28 |
SBO_READPARMS |
INTEGER myThid |
|
./pkg/sbo/sbo_readparms.F |
50 |
SBO_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_readparms.F |
54 |
SBO_READPARMS |
_END_MASTER(myThid) |
|
./pkg/sbo/sbo_readparms.F |
58 |
SBO_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/sbo/sbo_readparms.F |
63 |
SBO_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
68 |
SBO_READPARMS |
I myThid ) |
|
./pkg/sbo/sbo_readparms.F |
91 |
SBO_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/sbo/sbo_readparms.F |
98 |
SBO_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/freesurf_rescale_g.F |
12 |
FREESURF_RESCALE_G |
I myThid ) |
|
./model/src/freesurf_rescale_g.F |
34 |
FREESURF_RESCALE_G |
INTEGER myThid |
|
./pkg/seaice/advect.F |
119 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
120 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
146 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
147 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
16 |
ADVECT |
I iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
170 |
ADVECT |
CALL EXCH_XY_RL( fld, myThid ) |
|
./pkg/seaice/advect.F |
178 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
179 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
190 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
191 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
200 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
202 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
203 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
216 |
ADVECT |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/seaice/advect.F |
218 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
219 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
232 |
ADVECT |
CALL DIFFUS( tmpFld, DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/advect.F |
234 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
235 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
52 |
ADVECT |
INTEGER myThid |
|
./pkg/seaice/advect.F |
68 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
69 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/advect.F |
92 |
ADVECT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/advect.F |
93 |
ADVECT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
110 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
111 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
144 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
145 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
160 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
161 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
175 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
176 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
197 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
198 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
211 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
212 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
228 |
COST_ICE_TEST |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/seaice/cost_ice_test.F |
97 |
COST_ICE_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/cost_ice_test.F |
98 |
COST_ICE_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/diffus.F |
11 |
DIFFUS |
I DIFFA, iceMsk, myThid ) |
|
./pkg/seaice/diffus.F |
40 |
DIFFUS |
INTEGER myThid |
|
./pkg/seaice/diffus.F |
54 |
DIFFUS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/diffus.F |
55 |
DIFFUS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
10 |
DYNSOLVER |
SUBROUTINE DYNSOLVER( myTime, myIter, myThid ) |
|
./pkg/seaice/dynsolver.F |
120 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
121 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
163 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
164 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
253 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
254 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
269 |
DYNSOLVER |
CALL LSR( 1, myThid ) |
|
./pkg/seaice/dynsolver.F |
274 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
275 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
288 |
DYNSOLVER |
CALL LSR( 2, myThid ) |
|
./pkg/seaice/dynsolver.F |
297 |
DYNSOLVER |
CALL DIAGNOSTICS_FILL(zeta ,'SIzeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/dynsolver.F |
298 |
DYNSOLVER |
CALL DIAGNOSTICS_FILL(eta ,'SIeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/dynsolver.F |
299 |
DYNSOLVER |
CALL DIAGNOSTICS_FILL(press ,'SIpress ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/dynsolver.F |
304 |
DYNSOLVER |
CALL OSTRES ( COR_ICE, myThid ) |
|
./pkg/seaice/dynsolver.F |
316 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
317 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
338 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
339 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
43 |
DYNSOLVER |
INTEGER myThid |
|
./pkg/seaice/dynsolver.F |
77 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
78 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/dynsolver.F |
98 |
DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/dynsolver.F |
99 |
DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
1093 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
1094 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
1163 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
1164 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
1174 |
LSR |
_GLOBAL_MAX_RL( S2, myThid ) |
|
./pkg/seaice/lsr.F |
1184 |
LSR |
_EXCH_XY_RL( VICE, myThid ) |
|
./pkg/seaice/lsr.F |
1191 |
LSR |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/lsr.F |
1193 |
LSR |
_END_MASTER( myThid ) |
|
./pkg/seaice/lsr.F |
1200 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
1201 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
16 |
LSR |
SUBROUTINE LSR( ilcall, myThid ) |
|
./pkg/seaice/lsr.F |
170 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
171 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
276 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
277 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
44 |
LSR |
INTEGER myThid |
|
./pkg/seaice/lsr.F |
489 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
490 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
613 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
614 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
624 |
LSR |
_GLOBAL_MAX_RL( S1, myThid ) |
|
./pkg/seaice/lsr.F |
638 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
639 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
649 |
LSR |
_GLOBAL_MAX_RL( S2, myThid ) |
|
./pkg/seaice/lsr.F |
659 |
LSR |
CALL EXCH_UV_XY_RL( uIce, vIce,.TRUE.,myThid) |
|
./pkg/seaice/lsr.F |
669 |
LSR |
CALL DEBUG_STATS_RL( 1, uIce, msgBuf, myThid ) |
|
./pkg/seaice/lsr.F |
672 |
LSR |
CALL DEBUG_STATS_RL( 1, vIce, msgBuf, myThid ) |
|
./pkg/seaice/lsr.F |
679 |
LSR |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/lsr.F |
684 |
LSR |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/lsr.F |
700 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
701 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
721 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
722 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
858 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
859 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
915 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
916 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/lsr.F |
926 |
LSR |
_GLOBAL_MAX_RL( S1, myThid ) |
|
./pkg/seaice/lsr.F |
935 |
LSR |
_EXCH_XY_RL( UICE, myThid ) |
|
./pkg/seaice/lsr.F |
942 |
LSR |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/lsr.F |
944 |
LSR |
_END_MASTER( myThid ) |
|
./pkg/seaice/lsr.F |
948 |
LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/lsr.F |
949 |
LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/ostres.F |
26 |
OSTRES |
INTEGER myThid |
|
./pkg/seaice/ostres.F |
46 |
OSTRES |
CALL EXCH_UV_XY_RL(WINDX, WINDY, .TRUE., myThid) |
|
./pkg/seaice/ostres.F |
51 |
OSTRES |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/ostres.F |
52 |
OSTRES |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/ostres.F |
63 |
OSTRES |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./pkg/seaice/ostres.F |
68 |
OSTRES |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/ostres.F |
69 |
OSTRES |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/ostres.F |
7 |
OSTRES |
SUBROUTINE OSTRES( COR_ICE, myThid ) |
|
./pkg/seaice/ostres.F |
96 |
OSTRES |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./model/src/freeze_surface.F |
10 |
FREEZE_SURFACE |
SUBROUTINE FREEZE_SURFACE( myTime, myIter, myThid ) |
|
./model/src/freeze_surface.F |
36 |
FREEZE_SURFACE |
INTEGER myThid |
|
./model/src/freeze_surface.F |
54 |
FREEZE_SURFACE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/freeze_surface.F |
55 |
FREEZE_SURFACE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
102 |
SEAICE_AD_DUMP |
CALL ADEXCH_XY_RL( adarea, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
103 |
SEAICE_AD_DUMP |
CALL ADEXCH_XY_RL( adheff, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
104 |
SEAICE_AD_DUMP |
CALL ADEXCH_XY_RL( adhsnow, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
105 |
SEAICE_AD_DUMP |
CALL ADEXCH_UV_3D_RL( aduice,advice, .TRUE., 1, myThid ) |
|
./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 |
154 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adarea, var2Du, 1 , 12, 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 |
159 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adheff, var2Du, 1 , 12, 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 |
164 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adhsnow, var2Du, 1 , 12, 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 |
172 |
SEAICE_AD_DUMP |
& var2Du, var2Dv, 1, 34, 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 |
187 |
SEAICE_AD_DUMP |
CALL MNC_CW_SET_UDIM('adseaice', -1, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
188 |
SEAICE_AD_DUMP |
CALL MNC_CW_RL_W_S('D','adseaice',0,0,'T',myTime,myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
189 |
SEAICE_AD_DUMP |
CALL MNC_CW_SET_UDIM('adseaice', 0, 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 |
192 |
SEAICE_AD_DUMP |
& myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
195 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adarea, var2Du, 1 , 12, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
197 |
SEAICE_AD_DUMP |
& var2Du, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
198 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adheff, var2Du, 1 , 12, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
200 |
SEAICE_AD_DUMP |
& var2Du, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
201 |
SEAICE_AD_DUMP |
CALL COPY_ADVAR_OUTP( dumRS, adhsnow, var2Du, 1 , 12, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
203 |
SEAICE_AD_DUMP |
& var2Du, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
207 |
SEAICE_AD_DUMP |
& var2Du, var2Dv, 1, 34, myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
209 |
SEAICE_AD_DUMP |
& var2Du, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
211 |
SEAICE_AD_DUMP |
& var2Dv, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
216 |
SEAICE_AD_DUMP |
& adarea, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
218 |
SEAICE_AD_DUMP |
& adheff, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
220 |
SEAICE_AD_DUMP |
& adhsnow, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
224 |
SEAICE_AD_DUMP |
& aduice, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
226 |
SEAICE_AD_DUMP |
& advice, myThid) |
|
./pkg/seaice/seaice_ad_dump.F |
234 |
SEAICE_AD_DUMP |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
55 |
SEAICE_AD_DUMP |
INTEGER myThid |
|
./pkg/seaice/seaice_ad_dump.F |
80 |
SEAICE_AD_DUMP |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/seaice/seaice_ad_dump.F |
92 |
SEAICE_AD_DUMP |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
113 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
114 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
137 |
SEAICE_ADVDIFF |
CALL EXCH_UV_XY_RL(uc,vc,.TRUE.,myThid) |
|
./pkg/seaice/seaice_advdiff.F |
14 |
SEAICE_ADVDIFF |
I uc, vc, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
157 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
158 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
169 |
SEAICE_ADVDIFF |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
170 |
SEAICE_ADVDIFF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_advdiff.F |
171 |
SEAICE_ADVDIFF |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
172 |
SEAICE_ADVDIFF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_advdiff.F |
173 |
SEAICE_ADVDIFF |
act3 = myThid - 1 |
|
./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 |
53 |
SEAICE_ADVDIFF |
INTEGER myThid |
|
./pkg/seaice/seaice_advdiff.F |
556 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
557 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
566 |
SEAICE_ADVDIFF |
CALL ADVECT( uc, vc, hEff, fldNm1, HEFFM, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
569 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
570 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
576 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
581 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
582 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
599 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
600 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
609 |
SEAICE_ADVDIFF |
CALL ADVECT( uc, vc, area, fldNm1, HEFFM, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
612 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
613 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
619 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
624 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
625 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
635 |
SEAICE_ADVDIFF |
CALL ADVECT( uc, vc, opnWtrFrac, fldNm1, HEFFM, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
638 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
639 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
645 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
657 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
658 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
667 |
SEAICE_ADVDIFF |
CALL ADVECT( uc, vc, HSNOW, fldNm1, HEFFM, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
670 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
671 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
677 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
682 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
683 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
696 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
697 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
701 |
SEAICE_ADVDIFF |
CALL SEAICE_ITD_SUM(bi, bj, myTime, myIter, myThid) |
|
./pkg/seaice/seaice_advdiff.F |
711 |
SEAICE_ADVDIFF |
CALL ADVECT( uc, vc, HSALT, fldNm1, HEFFM, myThid ) |
|
./pkg/seaice/seaice_advdiff.F |
714 |
SEAICE_ADVDIFF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
715 |
SEAICE_ADVDIFF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_advdiff.F |
721 |
SEAICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_advection.F |
156 |
SEAICE_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_advection.F |
157 |
SEAICE_ADVECTION |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_advection.F |
158 |
SEAICE_ADVECTION |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_advection.F |
159 |
SEAICE_ADVECTION |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_advection.F |
160 |
SEAICE_ADVECTION |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_advection.F |
172 |
SEAICE_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_advection.F |
180 |
SEAICE_ADVECTION |
diagSufx = SEAICE_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/seaice/seaice_advection.F |
211 |
SEAICE_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_advection.F |
22 |
SEAICE_ADVECTION |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/seaice/seaice_advection.F |
281 |
SEAICE_ADVECTION |
& withSigns, maskLocW,maskLocS, bi,bj, myThid ) |
|
./pkg/seaice/seaice_advection.F |
294 |
SEAICE_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_advection.F |
355 |
SEAICE_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/seaice/seaice_advection.F |
370 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
380 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
384 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
388 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
393 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
399 |
SEAICE_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_advection.F |
410 |
SEAICE_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/seaice/seaice_advection.F |
557 |
SEAICE_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/seaice/seaice_advection.F |
572 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
582 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
586 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
590 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
595 |
SEAICE_ADVECTION |
O af, myThid ) |
|
./pkg/seaice/seaice_advection.F |
601 |
SEAICE_ADVECTION |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_advection.F |
612 |
SEAICE_ADVECTION |
& localTij, bi,bj, myThid ) |
|
./pkg/seaice/seaice_advection.F |
749 |
SEAICE_ADVECTION |
CALL DIAGNOSTICS_FILL(afx,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_advection.F |
751 |
SEAICE_ADVECTION |
CALL DIAGNOSTICS_FILL(afy,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_advection.F |
762 |
SEAICE_ADVECTION |
& afx,afy, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/seaice/seaice_advection.F |
96 |
SEAICE_ADVECTION |
INTEGER myThid |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
23 |
SEAICE_BOTTOMDRAG_COEFFS |
I iStep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
57 |
SEAICE_BOTTOMDRAG_COEFFS |
INTEGER myThid |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
94 |
SEAICE_BOTTOMDRAG_COEFFS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_bottomdrag_coeffs.F |
95 |
SEAICE_BOTTOMDRAG_COEFFS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
48 |
SEAICE_CALC_ICE_STRENGTH |
INTEGER myThid |
|
./model/src/grad_sigma.F |
13 |
GRAD_SIGMA |
I myThid ) |
|
./model/src/grad_sigma.F |
47 |
GRAD_SIGMA |
INTEGER myThid |
|
./model/src/grad_sigma.F |
67 |
GRAD_SIGMA |
& rhoLoc, bi,bj, myThid ) |
|
./model/src/grad_sigma.F |
82 |
GRAD_SIGMA |
& rhoLoc, bi,bj, myThid ) |
|
./pkg/seaice/seaice_calc_lhs.F |
116 |
SEAICE_CALC_LHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_lhs.F |
117 |
SEAICE_CALC_LHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
64 |
SEAICE_CALC_LHS |
INTEGER myThid |
|
./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 |
135 |
SEAICE_CALC_RESIDUAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_residual.F |
136 |
SEAICE_CALC_RESIDUAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_calc_residual.F |
45 |
SEAICE_CALC_RESIDUAL |
INTEGER myThid |
|
./pkg/seaice/seaice_calc_residual.F |
68 |
SEAICE_CALC_RESIDUAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_residual.F |
69 |
SEAICE_CALC_RESIDUAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./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 |
46 |
SEAICE_CALC_RHS |
INTEGER myThid |
|
./pkg/seaice/seaice_calc_rhs.F |
77 |
SEAICE_CALC_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_rhs.F |
78 |
SEAICE_CALC_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_calc_strainrates.F |
208 |
SEAICE_CALC_STRAINRATES |
CALL ZERO_ADJ( 1, e11Loc, myThid) |
|
./pkg/seaice/seaice_calc_strainrates.F |
209 |
SEAICE_CALC_STRAINRATES |
CALL ZERO_ADJ( 1, e12Loc, myThid) |
|
./pkg/seaice/seaice_calc_strainrates.F |
20 |
SEAICE_CALC_STRAINRATES |
I iStep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_calc_strainrates.F |
210 |
SEAICE_CALC_STRAINRATES |
CALL ZERO_ADJ( 1, e22Loc, myThid) |
|
./pkg/seaice/seaice_calc_strainrates.F |
66 |
SEAICE_CALC_STRAINRATES |
INTEGER myThid |
|
./pkg/seaice/seaice_calc_strainrates.F |
96 |
SEAICE_CALC_STRAINRATES |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_strainrates.F |
97 |
SEAICE_CALC_STRAINRATES |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
108 |
SEAICE_CALC_STRESS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
139 |
SEAICE_CALC_STRESS |
INTEGER myThid |
|
./pkg/seaice/seaice_calc_stressdiv.F |
20 |
SEAICE_CALC_STRESSDIV |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_calc_stressdiv.F |
51 |
SEAICE_CALC_STRESSDIV |
INTEGER myThid |
|
./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 |
41 |
SEAICE_CALC_VISCOSITIES |
INTEGER myThid |
|
./pkg/seaice/seaice_calc_viscosities.F |
91 |
SEAICE_CALC_VISCOSITIES |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_calc_viscosities.F |
92 |
SEAICE_CALC_VISCOSITIES |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_check.F |
1002 |
SEAICE_CHECK |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_check.F |
104 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
113 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
116 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
127 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
130 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
138 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
141 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
150 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
158 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
15 |
SEAICE_CHECK |
SUBROUTINE SEAICE_CHECK( myThid ) |
|
./pkg/seaice/seaice_check.F |
161 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
176 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
179 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
188 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
191 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
198 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
201 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
219 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
228 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
247 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
291 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
296 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
299 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
303 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
308 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
313 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
318 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
338 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
342 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
347 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
352 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
357 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
366 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
369 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
382 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
385 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
392 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
400 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
403 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
412 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
416 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
422 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
425 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
430 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
440 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
449 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
458 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
45 |
SEAICE_CHECK |
INTEGER myThid |
|
./pkg/seaice/seaice_check.F |
461 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
468 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
475 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
482 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
485 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
488 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
495 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
498 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
507 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
510 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
518 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
521 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
529 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
532 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
540 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
543 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
551 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
554 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
562 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
565 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
576 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
582 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
588 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
594 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
601 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
607 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
610 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
617 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
621 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
628 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
632 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
640 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
641 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
645 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
646 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
652 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
660 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
675 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
683 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
691 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
695 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
703 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
710 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
714 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
726 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
730 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
738 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
73 |
SEAICE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_check.F |
741 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
749 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
756 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
759 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
762 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
771 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
774 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
783 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
786 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
78 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
797 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
800 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
808 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
811 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
820 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
823 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
826 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
832 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
838 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
848 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
84 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
854 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
863 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
866 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
876 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
880 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
884 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
889 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
897 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
904 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
907 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
915 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
918 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
927 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
933 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
941 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
947 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
950 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
958 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
961 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
969 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
972 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
97 |
SEAICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check.F |
985 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
987 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
990 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
992 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
995 |
SEAICE_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check.F |
997 |
SEAICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
103 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
106 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
107 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
115 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
118 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
119 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
126 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
129 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
12 |
SEAICE_CHECK_PICKUP |
I myIter, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
130 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
141 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
144 |
SEAICE_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
145 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
159 |
SEAICE_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
165 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
173 |
SEAICE_CHECK_PICKUP |
& msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
176 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
182 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
185 |
SEAICE_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
186 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
194 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
198 |
SEAICE_CHECK_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
199 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
202 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
208 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
211 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
212 |
SEAICE_CHECK_PICKUP |
CALL SEAICE_ITD_PICKUP( myIter, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
217 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
218 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
41 |
SEAICE_CHECK_PICKUP |
INTEGER myThid |
|
./pkg/seaice/seaice_check_pickup.F |
95 |
SEAICE_CHECK_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
98 |
SEAICE_CHECK_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_check_pickup.F |
99 |
SEAICE_CHECK_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
30 |
SEAICE_COST_ACCUMULATE_MEAN |
INTEGER myThid |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
41 |
SEAICE_COST_ACCUMULATE_MEAN |
jtlo = myByLo(myThid) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
42 |
SEAICE_COST_ACCUMULATE_MEAN |
jthi = myByHi(myThid) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
43 |
SEAICE_COST_ACCUMULATE_MEAN |
itlo = myBxLo(myThid) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
44 |
SEAICE_COST_ACCUMULATE_MEAN |
ithi = myBxHi(myThid) |
|
./pkg/seaice/seaice_cost_accumulate_mean.F |
7 |
SEAICE_COST_ACCUMULATE_MEAN |
& myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_cost_export.F |
25 |
SEAICE_COST_EXPORT |
integer myThid |
|
./pkg/seaice/seaice_cost_export.F |
45 |
SEAICE_COST_EXPORT |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_cost_export.F |
46 |
SEAICE_COST_EXPORT |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_cost_export.F |
6 |
SEAICE_COST_EXPORT |
subroutine SEAICE_COST_EXPORT( myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
100 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_smrsst, f_smrsst, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
101 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_smrsss, f_smrsss, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
103 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( num_ice, no_ice, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
104 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( num_smrarea, no_smrarea, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
105 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( num_smrsst, no_smrsst, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
106 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( num_smrsss, no_smrsss, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
118 |
SEAICE_COST_FINAL |
IF ( MASTER_CPU_THREAD(myThid) ) THEN |
|
./pkg/seaice/seaice_cost_final.F |
15 |
SEAICE_COST_FINAL |
SUBROUTINE SEAICE_COST_FINAL( myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
41 |
SEAICE_COST_FINAL |
INTEGER myThid |
|
./pkg/seaice/seaice_cost_final.F |
77 |
SEAICE_COST_FINAL |
CALL SEAICE_COST_EXPORT( myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
81 |
SEAICE_COST_FINAL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_cost_final.F |
82 |
SEAICE_COST_FINAL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_cost_final.F |
98 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_ice, f_ice, myThid ) |
|
./pkg/seaice/seaice_cost_final.F |
99 |
SEAICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_smrarea, f_smrarea, myThid ) |
|
./pkg/seaice/seaice_cost_init_fixed.F |
58 |
SEAICE_COST_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_cost_sensi.F |
23 |
SEAICE_COST_SENSI |
integer myThid |
|
./pkg/seaice/seaice_cost_sensi.F |
28 |
SEAICE_COST_SENSI |
CALL COST_ICE_TEST ( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_cost_sensi.F |
31 |
SEAICE_COST_SENSI |
& myTime, myIter, myThid) |
|
./pkg/seaice/seaice_cost_sensi.F |
6 |
SEAICE_COST_SENSI |
subroutine SEAICE_COST_SENSI( myTime, myIter, myThid ) |
|
./model/src/impldiff.F |
13 |
IMPLDIFF |
I myThid ) |
|
./model/src/impldiff.F |
307 |
IMPLDIFF |
diagSufx = GAD_DIAG_SUFX( tracerId, myThid ) |
|
./model/src/impldiff.F |
319 |
IMPLDIFF |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./model/src/impldiff.F |
378 |
IMPLDIFF |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./model/src/impldiff.F |
382 |
IMPLDIFF |
& k, 1, 2,bi,bj, myThid ) |
|
./model/src/impldiff.F |
60 |
IMPLDIFF |
INTEGER myThid |
|
./pkg/seaice/seaice_diagnostics_init.F |
104 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
112 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
120 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
127 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
134 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
15 |
SEAICE_DIAGNOSTICS_INIT |
SUBROUTINE SEAICE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
175 |
SEAICE_DIAGNOSTICS_INIT |
I diagCode, diagUnits, diagTitle, numMateTr, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
183 |
SEAICE_DIAGNOSTICS_INIT |
I diagCode, diagUnits, diagTitle, numMateTrPreTh, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
193 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numArea, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
205 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
217 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
251 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
259 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
267 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
275 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
302 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
311 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
318 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
325 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
333 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
341 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
348 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
355 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
365 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
372 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
379 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
37 |
SEAICE_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/seaice/seaice_diagnostics_init.F |
386 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
393 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
400 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
407 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
414 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
432 |
SEAICE_DIAGNOSTICS_INIT |
I diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
445 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
452 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
459 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
466 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
473 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
480 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
487 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
494 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
501 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
509 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
519 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
526 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
533 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
540 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
548 |
SEAICE_DIAGNOSTICS_INIT |
diagSufx = SEAICE_DIAG_SUFX( GAD_HEFF, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
556 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
563 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
571 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
578 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
583 |
SEAICE_DIAGNOSTICS_INIT |
diagSufx = SEAICE_DIAG_SUFX( GAD_AREA, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
591 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
598 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
606 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
613 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
618 |
SEAICE_DIAGNOSTICS_INIT |
diagSufx = SEAICE_DIAG_SUFX( GAD_SNOW, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
626 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
633 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
641 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
648 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
653 |
SEAICE_DIAGNOSTICS_INIT |
diagSufx = SEAICE_DIAG_SUFX( GAD_SALT, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
661 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
668 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
676 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
683 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
692 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
700 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
709 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
716 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
723 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
730 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
737 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
744 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
751 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
758 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
768 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
769 |
SEAICE_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
777 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
778 |
SEAICE_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
785 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
786 |
SEAICE_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, nITD, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
799 |
SEAICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION SEAICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
818 |
SEAICE_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/seaice/seaice_diagnostics_init.F |
81 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
89 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_init.F |
96 |
SEAICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
102 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(HSNOW ,'SIhsnow ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
105 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(HEFFITD ,'SIheffN ',0,nITD ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
106 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(AREAITD ,'SIareaN ',0,nITD ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
107 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(HSNOWITD,'SIhsnowN',0,nITD ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
10 |
SEAICE_DIAGNOSTICS_STATE |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
116 |
SEAICE_DIAGNOSTICS_STATE |
I ONE, 1, diagName, 0, 1, 0, 1, 1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
120 |
SEAICE_DIAGNOSTICS_STATE |
I ONE, 1, diagName, 0, 1, 0, 1, 1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
125 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(HSALT ,'SIhsalt ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
128 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(zeta ,'SIzeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
129 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(eta ,'SIeta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
130 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(press ,'SIpress ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
131 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(deltaC ,'SIdelta ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
133 |
SEAICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SItensil',myThid) ) THEN |
|
./pkg/seaice/seaice_diagnostics_state.F |
134 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
135 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
155 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(tIce,'SItensil',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
157 |
SEAICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SIsig1 ',myThid) .OR. |
|
./pkg/seaice/seaice_diagnostics_state.F |
158 |
SEAICE_DIAGNOSTICS_STATE |
& DIAGNOSTICS_IS_ON('SIsig2 ',myThid) .OR. |
|
./pkg/seaice/seaice_diagnostics_state.F |
159 |
SEAICE_DIAGNOSTICS_STATE |
& DIAGNOSTICS_IS_ON('SIshear ',myThid) ) THEN |
|
./pkg/seaice/seaice_diagnostics_state.F |
165 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
166 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
184 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(sig1,'SIsig1 ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
185 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(sig2,'SIsig2 ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
196 |
SEAICE_DIAGNOSTICS_STATE |
I 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
203 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
204 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
208 |
SEAICE_DIAGNOSTICS_STATE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
232 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(sig1,'SIsig1 ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
233 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(sig2,'SIsig2 ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
238 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
239 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
251 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(sig1,'SIshear ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
258 |
SEAICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SIuheff ',myThid) ) THEN |
|
./pkg/seaice/seaice_diagnostics_state.F |
259 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
260 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
275 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(press,'SIuheff ',0,1,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
277 |
SEAICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SIvheff ',myThid) ) THEN |
|
./pkg/seaice/seaice_diagnostics_state.F |
278 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
279 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
294 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL(press,'SIvheff ',0,1,0,1,1,myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
38 |
SEAICE_DIAGNOSTICS_STATE |
INTEGER myThid |
|
./pkg/seaice/seaice_diagnostics_state.F |
66 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( AREA, 'SIarea ', 0, 1, 0, 1,1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
67 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( HEFF, 'SIheff ', 0, 1, 0, 1,1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
68 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( UICE, 'SIuice ', 0, 1, 0, 1,1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
69 |
SEAICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( VICE, 'SIvice ', 0, 1, 0, 1,1, myThid ) |
|
./pkg/seaice/seaice_diagnostics_state.F |
71 |
SEAICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SItices ',myThid) ) THEN |
|
./pkg/seaice/seaice_diagnostics_state.F |
72 |
SEAICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
73 |
SEAICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_diagnostics_state.F |
99 |
SEAICE_DIAGNOSTICS_STATE |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/seaice/seaice_diffusion.F |
105 |
SEAICE_DIFFUSION |
CALL DIAGNOSTICS_FILL(fZon,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_diffusion.F |
107 |
SEAICE_DIFFUSION |
CALL DIAGNOSTICS_FILL(fMer,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/seaice/seaice_diffusion.F |
17 |
SEAICE_DIFFUSION |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_diffusion.F |
57 |
SEAICE_DIFFUSION |
INTEGER myThid |
|
./pkg/seaice/seaice_diffusion.F |
76 |
SEAICE_DIFFUSION |
diagSufx = SEAICE_DIAG_SUFX( tracerIdentity, myThid ) |
|
./pkg/seaice/seaice_diffusion.F |
88 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,iceFld,fZon,myThid) |
|
./pkg/seaice/seaice_diffusion.F |
90 |
SEAICE_DIFFUSION |
CALL GAD_DIFF_Y(bi,bj,k,yA,diffKh,iceFld,fMer,myThid) |
|
./pkg/seaice/seaice_do_ridging.F |
13 |
SEAICE_DO_RIDGING |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
159 |
SEAICE_DO_RIDGING |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
431 |
SEAICE_DO_RIDGING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
436 |
SEAICE_DO_RIDGING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
446 |
SEAICE_DO_RIDGING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
451 |
SEAICE_DO_RIDGING |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_do_ridging.F |
51 |
SEAICE_DO_RIDGING |
INTEGER myThid |
|
./pkg/seaice/seaice_dynsolver.F |
112 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
113 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
12 |
SEAICE_DYNSOLVER |
SUBROUTINE SEAICE_DYNSOLVER( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
145 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
146 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
169 |
SEAICE_DYNSOLVER |
CALL EXCH_UV_XY_RL( seaiceMaskU, seaiceMaskV, .FALSE., myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
176 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
177 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
201 |
SEAICE_DYNSOLVER |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
203 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
204 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
265 |
SEAICE_DYNSOLVER |
CALL SEAICE_CALC_ICE_STRENGTH( bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
276 |
SEAICE_DYNSOLVER |
CALL SEAICE_FREEDRIFT( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
279 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
280 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
296 |
SEAICE_DYNSOLVER |
CALL OBCS_APPLY_UVICE( uIce, vIce, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
309 |
SEAICE_DYNSOLVER |
CALL SEAICE_EVP( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
315 |
SEAICE_DYNSOLVER |
CALL SEAICE_LSR( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
324 |
SEAICE_DYNSOLVER |
CALL SEAICE_KRYLOV( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
335 |
SEAICE_DYNSOLVER |
CALL SEAICE_JFNK( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
361 |
SEAICE_DYNSOLVER |
CALL SEAICE_OCEAN_STRESS ( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_dynsolver.F |
373 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
374 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
51 |
SEAICE_DYNSOLVER |
INTEGER myThid |
|
./pkg/seaice/seaice_dynsolver.F |
74 |
SEAICE_DYNSOLVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_dynsolver.F |
75 |
SEAICE_DYNSOLVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
17 |
SEAICE_EVP |
SUBROUTINE SEAICE_EVP( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_evp.F |
200 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
201 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
224 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
225 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
247 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
248 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
292 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
293 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
326 |
SEAICE_EVP |
I iEVPstep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_evp.F |
334 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
335 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
337 |
SEAICE_EVP |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_evp.F |
338 |
SEAICE_EVP |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_evp.F |
339 |
SEAICE_EVP |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_evp.F |
340 |
SEAICE_EVP |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_evp.F |
341 |
SEAICE_EVP |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_evp.F |
55 |
SEAICE_EVP |
INTEGER myThid |
|
./pkg/seaice/seaice_evp.F |
681 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
682 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
724 |
SEAICE_EVP |
CALL GLOBAL_SUM_TILE_RL( resTile, resloc, myThid ) |
|
./pkg/seaice/seaice_evp.F |
737 |
SEAICE_EVP |
CALL ZERO_ADJ( 1, stressDivergenceX, myThid) |
|
./pkg/seaice/seaice_evp.F |
738 |
SEAICE_EVP |
CALL ZERO_ADJ( 1, stressDivergenceY, myThid) |
|
./pkg/seaice/seaice_evp.F |
748 |
SEAICE_EVP |
I iEVPstep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_evp.F |
758 |
SEAICE_EVP |
I iEVPstep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_evp.F |
761 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
762 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
831 |
SEAICE_EVP |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_evp.F |
917 |
SEAICE_EVP |
CALL EXCH_UV_XY_RL(uIce,vIce,.TRUE.,myThid) |
|
./pkg/seaice/seaice_evp.F |
921 |
SEAICE_EVP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
922 |
SEAICE_EVP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_evp.F |
955 |
SEAICE_EVP |
CALL GLOBAL_SUM_TILE_RL( resTile, resloc, myThid ) |
|
./pkg/seaice/seaice_fake.F |
10 |
SEAICE_FAKE |
SUBROUTINE SEAICE_FAKE( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_fake.F |
35 |
SEAICE_FAKE |
INTEGER myIter, myThid |
|
./pkg/seaice/seaice_fake.F |
47 |
SEAICE_FAKE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_fake.F |
50 |
SEAICE_FAKE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fake.F |
51 |
SEAICE_FAKE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fake.F |
82 |
SEAICE_FAKE |
CALL EXCH_UV_XY_RS(fu,fv,.TRUE.,myThid) |
|
./pkg/seaice/seaice_fake.F |
83 |
SEAICE_FAKE |
_EXCH_XY_RS( qnet, myThid ) |
|
./pkg/seaice/seaice_fake.F |
84 |
SEAICE_FAKE |
_EXCH_XY_RS( qsw, myThid ) |
|
./pkg/seaice/seaice_fake.F |
85 |
SEAICE_FAKE |
_EXCH_XY_RS( empmr, myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
113 |
SEAICE_MAP_RS2VEC |
I map2vec, myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
133 |
SEAICE_MAP_RS2VEC |
INTEGER myThid |
|
./pkg/seaice/seaice_fgmres.F |
144 |
SEAICE_MAP_RS2VEC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
145 |
SEAICE_MAP_RS2VEC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
205 |
SEAICE_FGMRES |
I myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
21 |
SEAICE_MAP2VEC |
I map2vec, myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
237 |
SEAICE_FGMRES |
integer myThid |
|
./pkg/seaice/seaice_fgmres.F |
365 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
366 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
375 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
376 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
383 |
SEAICE_FGMRES |
call SEAICE_SCALPROD(n, im+1, 1, 1, vv, vv, ro, myThid) |
|
./pkg/seaice/seaice_fgmres.F |
387 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
388 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
394 |
SEAICE_FGMRES |
if (its .eq. 0) eps1(myThid)=eps |
|
./pkg/seaice/seaice_fgmres.F |
398 |
SEAICE_FGMRES |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
401 |
SEAICE_FGMRES |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
403 |
SEAICE_FGMRES |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
408 |
SEAICE_FGMRES |
rs(1,myThid) = ro |
|
./pkg/seaice/seaice_fgmres.F |
413 |
SEAICE_FGMRES |
i1Thid(myThid) = i + 1 |
|
./pkg/seaice/seaice_fgmres.F |
414 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
415 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
41 |
SEAICE_MAP2VEC |
INTEGER myThid |
|
./pkg/seaice/seaice_fgmres.F |
427 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
428 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
437 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
438 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
454 |
SEAICE_FGMRES |
i1 = i1Thid(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
455 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
456 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
466 |
SEAICE_FGMRES |
call SEAICE_SCALPROD(n, im+1, j, i1, vv, vv, t, myThid) |
|
./pkg/seaice/seaice_fgmres.F |
467 |
SEAICE_FGMRES |
hh(j,i,myThid) = t |
|
./pkg/seaice/seaice_fgmres.F |
468 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
469 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
476 |
SEAICE_FGMRES |
call SEAICE_SCALPROD(n, im+1, i1, i1, vv, vv, t, myThid) |
|
./pkg/seaice/seaice_fgmres.F |
478 |
SEAICE_FGMRES |
hh(i1,i,myThid) = t |
|
./pkg/seaice/seaice_fgmres.F |
481 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
482 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
499 |
SEAICE_FGMRES |
t = hh(k1,i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
500 |
SEAICE_FGMRES |
hh(k1,i,myThid) = c(k1,myThid)*t+s(k1,myThid)*hh(k,i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
501 |
SEAICE_FGMRES |
hh(k,i,myThid) = -s(k1,myThid)*t+c(k1,myThid)*hh(k,i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
504 |
SEAICE_FGMRES |
gam = sqrt(hh(i,i,myThid)**2 + hh(i1,i,myThid)**2) |
|
./pkg/seaice/seaice_fgmres.F |
507 |
SEAICE_FGMRES |
c(i,myThid) = hh(i, i,myThid)/gam |
|
./pkg/seaice/seaice_fgmres.F |
508 |
SEAICE_FGMRES |
s(i,myThid) = hh(i1,i,myThid)/gam |
|
./pkg/seaice/seaice_fgmres.F |
524 |
SEAICE_FGMRES |
rs(i1,myThid) = -s(i,myThid)*rs(i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
525 |
SEAICE_FGMRES |
rs(i ,myThid) = c(i,myThid)*rs(i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
529 |
SEAICE_FGMRES |
hh(i,i,myThid) = c(i,myThid)*hh(i, i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
52 |
SEAICE_MAP2VEC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
530 |
SEAICE_FGMRES |
& + s(i,myThid)*hh(i1,i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
531 |
SEAICE_FGMRES |
ro = abs(rs(i1,myThid)) |
|
./pkg/seaice/seaice_fgmres.F |
533 |
SEAICE_FGMRES |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
536 |
SEAICE_FGMRES |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
537 |
SEAICE_FGMRES |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_fgmres.F |
53 |
SEAICE_MAP2VEC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
543 |
SEAICE_FGMRES |
& .and. (ro .gt. eps1(myThid))) goto 4 |
|
./pkg/seaice/seaice_fgmres.F |
547 |
SEAICE_FGMRES |
rs(i,myThid) = rs(i,myThid)/hh(i,i,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
551 |
SEAICE_FGMRES |
t=rs(k,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
553 |
SEAICE_FGMRES |
t = t-hh(k,j,myThid)*rs(j,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
555 |
SEAICE_FGMRES |
rs(k,myThid) = t/hh(k,k,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
562 |
SEAICE_FGMRES |
t = rs(j,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
563 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
564 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
574 |
SEAICE_FGMRES |
if (ro .le. eps1(myThid) .or. its .ge. maxits) goto 999 |
|
./pkg/seaice/seaice_fgmres.F |
580 |
SEAICE_FGMRES |
i1 = i1Thid(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
583 |
SEAICE_FGMRES |
rs(jj-1,myThid) = -s(jj-1,myThid)*rs(jj,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
584 |
SEAICE_FGMRES |
rs(jj ,myThid) = c(jj-1,myThid)*rs(jj,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
587 |
SEAICE_FGMRES |
t = rs(j,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
589 |
SEAICE_FGMRES |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
590 |
SEAICE_FGMRES |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
616 |
SEAICE_SCALPROD |
subroutine SEAICE_SCALPROD(n,im,i1,i2,dx,dy,t,myThid) |
|
./pkg/seaice/seaice_fgmres.F |
632 |
SEAICE_SCALPROD |
integer myThid |
|
./pkg/seaice/seaice_fgmres.F |
643 |
SEAICE_SCALPROD |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
644 |
SEAICE_SCALPROD |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_fgmres.F |
672 |
SEAICE_SCALPROD |
CALL GLOBAL_SUM_TILE_RL( dtemp,t,myThid ) |
|
./pkg/seaice/seaice_freedrift.F |
10 |
SEAICE_FREEDRIFT |
SUBROUTINE SEAICE_FREEDRIFT( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_freedrift.F |
157 |
SEAICE_FREEDRIFT |
CALL EXCH_UV_AGRID_3D_RL(uice_cntr,vice_cntr,.TRUE.,1,myThid) |
|
./pkg/seaice/seaice_freedrift.F |
159 |
SEAICE_FREEDRIFT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
160 |
SEAICE_FREEDRIFT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
172 |
SEAICE_FREEDRIFT |
CALL EXCH_UV_XY_RL( uice_fd, vice_fd, .TRUE., myThid ) |
|
./pkg/seaice/seaice_freedrift.F |
175 |
SEAICE_FREEDRIFT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
176 |
SEAICE_FREEDRIFT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
37 |
SEAICE_FREEDRIFT |
INTEGER myThid |
|
./pkg/seaice/seaice_freedrift.F |
60 |
SEAICE_FREEDRIFT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
61 |
SEAICE_FREEDRIFT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
73 |
SEAICE_FREEDRIFT |
CALL EXCH_UV_XY_RL( TAUX, TAUY, .TRUE., myThid ) |
|
./pkg/seaice/seaice_freedrift.F |
76 |
SEAICE_FREEDRIFT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_freedrift.F |
77 |
SEAICE_FREEDRIFT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cartesian_grid.F |
38 |
INI_CARTESIAN_GRID |
INTEGER myThid |
|
./model/src/ini_cartesian_grid.F |
60 |
INI_CARTESIAN_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cartesian_grid.F |
61 |
INI_CARTESIAN_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cartesian_grid.F |
70 |
INI_CARTESIAN_GRID |
I bi, bj, myThid ) |
|
./model/src/ini_cartesian_grid.F |
9 |
INI_CARTESIAN_GRID |
SUBROUTINE INI_CARTESIAN_GRID( myThid ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
15 |
SEAICE_GET_DYNFORCING |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
282 |
SEAICE_GET_DYNFORCING |
CALL DIAGNOSTICS_FILL( taux, 'SItaux ', 0,1, 0,1,1, myThid ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
283 |
SEAICE_GET_DYNFORCING |
CALL DIAGNOSTICS_FILL( tauy, 'SItauy ', 0,1, 0,1,1, myThid ) |
|
./pkg/seaice/seaice_get_dynforcing.F |
284 |
SEAICE_GET_DYNFORCING |
IF ( DIAGNOSTICS_IS_ON( 'SIatmTx ', myThid ) ) THEN |
|
./pkg/seaice/seaice_get_dynforcing.F |
285 |
SEAICE_GET_DYNFORCING |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
286 |
SEAICE_GET_DYNFORCING |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
295 |
SEAICE_GET_DYNFORCING |
CALL DIAGNOSTICS_FILL(locVar,'SIatmTx ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
299 |
SEAICE_GET_DYNFORCING |
IF ( DIAGNOSTICS_IS_ON( 'SIatmTy ', myThid ) ) THEN |
|
./pkg/seaice/seaice_get_dynforcing.F |
300 |
SEAICE_GET_DYNFORCING |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
301 |
SEAICE_GET_DYNFORCING |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
310 |
SEAICE_GET_DYNFORCING |
CALL DIAGNOSTICS_FILL(locVar,'SIatmTy ',0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
63 |
SEAICE_GET_DYNFORCING |
INTEGER myThid |
|
./pkg/seaice/seaice_get_dynforcing.F |
98 |
SEAICE_GET_DYNFORCING |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_get_dynforcing.F |
99 |
SEAICE_GET_DYNFORCING |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
1124 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, r_QbyOCN, myThid) |
|
./pkg/seaice/seaice_growth.F |
18 |
SEAICE_GROWTH |
SUBROUTINE SEAICE_GROWTH( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
1947 |
SEAICE_GROWTH |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
1948 |
SEAICE_GROWTH |
CALL SEAICE_ITD_REDIST(bi, bj, myTime, myIter, myThid) |
|
./pkg/seaice/seaice_growth.F |
1951 |
SEAICE_GROWTH |
CALL SEAICE_ITD_SUM(bi, bj, myTime, myIter, myThid) |
|
./pkg/seaice/seaice_growth.F |
2297 |
SEAICE_GROWTH |
& 'SIaaflux',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2440 |
SEAICE_GROWTH |
CALL PLOT_FIELD_XYRL( QSW,'Current QSW ', myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2441 |
SEAICE_GROWTH |
CALL PLOT_FIELD_XYRL( QNET,'Current QNET ', myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2442 |
SEAICE_GROWTH |
CALL PLOT_FIELD_XYRL( EmPmR,'Current EmPmR ', myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2514 |
SEAICE_GROWTH |
& tmpscal1,1,'SIaQbATC',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2516 |
SEAICE_GROWTH |
& tmpscal1,1,'SIaQbATO',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2518 |
SEAICE_GROWTH |
& tmpscal1,1,'SIaQbOCN',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2520 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdHbOCN',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2522 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdHbATC',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2524 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdHbATO',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2526 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdHbFLO',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2528 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdSbOCN',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2530 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdSbATC',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2532 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdAbATO',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2534 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdAbATC',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2536 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdAbOCN',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2538 |
SEAICE_GROWTH |
& convertHI2Q,1, 'SIqneto ',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2540 |
SEAICE_GROWTH |
& convertHI2Q,1, 'SIqneti ',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2550 |
SEAICE_GROWTH |
& 'SIsnPrcp',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2552 |
SEAICE_GROWTH |
& tmpscal1,1,'SIdA ',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2560 |
SEAICE_GROWTH |
& 'SIfwSubl',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2582 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayA,'SIacSubl',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2583 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayC,'SIrsSubl',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2584 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayB,'SIhl ',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2588 |
SEAICE_GROWTH |
& 'SIgrsLT ',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
2611 |
SEAICE_GROWTH |
& CALL GLOBAL_SUM_TILE_RL( FWFsiTile, FWFsiGlob, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2614 |
SEAICE_GROWTH |
CALL GLOBAL_SUM_TILE_RL(FWF2HFsiTile, FWF2HFsiGlob, myThid) |
|
./pkg/seaice/seaice_growth.F |
2620 |
SEAICE_GROWTH |
& CALL GLOBAL_SUM_TILE_RL( HFsiTile, HFsiGlob, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2635 |
SEAICE_GROWTH |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
2636 |
SEAICE_GROWTH |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
2663 |
SEAICE_GROWTH |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_growth.F |
2667 |
SEAICE_GROWTH |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2668 |
SEAICE_GROWTH |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_growth.F |
2672 |
SEAICE_GROWTH |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
2673 |
SEAICE_GROWTH |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
2684 |
SEAICE_GROWTH |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_growth.F |
2688 |
SEAICE_GROWTH |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_growth.F |
2689 |
SEAICE_GROWTH |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_growth.F |
2699 |
SEAICE_GROWTH |
& 'SItflux ',0,1,0,1,1,myThid) |
|
./pkg/seaice/seaice_growth.F |
2701 |
SEAICE_GROWTH |
& 'SIatmQnt',0,1,0,1,1,myThid) |
|
./pkg/seaice/seaice_growth.F |
2705 |
SEAICE_GROWTH |
& tmpscal1,1,'SIatmFW ',0,1,0,1,1,myThid) |
|
./pkg/seaice/seaice_growth.F |
394 |
SEAICE_GROWTH |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
395 |
SEAICE_GROWTH |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_growth.F |
398 |
SEAICE_GROWTH |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_growth.F |
399 |
SEAICE_GROWTH |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_growth.F |
400 |
SEAICE_GROWTH |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_growth.F |
401 |
SEAICE_GROWTH |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_growth.F |
402 |
SEAICE_GROWTH |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_growth.F |
569 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayB,'SIareaPT',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
56 |
SEAICE_GROWTH |
INTEGER myIter, myThid |
|
./pkg/seaice/seaice_growth.F |
570 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayC,'SIheffPT',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
571 |
SEAICE_GROWTH |
CALL DIAGNOSTICS_FILL(DIAGarrayD,'SIhsnoPT',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
578 |
SEAICE_GROWTH |
I ONE, 1, diagName,0,1,2,bi,bj,myThid ) |
|
./pkg/seaice/seaice_growth.F |
582 |
SEAICE_GROWTH |
I ONE, 1, diagName,0,1,2,bi,bj,myThid ) |
|
./pkg/seaice/seaice_growth.F |
683 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, heffActual, myThid) |
|
./pkg/seaice/seaice_growth.F |
684 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, hsnowActual, myThid) |
|
./pkg/seaice/seaice_growth.F |
685 |
SEAICE_GROWTH |
CALL ZERO_ADJ_1D( sNx*sNy, recip_heffActual, myThid) |
|
./pkg/seaice/seaice_growth.F |
751 |
SEAICE_GROWTH |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
842 |
SEAICE_GROWTH |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_growth.F |
913 |
SEAICE_GROWTH |
& 'SIactLHF',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_growth.F |
915 |
SEAICE_GROWTH |
& 'SImaxLHF',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_init_fixed.F |
182 |
SEAICE_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
187 |
SEAICE_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
191 |
SEAICE_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_init_fixed.F |
195 |
SEAICE_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_init_fixed.F |
202 |
SEAICE_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_init_fixed.F |
222 |
SEAICE_INIT_FIXED |
CALL SEAICE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
227 |
SEAICE_INIT_FIXED |
CALL SEAICE_SUMMARY( myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
28 |
SEAICE_INIT_FIXED |
INTEGER myThid |
|
./pkg/seaice/seaice_init_fixed.F |
64 |
SEAICE_INIT_FIXED |
CALL SEAICE_MNC_INIT( myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
68 |
SEAICE_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_init_fixed.F |
7 |
SEAICE_INIT_FIXED |
SUBROUTINE SEAICE_INIT_FIXED( myThid ) |
|
./pkg/seaice/seaice_init_fixed.F |
82 |
SEAICE_INIT_FIXED |
I dummyTime, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
10 |
SEAICE_INIT_VARIA |
SUBROUTINE SEAICE_INIT_VARIA( myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
224 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
225 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
253 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
254 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
360 |
SEAICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
361 |
SEAICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
362 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( FUtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
363 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( FVtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
364 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( EmPmRtave, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
365 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( QNETtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
366 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( QSWtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
367 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( UICEtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
368 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( VICEtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
369 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( HEFFtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
36 |
SEAICE_INIT_VARIA |
INTEGER myThid |
|
./pkg/seaice/seaice_init_varia.F |
370 |
SEAICE_INIT_VARIA |
CALL TIMEAVE_RESET( AREAtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
380 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
381 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
396 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
397 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
442 |
SEAICE_INIT_VARIA |
CALL EXCH_UV_XY_RL(seaiceMaskU,seaiceMaskV,.FALSE.,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
444 |
SEAICE_INIT_VARIA |
_EXCH_XY_RS(UVM, myThid) |
|
./pkg/seaice/seaice_init_varia.F |
450 |
SEAICE_INIT_VARIA |
& nIter0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
453 |
SEAICE_INIT_VARIA |
& nIter0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
455 |
SEAICE_INIT_VARIA |
& nIter0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
458 |
SEAICE_INIT_VARIA |
& nIter0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
466 |
SEAICE_INIT_VARIA |
CALL SEAICE_READ_PICKUP ( myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
470 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
471 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
484 |
SEAICE_INIT_VARIA |
& CALL READ_FLD_XY_RL( uIceFile, ' ', uIce, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
486 |
SEAICE_INIT_VARIA |
& CALL READ_FLD_XY_RL( vIceFile, ' ', vIce, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
489 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
490 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
500 |
SEAICE_INIT_VARIA |
CALL EXCH_UV_XY_RL( uIce, vIce, .TRUE., myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
505 |
SEAICE_INIT_VARIA |
CALL READ_FLD_XY_RL( HeffFile, ' ', HEFF, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
506 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(HEFF,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
507 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
508 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
518 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
519 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
530 |
SEAICE_INIT_VARIA |
CALL READ_FLD_XY_RL( AreaFile, ' ', AREA, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
531 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(AREA,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
532 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
533 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
546 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
547 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
558 |
SEAICE_INIT_VARIA |
CALL READ_FLD_XY_RL( HsnowFile, ' ', HSNOW, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
559 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(HSNOW,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
560 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
561 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
572 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
573 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
583 |
SEAICE_INIT_VARIA |
CALL SEAICE_ITD_REDIST(bi, bj, baseTime, nIter0, myThid) |
|
./pkg/seaice/seaice_init_varia.F |
589 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
590 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
604 |
SEAICE_INIT_VARIA |
CALL READ_FLD_XY_RL( HsaltFile, ' ', HSALT, 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
605 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(HSALT,myThid) |
|
./pkg/seaice/seaice_init_varia.F |
614 |
SEAICE_INIT_VARIA |
& SItracer(1-OLx,1-OLy,1,1,iTr), 0, myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
615 |
SEAICE_INIT_VARIA |
_EXCH_XY_RL(SItracer(1-OLx,1-OLy,1,1,iTr),myThid) |
|
./pkg/seaice/seaice_init_varia.F |
623 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
624 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
63 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
64 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
660 |
SEAICE_INIT_VARIA |
& scalarProductMetric, .TRUE., myThid ) |
|
./pkg/seaice/seaice_init_varia.F |
661 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
662 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
672 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
673 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
704 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
705 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
91 |
SEAICE_INIT_VARIA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_init_varia.F |
92 |
SEAICE_INIT_VARIA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
106 |
SEAICE_ITD_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
107 |
SEAICE_ITD_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
121 |
SEAICE_ITD_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
122 |
SEAICE_ITD_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
137 |
SEAICE_ITD_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
138 |
SEAICE_ITD_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
13 |
SEAICE_ITD_PICKUP |
I myIter, myThid ) |
|
./pkg/seaice/seaice_itd_pickup.F |
180 |
SEAICE_ITD_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
181 |
SEAICE_ITD_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
182 |
SEAICE_ITD_PICKUP |
CALL SEAICE_ITD_REDIST( bi, bj, dummyTime, myIter, myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
183 |
SEAICE_ITD_PICKUP |
CALL SEAICE_ITD_SUM( bi, bj, dummyTime, myIter, myThid) |
|
./pkg/seaice/seaice_itd_pickup.F |
67 |
SEAICE_ITD_PICKUP |
INTEGER myThid |
|
./pkg/seaice/seaice_itd_redist.F |
13 |
SEAICE_ITD_REDIST |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_redist.F |
62 |
SEAICE_ITD_REDIST |
INTEGER myThid |
|
./pkg/seaice/seaice_itd_remap.F |
17 |
SEAICE_ITD_REMAP |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
197 |
SEAICE_ITD_REMAP |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
232 |
SEAICE_ITD_REMAP |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
288 |
SEAICE_ITD_REMAP |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
376 |
SEAICE_ITD_REMAP_LINEAR |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
401 |
SEAICE_ITD_REMAP_LINEAR |
INTEGER myThid |
|
./pkg/seaice/seaice_itd_remap.F |
488 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
516 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
INTEGER myThid |
|
./pkg/seaice/seaice_itd_remap.F |
550 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
560 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
573 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
580 |
SEAICE_ITD_REMAP_CHECK_BOUNDS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_itd_remap.F |
64 |
SEAICE_ITD_REMAP |
INTEGER myThid |
|
./pkg/seaice/seaice_itd_sum.F |
13 |
SEAICE_ITD_SUM |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_itd_sum.F |
57 |
SEAICE_ITD_SUM |
INTEGER myThid |
|
./pkg/seaice/seaice_jacvec.F |
12 |
SEAICE_JACVEC |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jacvec.F |
155 |
SEAICE_JACVEC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jacvec.F |
156 |
SEAICE_JACVEC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jacvec.F |
170 |
SEAICE_JACVEC |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jacvec.F |
174 |
SEAICE_JACVEC |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jacvec.F |
175 |
SEAICE_JACVEC |
DO bi = myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jacvec.F |
46 |
SEAICE_JACVEC |
INTEGER myThid |
|
./pkg/seaice/seaice_jfnk.F |
146 |
SEAICE_JFNK |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
147 |
SEAICE_JFNK |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
17 |
SEAICE_JFNK |
SUBROUTINE SEAICE_JFNK( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
193 |
SEAICE_JFNK |
I newtonIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
196 |
SEAICE_JFNK |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
197 |
SEAICE_JFNK |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
242 |
SEAICE_JFNK |
CALL SEAICE_MAP2VEC(nVec,duIce,dvIce,sol,.TRUE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
244 |
SEAICE_JFNK |
CALL SEAICE_MAP2VEC(nVec,uIceRes,vIceRes,rhs,.TRUE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
245 |
SEAICE_JFNK |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
246 |
SEAICE_JFNK |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
260 |
SEAICE_JFNK |
CALL SEAICE_MAP2VEC(nVec,duIce,dvIce,wk2,.TRUE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
266 |
SEAICE_JFNK |
I myThid) |
|
./pkg/seaice/seaice_jfnk.F |
270 |
SEAICE_JFNK |
CALL SEAICE_MAP2VEC(nVec,duIce,dvIce,sol,.FALSE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
274 |
SEAICE_JFNK |
CALL SEAICE_MAP2VEC(nVec,duIce,dvIce,wk1,.FALSE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
277 |
SEAICE_JFNK |
CALL EXCH_UV_XY_RL( duIce, dvIce,.TRUE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
287 |
SEAICE_JFNK |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
293 |
SEAICE_JFNK |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
301 |
SEAICE_JFNK |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
310 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
316 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
317 |
SEAICE_JFNK |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
339 |
SEAICE_JFNK |
I newtonIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
341 |
SEAICE_JFNK |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
342 |
SEAICE_JFNK |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
376 |
SEAICE_JFNK |
I myTime+deltaTclock, myIter+1, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
380 |
SEAICE_JFNK |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
384 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
387 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
391 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
395 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
399 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
403 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
407 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
411 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
415 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
419 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
422 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
426 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
427 |
SEAICE_JFNK |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
439 |
SEAICE_JFNK |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
444 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
445 |
SEAICE_JFNK |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
448 |
SEAICE_JFNK |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
453 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
454 |
SEAICE_JFNK |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
456 |
SEAICE_JFNK |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
461 |
SEAICE_JFNK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
462 |
SEAICE_JFNK |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
477 |
SEAICE_JFNK_UPDATE |
I newtonIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
510 |
SEAICE_JFNK_UPDATE |
INTEGER myThid |
|
./pkg/seaice/seaice_jfnk.F |
548 |
SEAICE_JFNK_UPDATE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
549 |
SEAICE_JFNK_UPDATE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_jfnk.F |
563 |
SEAICE_JFNK_UPDATE |
I newtonIter, 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
566 |
SEAICE_JFNK_UPDATE |
CALL SEAICE_MAP2VEC(nVec,uIceRes,vIceRes,resTmp,.TRUE.,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
567 |
SEAICE_JFNK_UPDATE |
CALL SEAICE_SCALPROD(nVec,1,1,1,resTmp,resTmp,resLoc,myThid) |
|
./pkg/seaice/seaice_jfnk.F |
57 |
SEAICE_JFNK |
INTEGER myThid |
|
./pkg/seaice/seaice_jfnk.F |
583 |
SEAICE_JFNK_UPDATE |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
589 |
SEAICE_JFNK_UPDATE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_jfnk.F |
590 |
SEAICE_JFNK_UPDATE |
_END_MASTER( myThid ) |
|
./model/src/ini_cg2d.F |
10 |
INI_CG2D |
SUBROUTINE INI_CG2D( myThid ) |
|
./model/src/ini_cg2d.F |
130 |
INI_CG2D |
_GLOBAL_MAX_RS( myNorm, myThid ) |
|
./model/src/ini_cg2d.F |
136 |
INI_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg2d.F |
137 |
INI_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg2d.F |
152 |
INI_CG2D |
CALL EXCH_UV_XY_RS( aW2d, aS2d, .FALSE., myThid ) |
|
./model/src/ini_cg2d.F |
158 |
INI_CG2D |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_cg2d.F |
171 |
INI_CG2D |
_END_MASTER(myThid) |
|
./model/src/ini_cg2d.F |
174 |
INI_CG2D |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_cg2d.F |
185 |
INI_CG2D |
_END_MASTER( myThid ) |
|
./model/src/ini_cg2d.F |
202 |
INI_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg2d.F |
203 |
INI_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg2d.F |
246 |
INI_CG2D |
CALL EXCH_XY_RS( pC, myThid ) |
|
./model/src/ini_cg2d.F |
247 |
INI_CG2D |
CALL EXCH_UV_XY_RS( pW, pS, .FALSE., myThid ) |
|
./model/src/ini_cg2d.F |
35 |
INI_CG2D |
INTEGER myThid |
|
./model/src/ini_cg2d.F |
53 |
INI_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg2d.F |
54 |
INI_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg2d.F |
91 |
INI_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg2d.F |
92 |
INI_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
146 |
SEAICE_KRYLOV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
147 |
SEAICE_KRYLOV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
14 |
SEAICE_KRYLOV |
SUBROUTINE SEAICE_KRYLOV( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
189 |
SEAICE_KRYLOV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
190 |
SEAICE_KRYLOV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
207 |
SEAICE_KRYLOV |
I 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
217 |
SEAICE_KRYLOV |
I 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
222 |
SEAICE_KRYLOV |
I 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
226 |
SEAICE_KRYLOV |
I 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
230 |
SEAICE_KRYLOV |
I picardIter, 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
235 |
SEAICE_KRYLOV |
I picardIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
237 |
SEAICE_KRYLOV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
238 |
SEAICE_KRYLOV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
252 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIceLHS,vIceLHS,resTmp,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
254 |
SEAICE_KRYLOV |
& picardResidual,myThid) |
|
./pkg/seaice/seaice_krylov.F |
303 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIce,vIce,sol,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
304 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIceRHS,vIceRHS,rhs,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
305 |
SEAICE_KRYLOV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
306 |
SEAICE_KRYLOV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
321 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uWork,vWork,wk2,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
327 |
SEAICE_KRYLOV |
I myThid) |
|
./pkg/seaice/seaice_krylov.F |
331 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uIce,vIce,sol,.FALSE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
332 |
SEAICE_KRYLOV |
CALL EXCH_UV_XY_RL( uIce, vIce,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
336 |
SEAICE_KRYLOV |
CALL SEAICE_MAP2VEC(nVec,uWork,vWork,wk1,.FALSE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
337 |
SEAICE_KRYLOV |
CALL EXCH_UV_XY_RL( uWork, vWork,.TRUE.,myThid) |
|
./pkg/seaice/seaice_krylov.F |
349 |
SEAICE_KRYLOV |
I picardIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
355 |
SEAICE_KRYLOV |
I krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
359 |
SEAICE_KRYLOV |
I picardIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
360 |
SEAICE_KRYLOV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
361 |
SEAICE_KRYLOV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_krylov.F |
378 |
SEAICE_KRYLOV |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
387 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
393 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
394 |
SEAICE_KRYLOV |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
431 |
SEAICE_KRYLOV |
I myTime+deltaTclock, myIter+1, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
435 |
SEAICE_KRYLOV |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
439 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
442 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
446 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
450 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
455 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
459 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
463 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
467 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
471 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
475 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
478 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
482 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
483 |
SEAICE_KRYLOV |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
48 |
SEAICE_KRYLOV |
INTEGER myThid |
|
./pkg/seaice/seaice_krylov.F |
496 |
SEAICE_KRYLOV |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
501 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
502 |
SEAICE_KRYLOV |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
505 |
SEAICE_KRYLOV |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
510 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
511 |
SEAICE_KRYLOV |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
513 |
SEAICE_KRYLOV |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_krylov.F |
518 |
SEAICE_KRYLOV |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_krylov.F |
519 |
SEAICE_KRYLOV |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1015 |
SEAICE_RESIDUAL |
I calcMeanResid, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1064 |
SEAICE_RESIDUAL |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
1081 |
SEAICE_RESIDUAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
1082 |
SEAICE_RESIDUAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
1120 |
SEAICE_RESIDUAL |
_GLOBAL_SUM_RL( residU, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1121 |
SEAICE_RESIDUAL |
_GLOBAL_SUM_RL( residV, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1141 |
SEAICE_LSR_CALC_COEFFS |
I iMin, iMax, jMin, jMax, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1169 |
SEAICE_LSR_CALC_COEFFS |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
1244 |
SEAICE_LSR_CALC_COEFFS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
1245 |
SEAICE_LSR_CALC_COEFFS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
1465 |
SEAICE_LSR_RHSU |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1486 |
SEAICE_LSR_RHSU |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
1596 |
SEAICE_LSR_RHSV |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1617 |
SEAICE_LSR_RHSV |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
1727 |
SEAICE_LSR_TRIDIAGU |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1747 |
SEAICE_LSR_TRIDIAGU |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
179 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
180 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
1872 |
SEAICE_LSR_TRIDIAGV |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
1892 |
SEAICE_LSR_TRIDIAGV |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
200 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
201 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
273 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
274 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
27 |
SEAICE_LSR |
SUBROUTINE SEAICE_LSR( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
287 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
288 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
302 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
303 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
326 |
SEAICE_LSR |
I ipass, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
331 |
SEAICE_LSR |
I ipass, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
336 |
SEAICE_LSR |
I ipass, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
347 |
SEAICE_LSR |
I ipass, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
352 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
353 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
374 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
375 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
445 |
SEAICE_LSR |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
458 |
SEAICE_LSR |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
472 |
SEAICE_LSR |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
494 |
SEAICE_LSR |
I iMin, iMax, jMin, jMax, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
498 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
499 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
530 |
SEAICE_LSR |
CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
533 |
SEAICE_LSR |
CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
543 |
SEAICE_LSR |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
548 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
549 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
568 |
SEAICE_LSR |
CALL EXCH_UV_XY_RL( uIce_fd, vIce_fd, .TRUE., myThid ) |
|
./pkg/seaice/seaice_lsr.F |
575 |
SEAICE_LSR |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
584 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
585 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
618 |
SEAICE_LSR |
CALL EXCH_UV_XY_RL( uIce, vIce, .TRUE., myThid ) |
|
./pkg/seaice/seaice_lsr.F |
628 |
SEAICE_LSR |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
696 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
697 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
69 |
SEAICE_LSR |
INTEGER myThid |
|
./pkg/seaice/seaice_lsr.F |
730 |
SEAICE_LSR |
I iSubIter, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
732 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
733 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
757 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
758 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
761 |
SEAICE_LSR |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_lsr.F |
762 |
SEAICE_LSR |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_lsr.F |
763 |
SEAICE_LSR |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_lsr.F |
764 |
SEAICE_LSR |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_lsr.F |
765 |
SEAICE_LSR |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_lsr.F |
788 |
SEAICE_LSR |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
796 |
SEAICE_LSR |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
809 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
810 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
820 |
SEAICE_LSR |
_GLOBAL_MAX_RL( S1, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
834 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
835 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
845 |
SEAICE_LSR |
_GLOBAL_MAX_RL( S2, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
855 |
SEAICE_LSR |
CALL EXCH_UV_XY_RL( uIce, vIce,.TRUE.,myThid) |
|
./pkg/seaice/seaice_lsr.F |
874 |
SEAICE_LSR |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
875 |
SEAICE_LSR |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_lsr.F |
895 |
SEAICE_LSR |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_lsr.F |
901 |
SEAICE_LSR |
CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
904 |
SEAICE_LSR |
CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
911 |
SEAICE_LSR |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
916 |
SEAICE_LSR |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
921 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
922 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
938 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
939 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
958 |
SEAICE_LSR |
_GLOBAL_SUM_RL( resnorm, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
959 |
SEAICE_LSR |
_GLOBAL_SUM_RL( EKnorm, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
960 |
SEAICE_LSR |
_GLOBAL_SUM_RL( counter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
962 |
SEAICE_LSR |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_lsr.F |
966 |
SEAICE_LSR |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_lsr.F |
987 |
SEAICE_LSR |
I 3, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_lsr.F |
990 |
SEAICE_LSR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
991 |
SEAICE_LSR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_lsr.F |
995 |
SEAICE_LSR |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_map_thsice.F |
13 |
SEAICE_MAP_THSICE |
SUBROUTINE SEAICE_MAP_THSICE( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_map_thsice.F |
42 |
SEAICE_MAP_THSICE |
INTEGER myThid |
|
./pkg/seaice/seaice_map_thsice.F |
56 |
SEAICE_MAP_THSICE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_map_thsice.F |
57 |
SEAICE_MAP_THSICE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
100 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_VICE','V_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
101 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_VICE','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
103 |
SEAICE_MNC_INIT |
& 'Ice V velocity', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
105 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_HEFF','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
106 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_HEFF','units','m', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
108 |
SEAICE_MNC_INIT |
& 'Effective ice thickness',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
110 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_AREA','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
111 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_AREA','units','m^2/m^2',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
113 |
SEAICE_MNC_INIT |
& 'Fractional ice-covered area',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
116 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_UICEtave','U_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
117 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_UICEtave','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
119 |
SEAICE_MNC_INIT |
& 'Time-averaged ', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
11 |
SEAICE_MNC_INIT |
SUBROUTINE SEAICE_MNC_INIT( myThid ) |
|
./pkg/seaice/seaice_mnc_init.F |
121 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_VICEtave','V_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
122 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_VICEtave','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
124 |
SEAICE_MNC_INIT |
& 'Time-averaged ', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
126 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_FUtave','U_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
127 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_FUtave','units','N/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
129 |
SEAICE_MNC_INIT |
& 'Time-averaged zonal surface wind stress', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
131 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_FVtave','V_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
132 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_FVtave','units','N/m^2',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
134 |
SEAICE_MNC_INIT |
& 'Time-averaged Meridional surface wind stress', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
137 |
SEAICE_MNC_INIT |
& 'si_EmPmRtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
139 |
SEAICE_MNC_INIT |
& 'si_EmPmRtave','units','kg/m^2/s',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
141 |
SEAICE_MNC_INIT |
& 'Time-averaged net upward freshwater flux', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
144 |
SEAICE_MNC_INIT |
& 'si_QNETtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
146 |
SEAICE_MNC_INIT |
& 'si_QNETtave','units','W/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
148 |
SEAICE_MNC_INIT |
& 'Time-averaged net upward surface heat flux', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
151 |
SEAICE_MNC_INIT |
& 'si_QSWtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
153 |
SEAICE_MNC_INIT |
& 'si_QSWtave','units','W/m^2',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
155 |
SEAICE_MNC_INIT |
& 'Time-averaged net upward shortwave radiation',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
158 |
SEAICE_MNC_INIT |
& 'si_HEFFtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
160 |
SEAICE_MNC_INIT |
& 'si_HEFFtave','units','m', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
162 |
SEAICE_MNC_INIT |
& 'Time-averaged effective ice thickness',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
165 |
SEAICE_MNC_INIT |
& 'si_AREAtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
167 |
SEAICE_MNC_INIT |
& 'si_AREAtave','units','m^2/m^2',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
169 |
SEAICE_MNC_INIT |
& 'Time-averaged fractional ice-covered area',myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
27 |
SEAICE_MNC_INIT |
INTEGER myThid |
|
./pkg/seaice/seaice_mnc_init.F |
35 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_sigma1','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
36 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_sigma1','units','N/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
38 |
SEAICE_MNC_INIT |
& 'divergence of stress tensor', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
39 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_sigma2','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
40 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_sigma2','units','N/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
42 |
SEAICE_MNC_INIT |
& 'tension of stress tensor', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
43 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_sigma12','Cor_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
44 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_sigma12','units','N/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
46 |
SEAICE_MNC_INIT |
& 'shear of stress tensor', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
50 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_UWIND','U_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
51 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_UWIND','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
53 |
SEAICE_MNC_INIT |
& 'Surface (10m) zonal wind velocity', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
55 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_VWIND','V_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
56 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_VWIND','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
58 |
SEAICE_MNC_INIT |
& 'Surface (10m) meridional wind velocity', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
60 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_EVAP','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
61 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_EVAP','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
63 |
SEAICE_MNC_INIT |
& 'Evaporation', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
65 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_PRECIP','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
66 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_PRECIP','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
68 |
SEAICE_MNC_INIT |
& 'Precipitation', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
70 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_RUNOFF','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
71 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_RUNOFF','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
73 |
SEAICE_MNC_INIT |
& 'River and glacier runoff', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
75 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_ATEMP','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
76 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_ATEMP','units','deg K', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
78 |
SEAICE_MNC_INIT |
& 'Surface (2m) air temperature', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
80 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_AQH','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
81 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_AQH','units','kg/kg', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
83 |
SEAICE_MNC_INIT |
& 'Surface (2m) specific humidity', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
85 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_SWDOWN','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
86 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_SWDOWN','units','W/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
88 |
SEAICE_MNC_INIT |
& 'Downward shortwave radiation', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
90 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_LWDOWN','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
91 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_LWDOWN','units','W/m^2', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
93 |
SEAICE_MNC_INIT |
& 'Downward longwave radiation', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
95 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('si_UICE','U_xy_Hn__-__t',3,4,myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
96 |
SEAICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('si_UICE','units','m/s', myThid) |
|
./pkg/seaice/seaice_mnc_init.F |
98 |
SEAICE_MNC_INIT |
& 'Ice U velocity', myThid) |
|
./pkg/seaice/seaice_model.F |
13 |
SEAICE_MODEL |
SUBROUTINE SEAICE_MODEL( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
144 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_CALL( 'SEAICE_DYNSOLVER', myThid ) |
|
./pkg/seaice/seaice_model.F |
147 |
SEAICE_MODEL |
CALL TIMER_START('SEAICE_DYNSOLVER [SEAICE_MODEL]',myThid) |
|
./pkg/seaice/seaice_model.F |
148 |
SEAICE_MODEL |
CALL SEAICE_DYNSOLVER ( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
149 |
SEAICE_MODEL |
CALL TIMER_STOP ('SEAICE_DYNSOLVER [SEAICE_MODEL]',myThid) |
|
./pkg/seaice/seaice_model.F |
151 |
SEAICE_MODEL |
CALL TIMER_START('DYNSOLVER [SEAICE_MODEL]',myThid) |
|
./pkg/seaice/seaice_model.F |
152 |
SEAICE_MODEL |
CALL DYNSOLVER ( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
153 |
SEAICE_MODEL |
CALL TIMER_STOP ('DYNSOLVER [SEAICE_MODEL]',myThid) |
|
./pkg/seaice/seaice_model.F |
159 |
SEAICE_MODEL |
IF ( useOBCS ) CALL OBCS_ADJUST_UVICE( uice, vice, myThid ) |
|
./pkg/seaice/seaice_model.F |
167 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_CALL( 'THSICE_DO_ADVECT', myThid ) |
|
./pkg/seaice/seaice_model.F |
169 |
SEAICE_MODEL |
CALL THSICE_DO_ADVECT( 0, 0, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
182 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_CALL( 'SEAICE_ADVDIFF', myThid ) |
|
./pkg/seaice/seaice_model.F |
184 |
SEAICE_MODEL |
CALL SEAICE_ADVDIFF( uIce, vIce, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
194 |
SEAICE_MODEL |
CALL SEAICE_REG_RIDGE( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
202 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_CALL( 'SEAICE_GROWTH', myThid ) |
|
./pkg/seaice/seaice_model.F |
204 |
SEAICE_MODEL |
CALL SEAICE_GROWTH( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
213 |
SEAICE_MODEL |
CALL SEAICE_TRACER_PHYS ( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
219 |
SEAICE_MODEL |
IF ( useOBCS ) CALL OBCS_APPLY_SEAICE( myThid ) |
|
./pkg/seaice/seaice_model.F |
224 |
SEAICE_MODEL |
_EXCH_XY_RL( HEFF, myThid ) |
|
./pkg/seaice/seaice_model.F |
225 |
SEAICE_MODEL |
_EXCH_XY_RL( AREA, myThid ) |
|
./pkg/seaice/seaice_model.F |
226 |
SEAICE_MODEL |
_EXCH_XY_RL( HSNOW, myThid ) |
|
./pkg/seaice/seaice_model.F |
228 |
SEAICE_MODEL |
CALL EXCH_3D_RL( HEFFITD, nITD, myThid ) |
|
./pkg/seaice/seaice_model.F |
229 |
SEAICE_MODEL |
CALL EXCH_3D_RL( AREAITD, nITD, myThid ) |
|
./pkg/seaice/seaice_model.F |
230 |
SEAICE_MODEL |
CALL EXCH_3D_RL( HSNOWITD, nITD, myThid ) |
|
./pkg/seaice/seaice_model.F |
233 |
SEAICE_MODEL |
_EXCH_XY_RL( HSALT, myThid ) |
|
./pkg/seaice/seaice_model.F |
237 |
SEAICE_MODEL |
_EXCH_XY_RL( SItracer(1-OLx,1-OLy,1,1,iTr),myThid ) |
|
./pkg/seaice/seaice_model.F |
240 |
SEAICE_MODEL |
_EXCH_XY_RS(EmPmR, myThid ) |
|
./pkg/seaice/seaice_model.F |
241 |
SEAICE_MODEL |
_EXCH_XY_RS(saltFlux, myThid ) |
|
./pkg/seaice/seaice_model.F |
242 |
SEAICE_MODEL |
_EXCH_XY_RS(Qnet , myThid ) |
|
./pkg/seaice/seaice_model.F |
244 |
SEAICE_MODEL |
_EXCH_XY_RS(Qsw , myThid ) |
|
./pkg/seaice/seaice_model.F |
248 |
SEAICE_MODEL |
& _EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/seaice/seaice_model.F |
282 |
SEAICE_MODEL |
CALL DIAGNOSTICS_FILL_RS(EmPmR,'SIempmr ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_model.F |
283 |
SEAICE_MODEL |
CALL DIAGNOSTICS_FILL_RS(Qnet ,'SIqnet ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_model.F |
284 |
SEAICE_MODEL |
CALL DIAGNOSTICS_FILL_RS(Qsw ,'SIqsw ',0,1 ,0,1,1,myThid) |
|
./pkg/seaice/seaice_model.F |
298 |
SEAICE_MODEL |
CALL EXF_ADJOINT_SNAPSHOTS( 3, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
304 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_LEAVE( 'SEAICE_MODEL', myThid ) |
|
./pkg/seaice/seaice_model.F |
56 |
SEAICE_MODEL |
INTEGER myThid |
|
./pkg/seaice/seaice_model.F |
71 |
SEAICE_MODEL |
IF (debugMode) CALL DEBUG_ENTER( 'SEAICE_MODEL', myThid ) |
|
./pkg/seaice/seaice_model.F |
76 |
SEAICE_MODEL |
CALL EXCH_UV_AGRID_3D_RL( uwind, vwind, .TRUE., 1, myThid ) |
|
./pkg/seaice/seaice_model.F |
82 |
SEAICE_MODEL |
CALL SEAICE_MAP_THSICE( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_model.F |
87 |
SEAICE_MODEL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_model.F |
88 |
SEAICE_MODEL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
131 |
SEAICE_MOM_ADVECTION |
CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
152 |
SEAICE_MOM_ADVECTION |
CALL MOM_CALC_KE(bi,bj,k,SEAICEselectKEscheme,uFld,vFld,KE,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
154 |
SEAICE_MOM_ADVECTION |
CALL MOM_CALC_RELVORT3(bi,bj,k,uFld,vFld,hFacZ,vort3,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
17 |
SEAICE_MOM_ADVECTION |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_mom_advection.F |
188 |
SEAICE_MOM_ADVECTION |
& uCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
193 |
SEAICE_MOM_ADVECTION |
& uCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
205 |
SEAICE_MOM_ADVECTION |
& vCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
210 |
SEAICE_MOM_ADVECTION |
& vCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
227 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(uCf,'SIuAdvZ3',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
228 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(vCf,'SIvAdvZ3',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
233 |
SEAICE_MOM_ADVECTION |
CALL MOM_VI_U_GRAD_KE(bi,bj,k,KE,uCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
239 |
SEAICE_MOM_ADVECTION |
CALL MOM_VI_V_GRAD_KE(bi,bj,k,KE,vCf,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
247 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(uCf,'SIKEx ',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
248 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(vCf,'SIKEy ',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
263 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(KE, 'SImomKE ',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
264 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(gU, 'SIuMmAdv',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
265 |
SEAICE_MOM_ADVECTION |
CALL DIAGNOSTICS_FILL(gV, 'SIvMmAdv',k,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
59 |
SEAICE_MOM_ADVECTION |
INTEGER myThid |
|
./pkg/seaice/seaice_mom_advection.F |
93 |
SEAICE_MOM_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
94 |
SEAICE_MOM_ADVECTION |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_mom_advection.F |
95 |
SEAICE_MOM_ADVECTION |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_mom_advection.F |
96 |
SEAICE_MOM_ADVECTION |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_mom_advection.F |
97 |
SEAICE_MOM_ADVECTION |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_monitor.F |
100 |
SEAICE_MONITOR |
CALL MON_OUT_RL('_time_sec', myTime,mon_string_none,myThid) |
|
./pkg/seaice/seaice_monitor.F |
105 |
SEAICE_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
108 |
SEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
112 |
SEAICE_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
115 |
SEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
119 |
SEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
121 |
SEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
123 |
SEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
126 |
SEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
12 |
SEAICE_MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
134 |
SEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor.F |
138 |
SEAICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/seaice/seaice_monitor.F |
34 |
SEAICE_MONITOR |
INTEGER myThid |
|
./pkg/seaice/seaice_monitor.F |
58 |
SEAICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/seaice/seaice_monitor.F |
75 |
SEAICE_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/seaice/seaice_monitor.F |
76 |
SEAICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/seaice/seaice_monitor.F |
78 |
SEAICE_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/seaice/seaice_monitor.F |
79 |
SEAICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/seaice/seaice_monitor.F |
98 |
SEAICE_MONITOR |
CALL MON_SET_PREF('seaice',myThid) |
|
./pkg/seaice/seaice_monitor.F |
99 |
SEAICE_MONITOR |
CALL MON_OUT_I ('_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
107 |
ADSEAICE_MONITOR |
CALL MON_SET_PREF('ad_seaice',myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
108 |
ADSEAICE_MONITOR |
CALL MON_OUT_I ('_tsnumber', myIter,mon_string_none,myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
109 |
ADSEAICE_MONITOR |
CALL MON_OUT_RL('_time_sec', myTime,mon_string_none,myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
114 |
ADSEAICE_MONITOR |
& maskInW, maskInW, rAw, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
117 |
ADSEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
121 |
ADSEAICE_MONITOR |
& maskInS, maskInS, rAs, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
124 |
ADSEAICE_MONITOR |
& UVM, UVM, rAz, drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
127 |
ADSEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
129 |
ADSEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
131 |
ADSEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
134 |
ADSEAICE_MONITOR |
& maskInC, maskInC, rA , drF, dummyRL, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
137 |
ADSEAICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/seaice/seaice_monitor_ad.F |
15 |
ADSEAICE_MONITOR |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_monitor_ad.F |
42 |
ADSEAICE_MONITOR |
INTEGER myThid |
|
./pkg/seaice/seaice_monitor_ad.F |
67 |
ADSEAICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/seaice/seaice_monitor_ad.F |
84 |
ADSEAICE_MONITOR |
& 'T', '-_-_--__-__t', 0,0, myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
85 |
ADSEAICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
87 |
ADSEAICE_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/seaice/seaice_monitor_ad.F |
88 |
ADSEAICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
100 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWa, 1,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
101 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWh, 2,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
102 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWsl, 3,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
103 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWsn, 4,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
104 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWuice, 5,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
105 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBWvice, 6,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
13 |
SEAICE_OBCS_OUTPUT |
SUBROUTINE SEAICE_OBCS_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_obcs_output.F |
39 |
SEAICE_OBCS_OUTPUT |
INTEGER myThid |
|
./pkg/seaice/seaice_obcs_output.F |
73 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNa, 1,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
74 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNh, 2,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
75 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNsl, 3,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
76 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNsn, 4,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
77 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNuice, 5,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
78 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBNvice, 6,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
82 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSa, 1,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
83 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSh, 2,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
84 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSsl, 3,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
85 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSsn, 4,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
86 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSuice, 5,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
87 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec, 1,OBSvice, 6,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
91 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEa, 1,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
92 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEh, 2,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
93 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEsl, 3,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
94 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEsn, 4,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
95 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEuice, 5,myIter,myThid) |
|
./pkg/seaice/seaice_obcs_output.F |
96 |
SEAICE_OBCS_OUTPUT |
CALL WRITE_REC_YZ_RL(fn,prec, 1,OBEvice, 6,myIter,myThid) |
|
./pkg/seaice/seaice_ocean_stress.F |
128 |
SEAICE_OCEAN_STRESS |
CALL EXCH_UV_XY_RS(fu, fv, .TRUE., myThid) |
|
./pkg/seaice/seaice_ocean_stress.F |
34 |
SEAICE_OCEAN_STRESS |
INTEGER myThid |
|
./pkg/seaice/seaice_ocean_stress.F |
59 |
SEAICE_OCEAN_STRESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_ocean_stress.F |
60 |
SEAICE_OCEAN_STRESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_ocean_stress.F |
8 |
SEAICE_OCEAN_STRESS |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_ocean_stress.F |
91 |
SEAICE_OCEAN_STRESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_ocean_stress.F |
92 |
SEAICE_OCEAN_STRESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg3d.F |
106 |
INI_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg3d.F |
107 |
INI_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg3d.F |
10 |
INI_CG3D |
SUBROUTINE INI_CG3D( myThid ) |
|
./model/src/ini_cg3d.F |
168 |
INI_CG3D |
_GLOBAL_MAX_RS( myNorm, myThid ) |
|
./model/src/ini_cg3d.F |
175 |
INI_CG3D |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_cg3d.F |
181 |
INI_CG3D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_cg3d.F |
184 |
INI_CG3D |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_cg3d.F |
185 |
INI_CG3D |
_END_MASTER( myThid ) |
|
./model/src/ini_cg3d.F |
187 |
INI_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg3d.F |
188 |
INI_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg3d.F |
251 |
INI_CG3D |
CALL EXCH_UV_XYZ_RS(aW3d,aS3d,.FALSE.,myThid) |
|
./model/src/ini_cg3d.F |
252 |
INI_CG3D |
_EXCH_XYZ_RS(aV3d, myThid) |
|
./model/src/ini_cg3d.F |
253 |
INI_CG3D |
_EXCH_XYZ_RS(aC3d, myThid) |
|
./model/src/ini_cg3d.F |
264 |
INI_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg3d.F |
265 |
INI_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cg3d.F |
326 |
INI_CG3D |
_EXCH_XYZ_RS(zMC, myThid) |
|
./model/src/ini_cg3d.F |
327 |
INI_CG3D |
_EXCH_XYZ_RS(zML, myThid) |
|
./model/src/ini_cg3d.F |
328 |
INI_CG3D |
_EXCH_XYZ_RS(zMU, myThid) |
|
./model/src/ini_cg3d.F |
331 |
INI_CG3D |
CALL WRITE_FLD_XYZ_RS( 'zMC',' ',zMC, 0, myThid ) |
|
./model/src/ini_cg3d.F |
332 |
INI_CG3D |
CALL WRITE_FLD_XYZ_RS( 'zML',' ',zML, 0, myThid ) |
|
./model/src/ini_cg3d.F |
333 |
INI_CG3D |
CALL WRITE_FLD_XYZ_RS( 'zMU',' ',zMU, 0, myThid ) |
|
./model/src/ini_cg3d.F |
35 |
INI_CG3D |
INTEGER myThid |
|
./model/src/ini_cg3d.F |
61 |
INI_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_cg3d.F |
62 |
INI_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_oceandrag_coeffs.F |
18 |
SEAICE_OCEANDRAG_COEFFS |
I iStep, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_oceandrag_coeffs.F |
54 |
SEAICE_OCEANDRAG_COEFFS |
INTEGER myThid |
|
./pkg/seaice/seaice_oceandrag_coeffs.F |
72 |
SEAICE_OCEANDRAG_COEFFS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_oceandrag_coeffs.F |
73 |
SEAICE_OCEANDRAG_COEFFS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_output.F |
102 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_UICE',uIce,myThid) |
|
./pkg/seaice/seaice_output.F |
103 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_VICE',vIce,myThid) |
|
./pkg/seaice/seaice_output.F |
105 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_HEFF',hEff,myThid) |
|
./pkg/seaice/seaice_output.F |
106 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_AREA',area,myThid) |
|
./pkg/seaice/seaice_output.F |
113 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_UWIND',uwind,myThid) |
|
./pkg/seaice/seaice_output.F |
114 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W(pf,'sice',0,0,'si_VWIND',vwind,myThid) |
|
./pkg/seaice/seaice_output.F |
116 |
SEAICE_OUTPUT |
CALL MNC_CW_RS_W(pf,'sice',0,0,'fu',fu,myThid) |
|
./pkg/seaice/seaice_output.F |
117 |
SEAICE_OUTPUT |
CALL MNC_CW_RS_W(pf,'sice',0,0,'fv',fv,myThid) |
|
./pkg/seaice/seaice_output.F |
118 |
SEAICE_OUTPUT |
CALL MNC_CW_RS_W(pf,'sice',0,0,'EmPmR',EmPmR,myThid) |
|
./pkg/seaice/seaice_output.F |
119 |
SEAICE_OUTPUT |
CALL MNC_CW_RS_W(pf,'sice',0,0,'Qnet',Qnet,myThid) |
|
./pkg/seaice/seaice_output.F |
120 |
SEAICE_OUTPUT |
CALL MNC_CW_RS_W(pf,'sice',0,0,'Qsw',Qsw,myThid) |
|
./pkg/seaice/seaice_output.F |
127 |
SEAICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
131 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('UWIND.',suff,uwind,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
132 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('VWIND.',suff,vwind,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
134 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('FU.',suff,fu,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
135 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('FV.',suff,fv,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
136 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('EmPmR.',suff,EmPmR,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
137 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('Qnet.',suff,Qnet,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
138 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RS('Qsw.',suff,Qsw,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
13 |
SEAICE_OUTPUT |
SUBROUTINE SEAICE_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
140 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'UICE.',suff,uIce,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
141 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'VICE.',suff,vIce,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
143 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'HEFF.',suff,hEff,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
144 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'AREA.',suff,area,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
145 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'HSNOW.',suff,HSNOW,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
148 |
SEAICE_OUTPUT |
& myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
150 |
SEAICE_OUTPUT |
& myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
152 |
SEAICE_OUTPUT |
& myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
155 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL( 'HSALT.',suff,HSALT,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
163 |
SEAICE_OUTPUT |
& myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
170 |
SEAICE_OUTPUT |
& myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
172 |
SEAICE_OUTPUT |
& myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
174 |
SEAICE_OUTPUT |
& myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
191 |
SEAICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_output.F |
192 |
SEAICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_output.F |
241 |
SEAICE_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
248 |
SEAICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_output.F |
249 |
SEAICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_output.F |
251 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
253 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
255 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
257 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
259 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
261 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
263 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
265 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
267 |
SEAICE_OUTPUT |
& SEAICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
270 |
SEAICE_OUTPUT |
& SEAICE_timeAve, nITD, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
272 |
SEAICE_OUTPUT |
& SEAICE_timeAve, nITD, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
285 |
SEAICE_OUTPUT |
CALL MNC_CW_SET_UDIM('sice_tave', -1, myThid) |
|
./pkg/seaice/seaice_output.F |
286 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W_S('D','sice_tave',0,0,'T', myTime, myThid) |
|
./pkg/seaice/seaice_output.F |
287 |
SEAICE_OUTPUT |
CALL MNC_CW_SET_UDIM('sice_tave', 0, myThid) |
|
./pkg/seaice/seaice_output.F |
288 |
SEAICE_OUTPUT |
CALL MNC_CW_I_W_S('I','sice_tave',0,0,'iter', myIter, myThid) |
|
./pkg/seaice/seaice_output.F |
292 |
SEAICE_OUTPUT |
& 'si_UICEtave',UICEtave,myThid) |
|
./pkg/seaice/seaice_output.F |
294 |
SEAICE_OUTPUT |
& 'si_VICEtave',VICEtave,myThid) |
|
./pkg/seaice/seaice_output.F |
296 |
SEAICE_OUTPUT |
& 'si_FUtave',FUtave,myThid) |
|
./pkg/seaice/seaice_output.F |
298 |
SEAICE_OUTPUT |
& 'si_FVtave',FVtave,myThid) |
|
./pkg/seaice/seaice_output.F |
300 |
SEAICE_OUTPUT |
& 'si_EmPmRtave',EmPmRtave,myThid) |
|
./pkg/seaice/seaice_output.F |
302 |
SEAICE_OUTPUT |
& 'si_QNETtave',QNETtave,myThid) |
|
./pkg/seaice/seaice_output.F |
304 |
SEAICE_OUTPUT |
& 'si_QSWtave',QSWtave,myThid) |
|
./pkg/seaice/seaice_output.F |
306 |
SEAICE_OUTPUT |
& 'si_HEFFtave',HEFFtave,myThid) |
|
./pkg/seaice/seaice_output.F |
308 |
SEAICE_OUTPUT |
& 'si_AREAtave',AREAtave,myThid) |
|
./pkg/seaice/seaice_output.F |
315 |
SEAICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
317 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('FUtave.' ,suff,FUtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
318 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('FVtave.' ,suff,FVtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
319 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('EmPmRtave.',suff,EmPmRtave,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
320 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('QNETtave.' ,suff,QNETtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
321 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('QSWtave.' ,suff,QSWtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
322 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('UICEtave.' ,suff,UICEtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
323 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('VICEtave.' ,suff,VICEtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
324 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('HEFFtave.' ,suff,HEFFtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
325 |
SEAICE_OUTPUT |
CALL WRITE_FLD_XY_RL('AREAtave.' ,suff,AREAtave ,myIter,myThid) |
|
./pkg/seaice/seaice_output.F |
329 |
SEAICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/seaice/seaice_output.F |
330 |
SEAICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_output.F |
331 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( FUtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
332 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( FVtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
333 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( EmPmRtave, 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
334 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( QNETtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
335 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( QSWtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
336 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( UICEtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
337 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( VICEtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
338 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( HEFFtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
339 |
SEAICE_OUTPUT |
CALL TIMEAVE_RESET( AREAtave , 1, bi, bj, myThid ) |
|
./pkg/seaice/seaice_output.F |
352 |
SEAICE_OUTPUT |
CALL SEAICE_MONITOR( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
355 |
SEAICE_OUTPUT |
IF ( useOBCS ) CALL SEAICE_OBCS_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_output.F |
45 |
SEAICE_OUTPUT |
INTEGER myThid |
|
./pkg/seaice/seaice_output.F |
86 |
SEAICE_OUTPUT |
CALL MNC_CW_SET_UDIM('sice', -1, myThid) |
|
./pkg/seaice/seaice_output.F |
87 |
SEAICE_OUTPUT |
CALL MNC_CW_RL_W_S('D','sice',0,0,'T', myTime, myThid) |
|
./pkg/seaice/seaice_output.F |
88 |
SEAICE_OUTPUT |
CALL MNC_CW_SET_UDIM('sice', 0, myThid) |
|
./pkg/seaice/seaice_output.F |
89 |
SEAICE_OUTPUT |
CALL MNC_CW_I_W_S('I','sice',0,0,'iter', myIter, myThid) |
|
./pkg/seaice/seaice_output.F |
91 |
SEAICE_OUTPUT |
& myTime,myThid) |
|
./pkg/seaice/seaice_output.F |
95 |
SEAICE_OUTPUT |
& seaice_sigma1,myThid) |
|
./pkg/seaice/seaice_output.F |
97 |
SEAICE_OUTPUT |
& seaice_sigma2,myThid) |
|
./pkg/seaice/seaice_output.F |
99 |
SEAICE_OUTPUT |
& seaice_sigma12,myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
150 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
151 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
170 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
171 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
187 |
SEAICE_PRECONDITIONER |
I iMin, iMax, jMin, jMax, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
191 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
192 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
222 |
SEAICE_PRECONDITIONER |
CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
226 |
SEAICE_PRECONDITIONER |
CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
233 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
234 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
23 |
SEAICE_PRECONDITIONER |
I newtonIter, krylovIter, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
246 |
SEAICE_PRECONDITIONER |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
252 |
SEAICE_PRECONDITIONER |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
271 |
SEAICE_PRECONDITIONER |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
282 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
283 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
307 |
SEAICE_PRECONDITIONER |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
314 |
SEAICE_PRECONDITIONER |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
336 |
SEAICE_PRECONDITIONER |
I imin, imax, jmin, jmax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
342 |
SEAICE_PRECONDITIONER |
CALL EXCH_UV_XY_RL( duIce, dvIce, .TRUE., myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
344 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
345 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
357 |
SEAICE_PRECONDITIONER |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
374 |
SEAICE_PRECONDITIONER |
I imin, imax, jmin, jmax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
380 |
SEAICE_PRECONDITIONER |
CALL EXCH_UV_XY_RL( duIce, dvIce, .TRUE., myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
393 |
SEAICE_PRECONDITIONER |
I printResidual, myIter, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
394 |
SEAICE_PRECONDITIONER |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
402 |
SEAICE_PRECONDITIONER |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
409 |
SEAICE_PRECONDITIONER |
CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
413 |
SEAICE_PRECONDITIONER |
CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
418 |
SEAICE_PRECONDITIONER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
419 |
SEAICE_PRECONDITIONER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_preconditioner.F |
442 |
SEAICE_PRECOND_RHSU |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
475 |
SEAICE_PRECOND_RHSU |
INTEGER iMin, iMax, jMin, jMax, bi, bj, myThid |
|
./pkg/seaice/seaice_preconditioner.F |
495 |
SEAICE_PRECOND_RHSU |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
547 |
SEAICE_PRECOND_RHSV |
I iMin,iMax,jMin,jMax,bi,bj,myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
580 |
SEAICE_PRECOND_RHSV |
INTEGER iMin, iMax, jMin, jMax, bi, bj, myThid |
|
./pkg/seaice/seaice_preconditioner.F |
600 |
SEAICE_PRECOND_RHSV |
I iMin, iMax, jMin, jMax, bi, bj, myThid ) |
|
./pkg/seaice/seaice_preconditioner.F |
66 |
SEAICE_PRECONDITIONER |
INTEGER myThid |
|
./pkg/seaice/seaice_prepare_ridging.F |
17 |
SEAICE_PREPARE_RIDGING |
I iMin, iMax, jMin, jMax, bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_prepare_ridging.F |
57 |
SEAICE_PREPARE_RIDGING |
INTEGER myThid |
|
./pkg/seaice/seaice_read_pickup.F |
100 |
SEAICE_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
111 |
SEAICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
115 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
120 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
125 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
130 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
133 |
SEAICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
146 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn,fp,nITD, TICES, nj,nIter0,myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
151 |
SEAICE_READ_PICKUP |
I nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
155 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HSNOW , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
157 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, UICE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
159 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, VICE , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
161 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HEFF , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
163 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, AREA , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
168 |
SEAICE_READ_PICKUP |
CALL SEAICE_ITD_PICKUP( nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
172 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma1,nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
174 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma2,nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
176 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,seaice_sigma12,nj,nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
181 |
SEAICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HSALT , nj, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
192 |
SEAICE_READ_PICKUP |
& nj, fp, nITD, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
197 |
SEAICE_READ_PICKUP |
& nj, fp, nITD,1,1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
203 |
SEAICE_READ_PICKUP |
& nj, fp, nITD,1,1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
206 |
SEAICE_READ_PICKUP |
& nj, fp, nITD,1,1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
212 |
SEAICE_READ_PICKUP |
& nj, fp, nITD, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
218 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
220 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
222 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
226 |
SEAICE_READ_PICKUP |
CALL SEAICE_ITD_PICKUP( nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
231 |
SEAICE_READ_PICKUP |
& nj, fp, nITD, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
233 |
SEAICE_READ_PICKUP |
& nj, fp, nITD, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
235 |
SEAICE_READ_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
236 |
SEAICE_READ_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
237 |
SEAICE_READ_PICKUP |
CALL SEAICE_ITD_SUM( bi, bj, startTime, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
244 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
251 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
252 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(SItracer(1-OLx,1-OLy,1,1,iTrac),myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
260 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
262 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
265 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
267 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
272 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
274 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
276 |
SEAICE_READ_PICKUP |
& nj, fp, 1, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
288 |
SEAICE_READ_PICKUP |
I nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
292 |
SEAICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
298 |
SEAICE_READ_PICKUP |
I nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
307 |
SEAICE_READ_PICKUP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
308 |
SEAICE_READ_PICKUP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
321 |
SEAICE_READ_PICKUP |
CALL EXCH_UV_XY_RL( uIce, vIce,.TRUE.,myThid) |
|
./pkg/seaice/seaice_read_pickup.F |
322 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL( HEFF, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
323 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL( AREA, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
324 |
SEAICE_READ_PICKUP |
CALL EXCH_3D_RL( TICES, nITD, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
325 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(HSNOW, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
328 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(seaice_sigma1 , myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
329 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(seaice_sigma2 , myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
330 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(seaice_sigma12, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
334 |
SEAICE_READ_PICKUP |
_EXCH_XY_RL(HSALT, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
337 |
SEAICE_READ_PICKUP |
CALL EXCH_3D_RL( HEFFITD, nITD, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
338 |
SEAICE_READ_PICKUP |
CALL EXCH_3D_RL( AREAITD, nITD, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
339 |
SEAICE_READ_PICKUP |
CALL EXCH_3D_RL( HSNOWITD, nITD, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
33 |
SEAICE_READ_PICKUP |
INTEGER myThid |
|
./pkg/seaice/seaice_read_pickup.F |
70 |
SEAICE_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
88 |
SEAICE_READ_PICKUP |
I nITD, nIter0, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
90 |
SEAICE_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
94 |
SEAICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
97 |
SEAICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_read_pickup.F |
9 |
SEAICE_READ_PICKUP |
SUBROUTINE SEAICE_READ_PICKUP ( myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1004 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1007 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1014 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1017 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1024 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1027 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1034 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1038 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1045 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1049 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1056 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1060 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1065 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1068 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1074 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1077 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1083 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1086 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1092 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1095 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1102 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1106 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1113 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1117 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1124 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1129 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1136 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1140 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1147 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1151 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1157 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1160 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1167 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1174 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1178 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1185 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1189 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1196 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1200 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1207 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1211 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1221 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1225 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1230 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1233 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1240 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1247 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1254 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1259 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1262 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
12 |
SEAICE_READPARMS |
SUBROUTINE SEAICE_READPARMS( myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1301 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
1305 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
1309 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
1323 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1330 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1337 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1344 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1351 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
1356 |
SEAICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_readparms.F |
205 |
SEAICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_readparms.F |
209 |
SEAICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_readparms.F |
213 |
SEAICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_readparms.F |
48 |
SEAICE_READPARMS |
INTEGER myThid |
|
./pkg/seaice/seaice_readparms.F |
574 |
SEAICE_READPARMS |
CALL CAL_GETDATE( -1, startTime, locDate, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
623 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
626 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
631 |
SEAICE_READPARMS |
I myThid ) |
|
./pkg/seaice/seaice_readparms.F |
660 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
705 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
708 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
732 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
738 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
779 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
790 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
795 |
SEAICE_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/seaice/seaice_readparms.F |
872 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
883 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
898 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
924 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
937 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/seaice/seaice_readparms.F |
984 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
987 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
994 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_readparms.F |
997 |
SEAICE_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
15 |
SEAICE_REG_RIDGE |
SUBROUTINE SEAICE_REG_RIDGE( myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
177 |
SEAICE_REG_RIDGE |
CALL SEAICE_ITD_SUM ( bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
356 |
SEAICE_REG_RIDGE |
CALL SEAICE_DO_RIDGING( bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
359 |
SEAICE_REG_RIDGE |
CALL SEAICE_ITD_REDIST( bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
362 |
SEAICE_REG_RIDGE |
CALL SEAICE_ITD_SUM ( bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_reg_ridge.F |
393 |
SEAICE_REG_RIDGE |
CALL DIAGNOSTICS_FILL(DIAGarrayA,'SIareaPR',0,1,3,bi,bj,myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
55 |
SEAICE_REG_RIDGE |
INTEGER myIter, myThid |
|
./pkg/seaice/seaice_reg_ridge.F |
86 |
SEAICE_REG_RIDGE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
87 |
SEAICE_REG_RIDGE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
90 |
SEAICE_REG_RIDGE |
act1 = bi - myBxLo(myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
91 |
SEAICE_REG_RIDGE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/seaice/seaice_reg_ridge.F |
92 |
SEAICE_REG_RIDGE |
act2 = bj - myByLo(myThid) |
|
./pkg/seaice/seaice_reg_ridge.F |
93 |
SEAICE_REG_RIDGE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/seaice/seaice_reg_ridge.F |
94 |
SEAICE_REG_RIDGE |
act3 = myThid - 1 |
|
./pkg/seaice/seaice_solve4temp.F |
24 |
SEAICE_SOLVE4TEMP |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_solve4temp.F |
478 |
SEAICE_SOLVE4TEMP |
CALL ZERO_ADJ_1D( 1, TSURFin(I,J), myThid) |
|
./pkg/seaice/seaice_solve4temp.F |
87 |
SEAICE_SOLVE4TEMP |
INTEGER myIter, myThid |
|
./pkg/seaice/seaice_summary.F |
103 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
112 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
299 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
303 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
307 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
312 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
31 |
SEAICE_SUMMARY |
INTEGER myThid |
|
./pkg/seaice/seaice_summary.F |
386 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
390 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
394 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
408 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
442 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
447 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
449 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
450 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
454 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
460 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
462 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
464 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
465 |
SEAICE_SUMMARY |
CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
484 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
48 |
SEAICE_SUMMARY |
_BEGIN_MASTER(myThid) |
|
./pkg/seaice/seaice_summary.F |
499 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
503 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
507 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
56 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
60 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
615 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
619 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
623 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
64 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
676 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
704 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
708 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
70 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
712 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
729 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
733 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
737 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
741 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
744 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
746 |
SEAICE_SUMMARY |
_END_MASTER(myThid) |
|
./pkg/seaice/seaice_summary.F |
74 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
78 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
8 |
SEAICE_SUMMARY |
SUBROUTINE SEAICE_SUMMARY( myThid ) |
|
./pkg/seaice/seaice_summary.F |
95 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_summary.F |
99 |
SEAICE_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/seaice/seaice_tracer_phys.F |
198 |
SEAICE_TRACER_PHYS |
& tmpscal1, 1, diagName,0,1,2,bi,bj,myThid) |
|
./pkg/seaice/seaice_tracer_phys.F |
36 |
SEAICE_TRACER_PHYS |
INTEGER myIter, myThid |
|
./pkg/seaice/seaice_tracer_phys.F |
60 |
SEAICE_TRACER_PHYS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/seaice/seaice_tracer_phys.F |
61 |
SEAICE_TRACER_PHYS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/seaice/seaice_tracer_phys.F |
7 |
SEAICE_TRACER_PHYS |
SUBROUTINE SEAICE_TRACER_PHYS( myTime, myIter, myThid ) |
|
./eesupp/src/bar_check.F |
34 |
BAR_CHECK |
INTEGER myThid |
|
./eesupp/src/bar_check.F |
49 |
BAR_CHECK |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/bar_check.F |
50 |
BAR_CHECK |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/bar_check.F |
64 |
BAR_CHECK |
WRITE(msgBuf,'(A,I4,A,I8)') 'BAR_CHECK: thread', myThid, |
|
./eesupp/src/bar_check.F |
66 |
BAR_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/bar_check.F |
68 |
BAR_CHECK |
WRITE(0,*) myThid, barrierId, 'barStatus=', barStatus |
|
./eesupp/src/bar_check.F |
9 |
BAR_CHECK |
SUBROUTINE BAR_CHECK( barrierId, myThid ) |
|
./model/src/ini_cori.F |
109 |
INI_CORI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cori.F |
110 |
INI_CORI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cori.F |
11 |
INI_CORI |
SUBROUTINE INI_CORI( myThid ) |
|
./model/src/ini_cori.F |
124 |
INI_CORI |
CALL READ_REC_XY_RS( 'fCoriC.bin', fCori, 1, 0, myThid ) |
|
./model/src/ini_cori.F |
125 |
INI_CORI |
CALL READ_REC_XY_RS( 'fCorCs.bin', fCoriCos,1, 0, myThid ) |
|
./model/src/ini_cori.F |
127 |
INI_CORI |
CALL READ_REC_XY_RS('fCoriG.bin', fCoriG, 1, 0, myThid ) |
|
./model/src/ini_cori.F |
130 |
INI_CORI |
CALL READ_REC_XY_RS('fCoriG.bin', fCoriG, 1, 0, myThid ) |
|
./model/src/ini_cori.F |
132 |
INI_CORI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cori.F |
133 |
INI_CORI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cori.F |
151 |
INI_CORI |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_cori.F |
165 |
INI_CORI |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_cori.F |
168 |
INI_CORI |
& fCoriG, bi, bj, myThid ) |
|
./model/src/ini_cori.F |
171 |
INI_CORI |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_cori.F |
177 |
INI_CORI |
_END_MASTER(myThid) |
|
./model/src/ini_cori.F |
181 |
INI_CORI |
CALL EXCH_XY_RS( fCori, myThid ) |
|
./model/src/ini_cori.F |
182 |
INI_CORI |
CALL EXCH_XY_RS( fCoriCos, myThid ) |
|
./model/src/ini_cori.F |
183 |
INI_CORI |
CALL EXCH_Z_3D_RS( fCoriG, 1, myThid ) |
|
./model/src/ini_cori.F |
187 |
INI_CORI |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./model/src/ini_cori.F |
203 |
INI_CORI |
CALL MNC_CW_SET_UDIM(mon_fname, 1, myThid) |
|
./model/src/ini_cori.F |
210 |
INI_CORI |
CALL MON_SET_PREF( mon_string_none, myThid ) |
|
./model/src/ini_cori.F |
211 |
INI_CORI |
CALL MON_PRINTSTATS_RS(1,fCori,'fCori',myThid) |
|
./model/src/ini_cori.F |
212 |
INI_CORI |
CALL MON_PRINTSTATS_RS(1,fCoriG,'fCoriG',myThid) |
|
./model/src/ini_cori.F |
213 |
INI_CORI |
CALL MON_PRINTSTATS_RS(1,fCoriCos,'fCoriCos',myThid) |
|
./model/src/ini_cori.F |
215 |
INI_CORI |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./model/src/ini_cori.F |
34 |
INI_CORI |
INTEGER myThid |
|
./model/src/ini_cori.F |
60 |
INI_CORI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cori.F |
61 |
INI_CORI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cori.F |
76 |
INI_CORI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cori.F |
77 |
INI_CORI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cori.F |
90 |
INI_CORI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cori.F |
91 |
INI_CORI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/seaice/seaice_turnoff_io.F |
38 |
SEAICE_TURNOFF_IO |
INTEGER myThid |
|
./pkg/seaice/seaice_turnoff_io.F |
46 |
SEAICE_TURNOFF_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/seaice/seaice_turnoff_io.F |
54 |
SEAICE_TURNOFF_IO |
_END_MASTER( myThid ) |
|
./pkg/seaice/seaice_turnoff_io.F |
9 |
SEAICE_TURNOFF_IO |
SUBROUTINE SEAICE_TURNOFF_IO( seqFlag, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
105 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL(fn,fp,nITD,TICES, nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
10 |
SEAICE_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
112 |
SEAICE_WRITE_PICKUP |
I nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
119 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, AREA , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
123 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, HEFF , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
127 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, HSNOW , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
135 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, HSALT , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
145 |
SEAICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
154 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, UICE , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
159 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, VICE , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
165 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, uIceNm1 , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
170 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, vIceNm1 , nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
178 |
SEAICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
184 |
SEAICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
190 |
SEAICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
199 |
SEAICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
202 |
SEAICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
215 |
SEAICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
42 |
SEAICE_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/seaice/seaice_write_pickup.F |
86 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,fp, nITD, TICES, -j, myIter,myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
89 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,fp, nITD, AREAITD, -j, myIter,myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
92 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,fp, nITD, HEFFITD, -j, myIter,myThid ) |
|
./pkg/seaice/seaice_write_pickup.F |
95 |
SEAICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,fp, nITD, HSNOWITD,-j, myIter,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
116 |
SHAP_FILT_APPLY_TS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
119 |
SHAP_FILT_APPLY_TS |
& myIter, myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
127 |
SHAP_FILT_APPLY_TS |
& 0,1,1,myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
12 |
SHAP_FILT_APPLY_TS |
I myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
137 |
SHAP_FILT_APPLY_TS |
I nShapS, Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
142 |
SHAP_FILT_APPLY_TS |
I nShapS, exchInOut, Nr, myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
146 |
SHAP_FILT_APPLY_TS |
I nShapS, Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
165 |
SHAP_FILT_APPLY_TS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
168 |
SHAP_FILT_APPLY_TS |
& myIter, myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
176 |
SHAP_FILT_APPLY_TS |
& 0,1,1,myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
33 |
SHAP_FILT_APPLY_TS |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
65 |
SHAP_FILT_APPLY_TS |
IF ( tempStepping ) _EXCH_XYZ_RL( tFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
66 |
SHAP_FILT_APPLY_TS |
IF ( saltStepping ) _EXCH_XYZ_RL( sFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
68 |
SHAP_FILT_APPLY_TS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
69 |
SHAP_FILT_APPLY_TS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
72 |
SHAP_FILT_APPLY_TS |
& CALL SHAP_FILT_TRACEROLD( tFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
74 |
SHAP_FILT_APPLY_TS |
& CALL SHAP_FILT_TRACEROLD( sFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
79 |
SHAP_FILT_APPLY_TS |
IF ( tempStepping ) _EXCH_XYZ_RL( tFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
80 |
SHAP_FILT_APPLY_TS |
IF ( saltStepping ) _EXCH_XYZ_RL( sFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
88 |
SHAP_FILT_APPLY_TS |
I nShapT, Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
93 |
SHAP_FILT_APPLY_TS |
I nShapT, exchInOut, Nr, myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_ts.F |
97 |
SHAP_FILT_APPLY_TS |
I nShapT, Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
102 |
SHAP_FILT_APPLY_UV |
I Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
110 |
SHAP_FILT_APPLY_UV |
I Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
11 |
SHAP_FILT_APPLY_UV |
I myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
124 |
SHAP_FILT_APPLY_UV |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
127 |
SHAP_FILT_APPLY_UV |
& myIter,myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
129 |
SHAP_FILT_APPLY_UV |
& myIter,myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
138 |
SHAP_FILT_APPLY_UV |
& 0, 1, 1, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
140 |
SHAP_FILT_APPLY_UV |
& 0, 1, 1, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
141 |
SHAP_FILT_APPLY_UV |
diag_dKE = DIAGNOSTICS_IS_ON('SHAP_dKE',myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
146 |
SHAP_FILT_APPLY_UV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
147 |
SHAP_FILT_APPLY_UV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
180 |
SHAP_FILT_APPLY_UV |
& k, 1, 2, bi, bj, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
46 |
SHAP_FILT_APPLY_UV |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
76 |
SHAP_FILT_APPLY_UV |
_EXCH_XYZ_RL( uFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
77 |
SHAP_FILT_APPLY_UV |
_EXCH_XYZ_RL( vFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
79 |
SHAP_FILT_APPLY_UV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
80 |
SHAP_FILT_APPLY_UV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
82 |
SHAP_FILT_APPLY_UV |
CALL SHAP_FILT_U( uFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
83 |
SHAP_FILT_APPLY_UV |
CALL SHAP_FILT_V( vFld,bi,bj,k,myTime,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
88 |
SHAP_FILT_APPLY_UV |
_EXCH_XYZ_RL( uFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
89 |
SHAP_FILT_APPLY_UV |
_EXCH_XYZ_RL( vFld,myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
94 |
SHAP_FILT_APPLY_UV |
I Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_apply_uv.F |
98 |
SHAP_FILT_APPLY_UV |
I Nr, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_computvort.F |
12 |
SHAP_FILT_COMPUTVORT |
I k, bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_computvort.F |
45 |
SHAP_FILT_COMPUTVORT |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
29 |
SHAP_FILT_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
65 |
SHAP_FILT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
71 |
SHAP_FILT_DIAGNOSTICS_INIT |
diagUnits = DIAGS_MK_UNITS( trUnits//'/s', myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
74 |
SHAP_FILT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
82 |
SHAP_FILT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
90 |
SHAP_FILT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
98 |
SHAP_FILT_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shap_filt/shap_filt_diagnostics_init.F |
9 |
SHAP_FILT_DIAGNOSTICS_INIT |
SUBROUTINE SHAP_FILT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/shap_filt/shap_filt_init_fixed.F |
29 |
SHAP_FILT_INIT_FIXED |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_init_fixed.F |
37 |
SHAP_FILT_INIT_FIXED |
CALL SHAP_FILT_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/shap_filt/shap_filt_init_fixed.F |
9 |
SHAP_FILT_INIT_FIXED |
SUBROUTINE SHAP_FILT_INIT_FIXED( myThid ) |
|
./pkg/shap_filt/shap_filt_readparms.F |
237 |
SHAP_FILT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/shap_filt/shap_filt_readparms.F |
30 |
SHAP_FILT_READPARMS |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_readparms.F |
51 |
SHAP_FILT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/shap_filt/shap_filt_readparms.F |
56 |
SHAP_FILT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/shap_filt/shap_filt_readparms.F |
64 |
SHAP_FILT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/shap_filt/shap_filt_readparms.F |
73 |
SHAP_FILT_READPARMS |
I myThid ) |
|
./pkg/shap_filt/shap_filt_readparms.F |
9 |
SHAP_FILT_READPARMS |
SUBROUTINE SHAP_FILT_READPARMS( myThid ) |
|
./model/src/ini_curvilinear_grid.F |
102 |
INI_CURVILINEAR_GRID |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
10 |
INI_CURVILINEAR_GRID |
SUBROUTINE INI_CURVILINEAR_GRID( myThid ) |
|
./model/src/ini_curvilinear_grid.F |
117 |
INI_CURVILINEAR_GRID |
_END_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
122 |
INI_CURVILINEAR_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
127 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( xG, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
128 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( yG, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
130 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DXV.bin', fp, 1, dxV, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
131 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYU.bin', fp, 1, dyU, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
135 |
INI_CURVILINEAR_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
136 |
INI_CURVILINEAR_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
146 |
INI_CURVILINEAR_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
151 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_BGRID_3D_RS( dxV, dyU, .FALSE., 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
153 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'RAZ.bin', fp, 1, rAz, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
156 |
INI_CURVILINEAR_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
157 |
INI_CURVILINEAR_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
164 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( rAz, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
167 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DXC.bin', fp, 1, dxC, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
168 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYC.bin', fp, 1, dyC, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
169 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dxC,dyC,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
171 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'RAW.bin', fp, 1, rAw, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
172 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'RAS.bin', fp, 1, rAs, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
173 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(rAw,rAs,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
175 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DXG.bin', fp, 1, dxG, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
176 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYG.bin', fp, 1, dyG, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
177 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dyG,dxG,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
181 |
INI_CURVILINEAR_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
184 |
INI_CURVILINEAR_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
220 |
INI_CURVILINEAR_GRID |
& SQUEEZE_RIGHT , myThid) |
|
./model/src/ini_curvilinear_grid.F |
221 |
INI_CURVILINEAR_GRID |
CALL MNC_FILE_CLOSE_ALL_MATCHING(mncFn, myThid) |
|
./model/src/ini_curvilinear_grid.F |
222 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_SET_UDIM(mncFn, 1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
223 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_SET_CITER(mncFn, 2, -1, -1, -1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
224 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_SET_UDIM(mncFn, 1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
225 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'XC', xC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
226 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'XG', xG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
227 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'YC', yC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
228 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'YG', yG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
229 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxC',dxC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
230 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyC',dyC, myThid) |
|
./model/src/ini_curvilinear_grid.F |
231 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxF',dxF, myThid) |
|
./model/src/ini_curvilinear_grid.F |
232 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyF',dyF, myThid) |
|
./model/src/ini_curvilinear_grid.F |
233 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxG',dxG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
234 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyG',dyG, myThid) |
|
./model/src/ini_curvilinear_grid.F |
235 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dxV',dxV, myThid) |
|
./model/src/ini_curvilinear_grid.F |
236 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'dyU',dyU, myThid) |
|
./model/src/ini_curvilinear_grid.F |
237 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'rA', rA, myThid) |
|
./model/src/ini_curvilinear_grid.F |
238 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'rAz',rAz, myThid) |
|
./model/src/ini_curvilinear_grid.F |
239 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'rAw',rAw, myThid) |
|
./model/src/ini_curvilinear_grid.F |
240 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'rAs',rAs, myThid) |
|
./model/src/ini_curvilinear_grid.F |
241 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'AngleCS',angleCosC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
242 |
INI_CURVILINEAR_GRID |
CALL MNC_CW_RS_R('D',mncFn,0,0,'AngleSN',angleSinC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
258 |
INI_CURVILINEAR_GRID |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
287 |
INI_CURVILINEAR_GRID |
& SQUEEZE_RIGHT , myThid) |
|
./model/src/ini_curvilinear_grid.F |
291 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 1, xC, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
294 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 2, yC, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
297 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 3, dxF, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
300 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 4, dyF, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
303 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 5, rA, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
306 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 6, xG, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
309 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 7, yG, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
312 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 8, dxV, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
315 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp, 9, dyU, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
318 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,10, rAz, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
321 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,11, dxC, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
324 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,12, dyC, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
327 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,13, rAw, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
330 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,14, rAs, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
333 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,15, dxG, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
336 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS( fName, fp,16, dyG, bi, bj, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
342 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS(fName,fp,17,angleCosC,bi,bj,myThid) |
|
./model/src/ini_curvilinear_grid.F |
345 |
INI_CURVILINEAR_GRID |
CALL MDS_FACEF_READ_RS(fName,fp,18,angleSinC,bi,bj,myThid) |
|
./model/src/ini_curvilinear_grid.F |
355 |
INI_CURVILINEAR_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
360 |
INI_CURVILINEAR_GRID |
& SQUEEZE_RIGHT , myThid) |
|
./model/src/ini_curvilinear_grid.F |
365 |
INI_CURVILINEAR_GRID |
_END_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
371 |
INI_CURVILINEAR_GRID |
CALL EXCH_XY_RS(xC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
372 |
INI_CURVILINEAR_GRID |
CALL EXCH_XY_RS(yC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
373 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_AGRID_3D_RS( dxF, dyF, .FALSE., 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
374 |
INI_CURVILINEAR_GRID |
CALL EXCH_XY_RS(rA,myThid ) |
|
./model/src/ini_curvilinear_grid.F |
375 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( xG, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
376 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( yG, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
377 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_BGRID_3D_RS( dxV, dyU, .FALSE., 1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
378 |
INI_CURVILINEAR_GRID |
CALL EXCH_Z_3D_RS( rAz, 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
379 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dxC,dyC,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
380 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(rAw,rAs,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
381 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_XY_RS(dyG,dxG,.FALSE.,myThid) |
|
./model/src/ini_curvilinear_grid.F |
390 |
INI_CURVILINEAR_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
391 |
INI_CURVILINEAR_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_curvilinear_grid.F |
414 |
INI_CURVILINEAR_GRID |
CALL CALC_GRID_ANGLES( anglesAreSet, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
417 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_AGRID_3D_RS(angleSinC,angleCosC,.TRUE., 1, myThid) |
|
./model/src/ini_curvilinear_grid.F |
427 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( xC , 'Current xC ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
428 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( yC , 'Current yC ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
429 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dxF , 'Current dxF ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
42 |
INI_CURVILINEAR_GRID |
INTEGER myThid |
|
./model/src/ini_curvilinear_grid.F |
430 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyF , 'Current dyF ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
431 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( rA , 'Current rA ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
432 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( xG , 'Current xG ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
433 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( yG , 'Current yG ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
434 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dxV , 'Current dxV ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
435 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyU , 'Current dyU ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
436 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( rAz , 'Current rAz ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
437 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dxC , 'Current dxC ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
438 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyC , 'Current dyC ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
439 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( rAw , 'Current rAw ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
440 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( rAs , 'Current rAs ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
441 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dxG , 'Current dxG ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
442 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS( dyG , 'Current dyG ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
443 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS(angleCosC, 'Current AngleCS ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
444 |
INI_CURVILINEAR_GRID |
CALL PLOT_FIELD_XYRS(angleSinC, 'Current AngleSN ', 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
79 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'LONC.bin', fp, 1, xC, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
80 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'LATC.bin', fp, 1, yC, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
81 |
INI_CURVILINEAR_GRID |
_EXCH_XY_RS(xC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
82 |
INI_CURVILINEAR_GRID |
_EXCH_XY_RS(yC,myThid) |
|
./model/src/ini_curvilinear_grid.F |
84 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DXF.bin', fp, 1, dxF, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
85 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'DYF.bin', fp, 1, dyF, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
86 |
INI_CURVILINEAR_GRID |
CALL EXCH_UV_AGRID_3D_RS( dxF, dyF, .FALSE., 1, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
88 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'RA.bin' , fp, 1, rA, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
89 |
INI_CURVILINEAR_GRID |
_EXCH_XY_RS(rA,myThid ) |
|
./model/src/ini_curvilinear_grid.F |
91 |
INI_CURVILINEAR_GRID |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
93 |
INI_CURVILINEAR_GRID |
_END_MASTER(myThid) |
|
./model/src/ini_curvilinear_grid.F |
96 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'LONG.bin', fp, 1, xG, 1, 0, myThid ) |
|
./model/src/ini_curvilinear_grid.F |
97 |
INI_CURVILINEAR_GRID |
CALL READ_REC_3D_RS( 'LATG.bin', fp, 1, yG, 1, 0, myThid ) |
|
./pkg/shap_filt/shap_filt_relvort3.F |
11 |
SHAP_FILT_RELVORT3 |
I myThid) |
|
./pkg/shap_filt/shap_filt_relvort3.F |
37 |
SHAP_FILT_RELVORT3 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
106 |
SHAP_FILT_TRACER_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
107 |
SHAP_FILT_TRACER_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
11 |
SHAP_FILT_TRACER_S1 |
I nShapTr, kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
127 |
SHAP_FILT_TRACER_S1 |
_EXCH_XYZ_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
129 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
132 |
SHAP_FILT_TRACER_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
133 |
SHAP_FILT_TRACER_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
159 |
SHAP_FILT_TRACER_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
160 |
SHAP_FILT_TRACER_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
173 |
SHAP_FILT_TRACER_S1 |
_EXCH_XYZ_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
175 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
43 |
SHAP_FILT_TRACER_S1 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
56 |
SHAP_FILT_TRACER_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
57 |
SHAP_FILT_TRACER_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
74 |
SHAP_FILT_TRACER_S1 |
_EXCH_XYZ_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
76 |
SHAP_FILT_TRACER_S1 |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
79 |
SHAP_FILT_TRACER_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s1.F |
80 |
SHAP_FILT_TRACER_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
105 |
SHAP_FILT_TRACER_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
106 |
SHAP_FILT_TRACER_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
118 |
SHAP_FILT_TRACER_S2 |
& bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
12 |
SHAP_FILT_TRACER_S2 |
I myTime, myIter, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
149 |
SHAP_FILT_TRACER_S2 |
& bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
215 |
SHAP_FILT_TRACER_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
216 |
SHAP_FILT_TRACER_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
231 |
SHAP_FILT_TRACER_S2 |
_EXCH_XYZ_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
233 |
SHAP_FILT_TRACER_S2 |
_EXCH_XY_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
54 |
SHAP_FILT_TRACER_S2 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
78 |
SHAP_FILT_TRACER_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
79 |
SHAP_FILT_TRACER_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
97 |
SHAP_FILT_TRACER_S2 |
_EXCH_XYZ_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s2.F |
99 |
SHAP_FILT_TRACER_S2 |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
105 |
SHAP_FILT_TRACER_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
106 |
SHAP_FILT_TRACER_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
11 |
SHAP_FILT_TRACER_S4 |
I nShapTr, kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
125 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
127 |
SHAP_FILT_TRACER_S4 |
_EXCH_XYZ_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
130 |
SHAP_FILT_TRACER_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
131 |
SHAP_FILT_TRACER_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
157 |
SHAP_FILT_TRACER_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
158 |
SHAP_FILT_TRACER_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
171 |
SHAP_FILT_TRACER_S4 |
_EXCH_XYZ_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
173 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_RL( field, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
43 |
SHAP_FILT_TRACER_S4 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
55 |
SHAP_FILT_TRACER_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
56 |
SHAP_FILT_TRACER_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
73 |
SHAP_FILT_TRACER_S4 |
_EXCH_XYZ_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
75 |
SHAP_FILT_TRACER_S4 |
_EXCH_XY_RL( tmpFld, myThid ) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
78 |
SHAP_FILT_TRACER_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracer_s4.F |
79 |
SHAP_FILT_TRACER_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_tracerold.F |
24 |
SHAP_FILT_TRACEROLD |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_tracerold.F |
8 |
SHAP_FILT_TRACEROLD |
I bi, bj, K, myCurrentTime, myThid ) |
|
./pkg/shap_filt/shap_filt_u.F |
23 |
SHAP_FILT_U |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_u.F |
6 |
SHAP_FILT_U |
SUBROUTINE SHAP_FILT_U(uVel,bi,bj,K,myCurrentTime,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
11 |
SHAP_FILT_UV_S1 |
I kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
134 |
SHAP_FILT_UV_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
135 |
SHAP_FILT_UV_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
163 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XYZ_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
165 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XY_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
168 |
SHAP_FILT_UV_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
169 |
SHAP_FILT_UV_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
263 |
SHAP_FILT_UV_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
264 |
SHAP_FILT_UV_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
283 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XYZ_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
285 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XY_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
47 |
SHAP_FILT_UV_S1 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
65 |
SHAP_FILT_UV_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
66 |
SHAP_FILT_UV_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
86 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XYZ_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
88 |
SHAP_FILT_UV_S1 |
CALL EXCH_UV_XY_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
91 |
SHAP_FILT_UV_S1 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s1.F |
92 |
SHAP_FILT_UV_S1 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
107 |
SHAP_FILT_UV_S2 |
CALL EXCH_UV_3D_RL( tmpFldU,tmpFldV, .TRUE., kSize, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
110 |
SHAP_FILT_UV_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
111 |
SHAP_FILT_UV_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
116 |
SHAP_FILT_UV_S2 |
& CALL MOM_CALC_HFACZ(bi,bj,k,hFacZ,r_hFacZ,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
11 |
SHAP_FILT_UV_S2 |
I kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
123 |
SHAP_FILT_UV_S2 |
& hDiv,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
128 |
SHAP_FILT_UV_S2 |
& hFacZ,vort3,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
133 |
SHAP_FILT_UV_S2 |
& hFacZ,vort3,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
147 |
SHAP_FILT_UV_S2 |
I k,bi,bj,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
169 |
SHAP_FILT_UV_S2 |
I myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
205 |
SHAP_FILT_UV_S2 |
& hDiv, bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
221 |
SHAP_FILT_UV_S2 |
& hDiv, bi,bj, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
245 |
SHAP_FILT_UV_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
246 |
SHAP_FILT_UV_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
268 |
SHAP_FILT_UV_S2 |
& CALL EXCH_UV_3D_RL( uFld, vFld, .TRUE., kSize, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
51 |
SHAP_FILT_UV_S2 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
85 |
SHAP_FILT_UV_S2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2.F |
86 |
SHAP_FILT_UV_S2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
11 |
SHAP_FILT_UV_S2C |
I kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
195 |
SHAP_FILT_UV_S2C |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
196 |
SHAP_FILT_UV_S2C |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
217 |
SHAP_FILT_UV_S2C |
CALL EXCH_UV_XYZ_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
219 |
SHAP_FILT_UV_S2C |
CALL EXCH_UV_XY_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
47 |
SHAP_FILT_UV_S2C |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
64 |
SHAP_FILT_UV_S2C |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
65 |
SHAP_FILT_UV_S2C |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
87 |
SHAP_FILT_UV_S2C |
CALL EXCH_UV_XYZ_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
89 |
SHAP_FILT_UV_S2C |
CALL EXCH_UV_XY_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
93 |
SHAP_FILT_UV_S2C |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s2c.F |
94 |
SHAP_FILT_UV_S2C |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
11 |
SHAP_FILT_UV_S4 |
I kSize, myTime, myThid ) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
133 |
SHAP_FILT_UV_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
134 |
SHAP_FILT_UV_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
160 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XYZ_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
162 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XY_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
165 |
SHAP_FILT_UV_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
166 |
SHAP_FILT_UV_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
265 |
SHAP_FILT_UV_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
266 |
SHAP_FILT_UV_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
285 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XYZ_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
287 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XY_RL(uFld,vFld,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
47 |
SHAP_FILT_UV_S4 |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
64 |
SHAP_FILT_UV_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
65 |
SHAP_FILT_UV_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
85 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XYZ_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
87 |
SHAP_FILT_UV_S4 |
CALL EXCH_UV_XY_RL(tmpFldU,tmpFldV,.TRUE.,myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
90 |
SHAP_FILT_UV_S4 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/shap_filt/shap_filt_uv_s4.F |
91 |
SHAP_FILT_UV_S4 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_cylinder_grid.F |
38 |
INI_CYLINDER_GRID |
INTEGER myThid |
|
./model/src/ini_cylinder_grid.F |
66 |
INI_CYLINDER_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_cylinder_grid.F |
67 |
INI_CYLINDER_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_cylinder_grid.F |
75 |
INI_CYLINDER_GRID |
I bi, bj, myThid ) |
|
./model/src/ini_cylinder_grid.F |
9 |
INI_CYLINDER_GRID |
SUBROUTINE INI_CYLINDER_GRID( myThid ) |
|
./pkg/shap_filt/shap_filt_v.F |
23 |
SHAP_FILT_V |
INTEGER myThid |
|
./pkg/shap_filt/shap_filt_v.F |
6 |
SHAP_FILT_V |
SUBROUTINE SHAP_FILT_V( vVel,bi,bj,K,myCurrentTime,myThid ) |
|
./pkg/shelfice/shelfice_check.F |
138 |
SHELFICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
145 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
153 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
167 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
169 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
191 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
194 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
202 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
205 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
215 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
218 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
21 |
SHELFICE_CHECK |
INTEGER myThid |
|
./pkg/shelfice/shelfice_check.F |
226 |
SHELFICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
231 |
SHELFICE_CHECK |
_END_MASTER(myThid) |
|
./pkg/shelfice/shelfice_check.F |
30 |
SHELFICE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/shelfice/shelfice_check.F |
35 |
SHELFICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
40 |
SHELFICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
44 |
SHELFICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_check.F |
5 |
SHELFICE_CHECK |
SUBROUTINE SHELFICE_CHECK( myThid ) |
|
./model/src/ini_depths.F |
10 |
INI_DEPTHS |
SUBROUTINE INI_DEPTHS( myThid ) |
|
./model/src/ini_depths.F |
110 |
INI_DEPTHS |
CALL MNC_CW_ADD_VNAME('bathy', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_depths.F |
111 |
INI_DEPTHS |
CALL MNC_FILE_CLOSE_ALL_MATCHING(bathyFile, myThid) |
|
./model/src/ini_depths.F |
112 |
INI_DEPTHS |
CALL MNC_CW_SET_UDIM(bathyFile, 1, myThid) |
|
./model/src/ini_depths.F |
113 |
INI_DEPTHS |
CALL MNC_CW_SET_CITER(bathyFile, 2, -1, -1, -1, myThid) |
|
./model/src/ini_depths.F |
114 |
INI_DEPTHS |
CALL MNC_CW_SET_UDIM(bathyFile, 1, myThid) |
|
./model/src/ini_depths.F |
115 |
INI_DEPTHS |
CALL MNC_CW_RS_R('D',bathyFile,0,0,'bathy',R_low, myThid) |
|
./model/src/ini_depths.F |
116 |
INI_DEPTHS |
CALL MNC_FILE_CLOSE_ALL_MATCHING(bathyFile, myThid) |
|
./model/src/ini_depths.F |
117 |
INI_DEPTHS |
CALL MNC_CW_DEL_VNAME('bathy', myThid) |
|
./model/src/ini_depths.F |
122 |
INI_DEPTHS |
CALL READ_REC_XY_RS( bathyFile, R_low, 1, 0, myThid ) |
|
./model/src/ini_depths.F |
138 |
INI_DEPTHS |
_EXCH_XY_RS(R_low, myThid ) |
|
./model/src/ini_depths.F |
143 |
INI_DEPTHS |
& -1, myThid ) |
|
./model/src/ini_depths.F |
156 |
INI_DEPTHS |
CALL READ_REC_XY_RS( bathyFile, Ro_surf, 1, 0, myThid ) |
|
./model/src/ini_depths.F |
161 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
162 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_depths.F |
176 |
INI_DEPTHS |
CALL READ_REC_XY_RS( topoFile, topoZ, 1, 0, myThid ) |
|
./model/src/ini_depths.F |
177 |
INI_DEPTHS |
_EXCH_XY_RS( topoZ, myThid ) |
|
./model/src/ini_depths.F |
188 |
INI_DEPTHS |
I myThid ) |
|
./model/src/ini_depths.F |
197 |
INI_DEPTHS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_depths.F |
204 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
205 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_depths.F |
220 |
INI_DEPTHS |
_EXCH_XY_RS(Ro_surf, myThid ) |
|
./model/src/ini_depths.F |
228 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
229 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_depths.F |
250 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
251 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_depths.F |
277 |
INI_DEPTHS |
& -1, myThid ) |
|
./model/src/ini_depths.F |
289 |
INI_DEPTHS |
CALL OBCS_CHECK_DEPTHS( myThid ) |
|
./model/src/ini_depths.F |
291 |
INI_DEPTHS |
_EXCH_XY_RS( R_low, myThid ) |
|
./model/src/ini_depths.F |
297 |
INI_DEPTHS |
CALL EXCH2_CHECK_DEPTHS( R_low, Ro_surf, myThid ) |
|
./model/src/ini_depths.F |
48 |
INI_DEPTHS |
INTEGER myThid |
|
./model/src/ini_depths.F |
68 |
INI_DEPTHS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_depths.F |
75 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
76 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_depths.F |
97 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_depths.F |
98 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_cost_accumulate.F |
26 |
SHELFICE_COST_ACCUMULATE |
integer myThid |
|
./pkg/shelfice/shelfice_cost_accumulate.F |
6 |
SHELFICE_COST_ACCUMULATE |
subroutine SHELFICE_COST_ACCUMULATE( myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
111 |
SHELFICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_shelfice, f_shelfice, myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
112 |
SHELFICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( objf_shifwflx, f_shifwflx, myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
114 |
SHELFICE_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( num_shifwflx, no_shifwflx, myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
118 |
SHELFICE_COST_FINAL |
IF ( MASTER_CPU_THREAD(myThid) ) THEN |
|
./pkg/shelfice/shelfice_cost_final.F |
15 |
SHELFICE_COST_FINAL |
SUBROUTINE SHELFICE_COST_FINAL( myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
46 |
SHELFICE_COST_FINAL |
INTEGER myThid |
|
./pkg/shelfice/shelfice_cost_final.F |
76 |
SHELFICE_COST_FINAL |
CALL SHELFICE_COST_SHIFWFLX( myThid ) |
|
./pkg/shelfice/shelfice_cost_final.F |
80 |
SHELFICE_COST_FINAL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_cost_final.F |
81 |
SHELFICE_COST_FINAL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_cost_final.F |
98 |
SHELFICE_COST_FINAL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_cost_final.F |
99 |
SHELFICE_COST_FINAL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
112 |
SHELFICE_COST_SHIFWFLX |
_BEGIN_MASTER( myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
115 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
118 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
122 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
125 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
126 |
SHELFICE_COST_SHIFWFLX |
_END_MASTER( myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
140 |
SHELFICE_COST_SHIFWFLX |
& ladinit, optimcycle, myThid, xx_shifwflx_dummy ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
16 |
SHELFICE_COST_SHIFWFLX |
I myThid |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
170 |
SHELFICE_COST_SHIFWFLX |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
173 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
177 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
182 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
185 |
SHELFICE_COST_SHIFWFLX |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
54 |
SHELFICE_COST_SHIFWFLX |
integer myThid |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
94 |
SHELFICE_COST_SHIFWFLX |
jtlo = mybylo(myThid) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
95 |
SHELFICE_COST_SHIFWFLX |
jthi = mybyhi(myThid) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
96 |
SHELFICE_COST_SHIFWFLX |
itlo = mybxlo(myThid) |
|
./pkg/shelfice/shelfice_cost_shifwflx.F |
97 |
SHELFICE_COST_SHIFWFLX |
ithi = mybxhi(myThid) |
|
./pkg/shelfice/shelfice_forcing.F |
111 |
SHELFICE_FORCING_S |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_forcing.F |
148 |
SHELFICE_FORCING_S |
INTEGER myThid |
|
./pkg/shelfice/shelfice_forcing.F |
18 |
SHELFICE_FORCING_T |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_forcing.F |
55 |
SHELFICE_FORCING_T |
INTEGER myThid |
|
./pkg/shelfice/shelfice_forcing_surf.F |
12 |
SHELFICE_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_forcing_surf.F |
44 |
SHELFICE_FORCING_SURF |
INTEGER myThid |
|
./pkg/shelfice/shelfice_init_depths.F |
11 |
SHELFICE_INIT_DEPTHS |
I myThid ) |
|
./pkg/shelfice/shelfice_init_depths.F |
37 |
SHELFICE_INIT_DEPTHS |
INTEGER myThid |
|
./pkg/shelfice/shelfice_init_depths.F |
49 |
SHELFICE_INIT_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_depths.F |
50 |
SHELFICE_INIT_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_depths.F |
64 |
SHELFICE_INIT_DEPTHS |
& 1, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_depths.F |
73 |
SHELFICE_INIT_DEPTHS |
_EXCH_XY_RS( R_shelfIce, myThid ) |
|
./pkg/shelfice/shelfice_init_depths.F |
77 |
SHELFICE_INIT_DEPTHS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_depths.F |
78 |
SHELFICE_INIT_DEPTHS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
121 |
SHELFICE_INIT_FIXED |
CALL READ_REC_XY_RL( shifwflx_errfile, wshifwflx, 1, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
124 |
SHELFICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
125 |
SHELFICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
12 |
SHELFICE_INIT_FIXED |
SUBROUTINE SHELFICE_INIT_FIXED( myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
145 |
SHELFICE_INIT_FIXED |
& 1, 0, myThid, dummy ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
151 |
SHELFICE_INIT_FIXED |
& shelficeLoadAnomaly, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
155 |
SHELFICE_INIT_FIXED |
& shelficeMassInit, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
157 |
SHELFICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
158 |
SHELFICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
169 |
SHELFICE_INIT_FIXED |
_EXCH_XY_RL( shelficeMassInit, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
171 |
SHELFICE_INIT_FIXED |
& shelficeMassInit, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
176 |
SHELFICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
177 |
SHELFICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
191 |
SHELFICE_INIT_FIXED |
I shelficeLoadAnomaly, -1, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
197 |
SHELFICE_INIT_FIXED |
& shelfIceMassDynTendency, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
207 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
214 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
222 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
230 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
237 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
244 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
251 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
258 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
265 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
272 |
SHELFICE_INIT_FIXED |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
34 |
SHELFICE_INIT_FIXED |
INTEGER myThid |
|
./pkg/shelfice/shelfice_init_fixed.F |
59 |
SHELFICE_INIT_FIXED |
CALL SHELFICE_MNC_INIT( myThid ) |
|
./pkg/shelfice/shelfice_init_fixed.F |
70 |
SHELFICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
71 |
SHELFICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
93 |
SHELFICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_fixed.F |
94 |
SHELFICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
105 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
106 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
116 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
117 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
28 |
SHELFICE_INIT_VARIA |
INTEGER myThid |
|
./pkg/shelfice/shelfice_init_varia.F |
37 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
38 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
55 |
SHELFICE_INIT_VARIA |
& shiTransCoeffT, 0, myThid ) |
|
./pkg/shelfice/shelfice_init_varia.F |
56 |
SHELFICE_INIT_VARIA |
_EXCH_XY_RL( shiTransCoeffT, myThid ) |
|
./pkg/shelfice/shelfice_init_varia.F |
57 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
58 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
69 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
70 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
7 |
SHELFICE_INIT_VARIA |
SUBROUTINE SHELFICE_INIT_VARIA( myThid ) |
|
./pkg/shelfice/shelfice_init_varia.F |
82 |
SHELFICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
83 |
SHELFICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_init_varia.F |
97 |
SHELFICE_INIT_VARIA |
CALL SHELFICE_READ_PICKUP ( myThid ) |
|
./pkg/shelfice/shelfice_mnc_init.F |
11 |
SHELFICE_MNC_INIT |
SUBROUTINE SHELFICE_MNC_INIT( myThid ) |
|
./pkg/shelfice/shelfice_mnc_init.F |
23 |
SHELFICE_MNC_INIT |
INTEGER myThid |
|
./pkg/shelfice/shelfice_mnc_init.F |
30 |
SHELFICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('fwFlux','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
31 |
SHELFICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('fwFlux','units','kg/m^2/s', myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
33 |
SHELFICE_MNC_INIT |
& 'Net fresh water flux into shelfice',myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
35 |
SHELFICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('heatFlux','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
36 |
SHELFICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('heatFlux','units','W/m^2',myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
38 |
SHELFICE_MNC_INIT |
& 'Net heat flux into shelfice',myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
43 |
SHELFICE_MNC_INIT |
& 'fwFluxtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
45 |
SHELFICE_MNC_INIT |
& 'fwFluxtave','units','kg/m^2/s',myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
47 |
SHELFICE_MNC_INIT |
& 'Time-averaged net freshwater flux into shelfice', myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
50 |
SHELFICE_MNC_INIT |
& 'heatFluxtave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
52 |
SHELFICE_MNC_INIT |
& 'heatFluxtave','units','W/m^2', myThid) |
|
./pkg/shelfice/shelfice_mnc_init.F |
54 |
SHELFICE_MNC_INIT |
& 'Time-averaged net heat flux into shelfice', myThid) |
|
./pkg/shelfice/shelfice_output.F |
104 |
SHELFICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
105 |
SHELFICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
106 |
SHELFICE_OUTPUT |
CALL TIMEAVE_RESET( shelfice_frshFluxtave, 1, bi,bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
107 |
SHELFICE_OUTPUT |
CALL TIMEAVE_RESET( shelfice_heatFluxtave, 1, bi,bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
114 |
SHELFICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
115 |
SHELFICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
140 |
SHELFICE_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
147 |
SHELFICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
148 |
SHELFICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
150 |
SHELFICE_OUTPUT |
& SHELFICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
152 |
SHELFICE_OUTPUT |
& SHELFICE_timeAve, 1, bi, bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
163 |
SHELFICE_OUTPUT |
CALL MNC_CW_SET_UDIM('shelfice_tave', -1, myThid) |
|
./pkg/shelfice/shelfice_output.F |
165 |
SHELFICE_OUTPUT |
& 'T', myTime, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
166 |
SHELFICE_OUTPUT |
CALL MNC_CW_SET_UDIM('shelfice_tave', 0, myThid) |
|
./pkg/shelfice/shelfice_output.F |
168 |
SHELFICE_OUTPUT |
& 'iter', myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
172 |
SHELFICE_OUTPUT |
& 'fwFluxtave', Shelfice_FrshFluxtave, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
174 |
SHELFICE_OUTPUT |
& 'heatFluxtave', Shelfice_HeatFluxtave, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
181 |
SHELFICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
184 |
SHELFICE_OUTPUT |
& shelfice_frshFluxtave, myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
186 |
SHELFICE_OUTPUT |
& shelfice_heatFluxtave, myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
190 |
SHELFICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
191 |
SHELFICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_output.F |
192 |
SHELFICE_OUTPUT |
CALL TIMEAVE_RESET( shelfice_frshFluxtave, 1, bi,bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
193 |
SHELFICE_OUTPUT |
CALL TIMEAVE_RESET( shelfice_heatFluxtave, 1, bi,bj, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
36 |
SHELFICE_OUTPUT |
INTEGER myThid |
|
./pkg/shelfice/shelfice_output.F |
68 |
SHELFICE_OUTPUT |
CALL MNC_CW_SET_UDIM('shelfice', -1, myThid) |
|
./pkg/shelfice/shelfice_output.F |
69 |
SHELFICE_OUTPUT |
CALL MNC_CW_RL_W_S('D','shelfice',0,0,'T', myTime, myThid) |
|
./pkg/shelfice/shelfice_output.F |
70 |
SHELFICE_OUTPUT |
CALL MNC_CW_SET_UDIM('shelfice', 0, myThid) |
|
./pkg/shelfice/shelfice_output.F |
71 |
SHELFICE_OUTPUT |
CALL MNC_CW_I_W_S('I','shelfice',0,0,'iter', myIter, myThid) |
|
./pkg/shelfice/shelfice_output.F |
73 |
SHELFICE_OUTPUT |
& myTime,myThid) |
|
./pkg/shelfice/shelfice_output.F |
75 |
SHELFICE_OUTPUT |
& shelfIceFreshWaterFlux,myThid) |
|
./pkg/shelfice/shelfice_output.F |
77 |
SHELFICE_OUTPUT |
& shelfIceHeatFlux,myThid) |
|
./pkg/shelfice/shelfice_output.F |
84 |
SHELFICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_output.F |
87 |
SHELFICE_OUTPUT |
& shelficeFreshWaterFlux,myIter,myThid) |
|
./pkg/shelfice/shelfice_output.F |
89 |
SHELFICE_OUTPUT |
& shelficeHeatFlux,myIter,myThid) |
|
./pkg/shelfice/shelfice_output.F |
9 |
SHELFICE_OUTPUT |
SUBROUTINE SHELFICE_OUTPUT( myTime, myIter, myThid ) |
|
./model/src/ini_dynvars.F |
35 |
INI_DYNVARS |
INTEGER myThid |
|
./model/src/ini_dynvars.F |
46 |
INI_DYNVARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_dynvars.F |
47 |
INI_DYNVARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_dynvars.F |
9 |
INI_DYNVARS |
SUBROUTINE INI_DYNVARS( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
100 |
SHELFICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
105 |
SHELFICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
116 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
117 |
SHELFICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
11 |
SHELFICE_READ_PICKUP |
SUBROUTINE SHELFICE_READ_PICKUP( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
136 |
SHELFICE_READ_PICKUP |
& nj, fp, 1 , nIter0, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
146 |
SHELFICE_READ_PICKUP |
I nIter0, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
150 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
151 |
SHELFICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
159 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
161 |
SHELFICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
167 |
SHELFICE_READ_PICKUP |
CALL EXCH_XY_RL( shelfIceMass, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
25 |
SHELFICE_READ_PICKUP |
INTEGER myThid |
|
./pkg/shelfice/shelfice_read_pickup.F |
57 |
SHELFICE_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
68 |
SHELFICE_READ_PICKUP |
I Nr, nIter0, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
70 |
SHELFICE_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
74 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
77 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
81 |
SHELFICE_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
90 |
SHELFICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
94 |
SHELFICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_read_pickup.F |
95 |
SHELFICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
10 |
SHELFICE_READPARMS |
SUBROUTINE SHELFICE_READPARMS( myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
144 |
SHELFICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
148 |
SHELFICE_READPARMS |
I myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
153 |
SHELFICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/shelfice/shelfice_readparms.F |
196 |
SHELFICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/shelfice/shelfice_readparms.F |
30 |
SHELFICE_READPARMS |
INTEGER myThid |
|
./pkg/shelfice/shelfice_readparms.F |
77 |
SHELFICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/shelfice/shelfice_readparms.F |
82 |
SHELFICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/shelfice/shelfice_readparms.F |
86 |
SHELFICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/shelfice/shelfice_step_icemass.F |
14 |
SHELFICE_STEP_ICEMASS |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_step_icemass.F |
40 |
SHELFICE_STEP_ICEMASS |
INTEGER myThid |
|
./pkg/shelfice/shelfice_step_icemass.F |
52 |
SHELFICE_STEP_ICEMASS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_step_icemass.F |
53 |
SHELFICE_STEP_ICEMASS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_step_icemass.F |
71 |
SHELFICE_STEP_ICEMASS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_step_icemass.F |
72 |
SHELFICE_STEP_ICEMASS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_step_icemass.F |
90 |
SHELFICE_STEP_ICEMASS |
_EXCH_XY_RL( shelficeMass, myThid ) |
|
./pkg/shelfice/shelfice_step_icemass.F |
97 |
SHELFICE_STEP_ICEMASS |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
127 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
128 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
154 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
155 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
16 |
SHELFICE_THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
205 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
206 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
221 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
222 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
237 |
SHELFICE_THERMODYNAMICS |
& myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
240 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
241 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
244 |
SHELFICE_THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
245 |
SHELFICE_THERMODYNAMICS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
246 |
SHELFICE_THERMODYNAMICS |
act2 = bj - myByLo(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
247 |
SHELFICE_THERMODYNAMICS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
248 |
SHELFICE_THERMODYNAMICS |
act3 = myThid - 1 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
572 |
SHELFICE_THERMODYNAMICS |
CALL SHELFICE_STEP_ICEMASS( myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
578 |
SHELFICE_THERMODYNAMICS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
579 |
SHELFICE_THERMODYNAMICS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
594 |
SHELFICE_THERMODYNAMICS |
& 0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
596 |
SHELFICE_THERMODYNAMICS |
& 0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
600 |
SHELFICE_THERMODYNAMICS |
& 'SHIForcT',0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
604 |
SHELFICE_THERMODYNAMICS |
& 'SHIForcS',0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
607 |
SHELFICE_THERMODYNAMICS |
& 0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
609 |
SHELFICE_THERMODYNAMICS |
& 0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
60 |
SHELFICE_THERMODYNAMICS |
INTEGER myThid |
|
./pkg/shelfice/shelfice_thermodynamics.F |
613 |
SHELFICE_THERMODYNAMICS |
& CALL DIAGNOSTICS_FILL(uStarDiag,'SHIuStar',0,1,0,1,1,myThid) |
|
./pkg/shelfice/shelfice_u_drag.F |
14 |
SHELFICE_U_DRAG |
I myThid ) |
|
./pkg/shelfice/shelfice_u_drag.F |
190 |
SHELFICE_U_DRAG |
CALL DIAGNOSTICS_FILL(uDragTerms,'SHIUDrag',k,1,2,bi,bj,myThid) |
|
./pkg/shelfice/shelfice_u_drag.F |
44 |
SHELFICE_U_DRAG |
INTEGER myThid |
|
./pkg/shelfice/shelfice_v_drag.F |
14 |
SHELFICE_V_DRAG |
I myThid ) |
|
./pkg/shelfice/shelfice_v_drag.F |
190 |
SHELFICE_V_DRAG |
CALL DIAGNOSTICS_FILL(vDragTerms,'SHIVDrag',k,1,2,bi,bj,myThid) |
|
./pkg/shelfice/shelfice_v_drag.F |
44 |
SHELFICE_V_DRAG |
INTEGER myThid |
|
./pkg/shelfice/shelfice_write_pickup.F |
100 |
SHELFICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/shelfice/shelfice_write_pickup.F |
101 |
SHELFICE_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/shelfice/shelfice_write_pickup.F |
118 |
SHELFICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/shelfice/shelfice_write_pickup.F |
11 |
SHELFICE_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/shelfice/shelfice_write_pickup.F |
33 |
SHELFICE_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/shelfice/shelfice_write_pickup.F |
82 |
SHELFICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/shelfice/shelfice_write_pickup.F |
97 |
SHELFICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_eos.F |
109 |
INI_EOS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/ini_eos.F |
112 |
INI_EOS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/ini_eos.F |
115 |
INI_EOS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/ini_eos.F |
16 |
INI_EOS |
SUBROUTINE INI_EOS( myThid ) |
|
./model/src/ini_eos.F |
173 |
INI_EOS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
178 |
INI_EOS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
182 |
INI_EOS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
186 |
INI_EOS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
190 |
INI_EOS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
312 |
INI_EOS |
CALL PRINT_ERROR( msgbuf, myThid ) |
|
./model/src/ini_eos.F |
319 |
INI_EOS |
CALL EOS_CHECK( myThid ) |
|
./model/src/ini_eos.F |
321 |
INI_EOS |
_END_MASTER( myThid ) |
|
./model/src/ini_eos.F |
330 |
EOS_CHECK |
SUBROUTINE EOS_CHECK( myThid ) |
|
./model/src/ini_eos.F |
351 |
EOS_CHECK |
INTEGER myThid |
|
./model/src/ini_eos.F |
36 |
INI_EOS |
INTEGER myThid |
|
./model/src/ini_eos.F |
465 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
47 |
INI_EOS |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_eos.F |
491 |
EOS_CHECK |
I k, bi, bj, myThid ) |
|
./model/src/ini_eos.F |
501 |
EOS_CHECK |
I myThid ) |
|
./model/src/ini_eos.F |
508 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
513 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
518 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
523 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
531 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
536 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
539 |
EOS_CHECK |
& pLoc(kcheck), rhoLoc(i,j), myThid ) |
|
./model/src/ini_eos.F |
544 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
553 |
EOS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_eos.F |
85 |
INI_EOS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/ini_eos.F |
88 |
INI_EOS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/showflops/showflops_init.F |
29 |
SHOWFLOPS_INIT |
INTEGER myThid |
|
./pkg/showflops/showflops_init.F |
45 |
SHOWFLOPS_INIT |
IF (debugMode) CALL DEBUG_ENTER('SHOWFLOPS_INIT',myThid) |
|
./pkg/showflops/showflops_init.F |
50 |
SHOWFLOPS_INIT |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
52 |
SHOWFLOPS_INIT |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
56 |
SHOWFLOPS_INIT |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
73 |
SHOWFLOPS_INIT |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
77 |
SHOWFLOPS_INIT |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
86 |
SHOWFLOPS_INIT |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_init.F |
91 |
SHOWFLOPS_INIT |
IF (debugMode) CALL DEBUG_LEAVE('SHOWFLOPS_INIT',myThid) |
|
./pkg/showflops/showflops_init.F |
9 |
SHOWFLOPS_INIT |
SUBROUTINE SHOWFLOPS_INIT( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
104 |
SHOWFLOPS_INLOOP |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
109 |
SHOWFLOPS_INLOOP |
IF (debugMode) CALL DEBUG_LEAVE('SHOWFLOPS_INLOOP',myThid) |
|
./pkg/showflops/showflops_inloop.F |
35 |
SHOWFLOPS_INLOOP |
INTEGER myThid |
|
./pkg/showflops/showflops_inloop.F |
50 |
SHOWFLOPS_INLOOP |
IF (debugMode) CALL DEBUG_ENTER('SHOWFLOPS_INLOOP',myThid) |
|
./pkg/showflops/showflops_inloop.F |
55 |
SHOWFLOPS_INLOOP |
RC_CONT=RUNCLOCK_CONTINUE( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
61 |
SHOWFLOPS_INLOOP |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
70 |
SHOWFLOPS_INLOOP |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
74 |
SHOWFLOPS_INLOOP |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
91 |
SHOWFLOPS_INLOOP |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
95 |
SHOWFLOPS_INLOOP |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_inloop.F |
9 |
SHOWFLOPS_INLOOP |
SUBROUTINE SHOWFLOPS_INLOOP( iloop, myThid ) |
|
./pkg/showflops/showflops_insolve.F |
101 |
SHOWFLOPS_INSOLVE |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
106 |
SHOWFLOPS_INSOLVE |
IF (debugMode) CALL DEBUG_LEAVE('SHOWFLOPS_INSOLVE',myThid) |
|
./pkg/showflops/showflops_insolve.F |
35 |
SHOWFLOPS_INSOLVE |
INTEGER myThid |
|
./pkg/showflops/showflops_insolve.F |
50 |
SHOWFLOPS_INSOLVE |
IF (debugMode) CALL DEBUG_ENTER('SHOWFLOPS_INSOLVE',myThid) |
|
./pkg/showflops/showflops_insolve.F |
55 |
SHOWFLOPS_INSOLVE |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
67 |
SHOWFLOPS_INSOLVE |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
71 |
SHOWFLOPS_INSOLVE |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
88 |
SHOWFLOPS_INSOLVE |
_END_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
92 |
SHOWFLOPS_INSOLVE |
_BEGIN_MASTER( myThid ) |
|
./pkg/showflops/showflops_insolve.F |
9 |
SHOWFLOPS_INSOLVE |
SUBROUTINE SHOWFLOPS_INSOLVE( myThid ) |
|
./pkg/smooth/smooth2d.F |
30 |
SMOOTH2D |
integer myThid |
|
./pkg/smooth/smooth2d.F |
44 |
SMOOTH2D |
CALL EXCH_XY_RL ( smooth2D_Kux, myThid ) |
|
./pkg/smooth/smooth2d.F |
45 |
SMOOTH2D |
CALL EXCH_XY_RL ( smooth2D_Kvy, myThid ) |
|
./pkg/smooth/smooth3d.F |
30 |
SMOOTH3D |
integer myThid |
|
./pkg/smooth/smooth3d.F |
42 |
SMOOTH3D |
& Nr,smooth3D_Kwx,1, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
44 |
SMOOTH3D |
& Nr,smooth3D_Kwy,2, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
46 |
SMOOTH3D |
& Nr,smooth3D_Kwz,3, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
48 |
SMOOTH3D |
& Nr,smooth3D_Kux,4, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
50 |
SMOOTH3D |
& Nr,smooth3D_Kvy,5, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
52 |
SMOOTH3D |
& Nr,smooth3D_Kuz,6, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
54 |
SMOOTH3D |
& Nr,smooth3D_Kvz,7, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
56 |
SMOOTH3D |
& Nr,smooth3D_Kuy,8, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
58 |
SMOOTH3D |
& Nr,smooth3D_Kvx,9, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
60 |
SMOOTH3D |
& Nr,smooth3D_kappaR,10, 1, myThid ) |
|
./pkg/smooth/smooth3d.F |
61 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwx, myThid ) |
|
./pkg/smooth/smooth3d.F |
62 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwy, myThid ) |
|
./pkg/smooth/smooth3d.F |
63 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwz, myThid ) |
|
./pkg/smooth/smooth3d.F |
64 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kux, myThid ) |
|
./pkg/smooth/smooth3d.F |
65 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvy, myThid ) |
|
./pkg/smooth/smooth3d.F |
66 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuz, myThid ) |
|
./pkg/smooth/smooth3d.F |
67 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvz, myThid ) |
|
./pkg/smooth/smooth3d.F |
68 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuy, myThid ) |
|
./pkg/smooth/smooth3d.F |
69 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvx, myThid ) |
|
./pkg/smooth/smooth3d.F |
70 |
SMOOTH3D |
CALL EXCH_XYZ_RL ( smooth3D_kappaR, myThid ) |
|
./pkg/smooth/smooth_basic2d.F |
31 |
SMOOTH_BASIC2D |
integer myThid |
|
./pkg/smooth/smooth_basic2d.F |
41 |
SMOOTH_BASIC2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_basic2d.F |
42 |
SMOOTH_BASIC2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_basic2d.F |
52 |
SMOOTH_BASIC2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_basic2d.F |
53 |
SMOOTH_BASIC2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_basic2d.F |
65 |
SMOOTH_BASIC2D |
CALL EXCH_XY_RL ( smooth2D_Kux , myThid ) |
|
./pkg/smooth/smooth_basic2d.F |
66 |
SMOOTH_BASIC2D |
CALL EXCH_XY_RL ( smooth2D_Kvy , myThid ) |
|
./pkg/smooth/smooth_basic2d.F |
70 |
SMOOTH_BASIC2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_correl2d.F |
31 |
SMOOTH_CORREL2D |
integer myThid |
|
./pkg/smooth/smooth_correl2d.F |
47 |
SMOOTH_CORREL2D |
CALL EXCH_XY_RL ( smooth2D_Kux, myThid ) |
|
./pkg/smooth/smooth_correl2d.F |
48 |
SMOOTH_CORREL2D |
CALL EXCH_XY_RL ( smooth2D_Kvy, myThid ) |
|
./pkg/smooth/smooth_correl2d.F |
55 |
SMOOTH_CORREL2D |
CALL EXCH_XY_RL ( smooth2Dnorm, myThid ) |
|
./pkg/smooth/smooth_correl2d.F |
68 |
SMOOTH_CORREL2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_correl2d.F |
85 |
SMOOTH_CORREL2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_correl2dw.F |
131 |
SMOOTH_CORREL2DW |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_correl2dw.F |
40 |
SMOOTH_CORREL2DW |
integer myThid |
|
./model/src/ini_ffields.F |
31 |
INI_FFIELDS |
INTEGER myThid |
|
./model/src/ini_ffields.F |
42 |
INI_FFIELDS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_ffields.F |
43 |
INI_FFIELDS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_ffields.F |
9 |
INI_FFIELDS |
SUBROUTINE INI_FFIELDS( myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
113 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
31 |
SMOOTH_CORREL3D |
integer myThid |
|
./pkg/smooth/smooth_correl3d.F |
44 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kwx,1, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
46 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kwy,2, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
48 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kwz,3, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
50 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kux,4, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
52 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kvy,5, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
54 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kuz,6, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
56 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kvz,7, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
58 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kuy,8, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
60 |
SMOOTH_CORREL3D |
& Nr,smooth3D_Kvx,9, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
62 |
SMOOTH_CORREL3D |
& Nr,smooth3D_kappaR,10, 1, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
63 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwx, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
64 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwy, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
65 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwz, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
66 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kux, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
67 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvy, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
68 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuz, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
69 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvz, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
70 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuy, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
71 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvx, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
72 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3D_kappaR, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
79 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( smooth3Dnorm, myThid ) |
|
./pkg/smooth/smooth_correl3d.F |
94 |
SMOOTH_CORREL3D |
CALL EXCH_XYZ_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
190 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
191 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
192 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( gtm1_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
31 |
SMOOTH_DIFF2D |
integer myThid,myIter(nSx,nSy),key_in |
|
./pkg/smooth/smooth_diff2d.F |
73 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
74 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
75 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( gtm1_in , myThid ) |
|
./pkg/smooth/smooth_diff2d.F |
76 |
SMOOTH_DIFF2D |
CALL EXCH_XY_RL ( smooth2Dmask , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
129 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
132 |
SMOOTH_DIFF3D |
CALL SMOOTH_RHS( fld_in, gT_in, myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
143 |
SMOOTH_DIFF3D |
I 0, myIter(bi,bj), myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
169 |
SMOOTH_DIFF3D |
I myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
175 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
176 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
177 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( gtm1_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
29 |
SMOOTH_DIFF3D |
integer myThid, myIter(nSx,nSy) |
|
./pkg/smooth/smooth_diff3d.F |
68 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
69 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_diff3d.F |
70 |
SMOOTH_DIFF3D |
CALL EXCH_XYZ_RL ( gtm1_in , myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
110 |
SMOOTH_FILTERVAR2D |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
129 |
SMOOTH_FILTERVAR2D |
CALL EXCH_XY_RL ( smoothTmpFld,myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
190 |
SMOOTH_FILTERVAR2D |
CALL EXCH_XY_RL ( smoothTmpFld, myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
234 |
SMOOTH_FILTERVAR2D |
CALL EXCH_XY_RL ( smooth2Dnorm, myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
23 |
SMOOTH_FILTERVAR2D |
integer smoothOpNb, myThid |
|
./pkg/smooth/smooth_filtervar2d.F |
57 |
SMOOTH_FILTERVAR2D |
CALL EXCH_XY_RL ( smooth2D_Kux, myThid ) |
|
./pkg/smooth/smooth_filtervar2d.F |
58 |
SMOOTH_FILTERVAR2D |
CALL EXCH_XY_RL ( smooth2D_Kvy, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
142 |
SMOOTH_FILTERVAR3D |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
163 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smoothTmpFld , myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
166 |
SMOOTH_FILTERVAR3D |
call SMOOTH_DIFF3D(smoothTmpFld,nbt_in,myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
231 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smoothTmpFld, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
234 |
SMOOTH_FILTERVAR3D |
call SMOOTH_DIFF3D(smoothTmpFld,nbt_in,myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
23 |
SMOOTH_FILTERVAR3D |
integer smoothOpNb, myThid |
|
./pkg/smooth/smooth_filtervar3d.F |
278 |
SMOOTH_FILTERVAR3D |
& Nr, smooth3Dnorm, 1, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
279 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3Dnorm, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
37 |
SMOOTH_FILTERVAR3D |
jtlo = mybylo(myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
38 |
SMOOTH_FILTERVAR3D |
jthi = mybyhi(myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
39 |
SMOOTH_FILTERVAR3D |
itlo = mybxlo(myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
40 |
SMOOTH_FILTERVAR3D |
ithi = mybxhi(myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
54 |
SMOOTH_FILTERVAR3D |
& 1, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
56 |
SMOOTH_FILTERVAR3D |
& 2, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
58 |
SMOOTH_FILTERVAR3D |
& 3, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
60 |
SMOOTH_FILTERVAR3D |
& 4, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
62 |
SMOOTH_FILTERVAR3D |
& 5, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
64 |
SMOOTH_FILTERVAR3D |
& 6, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
66 |
SMOOTH_FILTERVAR3D |
& 7, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
68 |
SMOOTH_FILTERVAR3D |
& 8, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
6 |
SMOOTH_FILTERVAR3D |
subroutine SMOOTH_FILTERVAR3D (smoothOpNb,myThid) |
|
./pkg/smooth/smooth_filtervar3d.F |
70 |
SMOOTH_FILTERVAR3D |
& 9, 1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
72 |
SMOOTH_FILTERVAR3D |
& 10,1, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
73 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwx, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
74 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwy, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
75 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kwz, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
76 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kux, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
77 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvy, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
78 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuz, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
79 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvz, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
80 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kuy, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
81 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_Kvx, myThid ) |
|
./pkg/smooth/smooth_filtervar3d.F |
82 |
SMOOTH_FILTERVAR3D |
CALL EXCH_XYZ_RL ( smooth3D_kappaR, myThid ) |
|
./pkg/smooth/smooth_hetero2d.F |
32 |
SMOOTH_HETERO2D |
integer myThid |
|
./pkg/smooth/smooth_hetero2d.F |
44 |
SMOOTH_HETERO2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_hetero2d.F |
45 |
SMOOTH_HETERO2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_hetero2d.F |
55 |
SMOOTH_HETERO2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_hetero2d.F |
56 |
SMOOTH_HETERO2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_hetero2d.F |
68 |
SMOOTH_HETERO2D |
CALL EXCH_XY_RL ( smooth2D_Kux , myThid ) |
|
./pkg/smooth/smooth_hetero2d.F |
69 |
SMOOTH_HETERO2D |
CALL EXCH_XY_RL ( smooth2D_Kvy , myThid ) |
|
./pkg/smooth/smooth_hetero2d.F |
73 |
SMOOTH_HETERO2D |
CALL EXCH_XY_RL ( fld_in , myThid ) |
|
./pkg/smooth/smooth_impldiff.F |
32 |
SMOOTH_IMPLDIFF |
INTEGER myThid |
|
./pkg/smooth/smooth_impldiff.F |
9 |
SMOOTH_IMPLDIFF |
I myThid ) |
|
./pkg/smooth/smooth_init2d.F |
26 |
SMOOTH_INIT2D |
integer myThid |
|
./pkg/smooth/smooth_init2d.F |
46 |
SMOOTH_INIT2D |
CALL EXCH_XY_RL ( smooth2D_Lx, myThid ) |
|
./pkg/smooth/smooth_init2d.F |
47 |
SMOOTH_INIT2D |
CALL EXCH_XY_RL ( smooth2D_Ly, myThid ) |
|
./pkg/smooth/smooth_init2d.F |
49 |
SMOOTH_INIT2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_init2d.F |
50 |
SMOOTH_INIT2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_init2d.F |
61 |
SMOOTH_INIT2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_init2d.F |
62 |
SMOOTH_INIT2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_init2d.F |
74 |
SMOOTH_INIT2D |
CALL EXCH_XY_RL ( smooth2D_Kux , myThid ) |
|
./pkg/smooth/smooth_init2d.F |
75 |
SMOOTH_INIT2D |
CALL EXCH_XY_RL ( smooth2D_Kvy , myThid ) |
|
./pkg/smooth/smooth_init3d.F |
100 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_kappaR, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
153 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_kappaR, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
154 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kwx, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
155 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kwy, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
156 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kwz, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
157 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kux, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
158 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kvy, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
159 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kuz, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
160 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kvz, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
161 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kuy, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
162 |
SMOOTH_INIT3D |
CALL EXCH_XYZ_RL( smooth3D_Kvx, myThid ) |
|
./pkg/smooth/smooth_init3d.F |
32 |
SMOOTH_INIT3D |
integer myThid |
|
./pkg/smooth/smooth_init_fixed.F |
20 |
SMOOTH_INIT_FIXED |
integer myThid |
|
./model/src/ini_fields.F |
12 |
INI_FIELDS |
SUBROUTINE INI_FIELDS( myThid ) |
|
./model/src/ini_fields.F |
26 |
INI_FIELDS |
INTEGER myThid |
|
./model/src/ini_fields.F |
32 |
INI_FIELDS |
CALL INI_VEL( myThid ) |
|
./model/src/ini_fields.F |
33 |
INI_FIELDS |
CALL INI_THETA( myThid ) |
|
./model/src/ini_fields.F |
34 |
INI_FIELDS |
CALL INI_SALT( myThid ) |
|
./model/src/ini_fields.F |
35 |
INI_FIELDS |
CALL INI_PSURF( myThid ) |
|
./model/src/ini_fields.F |
36 |
INI_FIELDS |
CALL INI_PRESSURE( myThid ) |
|
./model/src/ini_fields.F |
38 |
INI_FIELDS |
CALL INI_EP( myThid ) |
|
./model/src/ini_fields.F |
41 |
INI_FIELDS |
CALL READ_PICKUP( nIter0, myThid ) |
|
./model/src/ini_fields.F |
46 |
INI_FIELDS |
CALL INI_NH_FIELDS( myThid ) |
|
./model/src/ini_fields.F |
53 |
INI_FIELDS |
CALL UPDATE_ETAWS( startTime, nIter0, myThid ) |
|
./pkg/smooth/smooth_init_varia.F |
15 |
SMOOTH_INIT_VARIA |
integer myThid |
|
./pkg/smooth/smooth_readparms.F |
162 |
SMOOTH_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/smooth/smooth_readparms.F |
26 |
SMOOTH_READPARMS |
integer myThid |
|
./pkg/smooth/smooth_readparms.F |
59 |
SMOOTH_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/smooth/smooth_readparms.F |
63 |
SMOOTH_READPARMS |
_END_MASTER(myThid) |
|
./pkg/smooth/smooth_readparms.F |
67 |
SMOOTH_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/smooth/smooth_readparms.F |
6 |
SMOOTH_READPARMS |
subroutine SMOOTH_READPARMS( myThid ) |
|
./pkg/smooth/smooth_readparms.F |
97 |
SMOOTH_READPARMS |
I myThid ) |
|
./pkg/smooth/smooth_rhs.F |
329 |
SMOOTH_RHS |
CALL EXCH_UV_XYZ_RL(fZon,fMer,.TRUE.,myThid) |
|
./pkg/smooth/smooth_rhs.F |
330 |
SMOOTH_RHS |
CALL EXCH_XYZ_RL ( fVerT, myThid ) |
|
./pkg/smooth/smooth_rhs.F |
332 |
SMOOTH_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_rhs.F |
333 |
SMOOTH_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_rhs.F |
366 |
SMOOTH_RHS |
CALL EXCH_XYZ_RL ( gt_in , myThid ) |
|
./pkg/smooth/smooth_rhs.F |
47 |
SMOOTH_RHS |
INTEGER myThid |
|
./pkg/smooth/smooth_rhs.F |
69 |
SMOOTH_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/smooth/smooth_rhs.F |
70 |
SMOOTH_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/smooth/smooth_rhs.F |
7 |
SMOOTH_RHS |
SUBROUTINE SMOOTH_RHS(fld_in,gt_in,myThid) |
|
./pkg/sphere/exch_all_2d_rl.F |
37 |
EXCH_ALLGATHER_2D_RL |
integer myThid |
|
./pkg/sphere/exch_all_2d_rl.F |
61 |
EXCH_ALLGATHER_2D_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/sphere/exch_all_2d_rl.F |
99 |
EXCH_ALLGATHER_2D_RL |
_END_MASTER( myThid ) |
|
./pkg/sphere/exch_all_2d_rl.F |
9 |
EXCH_ALLGATHER_2D_RL |
I , myThid |
|
./model/src/ini_forcing.F |
100 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./model/src/ini_forcing.F |
103 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./model/src/ini_forcing.F |
107 |
INI_FORCING |
& lambdaThetaClimRelax, 0, myThid ) |
|
./model/src/ini_forcing.F |
10 |
INI_FORCING |
SUBROUTINE INI_FORCING( myThid ) |
|
./model/src/ini_forcing.F |
111 |
INI_FORCING |
& lambdaSaltClimRelax, 0, myThid ) |
|
./model/src/ini_forcing.F |
115 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQswFile, ' ', Qsw, 0, myThid ) |
|
./model/src/ini_forcing.F |
118 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_forcing.F |
119 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_forcing.F |
132 |
INI_FORCING |
CALL READ_FLD_XY_RS( pLoadFile, ' ', pLoad, 0, myThid ) |
|
./model/src/ini_forcing.F |
137 |
INI_FORCING |
CALL READ_FLD_XYZ_RL( addMassFile, ' ', addMass, 0, myThid ) |
|
./model/src/ini_forcing.F |
138 |
INI_FORCING |
CALL EXCH_XYZ_RL( addMass, myThid ) |
|
./model/src/ini_forcing.F |
144 |
INI_FORCING |
& geothermalFlux, 0, myThid ) |
|
./model/src/ini_forcing.F |
145 |
INI_FORCING |
CALL EXCH_XY_RS( geothermalFlux, myThid ) |
|
./model/src/ini_forcing.F |
148 |
INI_FORCING |
& 1,geothermalFlux,'geothermalFlux',myThid) |
|
./model/src/ini_forcing.F |
153 |
INI_FORCING |
CALL EXCH_UV_XY_RS( fu,fv, .TRUE., myThid ) |
|
./model/src/ini_forcing.F |
154 |
INI_FORCING |
CALL EXCH_XY_RS( Qnet , myThid ) |
|
./model/src/ini_forcing.F |
155 |
INI_FORCING |
CALL EXCH_XY_RS( EmPmR, myThid ) |
|
./model/src/ini_forcing.F |
156 |
INI_FORCING |
CALL EXCH_XY_RS( saltFlux, myThid ) |
|
./model/src/ini_forcing.F |
157 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
|
./model/src/ini_forcing.F |
158 |
INI_FORCING |
CALL EXCH_XY_RS( SSS , myThid ) |
|
./model/src/ini_forcing.F |
159 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaThetaClimRelax, myThid ) |
|
./model/src/ini_forcing.F |
160 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaSaltClimRelax , myThid ) |
|
./model/src/ini_forcing.F |
162 |
INI_FORCING |
CALL EXCH_XY_RS(Qsw , myThid ) |
|
./model/src/ini_forcing.F |
165 |
INI_FORCING |
CALL EXCH_XY_RS(pLoad , myThid ) |
|
./model/src/ini_forcing.F |
179 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_forcing.F |
180 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_forcing.F |
32 |
INI_FORCING |
INTEGER myThid |
|
./model/src/ini_forcing.F |
45 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_forcing.F |
46 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_forcing.F |
71 |
INI_FORCING |
CALL READ_FLD_XY_RS( zonalWindFile, ' ', fu, 0, myThid ) |
|
./model/src/ini_forcing.F |
74 |
INI_FORCING |
CALL READ_FLD_XY_RS( meridWindFile, ' ', fv, 0, myThid ) |
|
./model/src/ini_forcing.F |
77 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./model/src/ini_forcing.F |
79 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQnetFile, ' ', Qnet, 0, myThid ) |
|
./model/src/ini_forcing.F |
82 |
INI_FORCING |
CALL READ_FLD_XY_RS( EmPmRfile, ' ', EmPmR, 0, myThid ) |
|
./model/src/ini_forcing.F |
85 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_forcing.F |
86 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_forcing.F |
97 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltFluxFile, ' ', saltFlux, 0, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
127 |
ADSTREAMICE_CG_SOLVE |
& myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
134 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Bu, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
135 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Bv, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
149 |
ADSTREAMICE_CG_SOLVE |
& myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
153 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Uin, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
154 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Vin, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
155 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( U_state, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
156 |
ADSTREAMICE_CG_SOLVE |
_EXCH_XY_RL( V_state, myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
158 |
ADSTREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/adstreamice_cg_solve.F |
159 |
ADSTREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/adstreamice_cg_solve.F |
203 |
ADSTREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/adstreamice_cg_solve.F |
204 |
ADSTREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/adstreamice_cg_solve.F |
28 |
ADSTREAMICE_CG_SOLVE |
I myThid ) |
|
./pkg/streamice/adstreamice_cg_solve.F |
66 |
ADSTREAMICE_CG_SOLVE |
INTEGER myThid |
|
./pkg/streamice/adstreamice_cg_solve.F |
95 |
ADSTREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/adstreamice_cg_solve.F |
96 |
ADSTREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
29 |
ADSTRMICE_H_INV |
INTEGER myThid |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
84 |
ADSTRMICE_H_INV |
I myThid) |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
91 |
ADSTRMICE_H_INV |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/adstreamice_invert_surf_forthick.F |
92 |
ADSTRMICE_H_INV |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_global_domain.F |
10 |
INI_GLOBAL_DOMAIN |
SUBROUTINE INI_GLOBAL_DOMAIN( myThid ) |
|
./model/src/ini_global_domain.F |
110 |
INI_GLOBAL_DOMAIN |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_global_domain.F |
117 |
INI_GLOBAL_DOMAIN |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_global_domain.F |
119 |
INI_GLOBAL_DOMAIN |
_END_MASTER( myThid ) |
|
./model/src/ini_global_domain.F |
126 |
INI_GLOBAL_DOMAIN |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_global_domain.F |
127 |
INI_GLOBAL_DOMAIN |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_global_domain.F |
154 |
INI_GLOBAL_DOMAIN |
CALL GLOBAL_SUM_INT( nCorners, myThid ) |
|
./model/src/ini_global_domain.F |
155 |
INI_GLOBAL_DOMAIN |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_global_domain.F |
160 |
INI_GLOBAL_DOMAIN |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_global_domain.F |
161 |
INI_GLOBAL_DOMAIN |
_END_MASTER( myThid ) |
|
./model/src/ini_global_domain.F |
39 |
INI_GLOBAL_DOMAIN |
INTEGER myThid |
|
./model/src/ini_global_domain.F |
77 |
INI_GLOBAL_DOMAIN |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_global_domain.F |
78 |
INI_GLOBAL_DOMAIN |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_global_domain.F |
94 |
INI_GLOBAL_DOMAIN |
CALL GLOBAL_SUM_TILE_RL( tileArea, threadArea, myThid ) |
|
./model/src/ini_global_domain.F |
96 |
INI_GLOBAL_DOMAIN |
_BEGIN_MASTER( myThid ) |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
30 |
STREAMICE_ADV_FLUX_FL_X |
INTEGER myThid |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
54 |
STREAMICE_ADV_FLUX_FL_X |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
55 |
STREAMICE_ADV_FLUX_FL_X |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
64 |
STREAMICE_ADV_FLUX_FL_X |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
65 |
STREAMICE_ADV_FLUX_FL_X |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_x.F |
8 |
STREAMICE_ADV_FLUX_FL_X |
SUBROUTINE STREAMICE_ADV_FLUX_FL_X ( myThid , |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
30 |
STREAMICE_ADV_FLUX_FL_Y |
INTEGER myThid |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
54 |
STREAMICE_ADV_FLUX_FL_Y |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
55 |
STREAMICE_ADV_FLUX_FL_Y |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
64 |
STREAMICE_ADV_FLUX_FL_Y |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
65 |
STREAMICE_ADV_FLUX_FL_Y |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_flux_fl_y.F |
8 |
STREAMICE_ADV_FLUX_FL_Y |
SUBROUTINE STREAMICE_ADV_FLUX_FL_Y ( myThid , |
|
./pkg/streamice/streamice_adv_front.F |
115 |
STREAMICE_ADV_FRONT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
116 |
STREAMICE_ADV_FRONT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
125 |
STREAMICE_ADV_FRONT |
act1 = bi - myBxLo(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
126 |
STREAMICE_ADV_FRONT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/streamice/streamice_adv_front.F |
127 |
STREAMICE_ADV_FRONT |
act2 = bj - myByLo(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
128 |
STREAMICE_ADV_FRONT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/streamice/streamice_adv_front.F |
129 |
STREAMICE_ADV_FRONT |
act3 = myThid - 1 |
|
./pkg/streamice/streamice_adv_front.F |
13 |
STREAMICE_ADV_FRONT |
& myThid, |
|
./pkg/streamice/streamice_adv_front.F |
37 |
STREAMICE_ADV_FRONT |
INTEGER myThid |
|
./pkg/streamice/streamice_adv_front.F |
60 |
STREAMICE_ADV_FRONT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
61 |
STREAMICE_ADV_FRONT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
98 |
STREAMICE_ADV_FRONT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_adv_front.F |
99 |
STREAMICE_ADV_FRONT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
101 |
STREAMICE_ADVECT_2DTRACER |
_EXCH_XY_RL(BCVALX,myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
102 |
STREAMICE_ADVECT_2DTRACER |
_EXCH_XY_RL(BCVALY,myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
108 |
STREAMICE_ADVECT_2DTRACER |
CALL STREAMICE_ADV_FLUX_FL_X ( myThid , |
|
./pkg/streamice/streamice_advect_2dtracer.F |
116 |
STREAMICE_ADVECT_2DTRACER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
117 |
STREAMICE_ADVECT_2DTRACER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
13 |
STREAMICE_ADVECT_2DTRACER |
& myThid, |
|
./pkg/streamice/streamice_advect_2dtracer.F |
149 |
STREAMICE_ADVECT_2DTRACER |
_EXCH_XY_RL(utrans,myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
157 |
STREAMICE_ADVECT_2DTRACER |
CALL STREAMICE_ADV_FLUX_FL_Y ( myThid , |
|
./pkg/streamice/streamice_advect_2dtracer.F |
165 |
STREAMICE_ADVECT_2DTRACER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
166 |
STREAMICE_ADVECT_2DTRACER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
204 |
STREAMICE_ADVECT_2DTRACER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
205 |
STREAMICE_ADVECT_2DTRACER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
225 |
STREAMICE_ADVECT_2DTRACER |
_EXCH_XY_RL(trac2d, myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
40 |
STREAMICE_ADVECT_2DTRACER |
INTEGER myThid, myIter, Gi, Gj |
|
./pkg/streamice/streamice_advect_2dtracer.F |
69 |
STREAMICE_ADVECT_2DTRACER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_2dtracer.F |
70 |
STREAMICE_ADVECT_2DTRACER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
12 |
STREAMICE_ADVECT_THICKNESS |
SUBROUTINE STREAMICE_ADVECT_THICKNESS ( myThid,myIter,time_step ) |
|
./pkg/streamice/streamice_advect_thickness.F |
166 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(utrans,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
167 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(vtrans,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
168 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RS(BCMASKx,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
169 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RS(BCMASKy,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
170 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(BCVALX,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
171 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(BCVALY,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
172 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(h_after_uflux_SI,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
173 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(h_after_vflux_SI,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
179 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
180 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
197 |
STREAMICE_ADVECT_THICKNESS |
CALL GLOBAL_MAX_R8 (max_icfl, myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
216 |
STREAMICE_ADVECT_THICKNESS |
CALL STREAMICE_ADV_FLUX_FL_X ( myThid , |
|
./pkg/streamice/streamice_advect_thickness.F |
224 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
225 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
259 |
STREAMICE_ADVECT_THICKNESS |
CALL STREAMICE_ADV_FLUX_FL_Y ( myThid , |
|
./pkg/streamice/streamice_advect_thickness.F |
267 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
268 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
294 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
295 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
311 |
STREAMICE_ADVECT_THICKNESS |
& myThid, time_step_loc, |
|
./pkg/streamice/streamice_advect_thickness.F |
317 |
STREAMICE_ADVECT_THICKNESS |
& myThid, |
|
./pkg/streamice/streamice_advect_thickness.F |
335 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
336 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
36 |
STREAMICE_ADVECT_THICKNESS |
INTEGER myThid, myIter |
|
./pkg/streamice/streamice_advect_thickness.F |
378 |
STREAMICE_ADVECT_THICKNESS |
_EXCH_XY_RL(H_streamice,myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
383 |
STREAMICE_ADVECT_THICKNESS |
CALL TIMER_STOP ('STREAMICE_ADVECT_THICKNESS',myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
58 |
STREAMICE_ADVECT_THICKNESS |
CALL TIMER_START ('STREAMICE_ADVECT_THICKNESS',myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
75 |
STREAMICE_ADVECT_THICKNESS |
I myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
80 |
STREAMICE_ADVECT_THICKNESS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_advect_thickness.F |
81 |
STREAMICE_ADVECT_THICKNESS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
29 |
STREAMICE_APPLY_FLUX_CTRL |
INTEGER myThid |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
53 |
STREAMICE_APPLY_FLUX_CTRL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
54 |
STREAMICE_APPLY_FLUX_CTRL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_apply_flux_ctrl.F |
9 |
STREAMICE_APPLY_FLUX_CTRL |
SUBROUTINE STREAMICE_APPLY_FLUX_CTRL ( myThid ) |
|
./eesupp/src/barrier.F |
103 |
BARRIER |
INTEGER myThid |
|
./eesupp/src/barrier.F |
120 |
BARRIER |
bCount(myThid) = bCount(myThid) + 1 |
|
./eesupp/src/barrier.F |
121 |
BARRIER |
IF ( masterSet(myThid) .NE. 0 ) THEN |
|
./eesupp/src/barrier.F |
123 |
BARRIER |
& myThid, masterSet(myThid) |
|
./eesupp/src/barrier.F |
142 |
BARRIER |
IF ( myThid .LT. 1 .OR. myThid .GT. nThreads ) THEN |
|
./eesupp/src/barrier.F |
145 |
BARRIER |
& myThid, ' nThreads = ', nThreads |
|
./eesupp/src/barrier.F |
150 |
BARRIER |
IF ( key1(1,myThid) .EQ. VALID ) THEN |
|
./eesupp/src/barrier.F |
153 |
BARRIER |
& myThid, ' key1 already validated' |
|
./eesupp/src/barrier.F |
156 |
BARRIER |
key1(1,myThid) = VALID |
|
./eesupp/src/barrier.F |
158 |
BARRIER |
IF ( myThid .eq. 1 ) THEN |
|
./eesupp/src/barrier.F |
173 |
BARRIER |
key1(1,myThid) = INVALID |
|
./eesupp/src/barrier.F |
185 |
BARRIER |
IF ( myThid .EQ. 1 ) THEN |
|
./eesupp/src/barrier.F |
196 |
BARRIER |
IF ( key2(1,myThid) .EQ. VALID ) THEN |
|
./eesupp/src/barrier.F |
199 |
BARRIER |
& myThid, ' key2 already validated' |
|
./eesupp/src/barrier.F |
202 |
BARRIER |
key2(1,myThid) = VALID |
|
./eesupp/src/barrier.F |
204 |
BARRIER |
IF ( myThid .eq. 1 ) THEN |
|
./eesupp/src/barrier.F |
220 |
BARRIER |
key2(1,myThid) = INVALID |
|
./eesupp/src/barrier.F |
226 |
BARRIER |
IF ( myThid .EQ. 1 ) THEN |
|
./eesupp/src/barrier.F |
232 |
BARRIER |
IF ( key3(1,myThid) .EQ. VALID ) THEN |
|
./eesupp/src/barrier.F |
235 |
BARRIER |
& myThid, ' key3 already validated' |
|
./eesupp/src/barrier.F |
238 |
BARRIER |
key3(1,myThid) = VALID |
|
./eesupp/src/barrier.F |
240 |
BARRIER |
IF ( myThid .eq. 1 ) THEN |
|
./eesupp/src/barrier.F |
256 |
BARRIER |
key3(1,myThid) = INVALID |
|
./eesupp/src/barrier.F |
262 |
BARRIER |
IF ( myThid .EQ. 1 ) THEN |
|
./eesupp/src/barrier.F |
274 |
BARRIER_MS |
SUBROUTINE BARRIER_MS( myThid ) |
|
./eesupp/src/barrier.F |
283 |
BARRIER_MS |
INTEGER myThid |
|
./eesupp/src/barrier.F |
285 |
BARRIER_MS |
masterSet(myThid) = masterSet(myThid) + 1 |
|
./eesupp/src/barrier.F |
289 |
BARRIER_MU |
SUBROUTINE BARRIER_MU( myThid ) |
|
./eesupp/src/barrier.F |
298 |
BARRIER_MU |
INTEGER myThid |
|
./eesupp/src/barrier.F |
300 |
BARRIER_MU |
masterSet(myThid) = masterSet(myThid) - 1 |
|
./eesupp/src/barrier.F |
53 |
BARRIER |
SUBROUTINE BARRIER( myThid ) |
|
./model/src/ini_grid.F |
11 |
INI_GRID |
SUBROUTINE INI_GRID( myThid ) |
|
./model/src/ini_grid.F |
134 |
INI_GRID |
CALL INI_CARTESIAN_GRID( myThid ) |
|
./model/src/ini_grid.F |
136 |
INI_GRID |
CALL INI_SPHERICAL_POLAR_GRID( myThid ) |
|
./model/src/ini_grid.F |
138 |
INI_GRID |
CALL INI_CURVILINEAR_GRID( myThid ) |
|
./model/src/ini_grid.F |
140 |
INI_GRID |
CALL INI_CYLINDER_GRID( myThid ) |
|
./model/src/ini_grid.F |
142 |
INI_GRID |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_grid.F |
145 |
INI_GRID |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_grid.F |
148 |
INI_GRID |
_END_MASTER(myThid) |
|
./model/src/ini_grid.F |
152 |
INI_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_grid.F |
153 |
INI_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_grid.F |
188 |
INI_GRID |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./model/src/ini_grid.F |
204 |
INI_GRID |
CALL MNC_CW_SET_UDIM(mon_fname, 1, myThid) |
|
./model/src/ini_grid.F |
212 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,xC,'XC',myThid) |
|
./model/src/ini_grid.F |
213 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,xG,'XG',myThid) |
|
./model/src/ini_grid.F |
214 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dxC,'DXC',myThid) |
|
./model/src/ini_grid.F |
215 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dxF,'DXF',myThid) |
|
./model/src/ini_grid.F |
216 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dxG,'DXG',myThid) |
|
./model/src/ini_grid.F |
217 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dxV,'DXV',myThid) |
|
./model/src/ini_grid.F |
218 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,yC,'YC',myThid) |
|
./model/src/ini_grid.F |
219 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,yG,'YG',myThid) |
|
./model/src/ini_grid.F |
220 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyC,'DYC',myThid) |
|
./model/src/ini_grid.F |
221 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyF,'DYF',myThid) |
|
./model/src/ini_grid.F |
222 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyG,'DYG',myThid) |
|
./model/src/ini_grid.F |
223 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,dyU,'DYU',myThid) |
|
./model/src/ini_grid.F |
224 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,rA,'RA',myThid) |
|
./model/src/ini_grid.F |
225 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,rAw,'RAW',myThid) |
|
./model/src/ini_grid.F |
226 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,rAs,'RAS',myThid) |
|
./model/src/ini_grid.F |
227 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,rAz,'RAZ',myThid) |
|
./model/src/ini_grid.F |
228 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,angleCosC,'AngleCS',myThid) |
|
./model/src/ini_grid.F |
229 |
INI_GRID |
CALL MON_PRINTSTATS_RS(1,angleSinC,'AngleSN',myThid) |
|
./model/src/ini_grid.F |
231 |
INI_GRID |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./model/src/ini_grid.F |
42 |
INI_GRID |
INTEGER myThid |
|
./model/src/ini_grid.F |
60 |
INI_GRID |
CALL LOAD_GRID_SPACING( myThid ) |
|
./model/src/ini_grid.F |
63 |
INI_GRID |
CALL INI_VERTICAL_GRID( myThid ) |
|
./model/src/ini_grid.F |
69 |
INI_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_grid.F |
70 |
INI_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
193 |
STREAMICE_CG_MAKE_A |
SUBROUTINE STREAMICE_CG_MAKE_A( myThid ) |
|
./pkg/streamice/streamice_cg_functions.F |
213 |
STREAMICE_CG_MAKE_A |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_functions.F |
257 |
STREAMICE_CG_MAKE_A |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
258 |
STREAMICE_CG_MAKE_A |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
277 |
STREAMICE_CG_MAKE_A |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
278 |
STREAMICE_CG_MAKE_A |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
34 |
STREAMICE_CG_ACTION |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_functions.F |
668 |
STREAMICE_CG_ADIAG |
SUBROUTINE STREAMICE_CG_ADIAG( myThid, |
|
./pkg/streamice/streamice_cg_functions.F |
691 |
STREAMICE_CG_ADIAG |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_functions.F |
732 |
STREAMICE_CG_ADIAG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
733 |
STREAMICE_CG_ADIAG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
77 |
STREAMICE_CG_ACTION |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
78 |
STREAMICE_CG_ACTION |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
838 |
STREAMICE_CG_BOUND_VALS |
SUBROUTINE STREAMICE_CG_BOUND_VALS( myThid, |
|
./pkg/streamice/streamice_cg_functions.F |
860 |
STREAMICE_CG_BOUND_VALS |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_functions.F |
900 |
STREAMICE_CG_BOUND_VALS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
901 |
STREAMICE_CG_BOUND_VALS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_functions.F |
9 |
STREAMICE_CG_ACTION |
SUBROUTINE STREAMICE_CG_ACTION( myThid, |
|
./pkg/streamice/streamice_cg_solve.F |
101 |
STREAMICE_CG_SOLVE |
CALL TIMER_START ('STREAMICE_CG_SOLVE',myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
120 |
STREAMICE_CG_SOLVE |
I myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
132 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
133 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
155 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
156 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
181 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Au_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
182 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Av_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
185 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
186 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
200 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
201 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
214 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
217 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
218 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
21 |
STREAMICE_CG_SOLVE |
I myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
235 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
236 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
251 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
252 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
294 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
295 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
309 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
310 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
347 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
348 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
354 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
355 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
375 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
376 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p2_tile, dot_p2, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
379 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
380 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
411 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
412 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
418 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
419 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
442 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
443 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p2_tile, dot_p2, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
447 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
448 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
462 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
463 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
468 |
STREAMICE_CG_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
469 |
STREAMICE_CG_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve.F |
481 |
STREAMICE_CG_SOLVE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
492 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Du_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
493 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Dv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
494 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Ru_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
495 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( Rv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
496 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Uin, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
497 |
STREAMICE_CG_SOLVE |
_EXCH_XY_RL( cg_Vin, myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
52 |
STREAMICE_CG_SOLVE |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_solve.F |
543 |
STREAMICE_CG_SOLVE |
I myThid ) |
|
./pkg/streamice/streamice_cg_solve.F |
547 |
STREAMICE_CG_SOLVE |
CALL TIMER_STOP ('STREAMICE_CG_SOLVE',myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
106 |
STREAMICE_CG_SOLVE_MATFREE |
CALL STREAMICE_CG_ACTION( myThid, |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
115 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Au_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
116 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Av_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
118 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
119 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
133 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
134 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
146 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
151 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
152 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
167 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
168 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
16 |
STREAMICE_CG_SOLVE_MATFREE |
I myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
210 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
211 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
251 |
STREAMICE_CG_SOLVE_MATFREE |
CALL STREAMICE_CG_ACTION( myThid, |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
263 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
264 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
270 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
271 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
291 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
292 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p2_tile, dot_p2, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
295 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
296 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
327 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
328 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
334 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
335 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
358 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
359 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p2_tile, dot_p2, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
363 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
364 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
36 |
STREAMICE_CG_SOLVE_MATFREE |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
378 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
379 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
384 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
385 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
397 |
STREAMICE_CG_SOLVE_MATFREE |
CALL GLOBAL_SUM_TILE_RL( dot_p1_tile, dot_p1, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
408 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Du_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
409 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Dv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
410 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Ru_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
411 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( Rv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
412 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( cg_Uin, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
413 |
STREAMICE_CG_SOLVE_MATFREE |
_EXCH_XY_RL( cg_Vin, myThid ) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
60 |
STREAMICE_CG_SOLVE_MATFREE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_matfree.F |
61 |
STREAMICE_CG_SOLVE_MATFREE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
140 |
STREAMICE_CG_SOLVE_PETSC |
CALL TIMER_START ('STREAMICE_PETSC_SETUP',myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
160 |
STREAMICE_CG_SOLVE_PETSC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
161 |
STREAMICE_CG_SOLVE_PETSC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
21 |
STREAMICE_CG_SOLVE_PETSC |
I myThid ) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
223 |
STREAMICE_CG_SOLVE_PETSC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
224 |
STREAMICE_CG_SOLVE_PETSC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
398 |
STREAMICE_CG_SOLVE_PETSC |
CALL TIMER_STOP ('STREAMICE_PETSC_SETUP',myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
406 |
STREAMICE_CG_SOLVE_PETSC |
CALL TIMER_START ('STREAMICE_PETSC_SOLVE',myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
410 |
STREAMICE_CG_SOLVE_PETSC |
CALL TIMER_STOP ('STREAMICE_PETSC_SOLVE',myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
417 |
STREAMICE_CG_SOLVE_PETSC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
418 |
STREAMICE_CG_SOLVE_PETSC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_solve_petsc.F |
54 |
STREAMICE_CG_SOLVE_PETSC |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_wrapper.F |
100 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( RHSu_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
101 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( RHSv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
105 |
STREAMICE_CG_WRAPPER |
CALL STREAMICE_CG_ADIAG( myThid, |
|
./pkg/streamice/streamice_cg_wrapper.F |
109 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( DIAGu_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
110 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( DIAGv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
114 |
STREAMICE_CG_WRAPPER |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
115 |
STREAMICE_CG_WRAPPER |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
134 |
STREAMICE_CG_WRAPPER |
CALL STREAMICE_CG_MAKE_A(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
17 |
STREAMICE_CG_WRAPPER |
I myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
241 |
STREAMICE_CG_WRAPPER |
& myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
243 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( RHSu_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
244 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( RHSv_SI, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
270 |
STREAMICE_CG_WRAPPER |
& myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
280 |
STREAMICE_CG_WRAPPER |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
281 |
STREAMICE_CG_WRAPPER |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
296 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( cg_Uin, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
297 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL( cg_Vin, myThid ) |
|
./pkg/streamice/streamice_cg_wrapper.F |
39 |
STREAMICE_CG_WRAPPER |
INTEGER myThid |
|
./pkg/streamice/streamice_cg_wrapper.F |
58 |
STREAMICE_CG_WRAPPER |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
59 |
STREAMICE_CG_WRAPPER |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
74 |
STREAMICE_CG_WRAPPER |
CALL STREAMICE_CG_BOUND_VALS( myThid, |
|
./pkg/streamice/streamice_cg_wrapper.F |
78 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL(ubd_SI, myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
79 |
STREAMICE_CG_WRAPPER |
_EXCH_XY_RL(vbd_SI, myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
87 |
STREAMICE_CG_WRAPPER |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_cg_wrapper.F |
88 |
STREAMICE_CG_WRAPPER |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_check.F |
11 |
STREAMICE_CHECK |
SUBROUTINE STREAMICE_CHECK( myThid ) |
|
./pkg/streamice/streamice_check.F |
277 |
STREAMICE_CHECK |
_END_MASTER(myThid) |
|
./pkg/streamice/streamice_check.F |
27 |
STREAMICE_CHECK |
INTEGER myThid |
|
./pkg/streamice/streamice_check.F |
304 |
STREAMICE_CHECK |
& k1AtC_str, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
306 |
STREAMICE_CHECK |
& k2AtC_str, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
308 |
STREAMICE_CHECK |
& STREAMICE_ufacemask_bdry, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
310 |
STREAMICE_CHECK |
& STREAMICE_vfacemask_bdry, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
312 |
STREAMICE_CHECK |
& u_bdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
314 |
STREAMICE_CHECK |
& v_bdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
316 |
STREAMICE_CHECK |
& u_flux_bdry_SI, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
318 |
STREAMICE_CHECK |
& v_flux_bdry_SI, 0, myThid ) |
|
./pkg/streamice/streamice_check.F |
37 |
STREAMICE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
12 |
STREAMICE_COST_SURF_ACCUM |
subroutine STREAMICE_COST_SURF_ACCUM ( myThid, myIter ) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
43 |
STREAMICE_COST_SURF_ACCUM |
integer myThid, myIter |
|
./pkg/streamice/streamice_cost_surf_accum.F |
60 |
STREAMICE_COST_SURF_ACCUM |
jtlo = mybylo(myThid) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
61 |
STREAMICE_COST_SURF_ACCUM |
jthi = mybyhi(myThid) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
62 |
STREAMICE_COST_SURF_ACCUM |
itlo = mybxlo(myThid) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
63 |
STREAMICE_COST_SURF_ACCUM |
ithi = mybxhi(myThid) |
|
./pkg/streamice/streamice_cost_surf_accum.F |
68 |
STREAMICE_COST_SURF_ACCUM |
& S_obs, 0, myThid ) |
|
./pkg/streamice/streamice_diagnostics_state.F |
101 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
106 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
108 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
110 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
112 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
114 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
116 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
123 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
126 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
132 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
135 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
137 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
141 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
143 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
145 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
147 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
150 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
152 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
154 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
156 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
164 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
167 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
26 |
STREAMICE_DIAGNOSTICS_STATE |
INTEGER myIter, myThid, i, j, bi, bj |
|
./pkg/streamice/streamice_diagnostics_state.F |
52 |
STREAMICE_DIAGNOSTICS_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
53 |
STREAMICE_DIAGNOSTICS_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
93 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
95 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
97 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
99 |
STREAMICE_DIAGNOSTICS_STATE |
& 0,1,0,1,1,myThid) |
|
./pkg/streamice/streamice_diagnostics_state.F |
9 |
STREAMICE_DIAGNOSTICS_STATE |
SUBROUTINE STREAMICE_DIAGNOSTICS_STATE( myTime, myIter, myThid ) |
|
./pkg/streamice/streamice_driving_stress.F |
30 |
STREAMICE_DRIVING_STRESS |
INTEGER myThid |
|
./pkg/streamice/streamice_driving_stress.F |
65 |
STREAMICE_DRIVING_STRESS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress.F |
66 |
STREAMICE_DRIVING_STRESS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress.F |
93 |
STREAMICE_DRIVING_STRESS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress.F |
94 |
STREAMICE_DRIVING_STRESS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress.F |
9 |
STREAMICE_DRIVING_STRESS |
SUBROUTINE STREAMICE_DRIVING_STRESS( myThid ) |
|
./model/src/ini_linear_phisurf.F |
10 |
INI_LINEAR_PHISURF |
SUBROUTINE INI_LINEAR_PHISURF( myThid ) |
|
./model/src/ini_linear_phisurf.F |
110 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
111 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
122 |
INI_LINEAR_PHISURF |
O rhoLoc, myThid ) |
|
./model/src/ini_linear_phisurf.F |
127 |
INI_LINEAR_PHISURF |
O rhoLoc, myThid ) |
|
./model/src/ini_linear_phisurf.F |
147 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
148 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
195 |
INI_LINEAR_PHISURF |
CALL WRITE_FLD_XY_RL( 'Bo_surf',' ',Bo_surf,0,myThid) |
|
./model/src/ini_linear_phisurf.F |
203 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
204 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
226 |
INI_LINEAR_PHISURF |
I Ro_surf, myThid ) |
|
./model/src/ini_linear_phisurf.F |
229 |
INI_LINEAR_PHISURF |
_EXCH_XY_RS(phi0surf, myThid) |
|
./model/src/ini_linear_phisurf.F |
230 |
INI_LINEAR_PHISURF |
CALL WRITE_FLD_XY_RS( 'phi0surf',' ',phi0surf,0,myThid) |
|
./model/src/ini_linear_phisurf.F |
233 |
INI_LINEAR_PHISURF |
CALL WRITE_FLD_XY_RS( 'topo_H',' ',topoHloc,0,myThid) |
|
./model/src/ini_linear_phisurf.F |
36 |
INI_LINEAR_PHISURF |
INTEGER myThid |
|
./model/src/ini_linear_phisurf.F |
56 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
57 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
83 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
84 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
95 |
INI_LINEAR_PHISURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_linear_phisurf.F |
96 |
INI_LINEAR_PHISURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
159 |
STREAMICE_DRIVING_STRESS_FD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
160 |
STREAMICE_DRIVING_STRESS_FD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
30 |
STREAMICE_DRIVING_STRESS_FD |
INTEGER myThid |
|
./pkg/streamice/streamice_driving_stress_fd.F |
478 |
STREAMICE_DRIVING_STRESS_FD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
479 |
STREAMICE_DRIVING_STRESS_FD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
51 |
STREAMICE_DRIVING_STRESS_FD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
52 |
STREAMICE_DRIVING_STRESS_FD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
62 |
STREAMICE_DRIVING_STRESS_FD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
63 |
STREAMICE_DRIVING_STRESS_FD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_fd.F |
9 |
STREAMICE_DRIVING_STRESS_FD |
SUBROUTINE STREAMICE_DRIVING_STRESS_FD( myThid ) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
30 |
STREAMICE_DRIVING_STRESS_PPM |
INTEGER myThid |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
51 |
STREAMICE_DRIVING_STRESS_PPM |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
52 |
STREAMICE_DRIVING_STRESS_PPM |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
62 |
STREAMICE_DRIVING_STRESS_PPM |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
63 |
STREAMICE_DRIVING_STRESS_PPM |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_driving_stress_ppm.F |
9 |
STREAMICE_DRIVING_STRESS_PPM |
SUBROUTINE STREAMICE_DRIVING_STRESS_PPM( myThid ) |
|
./pkg/streamice/streamice_dump.F |
11 |
STREAMICE_DUMP |
subroutine STREAMICE_DUMP( mytime, myiter, myThid ) |
|
./pkg/streamice/streamice_dump.F |
39 |
STREAMICE_DUMP |
integer myThid |
|
./pkg/streamice/streamice_dump_ad.F |
110 |
ADSTREAMICE_DUMP |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/streamice/streamice_dump_ad.F |
114 |
ADSTREAMICE_DUMP |
& 1, c_basal_friction_ad, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
117 |
ADSTREAMICE_DUMP |
& 1, h_streamice_ad, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
11 |
ADSTREAMICE_DUMP |
subroutine ADSTREAMICE_DUMP( mytime, myiter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
121 |
ADSTREAMICE_DUMP |
& 1, r_low_si_ad, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
125 |
ADSTREAMICE_DUMP |
& 1, b_glen_ad, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
128 |
ADSTREAMICE_DUMP |
& 1, bdot_streamice_ad, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_dump_ad.F |
48 |
ADSTREAMICE_DUMP |
integer myThid |
|
./pkg/streamice/streamice_fields_load.F |
131 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
137 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
143 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
149 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
158 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
163 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
171 |
STREAMICE_FIELDS_LOAD |
& nm0,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
181 |
STREAMICE_FIELDS_LOAD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
182 |
STREAMICE_FIELDS_LOAD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
203 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
209 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
215 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
221 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
227 |
STREAMICE_FIELDS_LOAD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
228 |
STREAMICE_FIELDS_LOAD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
247 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
253 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
259 |
STREAMICE_FIELDS_LOAD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
260 |
STREAMICE_FIELDS_LOAD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
273 |
STREAMICE_FIELDS_LOAD |
& nm1,myIter,myThid) |
|
./pkg/streamice/streamice_fields_load.F |
279 |
STREAMICE_FIELDS_LOAD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
280 |
STREAMICE_FIELDS_LOAD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_fields_load.F |
315 |
STREAMICE_FIELDS_LOAD |
& (streamice_v_shear_stress, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
317 |
STREAMICE_FIELDS_LOAD |
& (streamice_u_shear_stress, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
319 |
STREAMICE_FIELDS_LOAD |
& (streamice_v_normal_stress, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
321 |
STREAMICE_FIELDS_LOAD |
& (streamice_u_normal_stress, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
326 |
STREAMICE_FIELDS_LOAD |
& (u_flux_bdry_pert, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
328 |
STREAMICE_FIELDS_LOAD |
& (v_flux_bdry_pert, myThid) |
|
./pkg/streamice/streamice_fields_load.F |
42 |
STREAMICE_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/streamice/streamice_fields_load.F |
8 |
STREAMICE_FIELDS_LOAD |
I myTime, myIter, myThid ) |
|
./pkg/streamice/streamice_fields_load.F |
92 |
STREAMICE_FIELDS_LOAD |
I myThid ) |
|
./pkg/streamice/streamice_fields_load.F |
99 |
STREAMICE_FIELDS_LOAD |
I myThid ) |
|
./pkg/streamice/streamice_finalize_petsc.F |
30 |
STREAMICE_FINALIZE_PETSC |
INTEGER myThid |
|
./pkg/streamice/streamice_forced_buttress.F |
30 |
STREAMICE_FORCED_BUTTRESS |
INTEGER myThid |
|
./pkg/streamice/streamice_forced_buttress.F |
56 |
STREAMICE_FORCED_BUTTRESS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_forced_buttress.F |
57 |
STREAMICE_FORCED_BUTTRESS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_forced_buttress.F |
83 |
STREAMICE_FORCED_BUTTRESS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_forced_buttress.F |
84 |
STREAMICE_FORCED_BUTTRESS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_forced_buttress.F |
9 |
STREAMICE_FORCED_BUTTRESS |
SUBROUTINE STREAMICE_FORCED_BUTTRESS( myThid ) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
28 |
STREAMICE_GET_FP_ERR_OAD |
INTEGER myThid |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
45 |
STREAMICE_GET_FP_ERR_OAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
46 |
STREAMICE_GET_FP_ERR_OAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
53 |
STREAMICE_GET_FP_ERR_OAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
54 |
STREAMICE_GET_FP_ERR_OAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
73 |
STREAMICE_GET_FP_ERR_OAD |
CALL GLOBAL_MAX_R8 (err_max, myThid) |
|
./pkg/streamice/streamice_get_fp_err_oad.F |
9 |
STREAMICE_GET_FP_ERR_OAD |
SUBROUTINE STREAMICE_GET_FP_ERR_OAD ( err_max, myThid ) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
114 |
STREAMICE_GET_VEL_FP_ERR |
CALL GLOBAL_SUM_TILE_RL( err_sum_tile, err_sum, myThid ) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
28 |
STREAMICE_GET_VEL_FP_ERR |
INTEGER myThid |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
45 |
STREAMICE_GET_VEL_FP_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
46 |
STREAMICE_GET_VEL_FP_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
53 |
STREAMICE_GET_VEL_FP_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
54 |
STREAMICE_GET_VEL_FP_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
81 |
STREAMICE_GET_VEL_FP_ERR |
CALL GLOBAL_MAX_R8 (err_max, myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
85 |
STREAMICE_GET_VEL_FP_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
86 |
STREAMICE_GET_VEL_FP_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_fp_err.F |
9 |
STREAMICE_GET_VEL_FP_ERR |
SUBROUTINE STREAMICE_GET_VEL_FP_ERR ( err_max, myThid ) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
114 |
STREAMICE_GET_VEL_RESID_ERR |
CALL GLOBAL_MAX_R8 (err_max, myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
121 |
STREAMICE_GET_VEL_RESID_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
122 |
STREAMICE_GET_VEL_RESID_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
142 |
STREAMICE_GET_VEL_RESID_ERR |
CALL GLOBAL_SUM_TILE_RL( err_sum_tile, err_sum, myThid ) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
27 |
STREAMICE_GET_VEL_RESID_ERR |
INTEGER myThid, myiter |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
48 |
STREAMICE_GET_VEL_RESID_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
49 |
STREAMICE_GET_VEL_RESID_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
54 |
STREAMICE_GET_VEL_RESID_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
55 |
STREAMICE_GET_VEL_RESID_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
67 |
STREAMICE_GET_VEL_RESID_ERR |
CALL STREAMICE_CG_BOUND_VALS( myThid, |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
76 |
STREAMICE_GET_VEL_RESID_ERR |
CALL STREAMICE_CG_ACTION( myThid, |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
90 |
STREAMICE_GET_VEL_RESID_ERR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
91 |
STREAMICE_GET_VEL_RESID_ERR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err.F |
9 |
STREAMICE_GET_VEL_RESID_ERR |
SUBROUTINE STREAMICE_GET_VEL_RESID_ERR ( err_max, myThid ) |
|
./model/src/ini_local_grid.F |
17 |
INI_LOCAL_GRID |
I bi, bj, myThid ) |
|
./model/src/ini_local_grid.F |
65 |
INI_LOCAL_GRID |
INTEGER myThid |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
111 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
CALL GLOBAL_MAX_R8 (err_max, myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
13 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
SUBROUTINE STREAMICE_GET_VEL_RESID_ERR_OAD ( err_max, myThid ) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
31 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
INTEGER myThid |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
52 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
53 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
58 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
59 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
73 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
CALL STREAMICE_CG_BOUND_VALS( myThid, |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
77 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
CALL STREAMICE_CG_ACTION( myThid, |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
85 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_get_vel_resid_err_oad.F |
86 |
STREAMICE_GET_VEL_RESID_ERR_OAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_diagnostics.F |
103 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
110 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
117 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
11 |
STREAMICE_INIT_DIAGNOSTICS |
SUBROUTINE STREAMICE_INIT_DIAGNOSTICS( myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
124 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
131 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
138 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
26 |
STREAMICE_INIT_DIAGNOSTICS |
INTEGER myThid |
|
./pkg/streamice/streamice_init_diagnostics.F |
47 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
54 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
61 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
68 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
75 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
82 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
89 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_diagnostics.F |
96 |
STREAMICE_INIT_DIAGNOSTICS |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
114 |
STREAMICE_INIT_FIXED |
& STREAMICE_cost_mask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
11 |
STREAMICE_INIT_FIXED |
SUBROUTINE STREAMICE_INIT_FIXED( myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
120 |
STREAMICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
121 |
STREAMICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
139 |
STREAMICE_INIT_FIXED |
& temp_ufacemask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
142 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
148 |
STREAMICE_INIT_FIXED |
& temp_vfacemask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
151 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
154 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(temp_ufacemask,myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
155 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(temp_vfacemask,myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
161 |
STREAMICE_INIT_FIXED |
& u_bdry_values_SI_base, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
163 |
STREAMICE_INIT_FIXED |
& u_bdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
167 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
174 |
STREAMICE_INIT_FIXED |
& v_bdry_values_SI_base, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
176 |
STREAMICE_INIT_FIXED |
& v_bdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
180 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
186 |
STREAMICE_INIT_FIXED |
& h_ubdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
189 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
195 |
STREAMICE_INIT_FIXED |
& h_vbdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
198 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
204 |
STREAMICE_INIT_FIXED |
& u_flux_bdry_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
207 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
213 |
STREAMICE_INIT_FIXED |
& v_flux_bdry_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
216 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
224 |
STREAMICE_INIT_FIXED |
& trac2d_ubdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
227 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
233 |
STREAMICE_INIT_FIXED |
& trac2d_vbdry_values_SI, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
236 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
249 |
STREAMICE_INIT_FIXED |
& temp_hmask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
252 |
STREAMICE_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
255 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(temp_hmask,myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
258 |
STREAMICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
259 |
STREAMICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
274 |
STREAMICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
275 |
STREAMICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
293 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(STREAMICE_calve_mask, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
295 |
STREAMICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
296 |
STREAMICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
30 |
STREAMICE_INIT_FIXED |
INTEGER myThid |
|
./pkg/streamice/streamice_init_fixed.F |
538 |
STREAMICE_INIT_FIXED |
& 'XY', Nr, 1, .FALSE., 0, myThid, dummyRS ) |
|
./pkg/streamice/streamice_init_fixed.F |
544 |
STREAMICE_INIT_FIXED |
& STREAMICE_cost_mask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
547 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(k1AtC_str, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
548 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(k2AtC_str, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
549 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(STREAMICE_ufacemask_bdry, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
550 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RS(STREAMICE_vfacemask_bdry, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
551 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(u_bdry_values_SI, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
552 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(v_bdry_values_SI, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
553 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(u_flux_bdry_SI, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
554 |
STREAMICE_INIT_FIXED |
_EXCH_XY_RL(v_flux_bdry_SI, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
559 |
STREAMICE_INIT_FIXED |
CALL STREAMICE_INIT_PHI( myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
63 |
STREAMICE_INIT_FIXED |
CALL STREAMICE_INIT_DIAGNOSTICS( myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
74 |
STREAMICE_INIT_FIXED |
& STREAMICE_calve_mask, 0, myThid ) |
|
./pkg/streamice/streamice_init_fixed.F |
80 |
STREAMICE_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_fixed.F |
81 |
STREAMICE_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_phi.F |
11 |
STREAMICE_INIT_PHI |
SUBROUTINE STREAMICE_INIT_PHI( myThid ) |
|
./pkg/streamice/streamice_init_phi.F |
26 |
STREAMICE_INIT_PHI |
INTEGER myThid |
|
./pkg/streamice/streamice_init_phi.F |
54 |
STREAMICE_INIT_PHI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_phi.F |
55 |
STREAMICE_INIT_PHI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
12 |
STREAMICE_INIT_VARIA |
SUBROUTINE STREAMICE_INIT_VARIA( myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
132 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
133 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
151 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
152 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
172 |
STREAMICE_INIT_VARIA |
& R_low_si, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
197 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
198 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
250 |
STREAMICE_INIT_VARIA |
& 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
251 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
252 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
294 |
STREAMICE_INIT_VARIA |
& 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
297 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
304 |
STREAMICE_INIT_VARIA |
& 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
307 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
316 |
STREAMICE_INIT_VARIA |
CALL STREAMICE_READ_PICKUP ( myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
332 |
STREAMICE_INIT_VARIA |
& B_glen, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
337 |
STREAMICE_INIT_VARIA |
& B_glen, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
33 |
STREAMICE_INIT_VARIA |
INTEGER myThid |
|
./pkg/streamice/streamice_init_varia.F |
348 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
349 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
367 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
381 |
STREAMICE_INIT_VARIA |
& BDOT_streamice, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
401 |
STREAMICE_INIT_VARIA |
& C_basal_friction, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
411 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
412 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
425 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
426 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
443 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
444 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
460 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
472 |
STREAMICE_INIT_VARIA |
& trac2d, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
478 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
479 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
490 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL (trac2d, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
498 |
STREAMICE_INIT_VARIA |
& streamice_u_normal_stress, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
49 |
STREAMICE_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
501 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
507 |
STREAMICE_INIT_VARIA |
& streamice_v_normal_stress, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
50 |
STREAMICE_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_init_varia.F |
510 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
516 |
STREAMICE_INIT_VARIA |
& streamice_u_shear_stress, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
519 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
525 |
STREAMICE_INIT_VARIA |
& streamice_v_shear_stress, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
528 |
STREAMICE_INIT_VARIA |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
532 |
STREAMICE_INIT_VARIA |
& (streamice_v_shear_stress, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
534 |
STREAMICE_INIT_VARIA |
& (streamice_u_shear_stress, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
536 |
STREAMICE_INIT_VARIA |
& (streamice_v_normal_stress, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
538 |
STREAMICE_INIT_VARIA |
& (streamice_u_normal_stress, myThid) |
|
./pkg/streamice/streamice_init_varia.F |
542 |
STREAMICE_INIT_VARIA |
CALL STREAMICE_UPD_FFRAC_UNCOUPLED ( myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
544 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(H_streamice, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
545 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RS(STREAMICE_hmask, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
546 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(area_shelf_streamice, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
547 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(C_basal_friction, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
549 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(B_glen, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
551 |
STREAMICE_INIT_VARIA |
CALL EXCH_3D_RL(B_glen, Nr,myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
555 |
STREAMICE_INIT_VARIA |
_EXCH_XY_RL(R_low_si, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
569 |
STREAMICE_INIT_VARIA |
CALL STREAMICE_UPD_FFRAC_UNCOUPLED ( myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
570 |
STREAMICE_INIT_VARIA |
CALL STREAMICE_VELMASK_UPD (myThid) |
|
./pkg/streamice/streamice_init_varia.F |
573 |
STREAMICE_INIT_VARIA |
CALL STREAMICE_VEL_SOLVE ( myThid, |
|
./pkg/streamice/streamice_init_varia.F |
586 |
STREAMICE_INIT_VARIA |
& C_basal_friction, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
588 |
STREAMICE_INIT_VARIA |
& B_glen, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
590 |
STREAMICE_INIT_VARIA |
& H_streamIce, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
593 |
STREAMICE_INIT_VARIA |
& trac2d, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
596 |
STREAMICE_INIT_VARIA |
& area_shelf_streamice, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
598 |
STREAMICE_INIT_VARIA |
& STREAMICE_hmask, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
601 |
STREAMICE_INIT_VARIA |
& 'XY', Nr, 1, .FALSE., 0, myThid, dummyRS ) |
|
./pkg/streamice/streamice_init_varia.F |
610 |
STREAMICE_INIT_VARIA |
& C_basal_friction, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
612 |
STREAMICE_INIT_VARIA |
& V_streamice, 0, myThid ) |
|
./pkg/streamice/streamice_init_varia.F |
615 |
STREAMICE_INIT_VARIA |
& R_low_si, 0, myThid ) |
|
./pkg/streamice/streamice_initialise_petsc.F |
25 |
STREAMICE_INITIALIZE_PETSC |
INTEGER myThid |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
12 |
STREAMICE_INVERT_SURF_FORTHICK |
I myThid) |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
34 |
STREAMICE_INVERT_SURF_FORTHICK |
INTEGER myThid |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
53 |
STREAMICE_INVERT_SURF_FORTHICK |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_invert_surf_forthick.F |
54 |
STREAMICE_INVERT_SURF_FORTHICK |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
122 |
STREAMICE_PETSC_NUMERATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
123 |
STREAMICE_PETSC_NUMERATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
141 |
STREAMICE_PETSC_NUMERATE |
_EXCH_XY_RS(streamice_petsc_dofs_u,myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
142 |
STREAMICE_PETSC_NUMERATE |
_EXCH_XY_RS(streamice_petsc_dofs_v,myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
31 |
STREAMICE_PETSC_NUMERATE |
INTEGER myThid |
|
./pkg/streamice/streamice_petsc_numerate.F |
46 |
STREAMICE_PETSC_NUMERATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
47 |
STREAMICE_PETSC_NUMERATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
58 |
STREAMICE_PETSC_NUMERATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
59 |
STREAMICE_PETSC_NUMERATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_petsc_numerate.F |
9 |
STREAMICE_PETSC_NUMERATE |
SUBROUTINE STREAMICE_PETSC_NUMERATE (myThid) |
|
./pkg/streamice/streamice_petscmatdestroy.F |
10 |
STREAMICE_PETSCMATDESTROY |
I myThid ) |
|
./pkg/streamice/streamice_petscmatdestroy.F |
38 |
STREAMICE_PETSCMATDESTROY |
INTEGER myThid |
|
./pkg/streamice/streamice_read_pickup.F |
101 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
112 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
113 |
STREAMICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
11 |
STREAMICE_READ_PICKUP |
SUBROUTINE STREAMICE_READ_PICKUP( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
130 |
STREAMICE_READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
136 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
138 |
STREAMICE_READ_PICKUP |
& nj, fp, 1, 1, 1, myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
140 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
142 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
144 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
146 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
148 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
152 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
154 |
STREAMICE_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
165 |
STREAMICE_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
169 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
170 |
STREAMICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
178 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
180 |
STREAMICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
186 |
STREAMICE_READ_PICKUP |
CALL EXCH_3D_RL( visc_streamice_full, Nr, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
188 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( area_shelf_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
189 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( h_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
190 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( u_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
191 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( v_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
192 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RS( streamice_hmask, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
193 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( tau_beta_eff_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
194 |
STREAMICE_READ_PICKUP |
CALL EXCH_XY_RL( visc_streamice, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
27 |
STREAMICE_READ_PICKUP |
INTEGER myThid |
|
./pkg/streamice/streamice_read_pickup.F |
64 |
STREAMICE_READ_PICKUP |
I Nr, nIter0, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
66 |
STREAMICE_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
70 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
73 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
77 |
STREAMICE_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
86 |
STREAMICE_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
90 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
91 |
STREAMICE_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/streamice/streamice_read_pickup.F |
96 |
STREAMICE_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_masks_etc.F |
104 |
INI_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_masks_etc.F |
105 |
INI_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_masks_etc.F |
10 |
INI_MASKS_ETC |
SUBROUTINE INI_MASKS_ETC( myThid ) |
|
./model/src/ini_masks_etc.F |
219 |
INI_MASKS_ETC |
& 'Model R_low (ini_masks_etc)', -1, myThid ) |
|
./model/src/ini_masks_etc.F |
221 |
INI_MASKS_ETC |
& 'Model Ro_surf (ini_masks_etc)', -1, myThid ) |
|
./model/src/ini_masks_etc.F |
226 |
INI_MASKS_ETC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_masks_etc.F |
227 |
INI_MASKS_ETC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_masks_etc.F |
37 |
INI_MASKS_ETC |
INTEGER myThid |
|
./model/src/ini_masks_etc.F |
423 |
INI_MASKS_ETC |
CALL EXCH_UV_XYZ_RS( hFacW, hFacS, .FALSE., myThid ) |
|
./model/src/ini_masks_etc.F |
424 |
INI_MASKS_ETC |
CALL EXCH_UV_XY_RS( rSurfW, rSurfS, .FALSE., myThid ) |
|
./model/src/ini_masks_etc.F |
425 |
INI_MASKS_ETC |
CALL EXCH_UV_XY_RS( rLowW, rLowS, .FALSE., myThid ) |
|
./model/src/ini_masks_etc.F |
430 |
INI_MASKS_ETC |
CALL ADD_WALLS2MASKS( myThid ) |
|
./model/src/ini_masks_etc.F |
433 |
INI_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_masks_etc.F |
434 |
INI_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_masks_etc.F |
455 |
INI_MASKS_ETC |
CALL INI_SIGMA_HFAC( myThid ) |
|
./model/src/ini_masks_etc.F |
469 |
INI_MASKS_ETC |
CALL PLOT_FIELD_XYZRS( hFacC, 'hFacC' , Nr, 0, myThid ) |
|
./model/src/ini_masks_etc.F |
470 |
INI_MASKS_ETC |
CALL PLOT_FIELD_XYZRS( hFacW, 'hFacW' , Nr, 0, myThid ) |
|
./model/src/ini_masks_etc.F |
471 |
INI_MASKS_ETC |
CALL PLOT_FIELD_XYZRS( hFacS, 'hFacS' , Nr, 0, myThid ) |
|
./model/src/ini_masks_etc.F |
475 |
INI_MASKS_ETC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_masks_etc.F |
476 |
INI_MASKS_ETC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_masks_etc.F |
60 |
INI_MASKS_ETC |
I myThid ) |
|
./model/src/ini_masks_etc.F |
69 |
INI_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_masks_etc.F |
70 |
INI_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_readparms.F |
10 |
STREAMICE_READPARMS |
SUBROUTINE STREAMICE_READPARMS( myThid ) |
|
./pkg/streamice/streamice_readparms.F |
177 |
STREAMICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/streamice/streamice_readparms.F |
182 |
STREAMICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/streamice/streamice_readparms.F |
186 |
STREAMICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/streamice/streamice_readparms.F |
27 |
STREAMICE_READPARMS |
INTEGER myThid |
|
./pkg/streamice/streamice_readparms.F |
374 |
STREAMICE_READPARMS |
I myThid ) |
|
./pkg/streamice/streamice_readparms.F |
458 |
STREAMICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/streamice/streamice_taub.F |
28 |
STREAMICE_TAUB |
INTEGER myThid |
|
./pkg/streamice/streamice_taub.F |
41 |
STREAMICE_TAUB |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_taub.F |
42 |
STREAMICE_TAUB |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_taub.F |
9 |
STREAMICE_TAUB |
SUBROUTINE STREAMICE_TAUB ( myThid ) |
|
./pkg/streamice/streamice_timestep.F |
118 |
STREAMICE_TIMESTEP |
CALL STREAMICE_UPD_FFRAC_UNCOUPLED ( myThid ) |
|
./pkg/streamice/streamice_timestep.F |
120 |
STREAMICE_TIMESTEP |
& ("surf_el_init","",surf_el_streamice,0,myThid) |
|
./pkg/streamice/streamice_timestep.F |
123 |
STREAMICE_TIMESTEP |
CALL STREAMICE_VELMASK_UPD (myThid) |
|
./pkg/streamice/streamice_timestep.F |
128 |
STREAMICE_TIMESTEP |
CALL STREAMICE_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./pkg/streamice/streamice_timestep.F |
12 |
STREAMICE_TIMESTEP |
SUBROUTINE STREAMICE_TIMESTEP ( myThid, myIter, |
|
./pkg/streamice/streamice_timestep.F |
134 |
STREAMICE_TIMESTEP |
CALL STREAMICE_VEL_SOLVE_OPENAD ( myThid, |
|
./pkg/streamice/streamice_timestep.F |
144 |
STREAMICE_TIMESTEP |
CALL STREAMICE_VEL_SOLVE( myThid, |
|
./pkg/streamice/streamice_timestep.F |
151 |
STREAMICE_TIMESTEP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_timestep.F |
152 |
STREAMICE_TIMESTEP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_timestep.F |
168 |
STREAMICE_TIMESTEP |
& sum_square_vel_tile, sum_square_vel, myThid ) |
|
./pkg/streamice/streamice_timestep.F |
179 |
STREAMICE_TIMESTEP |
CALL STREAMICE_VEL_SOLVE( myThid, |
|
./pkg/streamice/streamice_timestep.F |
191 |
STREAMICE_TIMESTEP |
CALL STREAMICE_ADVECT_THICKNESS ( myThid, myIter, deltaT ) |
|
./pkg/streamice/streamice_timestep.F |
196 |
STREAMICE_TIMESTEP |
CALL STREAMICE_UPD_FFRAC_UNCOUPLED ( myThid ) |
|
./pkg/streamice/streamice_timestep.F |
203 |
STREAMICE_TIMESTEP |
& myThid) |
|
./pkg/streamice/streamice_timestep.F |
38 |
STREAMICE_TIMESTEP |
INTEGER myThid, myIter, iLoop |
|
./pkg/streamice/streamice_timestep.F |
68 |
STREAMICE_TIMESTEP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_timestep.F |
69 |
STREAMICE_TIMESTEP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_timestep.F |
91 |
STREAMICE_TIMESTEP |
& myThid) |
|
./pkg/streamice/streamice_timestep.F |
99 |
STREAMICE_TIMESTEP |
CALL STREAMICE_DUMP( mytime, myiter, myThid ) |
|
./pkg/streamice/streamice_tridiag_solve.F |
16 |
STREAMICE_TRIDIAG_SOLVE |
I myThid ) |
|
./pkg/streamice/streamice_tridiag_solve.F |
36 |
STREAMICE_TRIDIAG_SOLVE |
INTEGER myThid |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
101 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
102 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
11 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
SUBROUTINE STREAMICE_UPD_FFRAC_UNCOUPLED ( myThid ) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
167 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_EXCH_XY_RL(float_frac_streamice, myThid ) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
168 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_EXCH_XY_RL(base_el_streamice, myThid ) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
169 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
_EXCH_XY_RL(surf_el_streamice, myThid ) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
25 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
INTEGER myThid |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
56 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_upd_ffrac_uncoupled.F |
57 |
STREAMICE_UPD_FFRAC_UNCOUPLED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_vel_phi.F |
13 |
STREAMICE_VEL_PHI |
I myThid, |
|
./pkg/streamice/streamice_vel_phi.F |
42 |
STREAMICE_VEL_PHI |
INTEGER myThid |
|
./pkg/streamice/streamice_vel_phi.F |
57 |
STREAMICE_VEL_PHI |
_EXCH_XY_RL( U_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
58 |
STREAMICE_VEL_PHI |
_EXCH_XY_RL( V_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
61 |
STREAMICE_VEL_PHI |
CALL STREAMICE_VISC_BETA_HYBRID ( myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
63 |
STREAMICE_VEL_PHI |
CALL STREAMICE_VISC_BETA ( myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
66 |
STREAMICE_VEL_PHI |
_EXCH_XY_RL( tau_beta_eff_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
67 |
STREAMICE_VEL_PHI |
_EXCH_XY_RL( visc_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
69 |
STREAMICE_VEL_PHI |
CALL STREAMICE_GET_VEL_RESID_ERR_OAD (max_err,myThid) |
|
./pkg/streamice/streamice_vel_phi.F |
72 |
STREAMICE_VEL_PHI |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_vel_phi.F |
73 |
STREAMICE_VEL_PHI |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_vel_phi.F |
91 |
STREAMICE_VEL_PHI |
& myThid ) |
|
./pkg/streamice/streamice_vel_phi.F |
94 |
STREAMICE_VEL_PHI |
CALL STREAMICE_TAUB (myThid) |
|
./pkg/streamice/streamice_vel_phistage.F |
125 |
STREAMICE_VEL_PHISTAGE |
CALL STREAMICE_GET_FP_ERR_OAD ( err_max_fp, myThid ) |
|
./pkg/streamice/streamice_vel_phistage.F |
139 |
STREAMICE_VEL_PHISTAGE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_vel_phistage.F |
140 |
STREAMICE_VEL_PHISTAGE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_vel_phistage.F |
14 |
STREAMICE_VEL_PHISTAGE |
I myThid, |
|
./pkg/streamice/streamice_vel_phistage.F |
25 |
STREAMICE_VEL_PHISTAGE |
I myThid, |
|
./pkg/streamice/streamice_vel_phistage.F |
59 |
STREAMICE_VEL_PHISTAGE |
INTEGER myThid |
|
./pkg/streamice/streamice_vel_solve.F |
116 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_VISC_BETA_HYBRID ( myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
118 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_VISC_BETA ( myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
125 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( tau_beta_eff_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
126 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( visc_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
12 |
STREAMICE_VEL_SOLVE |
SUBROUTINE STREAMICE_VEL_SOLVE( myThid, maxNLIter, maxCGiter, |
|
./pkg/streamice/streamice_vel_solve.F |
135 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_GET_VEL_RESID_ERR ( err_init, myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
227 |
STREAMICE_VEL_SOLVE |
& myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
237 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_TAUB (myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
260 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_VISC_BETA_HYBRID ( myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
262 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_VISC_BETA ( myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
265 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( tau_beta_eff_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
266 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( visc_streamice , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
273 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_GET_VEL_RESID_ERR ( err_max, myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
289 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_GET_VEL_FP_ERR ( err_max_fp, myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
291 |
STREAMICE_VEL_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
292 |
STREAMICE_VEL_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
345 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL(U_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
346 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL(V_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
348 |
STREAMICE_VEL_SOLVE |
CALL TIMER_STOP ('STREAMICE_VEL_SOLVE',myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
35 |
STREAMICE_VEL_SOLVE |
INTEGER myThid |
|
./pkg/streamice/streamice_vel_solve.F |
64 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_DRIVING_STRESS_FD (myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
66 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_DRIVING_STRESS_PPM (myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
68 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_DRIVING_STRESS (myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
79 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
80 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudy_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
81 |
STREAMICE_VEL_SOLVE |
CALL STREAMICE_FORCED_BUTTRESS (myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
84 |
STREAMICE_VEL_SOLVE |
CALL TIMER_START ('STREAMICE_VEL_SOLVE',myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
91 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
92 |
STREAMICE_VEL_SOLVE |
_EXCH_XY_RL( taudy_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve.F |
94 |
STREAMICE_VEL_SOLVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_vel_solve.F |
95 |
STREAMICE_VEL_SOLVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
103 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_VISC_BETA_HYBRID ( myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
105 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_VISC_BETA ( myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
111 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_GET_VEL_RESID_ERR_OAD ( err_init, myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
125 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
12 |
STREAMICE_VEL_SOLVE_OPENAD |
SUBROUTINE STREAMICE_VEL_SOLVE_OPENAD ( myThid, maxNLIter, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
136 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
158 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
169 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
198 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
209 |
STREAMICE_VEL_SOLVE_OPENAD |
I myThid, |
|
./pkg/streamice/streamice_vel_solve_openad.F |
239 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL(U_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
240 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL(V_streamice, myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
242 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL TIMER_STOP ('STREAMICE_VEL_SOLVE',myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
35 |
STREAMICE_VEL_SOLVE_OPENAD |
INTEGER myThid |
|
./pkg/streamice/streamice_vel_solve_openad.F |
68 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_DRIVING_STRESS_PPM (myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
70 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_DRIVING_STRESS (myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
74 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
75 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudy_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
76 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL STREAMICE_FORCED_BUTTRESS (myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
79 |
STREAMICE_VEL_SOLVE_OPENAD |
CALL TIMER_START ('STREAMICE_VEL_SOLVE',myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
86 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudx_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
87 |
STREAMICE_VEL_SOLVE_OPENAD |
_EXCH_XY_RL( taudy_SI , myThid ) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
89 |
STREAMICE_VEL_SOLVE_OPENAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/streamice/streamice_vel_solve_openad.F |
90 |
STREAMICE_VEL_SOLVE_OPENAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
12 |
STREAMICE_VELMASK_UPD |
SUBROUTINE STREAMICE_VELMASK_UPD ( myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
200 |
STREAMICE_VELMASK_UPD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
201 |
STREAMICE_VELMASK_UPD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
215 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_ufacemask, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
216 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_vfacemask, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
217 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_umask, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
218 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_vmask, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
228 |
STREAMICE_VELMASK_UPD |
myThidCopy = myThid |
|
./pkg/streamice/streamice_velmask_upd.F |
39 |
STREAMICE_VELMASK_UPD |
INTEGER myThid |
|
./pkg/streamice/streamice_velmask_upd.F |
55 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RL( H_streamice, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
56 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RL( area_shelf_streamice, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
57 |
STREAMICE_VELMASK_UPD |
_EXCH_XY_RS( STREAMICE_hmask, myThid ) |
|
./pkg/streamice/streamice_velmask_upd.F |
59 |
STREAMICE_VELMASK_UPD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
60 |
STREAMICE_VELMASK_UPD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
72 |
STREAMICE_VELMASK_UPD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_velmask_upd.F |
73 |
STREAMICE_VELMASK_UPD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_mixing.F |
101 |
INI_MIXING |
CALL READ_FLD_XYZ_RL(GM_background_K3dFile,' ',KapGM,0,myThid) |
|
./model/src/ini_mixing.F |
104 |
INI_MIXING |
_EXCH_XYZ_RL( kapGM, myThid ) |
|
./model/src/ini_mixing.F |
105 |
INI_MIXING |
CALL WRITE_FLD_XYZ_RL( 'KapGM', ' ', kapGM, 0, myThid ) |
|
./model/src/ini_mixing.F |
110 |
INI_MIXING |
CALL READ_FLD_XYZ_RL(GM_isopycK3dFile,' ',KapRedi,0,myThid) |
|
./model/src/ini_mixing.F |
113 |
INI_MIXING |
_EXCH_XYZ_RL( kapRedi, myThid ) |
|
./model/src/ini_mixing.F |
114 |
INI_MIXING |
CALL WRITE_FLD_XYZ_RL( 'KapRedi', ' ', kapRedi, 0, myThid ) |
|
./model/src/ini_mixing.F |
16 |
INI_MIXING |
SUBROUTINE INI_MIXING( myThid ) |
|
./model/src/ini_mixing.F |
42 |
INI_MIXING |
INTEGER myThid |
|
./model/src/ini_mixing.F |
52 |
INI_MIXING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_mixing.F |
53 |
INI_MIXING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_mixing.F |
77 |
INI_MIXING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_mixing.F |
78 |
INI_MIXING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_mixing.F |
93 |
INI_MIXING |
CALL READ_FLD_XYZ_RL(diffKrFile,' ',diffKr,0,myThid) |
|
./model/src/ini_mixing.F |
94 |
INI_MIXING |
_EXCH_XYZ_RL( diffKr, myThid ) |
|
./pkg/streamice/streamice_visc_beta.F |
28 |
STREAMICE_VISC_BETA |
INTEGER myThid |
|
./pkg/streamice/streamice_visc_beta.F |
40 |
STREAMICE_VISC_BETA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_visc_beta.F |
41 |
STREAMICE_VISC_BETA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_visc_beta.F |
9 |
STREAMICE_VISC_BETA |
SUBROUTINE STREAMICE_VISC_BETA ( myThid ) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
117 |
STREAMICE_VISC_BETA_HYBRID |
act1 = bi - myBxLo(myThid) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
118 |
STREAMICE_VISC_BETA_HYBRID |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
119 |
STREAMICE_VISC_BETA_HYBRID |
act2 = bj - myByLo(myThid) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
120 |
STREAMICE_VISC_BETA_HYBRID |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
121 |
STREAMICE_VISC_BETA_HYBRID |
act3 = myThid - 1 |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
12 |
STREAMICE_VISC_BETA_HYBRID |
SUBROUTINE STREAMICE_VISC_BETA_HYBRID ( myThid ) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
34 |
STREAMICE_VISC_BETA_HYBRID |
INTEGER myThid |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
60 |
STREAMICE_VISC_BETA_HYBRID |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/streamice/streamice_visc_beta_hybrid.F |
61 |
STREAMICE_VISC_BETA_HYBRID |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/streamice/streamice_write_pickup.F |
100 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
106 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
112 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
118 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
11 |
STREAMICE_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
124 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
131 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
137 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
152 |
STREAMICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
155 |
STREAMICE_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
156 |
STREAMICE_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
173 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
33 |
STREAMICE_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/streamice/streamice_write_pickup.F |
78 |
STREAMICE_WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
88 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/streamice/streamice_write_pickup.F |
94 |
STREAMICE_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./model/src/ini_mnc_vars.F |
101 |
INI_MNC_VARS |
& 'R coordinate of cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
103 |
INI_MNC_VARS |
& 'units', 'm', myThid) |
|
./model/src/ini_mnc_vars.F |
106 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('RF', '-_-_--__I__-', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
108 |
INI_MNC_VARS |
& 'R coordinate of cell interface',myThid) |
|
./model/src/ini_mnc_vars.F |
110 |
INI_MNC_VARS |
& 'units', 'm', myThid) |
|
./model/src/ini_mnc_vars.F |
113 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('RL', '-_-_--__L__-', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
115 |
INI_MNC_VARS |
& 'R coordinate of lower interface',myThid) |
|
./model/src/ini_mnc_vars.F |
117 |
INI_MNC_VARS |
& 'units', 'm', myThid) |
|
./model/src/ini_mnc_vars.F |
120 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('RU', '-_-_--__U__-', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
122 |
INI_MNC_VARS |
& 'R coordinate of upper interface',myThid) |
|
./model/src/ini_mnc_vars.F |
124 |
INI_MNC_VARS |
& 'units', 'm', myThid) |
|
./model/src/ini_mnc_vars.F |
129 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('drC', '-_-_--__I__-', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
130 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('drF', '-_-_--__C__-', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
131 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dxC', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
132 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dyC', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
133 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dxF', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
134 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dyF', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
135 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dxG', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
136 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dyG', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
137 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dxV', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
138 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dyU', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
139 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('rA', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
13 |
INI_MNC_VARS |
SUBROUTINE INI_MNC_VARS( myThid ) |
|
./model/src/ini_mnc_vars.F |
140 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('rAw', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
141 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('rAs', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
142 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('rAz', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
143 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('AngleCS','Cen_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
144 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('AngleSN','Cen_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
145 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fCori', 'Cen_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
146 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fCoriG','Cor_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
147 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('R_low', 'Cen_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
148 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Ro_surf','Cen_xy_Hn__-__-',3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
149 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Depth', 'Cen_xy_Hn__-__-', 3,4,myThid) |
|
./model/src/ini_mnc_vars.F |
150 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('HFacC', 'Cen_xy_Hn__C__-', 4,5,myThid) |
|
./model/src/ini_mnc_vars.F |
151 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('HFacW', 'U_xy_Hn__C__-', 4,5,myThid) |
|
./model/src/ini_mnc_vars.F |
152 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('HFacS', 'V_xy_Hn__C__-', 4,5,myThid) |
|
./model/src/ini_mnc_vars.F |
155 |
INI_MNC_VARS |
& 'r cell center separation',myThid) |
|
./model/src/ini_mnc_vars.F |
157 |
INI_MNC_VARS |
& 'r cell face separation',myThid) |
|
./model/src/ini_mnc_vars.F |
159 |
INI_MNC_VARS |
& 'x cell center separation',myThid) |
|
./model/src/ini_mnc_vars.F |
161 |
INI_MNC_VARS |
& 'y cell center separation',myThid) |
|
./model/src/ini_mnc_vars.F |
163 |
INI_MNC_VARS |
& 'x cell face separation',myThid) |
|
./model/src/ini_mnc_vars.F |
165 |
INI_MNC_VARS |
& 'y cell face separation',myThid) |
|
./model/src/ini_mnc_vars.F |
167 |
INI_MNC_VARS |
& 'x cell corner separation',myThid) |
|
./model/src/ini_mnc_vars.F |
169 |
INI_MNC_VARS |
& 'y cell corner separation',myThid) |
|
./model/src/ini_mnc_vars.F |
171 |
INI_MNC_VARS |
& 'x v-velocity separation',myThid) |
|
./model/src/ini_mnc_vars.F |
173 |
INI_MNC_VARS |
& 'y u-velocity separation',myThid) |
|
./model/src/ini_mnc_vars.F |
175 |
INI_MNC_VARS |
& 'r-face area at cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
177 |
INI_MNC_VARS |
& 'r-face area at U point',myThid) |
|
./model/src/ini_mnc_vars.F |
179 |
INI_MNC_VARS |
& 'r-face area at V point',myThid) |
|
./model/src/ini_mnc_vars.F |
181 |
INI_MNC_VARS |
& 'r-face area at cell corner',myThid) |
|
./model/src/ini_mnc_vars.F |
183 |
INI_MNC_VARS |
& 'Cos of grid orientation angle at cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
185 |
INI_MNC_VARS |
& 'Sin of grid orientation angle at cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
187 |
INI_MNC_VARS |
& 'Coriolis f at cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
189 |
INI_MNC_VARS |
& 'Coriolis f at cell corner',myThid) |
|
./model/src/ini_mnc_vars.F |
191 |
INI_MNC_VARS |
& 'base of fluid in r-units',myThid) |
|
./model/src/ini_mnc_vars.F |
193 |
INI_MNC_VARS |
& 'surface reference (at rest) position',myThid) |
|
./model/src/ini_mnc_vars.F |
195 |
INI_MNC_VARS |
& 'fluid thickness in r coordinates (at rest)',myThid) |
|
./model/src/ini_mnc_vars.F |
197 |
INI_MNC_VARS |
& 'vertical fraction of open cell at cell center',myThid) |
|
./model/src/ini_mnc_vars.F |
199 |
INI_MNC_VARS |
& 'vertical fraction of open cell at West face', myThid) |
|
./model/src/ini_mnc_vars.F |
201 |
INI_MNC_VARS |
& 'vertical fraction of open cell at South face',myThid) |
|
./model/src/ini_mnc_vars.F |
205 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('T', '-_-_--__-__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
207 |
INI_MNC_VARS |
& 'long_name','model_time', myThid) |
|
./model/src/ini_mnc_vars.F |
210 |
INI_MNC_VARS |
CALL CAL_GETDATE( -1, startTime, locDate, myThid ) |
|
./model/src/ini_mnc_vars.F |
220 |
INI_MNC_VARS |
& 'units',timeUnits, myThid) |
|
./model/src/ini_mnc_vars.F |
226 |
INI_MNC_VARS |
& 'units','s', myThid) |
|
./model/src/ini_mnc_vars.F |
229 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('iter', '-_-_--__-__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
231 |
INI_MNC_VARS |
& 'long_name','iteration_count', myThid) |
|
./model/src/ini_mnc_vars.F |
233 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('model_time', '-_-_--__-__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
235 |
INI_MNC_VARS |
& 'long_name','Model Time', myThid) |
|
./model/src/ini_mnc_vars.F |
236 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('model_time','units','s', myThid) |
|
./model/src/ini_mnc_vars.F |
238 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('U', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
239 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('U','units','m/s', myThid) |
|
./model/src/ini_mnc_vars.F |
241 |
INI_MNC_VARS |
& 'coordinates','XU YU RC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
243 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('V', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
244 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('V','units','m/s', myThid) |
|
./model/src/ini_mnc_vars.F |
246 |
INI_MNC_VARS |
& 'coordinates','XV YV RC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
248 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Temp', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
249 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Temp','units','degC', myThid) |
|
./model/src/ini_mnc_vars.F |
251 |
INI_MNC_VARS |
& 'potential_temperature', myThid) |
|
./model/src/ini_mnc_vars.F |
253 |
INI_MNC_VARS |
& 'coordinates','XC YC RC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
255 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('S', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
257 |
INI_MNC_VARS |
& 'salinity', myThid) |
|
./model/src/ini_mnc_vars.F |
259 |
INI_MNC_VARS |
& 'coordinates','XC YC RC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
261 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gUnm1', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
262 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gVnm1', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
263 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gTnm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
264 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gSnm1', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
266 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Eta', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
268 |
INI_MNC_VARS |
& 'free-surface_r-anomaly', myThid) |
|
./model/src/ini_mnc_vars.F |
269 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Eta','units','m', myThid) |
|
./model/src/ini_mnc_vars.F |
271 |
INI_MNC_VARS |
& 'coordinates','XC YC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
273 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('EtaH', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
275 |
INI_MNC_VARS |
& 'column-thickness_r-anomaly', myThid) |
|
./model/src/ini_mnc_vars.F |
276 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('EtaH','units','m', myThid) |
|
./model/src/ini_mnc_vars.F |
278 |
INI_MNC_VARS |
& 'coordinates','XC YC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
279 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('dEtaHdt', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
281 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('W', 'Cen_xy_Hn__L__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
282 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('W','units','m/s', myThid) |
|
./model/src/ini_mnc_vars.F |
284 |
INI_MNC_VARS |
& 'coordinates','XC YC RC iter', myThid) |
|
./model/src/ini_mnc_vars.F |
286 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('phiHyd', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
287 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('phiHydLow', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
288 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('phi_nh', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
289 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gW', 'Cen_xy_Hn__L__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
28 |
INI_MNC_VARS |
INTEGER myThid |
|
./model/src/ini_mnc_vars.F |
290 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('gWnm1', 'Cen_xy_Hn__L__t', 4,5, myThid) |
|
./model/src/ini_mnc_vars.F |
311 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fV', 'V_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
312 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('fV','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
314 |
INI_MNC_VARS |
& 'Merid. Planetary Coriolis Acceleration (f x U)', myThid) |
|
./model/src/ini_mnc_vars.F |
316 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fU', 'U_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
317 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('fU','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
319 |
INI_MNC_VARS |
& 'Zonal. Planetary Coriolis Acceleration (f x V)', myThid) |
|
./model/src/ini_mnc_vars.F |
321 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('zV', 'V_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
322 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('zV','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
324 |
INI_MNC_VARS |
& 'Merid. Relative Coriolis Acceleration (Zeta x U)', myThid) |
|
./model/src/ini_mnc_vars.F |
326 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('zU', 'U_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
327 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('zU','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
329 |
INI_MNC_VARS |
& 'Zonal. Relative Coriolis Acceleration (Zeta x V)', myThid) |
|
./model/src/ini_mnc_vars.F |
331 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('KEx','U_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
332 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('KEx','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
334 |
INI_MNC_VARS |
& 'Kinetic Energy Gradient Zonal Acceleration', myThid) |
|
./model/src/ini_mnc_vars.F |
336 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('KEy','V_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
337 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('KEx','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
339 |
INI_MNC_VARS |
& 'Kinetic Energy Gradient Merid. Acceleration', myThid) |
|
./model/src/ini_mnc_vars.F |
341 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Ds', 'Cor_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
342 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Ds','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
344 |
INI_MNC_VARS |
& 'Horiz. Velocity Shear Strain Rate (u_y+v_x)', myThid) |
|
./model/src/ini_mnc_vars.F |
346 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Dt', 'Cen_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
347 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Dt','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
349 |
INI_MNC_VARS |
& 'Horiz. Velocity Tension Rate (u_x-v_y)', myThid) |
|
./model/src/ini_mnc_vars.F |
351 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Du', 'U_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
352 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Du','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
354 |
INI_MNC_VARS |
& 'Explicit Viscous Zonal Acceleration', myThid) |
|
./model/src/ini_mnc_vars.F |
356 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Dv', 'V_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
357 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Dv','units','m/s^2', myThid) |
|
./model/src/ini_mnc_vars.F |
359 |
INI_MNC_VARS |
& 'Explicit Viscous Merid. Acceleration', myThid) |
|
./model/src/ini_mnc_vars.F |
361 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Z3', 'Cor_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
362 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Z3','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
364 |
INI_MNC_VARS |
& 'Vertical Relative Vorticity (v_x-u_y)', myThid) |
|
./model/src/ini_mnc_vars.F |
366 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('W3', 'Cor_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
367 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('W3','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
369 |
INI_MNC_VARS |
& 'Vertical Absolute Vorticity (v_x-u_y+f)', myThid) |
|
./model/src/ini_mnc_vars.F |
371 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('KE', 'Cen_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
372 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('KE','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
374 |
INI_MNC_VARS |
& 'Kinetic Energy of Horiz. Vel. (u^2+v^2)/2', myThid) |
|
./model/src/ini_mnc_vars.F |
376 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('D', 'Cen_xy_Hn__C__t', 0,0, myThid) |
|
./model/src/ini_mnc_vars.F |
377 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('D','units','1/s', myThid) |
|
./model/src/ini_mnc_vars.F |
379 |
INI_MNC_VARS |
& 'Divergence of Horiz. Vel. (u_x+v_y)', myThid) |
|
./model/src/ini_mnc_vars.F |
382 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fu', 'U_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
383 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('fu','units','N/m^2', myThid) |
|
./model/src/ini_mnc_vars.F |
385 |
INI_MNC_VARS |
& 'Zonal surface wind stress', myThid) |
|
./model/src/ini_mnc_vars.F |
387 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('fv', 'V_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
388 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('fv','units','N/m^2', myThid) |
|
./model/src/ini_mnc_vars.F |
390 |
INI_MNC_VARS |
& 'Meridional surface wind stress', myThid) |
|
./model/src/ini_mnc_vars.F |
392 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Qnet', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
393 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Qnet','units','W/m^2', myThid) |
|
./model/src/ini_mnc_vars.F |
396 |
INI_MNC_VARS |
& myThid) |
|
./model/src/ini_mnc_vars.F |
398 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('Qsw', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
399 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('Qsw','units','W/m^2', myThid) |
|
./model/src/ini_mnc_vars.F |
401 |
INI_MNC_VARS |
& 'Net upward shortwave radiation', myThid) |
|
./model/src/ini_mnc_vars.F |
403 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('EmPmR', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
404 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('EmPmR','units','kg/m^2/s', myThid) |
|
./model/src/ini_mnc_vars.F |
406 |
INI_MNC_VARS |
& 'Net upward freshwater flux', myThid) |
|
./model/src/ini_mnc_vars.F |
408 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('saltFlux', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
410 |
INI_MNC_VARS |
& 'psu.kg/m^2/s', myThid) |
|
./model/src/ini_mnc_vars.F |
412 |
INI_MNC_VARS |
& 'Net upward salt flux', myThid) |
|
./model/src/ini_mnc_vars.F |
414 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('SST', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
415 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('SST','units','deg C', myThid) |
|
./model/src/ini_mnc_vars.F |
417 |
INI_MNC_VARS |
& ' Sea surface temperature for relaxation', myThid) |
|
./model/src/ini_mnc_vars.F |
419 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('SSS', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
420 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VATTR_TEXT('SSS','units','psu', myThid) |
|
./model/src/ini_mnc_vars.F |
422 |
INI_MNC_VARS |
& 'Sea surface salinity for relaxation', myThid) |
|
./model/src/ini_mnc_vars.F |
43 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('XC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
45 |
INI_MNC_VARS |
& 'X coordinate of cell center (T-P point)',myThid) |
|
./model/src/ini_mnc_vars.F |
47 |
INI_MNC_VARS |
& 'units', 'degree_east', myThid) |
|
./model/src/ini_mnc_vars.F |
50 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('YC', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
52 |
INI_MNC_VARS |
& 'Y coordinate of cell center (T-P point)',myThid) |
|
./model/src/ini_mnc_vars.F |
54 |
INI_MNC_VARS |
& 'units', 'degree_north', myThid) |
|
./model/src/ini_mnc_vars.F |
57 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('XU', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
59 |
INI_MNC_VARS |
& 'X coordinate of U point',myThid) |
|
./model/src/ini_mnc_vars.F |
61 |
INI_MNC_VARS |
& 'units', 'degree_east', myThid) |
|
./model/src/ini_mnc_vars.F |
64 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('YU', 'U_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
66 |
INI_MNC_VARS |
& 'Y coordinate of U point',myThid) |
|
./model/src/ini_mnc_vars.F |
68 |
INI_MNC_VARS |
& 'units', 'degree_north', myThid) |
|
./model/src/ini_mnc_vars.F |
71 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('XV', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
73 |
INI_MNC_VARS |
& 'X coordinate of V point',myThid) |
|
./model/src/ini_mnc_vars.F |
75 |
INI_MNC_VARS |
& 'units', 'degree_east', myThid) |
|
./model/src/ini_mnc_vars.F |
78 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('YV', 'V_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
80 |
INI_MNC_VARS |
& 'Y coordinate of V point',myThid) |
|
./model/src/ini_mnc_vars.F |
82 |
INI_MNC_VARS |
& 'units', 'degree_north', myThid) |
|
./model/src/ini_mnc_vars.F |
85 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('XG', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
87 |
INI_MNC_VARS |
& 'X coordinate of cell corner (Vorticity point)',myThid) |
|
./model/src/ini_mnc_vars.F |
89 |
INI_MNC_VARS |
& 'units', 'degree_east', myThid) |
|
./model/src/ini_mnc_vars.F |
92 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('YG', 'Cor_xy_Hn__-__-', 3,4, myThid) |
|
./model/src/ini_mnc_vars.F |
94 |
INI_MNC_VARS |
& 'Y coordinate of cell corner (Vorticity point)',myThid) |
|
./model/src/ini_mnc_vars.F |
96 |
INI_MNC_VARS |
& 'units', 'degree_north', myThid) |
|
./model/src/ini_mnc_vars.F |
99 |
INI_MNC_VARS |
CALL MNC_CW_ADD_VNAME('RC', '-_-_--__C__-', 0,0, myThid) |
|
./pkg/thsice/thsice_advdiff.F |
113 |
THSICE_ADVDIFF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_advdiff.F |
114 |
THSICE_ADVDIFF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_advdiff.F |
115 |
THSICE_ADVDIFF |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_advdiff.F |
116 |
THSICE_ADVDIFF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_advdiff.F |
117 |
THSICE_ADVDIFF |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_advdiff.F |
157 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL(iceMask,'SI_AdvFr',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
15 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
162 |
THSICE_ADVDIFF |
I 0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
165 |
THSICE_ADVDIFF |
I 0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
167 |
THSICE_ADVDIFF |
IF ( DIAGNOSTICS_IS_ON('SI_AdvQ1',myThid) .OR. |
|
./pkg/thsice/thsice_advdiff.F |
168 |
THSICE_ADVDIFF |
& DIAGNOSTICS_IS_ON('SI_AdvQ2',myThid) ) THEN |
|
./pkg/thsice/thsice_advdiff.F |
177 |
THSICE_ADVDIFF |
I 0,1,2,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
181 |
THSICE_ADVDIFF |
I 0,1,2,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
213 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
248 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
261 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
279 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
328 |
THSICE_ADVDIFF |
diagSufx = THSICE_DIAG_SUFX( GAD_SI_FRAC, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
330 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( uTrans, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
332 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( vTrans, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
334 |
THSICE_ADVDIFF |
diagSufx = THSICE_DIAG_SUFX( GAD_SI_HSNOW, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
336 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afx, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
338 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afy, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
340 |
THSICE_ADVDIFF |
diagSufx = THSICE_DIAG_SUFX( GAD_SI_HICE, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
342 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( uTrIce, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
344 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( vTrIce, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
359 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
377 |
THSICE_ADVDIFF |
diagSufx = THSICE_DIAG_SUFX( GAD_SI_QICE1, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
379 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afx, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
381 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afy, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
396 |
THSICE_ADVDIFF |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
434 |
THSICE_ADVDIFF |
diagSufx = THSICE_DIAG_SUFX( GAD_SI_QICE2, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
436 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afx, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
438 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL( afy, diagName, 1,1,2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_advdiff.F |
534 |
THSICE_ADVDIFF |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/thsice/thsice_advdiff.F |
537 |
THSICE_ADVDIFF |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/thsice/thsice_advdiff.F |
546 |
THSICE_ADVDIFF |
CALL DIAGNOSTICS_FILL(iceMask,'SI_AdvFr',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
551 |
THSICE_ADVDIFF |
I 0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
554 |
THSICE_ADVDIFF |
I 0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
556 |
THSICE_ADVDIFF |
IF ( DIAGNOSTICS_IS_ON('SI_AdvQ1',myThid) .OR. |
|
./pkg/thsice/thsice_advdiff.F |
557 |
THSICE_ADVDIFF |
& DIAGNOSTICS_IS_ON('SI_AdvQ2',myThid) ) THEN |
|
./pkg/thsice/thsice_advdiff.F |
566 |
THSICE_ADVDIFF |
I 0,1,2,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
570 |
THSICE_ADVDIFF |
I 0,1,2,bi,bj,myThid) |
|
./pkg/thsice/thsice_advdiff.F |
61 |
THSICE_ADVDIFF |
INTEGER myThid |
|
./pkg/thsice/thsice_advection.F |
154 |
THSICE_ADVECTION |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_advection.F |
155 |
THSICE_ADVECTION |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_advection.F |
156 |
THSICE_ADVECTION |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_advection.F |
157 |
THSICE_ADVECTION |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_advection.F |
158 |
THSICE_ADVECTION |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_advection.F |
21 |
THSICE_ADVECTION |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/thsice/thsice_advection.F |
252 |
THSICE_ADVECTION |
& withSigns, maskLocW,maskLocS, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
329 |
THSICE_ADVECTION |
& iceFld, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
332 |
THSICE_ADVECTION |
& iceVol, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
361 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
370 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
374 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
378 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
388 |
THSICE_ADVECTION |
& iceFld, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
391 |
THSICE_ADVECTION |
& iceVol, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
549 |
THSICE_ADVECTION |
& iceFld, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
552 |
THSICE_ADVECTION |
& iceVol, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
581 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
590 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
594 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
598 |
THSICE_ADVECTION |
O af, myThid ) |
|
./pkg/thsice/thsice_advection.F |
607 |
THSICE_ADVECTION |
& iceFld, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
610 |
THSICE_ADVECTION |
& iceVol, bi,bj, myThid ) |
|
./pkg/thsice/thsice_advection.F |
767 |
THSICE_ADVECTION |
& afx,afy, k, standardMessageUnit,bi,bj,myThid ) |
|
./pkg/thsice/thsice_advection.F |
92 |
THSICE_ADVECTION |
INTEGER myThid |
|
./pkg/thsice/thsice_albedo.F |
14 |
THSICE_ALBEDO |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_albedo.F |
178 |
THSICE_ALBEDO |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/thsice/thsice_albedo.F |
182 |
THSICE_ALBEDO |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/thsice/thsice_albedo.F |
63 |
THSICE_ALBEDO |
INTEGER myThid |
|
./pkg/thsice/thsice_ave.F |
100 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
102 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
104 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
10 |
THSICE_AVE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_ave.F |
130 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL(icFlxAtm,'SIflxAtm',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_ave.F |
131 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL(icFrwAtm,'SIfrwAtm',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_ave.F |
136 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL_RS(Qnet, 'SIflx2oc',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_ave.F |
137 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL_RS(EmPmR, 'SIfrw2oc',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_ave.F |
138 |
THSICE_AVE |
CALL DIAGNOSTICS_FILL_RS(saltFlux,'SIsaltFx',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_ave.F |
43 |
THSICE_AVE |
INTEGER myThid |
|
./pkg/thsice/thsice_ave.F |
58 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
61 |
THSICE_AVE |
& 1, 0, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
63 |
THSICE_AVE |
& 1, 0, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
65 |
THSICE_AVE |
& 1, 0, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
67 |
THSICE_AVE |
& 1, 0, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
69 |
THSICE_AVE |
& 1, 0, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
74 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
91 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_ave.F |
93 |
THSICE_AVE |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_balance_frw.F |
117 |
THSICE_BALANCE_FRW |
_BEGIN_MASTER(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
119 |
THSICE_BALANCE_FRW |
_END_MASTER(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
11 |
THSICE_BALANCE_FRW |
I prcAtm, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_balance_frw.F |
121 |
THSICE_BALANCE_FRW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
122 |
THSICE_BALANCE_FRW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
45 |
THSICE_BALANCE_FRW |
INTEGER myThid |
|
./pkg/thsice/thsice_balance_frw.F |
62 |
THSICE_BALANCE_FRW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
63 |
THSICE_BALANCE_FRW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
80 |
THSICE_BALANCE_FRW |
& CALL GLOBAL_SUM_TILE_RL( sumTilePrc, sumPrc, myThid ) |
|
./pkg/thsice/thsice_balance_frw.F |
81 |
THSICE_BALANCE_FRW |
CALL GLOBAL_SUM_TILE_RL( sumTileFrW, sumFrW, myThid ) |
|
./pkg/thsice/thsice_balance_frw.F |
89 |
THSICE_BALANCE_FRW |
_BEGIN_MASTER(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
91 |
THSICE_BALANCE_FRW |
_END_MASTER(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
97 |
THSICE_BALANCE_FRW |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_balance_frw.F |
98 |
THSICE_BALANCE_FRW |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_calc_thickn.F |
1130 |
THSICE_CALC_THICKN |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_calc_thickn.F |
134 |
THSICE_CALC_THICKN |
INTEGER myThid |
|
./pkg/thsice/thsice_calc_thickn.F |
17 |
THSICE_CALC_THICKN |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_calc_thickn.F |
226 |
THSICE_CALC_THICKN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_calc_thickn.F |
227 |
THSICE_CALC_THICKN |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_calc_thickn.F |
228 |
THSICE_CALC_THICKN |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_calc_thickn.F |
229 |
THSICE_CALC_THICKN |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_calc_thickn.F |
230 |
THSICE_CALC_THICKN |
act3 = myThid - 1 |
|
./model/src/ini_model_io.F |
103 |
INI_MODEL_IO |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_model_io.F |
107 |
INI_MODEL_IO |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_model_io.F |
115 |
INI_MODEL_IO |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_model_io.F |
11 |
INI_MODEL_IO |
SUBROUTINE INI_MODEL_IO( myThid ) |
|
./model/src/ini_model_io.F |
145 |
INI_MODEL_IO |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_model_io.F |
161 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
163 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
169 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
175 |
INI_MODEL_IO |
CALL READ_MFLDS_INIT( myThid ) |
|
./model/src/ini_model_io.F |
186 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
192 |
INI_MODEL_IO |
_END_MASTER( myThid ) |
|
./model/src/ini_model_io.F |
198 |
INI_MODEL_IO |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_model_io.F |
203 |
INI_MODEL_IO |
_END_MASTER( myThid ) |
|
./model/src/ini_model_io.F |
211 |
INI_MODEL_IO |
CALL MNC_INIT( myThid ) |
|
./model/src/ini_model_io.F |
213 |
INI_MODEL_IO |
& Nr,myThid ) |
|
./model/src/ini_model_io.F |
219 |
INI_MODEL_IO |
CALL INI_MNC_VARS( myThid ) |
|
./model/src/ini_model_io.F |
224 |
INI_MODEL_IO |
IF ( useAUTODIFF ) CALL AUTODIFF_INI_MODEL_IO( myThid ) |
|
./model/src/ini_model_io.F |
228 |
INI_MODEL_IO |
IF ( usePROFILES ) CALL PROFILES_INI_IO( myThid ) |
|
./model/src/ini_model_io.F |
232 |
INI_MODEL_IO |
IF ( useDiagnostics ) CALL DIAGNOSTICS_INI_IO( myThid ) |
|
./model/src/ini_model_io.F |
237 |
INI_MODEL_IO |
CALL MON_INIT( myThid ) |
|
./model/src/ini_model_io.F |
36 |
INI_MODEL_IO |
INTEGER myThid |
|
./model/src/ini_model_io.F |
56 |
INI_MODEL_IO |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_model_io.F |
80 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
84 |
INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_model_io.F |
85 |
INI_MODEL_IO |
_END_MASTER( myThid ) |
|
./pkg/thsice/thsice_check.F |
108 |
THSICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_check.F |
10 |
THSICE_CHECK |
SUBROUTINE THSICE_CHECK( myThid ) |
|
./pkg/thsice/thsice_check.F |
112 |
THSICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_check.F |
123 |
THSICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_check.F |
128 |
THSICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_check.F |
134 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
139 |
THSICE_CHECK |
_END_MASTER(myThid) |
|
./pkg/thsice/thsice_check.F |
31 |
THSICE_CHECK |
INTEGER myThid |
|
./pkg/thsice/thsice_check.F |
39 |
THSICE_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/thsice/thsice_check.F |
44 |
THSICE_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_check.F |
52 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
55 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
62 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
69 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
78 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
84 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
93 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check.F |
99 |
THSICE_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/thsice/thsice_check_conserv.F |
12 |
THSICE_CHECK_CONSERV |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_check_conserv.F |
42 |
THSICE_CHECK_CONSERV |
INTEGER myThid |
|
./pkg/thsice/thsice_cost_final.F |
33 |
THSICE_COST_FINAL |
INTEGER myThid |
|
./pkg/thsice/thsice_cost_final.F |
48 |
THSICE_COST_FINAL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_cost_final.F |
49 |
THSICE_COST_FINAL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_cost_final.F |
9 |
THSICE_COST_FINAL |
SUBROUTINE THSICE_COST_FINAL( myThid ) |
|
./pkg/thsice/thsice_cost_test.F |
103 |
THSICE_COST_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_cost_test.F |
104 |
THSICE_COST_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_cost_test.F |
118 |
THSICE_COST_TEST |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/thsice/thsice_cost_test.F |
90 |
THSICE_COST_TEST |
do bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_cost_test.F |
91 |
THSICE_COST_TEST |
do bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_diagnostics_init.F |
104 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
111 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
118 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
125 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
133 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
142 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFrcFx, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
149 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFrcFx, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
156 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
163 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
170 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
177 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
184 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
191 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
198 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
223 |
THSICE_DIAGNOSTICS_INIT |
diagSufx = THSICE_DIAG_SUFX( n, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
229 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
235 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
251 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
259 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
267 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
274 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
281 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
296 |
THSICE_DIAGNOSTICS_INIT |
CHARACTER*4 FUNCTION THSICE_DIAG_SUFX( tracerId, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
314 |
THSICE_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/thsice/thsice_diagnostics_init.F |
31 |
THSICE_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/thsice/thsice_diagnostics_init.F |
66 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
75 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
83 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
90 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
97 |
THSICE_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/thsice/thsice_diagnostics_init.F |
9 |
THSICE_DIAGNOSTICS_INIT |
SUBROUTINE THSICE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
105 |
THSICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( tOceMxL,'SItOcMxL', 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
106 |
THSICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( sOceMxL,'SIsOcMxL', 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
10 |
THSICE_DIAGNOSTICS_STATE |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
36 |
THSICE_DIAGNOSTICS_STATE |
INTEGER myThid |
|
./pkg/thsice/thsice_diagnostics_state.F |
54 |
THSICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( iceMask,'SI_Fract', 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
55 |
THSICE_DIAGNOSTICS_STATE |
CALL DIAGNOSTICS_FILL( snowAge,'SIsnwAge', 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
61 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
64 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
67 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
70 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
73 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 0,1,1,myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
76 |
THSICE_DIAGNOSTICS_STATE |
IF ( DIAGNOSTICS_IS_ON('SI_Qice1',myThid) .OR. |
|
./pkg/thsice/thsice_diagnostics_state.F |
77 |
THSICE_DIAGNOSTICS_STATE |
& DIAGNOSTICS_IS_ON('SI_Qice2',myThid) ) THEN |
|
./pkg/thsice/thsice_diagnostics_state.F |
78 |
THSICE_DIAGNOSTICS_STATE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_diagnostics_state.F |
79 |
THSICE_DIAGNOSTICS_STATE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_diagnostics_state.F |
92 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_diagnostics_state.F |
96 |
THSICE_DIAGNOSTICS_STATE |
I 0,1, 2,bi,bj, myThid ) |
|
./pkg/thsice/thsice_diffusion.F |
13 |
THSICE_DIFFUSION |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_diffusion.F |
53 |
THSICE_DIFFUSION |
INTEGER myThid |
|
./pkg/thsice/thsice_do_advect.F |
10 |
THSICE_DO_ADVECT |
I biArg, bjArg, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
123 |
THSICE_DO_ADVECT |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
129 |
THSICE_DO_ADVECT |
& _EXCH_XY_RL( iceMask, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
131 |
THSICE_DO_ADVECT |
& _EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
142 |
THSICE_DO_ADVECT |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
145 |
THSICE_DO_ADVECT |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
43 |
THSICE_DO_ADVECT |
INTEGER myThid |
|
./pkg/thsice/thsice_do_advect.F |
68 |
THSICE_DO_ADVECT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_do_advect.F |
69 |
THSICE_DO_ADVECT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_do_advect.F |
71 |
THSICE_DO_ADVECT |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_do_advect.F |
72 |
THSICE_DO_ADVECT |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_do_advect.F |
73 |
THSICE_DO_ADVECT |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_do_advect.F |
74 |
THSICE_DO_ADVECT |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_do_advect.F |
75 |
THSICE_DO_ADVECT |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_do_advect.F |
85 |
THSICE_DO_ADVECT |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_do_advect.F |
96 |
THSICE_DO_ADVECT |
I bi,bj, myTime, myIter, myThid ) |
|
./model/src/ini_nh_fields.F |
38 |
INI_NH_FIELDS |
INTEGER myThid |
|
./model/src/ini_nh_fields.F |
65 |
INI_NH_FIELDS |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_nh_fields.F |
69 |
INI_NH_FIELDS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_nh_fields.F |
70 |
INI_NH_FIELDS |
_END_MASTER(myThid) |
|
./model/src/ini_nh_fields.F |
75 |
INI_NH_FIELDS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_nh_fields.F |
76 |
INI_NH_FIELDS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_nh_fields.F |
9 |
INI_NH_FIELDS |
SUBROUTINE INI_NH_FIELDS( myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
29 |
THSICE_DO_EXCH |
INTEGER myThid |
|
./pkg/thsice/thsice_do_exch.F |
35 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( iceMask, myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
38 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( iceHeight, myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
39 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( snowHeight, myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
40 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( Qice1, myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
41 |
THSICE_DO_EXCH |
CALL EXCH_XY_RL( Qice2, myThid ) |
|
./pkg/thsice/thsice_do_exch.F |
9 |
THSICE_DO_EXCH |
SUBROUTINE THSICE_DO_EXCH( myThid ) |
|
./pkg/thsice/thsice_extend.F |
135 |
THSICE_EXTEND |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_extend.F |
136 |
THSICE_EXTEND |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_extend.F |
137 |
THSICE_EXTEND |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_extend.F |
138 |
THSICE_EXTEND |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_extend.F |
139 |
THSICE_EXTEND |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_extend.F |
16 |
THSICE_EXTEND |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_extend.F |
239 |
THSICE_EXTEND |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_extend.F |
89 |
THSICE_EXTEND |
INTEGER myThid |
|
./pkg/thsice/thsice_get_bulkf.F |
105 |
THSICE_GET_BULKF |
I iceornot, myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
129 |
THSICE_GET_BULKF |
I iceornot, myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
136 |
THSICE_GET_BULKF |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
17 |
THSICE_GET_BULKF |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_get_bulkf.F |
63 |
THSICE_GET_BULKF |
INTEGER myThid |
|
./pkg/thsice/thsice_get_exf.F |
17 |
THSICE_GET_EXF |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_get_exf.F |
213 |
THSICE_GET_EXF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
214 |
THSICE_GET_EXF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_get_exf.F |
215 |
THSICE_GET_EXF |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
216 |
THSICE_GET_EXF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_get_exf.F |
217 |
THSICE_GET_EXF |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_get_exf.F |
283 |
THSICE_GET_EXF |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
284 |
THSICE_GET_EXF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_get_exf.F |
285 |
THSICE_GET_EXF |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_get_exf.F |
286 |
THSICE_GET_EXF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_get_exf.F |
287 |
THSICE_GET_EXF |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_get_exf.F |
74 |
THSICE_GET_EXF |
INTEGER myThid |
|
./pkg/thsice/thsice_get_ocean.F |
13 |
THSICE_GET_OCEAN |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_get_ocean.F |
49 |
THSICE_GET_OCEAN |
INTEGER myThid |
|
./pkg/thsice/thsice_get_precip.F |
18 |
THSICE_GET_PRECIP |
I iMin,iMax,jMin,jMax, bi,bj, myThid ) |
|
./pkg/thsice/thsice_get_precip.F |
63 |
THSICE_GET_PRECIP |
INTEGER myThid |
|
./pkg/thsice/thsice_get_velocity.F |
16 |
THSICE_GET_VELOCITY |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_get_velocity.F |
52 |
THSICE_GET_VELOCITY |
INTEGER myThid |
|
./pkg/thsice/thsice_impl_temp.F |
111 |
THSICE_IMPL_TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_impl_temp.F |
11 |
THSICE_IMPL_TEMP |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/thsice/thsice_impl_temp.F |
50 |
THSICE_IMPL_TEMP |
INTEGER myThid |
|
./pkg/thsice/thsice_ini_vars.F |
119 |
THSICE_INI_VARS |
CALL THSICE_READ_PICKUP( nIter0, myThid ) |
|
./pkg/thsice/thsice_ini_vars.F |
124 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceFract_InitFile,iceMask,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
127 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceThick_InitFile,iceHeight,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
12 |
THSICE_INI_VARS |
SUBROUTINE THSICE_INI_VARS( myThid ) |
|
./pkg/thsice/thsice_ini_vars.F |
130 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceSnowH_InitFile,snowHeight,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
133 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceSnowA_InitFile,snowAge,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
136 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceEnthp_InitFile,Qice1,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
137 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceEnthp_InitFile,Qice2,2,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
140 |
THSICE_INI_VARS |
CALL READ_REC_XY_RL(thSIceTsurf_InitFile,Tsrf,1,0,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
147 |
THSICE_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
148 |
THSICE_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
163 |
THSICE_INI_VARS |
_EXCH_XY_RL(iceMask,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
164 |
THSICE_INI_VARS |
_EXCH_XY_RL(iceHeight, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
165 |
THSICE_INI_VARS |
_EXCH_XY_RL(snowHeight,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
166 |
THSICE_INI_VARS |
_EXCH_XY_RL(Tsrf, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
167 |
THSICE_INI_VARS |
_EXCH_XY_RL(Tice1, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
168 |
THSICE_INI_VARS |
_EXCH_XY_RL(Tice2, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
169 |
THSICE_INI_VARS |
_EXCH_XY_RL(Qice1, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
170 |
THSICE_INI_VARS |
_EXCH_XY_RL(Qice2, myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
171 |
THSICE_INI_VARS |
_EXCH_XY_RL(snowAge,myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
175 |
THSICE_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
176 |
THSICE_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
38 |
THSICE_INI_VARS |
INTEGER myThid |
|
./pkg/thsice/thsice_ini_vars.F |
52 |
THSICE_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_ini_vars.F |
53 |
THSICE_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_init_fixed.F |
30 |
THSICE_INIT_FIXED |
INTEGER myThid |
|
./pkg/thsice/thsice_init_fixed.F |
38 |
THSICE_INIT_FIXED |
CALL THSICE_MNC_INIT( myThid ) |
|
./pkg/thsice/thsice_init_fixed.F |
44 |
THSICE_INIT_FIXED |
CALL THSICE_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/thsice/thsice_init_fixed.F |
9 |
THSICE_INIT_FIXED |
SUBROUTINE THSICE_INIT_FIXED( myThid ) |
|
./model/src/ini_nh_vars.F |
30 |
INI_NH_VARS |
INTEGER myThid |
|
./model/src/ini_nh_vars.F |
44 |
INI_NH_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_nh_vars.F |
45 |
INI_NH_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_nh_vars.F |
9 |
INI_NH_VARS |
SUBROUTINE INI_NH_VARS ( myThid ) |
|
./pkg/thsice/thsice_main.F |
122 |
THSICE_MAIN |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
158 |
THSICE_MAIN |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
15 |
THSICE_MAIN |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
168 |
THSICE_MAIN |
I iMin,iMax,jMin,jMax, bi,bj, myThid ) |
|
./pkg/thsice/thsice_main.F |
177 |
THSICE_MAIN |
I iMin,iMax,jMin,jMax, bi,bj, myThid ) |
|
./pkg/thsice/thsice_main.F |
192 |
THSICE_MAIN |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
224 |
THSICE_MAIN |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
251 |
THSICE_MAIN |
I prcAtm, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
261 |
THSICE_MAIN |
CALL THSICE_DO_EXCH( myThid ) |
|
./pkg/thsice/thsice_main.F |
265 |
THSICE_MAIN |
& _EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/thsice/thsice_main.F |
271 |
THSICE_MAIN |
I 0, 0, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
273 |
THSICE_MAIN |
_EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/thsice/thsice_main.F |
277 |
THSICE_MAIN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_main.F |
278 |
THSICE_MAIN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_main.F |
280 |
THSICE_MAIN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_main.F |
281 |
THSICE_MAIN |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_main.F |
282 |
THSICE_MAIN |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_main.F |
283 |
THSICE_MAIN |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_main.F |
284 |
THSICE_MAIN |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_main.F |
300 |
THSICE_MAIN |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_main.F |
55 |
THSICE_MAIN |
INTEGER myThid |
|
./pkg/thsice/thsice_main.F |
85 |
THSICE_MAIN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_main.F |
86 |
THSICE_MAIN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_main.F |
89 |
THSICE_MAIN |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_main.F |
90 |
THSICE_MAIN |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_main.F |
91 |
THSICE_MAIN |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_main.F |
92 |
THSICE_MAIN |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_main.F |
93 |
THSICE_MAIN |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_map_exf.F |
15 |
THSICE_MAP_EXF |
I iMin,iMax,jMin,jMax, bi,bj, myThid ) |
|
./pkg/thsice/thsice_map_exf.F |
59 |
THSICE_MAP_EXF |
INTEGER myThid |
|
./pkg/thsice/thsice_mnc_init.F |
101 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('sMxL_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
102 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('sMxL_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
12 |
THSICE_MNC_INIT |
SUBROUTINE THSICE_MNC_INIT( myThid ) |
|
./pkg/thsice/thsice_mnc_init.F |
21 |
THSICE_MNC_INIT |
INTEGER myThid |
|
./pkg/thsice/thsice_mnc_init.F |
27 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('iceMask','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
28 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('iceMask','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
30 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('iceHeight','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
31 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('iceHeight','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
33 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('snowHeight','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
34 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('snowHeight','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
36 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tsrf','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
37 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tsrf','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
39 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tice1','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
40 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tice1','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
42 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tice2','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
43 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tice2','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
45 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Qice1','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
46 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Qice1','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
48 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Qice2','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
49 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Qice2','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
51 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('snowAge','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
52 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('snowAge','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
54 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tOceMxL','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
55 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('tOceMxL','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
57 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('sOceMxL','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
58 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('sOceMxL','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
62 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('fract_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
63 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('fract_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
65 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('iceH_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
66 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('iceH_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
68 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('snowH_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
69 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('snowH_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
71 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tsrf_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
72 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tsrf','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
74 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tice1_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
75 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tice1','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
77 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('Tice2_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
78 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('Tice2','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
80 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('snowPr_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
81 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('snowPr_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
83 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('albedo_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
84 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('albedo_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
86 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('flx2oc_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
87 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('flx2oc_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
89 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('frw2oc_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
90 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('frw2oc_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
92 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('flxAtm_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
93 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('flxAtm_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
95 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('frwAtm_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
96 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('frwAtm_ave','units','---', myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
98 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VNAME('tMxL_ave','Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/thsice/thsice_mnc_init.F |
99 |
THSICE_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('tMxL_ave','units','---', myThid) |
|
./pkg/thsice/thsice_monitor.F |
116 |
THSICE_MONITOR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_monitor.F |
117 |
THSICE_MONITOR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_monitor.F |
126 |
THSICE_MONITOR |
CALL MON_SET_PREF('thSI_',myThid) |
|
./pkg/thsice/thsice_monitor.F |
127 |
THSICE_MONITOR |
CALL MON_OUT_RL('time_sec', myTime,mon_string_none,myThid) |
|
./pkg/thsice/thsice_monitor.F |
134 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
140 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theVolG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
141 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theVol(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
142 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theVol(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
144 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
145 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
146 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
148 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
149 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
156 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
163 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
164 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
165 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
167 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
168 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
175 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
181 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
182 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
183 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
185 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
186 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
188 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
189 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
192 |
THSICE_MONITOR |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_monitor.F |
193 |
THSICE_MONITOR |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_monitor.F |
207 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
217 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
218 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
219 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
221 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
222 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
224 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
225 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
232 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
237 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMeanG , mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
238 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
239 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var,theMean(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
241 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
242 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMin(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
244 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(1), mon_sufx(1), myThid) |
|
./pkg/thsice/thsice_monitor.F |
245 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theMax(2), mon_sufx(2), myThid) |
|
./pkg/thsice/thsice_monitor.F |
251 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
255 |
THSICE_MONITOR |
I myThid ) |
|
./pkg/thsice/thsice_monitor.F |
258 |
THSICE_MONITOR |
CALL MON_OUT_RL(mon_var, theEnergy, mon_sufx(0), myThid) |
|
./pkg/thsice/thsice_monitor.F |
266 |
THSICE_MONITOR |
CALL MON_OUT_RL('adjustFrW',adjustFrW,mon_string_none,myThid) |
|
./pkg/thsice/thsice_monitor.F |
269 |
THSICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/thsice/thsice_monitor.F |
35 |
THSICE_MONITOR |
INTEGER myThid |
|
./pkg/thsice/thsice_monitor.F |
74 |
THSICE_MONITOR |
IF ( MASTER_CPU_IO(myThid) ) THEN |
|
./pkg/thsice/thsice_monitor.F |
90 |
THSICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, -1, myThid) |
|
./pkg/thsice/thsice_monitor.F |
92 |
THSICE_MONITOR |
& 'I',mon_fname,1,1,'iter', myIter, myThid) |
|
./pkg/thsice/thsice_monitor.F |
93 |
THSICE_MONITOR |
CALL MNC_CW_SET_UDIM(mon_fname, 0, myThid) |
|
./pkg/thsice/thsice_monitor.F |
95 |
THSICE_MONITOR |
& 'D',mon_fname,1,1,'T', myTime, myThid) |
|
./pkg/thsice/thsice_monitor.F |
9 |
THSICE_MONITOR |
SUBROUTINE THSICE_MONITOR( myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
101 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
103 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
107 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
111 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
125 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
127 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
129 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
132 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
134 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
138 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
140 |
THSICE_OUTPUT |
& bi,bj,myThid) |
|
./pkg/thsice/thsice_output.F |
154 |
THSICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
158 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_fract_Ave, 1, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
159 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_iceH_Ave, 2, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
160 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_snowH_Ave, 3, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
161 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tsrf_Ave, 4, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
162 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tice1_Ave, 5, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
163 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_Tice2_Ave, 6, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
165 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_albedo_Ave, 7, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
166 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_flx2oc_Ave, 8, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
167 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_frw2oc_Ave, 9, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
169 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL( fn, ice_salFx_Ave, kl, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
172 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_flxAtm_Ave,kl, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
174 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_frwAtm_Ave,kl, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
178 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_tMxL_Ave, kl, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
180 |
THSICE_OUTPUT |
CALL WRITE_REC_XY_RL(fn, ice_sMxL_Ave, kl, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
198 |
THSICE_OUTPUT |
CALL MNC_CW_SET_UDIM(mncf, -1, myThid) |
|
./pkg/thsice/thsice_output.F |
199 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W_S('D',mncf,0,0,'T', myTime, myThid) |
|
./pkg/thsice/thsice_output.F |
200 |
THSICE_OUTPUT |
CALL MNC_CW_SET_UDIM(mncf, 0, myThid) |
|
./pkg/thsice/thsice_output.F |
201 |
THSICE_OUTPUT |
CALL MNC_CW_I_W_S('I',mncf,0,0,'iter', myIter, myThid) |
|
./pkg/thsice/thsice_output.F |
203 |
THSICE_OUTPUT |
& 'fract_ave', ice_fract_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
205 |
THSICE_OUTPUT |
& 'iceH_ave', ice_iceH_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
207 |
THSICE_OUTPUT |
& 'snowH_ave', ice_snowH_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
209 |
THSICE_OUTPUT |
& 'Tsrf_ave', ice_Tsrf_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
211 |
THSICE_OUTPUT |
& 'Tice1_ave', ice_Tice1_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
213 |
THSICE_OUTPUT |
& 'Tice2_ave', ice_Tice2_Ave, myThid) |
|
./pkg/thsice/thsice_output.F |
217 |
THSICE_OUTPUT |
& 'albedo_ave',ice_albedo_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
219 |
THSICE_OUTPUT |
& 'flx2oc_ave',ice_flx2oc_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
221 |
THSICE_OUTPUT |
& 'frw2oc_ave',ice_frw2oc_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
224 |
THSICE_OUTPUT |
& 'flxAtm_ave',ice_flxAtm_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
226 |
THSICE_OUTPUT |
& 'frwAtm_ave',ice_frwAtm_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
229 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'tMxL_ave',ice_tMxL_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
230 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'sMxL_ave',ice_sMxL_Ave,myThid) |
|
./pkg/thsice/thsice_output.F |
237 |
THSICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_output.F |
238 |
THSICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_output.F |
239 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_fract_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
240 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_iceH_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
241 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_snowH_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
242 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tsrf_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
243 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tice1_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
244 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tice2_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
246 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_flx2oc_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
247 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_frw2oc_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
248 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_salFx_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
249 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_flxAtm_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
250 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_frwAtm_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
251 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_albedo_Ave, 1, bi,bj, myThid) |
|
./pkg/thsice/thsice_output.F |
252 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_tMxL_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
253 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_sMxL_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
277 |
THSICE_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
281 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
283 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
285 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
287 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
289 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
291 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
293 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
295 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
297 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
300 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
302 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
306 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
308 |
THSICE_OUTPUT |
& myIter,myThid) |
|
./pkg/thsice/thsice_output.F |
326 |
THSICE_OUTPUT |
CALL MNC_CW_SET_UDIM(mncf, -1, myThid) |
|
./pkg/thsice/thsice_output.F |
327 |
THSICE_OUTPUT |
CALL MNC_CW_I_W_S('I',mncf,0,0,'iter', myIter, myThid) |
|
./pkg/thsice/thsice_output.F |
328 |
THSICE_OUTPUT |
CALL MNC_CW_SET_UDIM(mncf, 0, myThid) |
|
./pkg/thsice/thsice_output.F |
329 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W_S('D',mncf,0,0,'T', myTime, myThid) |
|
./pkg/thsice/thsice_output.F |
330 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'iceMask', iceMask, myThid) |
|
./pkg/thsice/thsice_output.F |
331 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'iceHeight', iceHeight, myThid) |
|
./pkg/thsice/thsice_output.F |
332 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'snowHeight',snowHeight,myThid) |
|
./pkg/thsice/thsice_output.F |
333 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Tsrf', Tsrf, myThid) |
|
./pkg/thsice/thsice_output.F |
334 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Tice1', Tice1, myThid) |
|
./pkg/thsice/thsice_output.F |
335 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Tice2', Tice1, myThid) |
|
./pkg/thsice/thsice_output.F |
336 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice1', Qice1, myThid) |
|
./pkg/thsice/thsice_output.F |
337 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'Qice2', Qice2, myThid) |
|
./pkg/thsice/thsice_output.F |
338 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'snowAge', snowAge, myThid) |
|
./pkg/thsice/thsice_output.F |
340 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'tOceMxL',tOceMxL,myThid) |
|
./pkg/thsice/thsice_output.F |
341 |
THSICE_OUTPUT |
CALL MNC_CW_RL_W(pf,mncf,0,0,'sOceMxL',sOceMxL,myThid) |
|
./pkg/thsice/thsice_output.F |
350 |
THSICE_OUTPUT |
& CALL THSICE_MONITOR( myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_output.F |
39 |
THSICE_OUTPUT |
INTEGER myThid |
|
./pkg/thsice/thsice_output.F |
64 |
THSICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_output.F |
65 |
THSICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_output.F |
66 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_fract_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
67 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_iceH_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
68 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_snowH_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
69 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tsrf_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
70 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tice1_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
71 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_Tice2_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
73 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_flx2oc_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
74 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_frw2oc_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
75 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_salFx_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
76 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_flxAtm_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
77 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_frwAtm_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
78 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_albedo_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
79 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_tMxL_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
80 |
THSICE_OUTPUT |
CALL TIMEAVE_RESET(ice_sMxL_Ave, 1, bi, bj, myThid) |
|
./pkg/thsice/thsice_output.F |
91 |
THSICE_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/thsice/thsice_output.F |
92 |
THSICE_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_output.F |
95 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
97 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
99 |
THSICE_OUTPUT |
& ice_fract_Ave, 1, bi, bj, myThid ) |
|
./pkg/thsice/thsice_output.F |
9 |
THSICE_OUTPUT |
SUBROUTINE THSICE_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
31 |
THSICE_READ_PICKUP |
INTEGER myThid |
|
./pkg/thsice/thsice_read_pickup.F |
48 |
THSICE_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
54 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, iceMask, 1, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
55 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, iceHeight,2, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
56 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1,snowHeight,3, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
57 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Tsrf, 4, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
58 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Tice1, 5, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
59 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Tice2, 6, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
60 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Qice1, 7, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
61 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, Qice2, 8, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
62 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, 1, snowAge, 9, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
65 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,1, tOceMxL, 10, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
66 |
THSICE_READ_PICKUP |
CALL READ_REC_3D_RL( fn,prec,1, sOceMxL, 11, myIter,myThid ) |
|
./pkg/thsice/thsice_read_pickup.F |
74 |
THSICE_READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
75 |
THSICE_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
76 |
THSICE_READ_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
77 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'iceMask', iceMask, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
78 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'iceHeight', iceHeight, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
79 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'snowHeight',snowHeight,myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
80 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Tsrf', Tsrf, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
81 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Tice1', Tice1, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
82 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Tice2', Tice1, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
83 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Qice1', Qice1, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
84 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Qice2', Qice2, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
85 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'snowAge', snowAge, myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
87 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'tOceMxL',tOceMxL,myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
88 |
THSICE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'sOceMxL',sOceMxL,myThid) |
|
./pkg/thsice/thsice_read_pickup.F |
9 |
THSICE_READ_PICKUP |
SUBROUTINE THSICE_READ_PICKUP( myIter, myThid ) |
|
./pkg/thsice/thsice_readparms.F |
105 |
THSICE_READPARMS |
I myThid ) |
|
./pkg/thsice/thsice_readparms.F |
264 |
THSICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_readparms.F |
268 |
THSICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_readparms.F |
275 |
THSICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_readparms.F |
279 |
THSICE_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/thsice/thsice_readparms.F |
354 |
THSICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/thsice/thsice_readparms.F |
38 |
THSICE_READPARMS |
INTEGER myThid |
|
./pkg/thsice/thsice_readparms.F |
88 |
THSICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/thsice/thsice_readparms.F |
92 |
THSICE_READPARMS |
_END_MASTER(myThid) |
|
./pkg/thsice/thsice_readparms.F |
96 |
THSICE_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/thsice/thsice_readparms.F |
9 |
THSICE_READPARMS |
SUBROUTINE THSICE_READPARMS( myThid ) |
|
./pkg/thsice/thsice_reshape_layers.F |
11 |
THSICE_RESHAPE_LAYERS |
I hlyr, hnew, myThid ) |
|
./pkg/thsice/thsice_reshape_layers.F |
39 |
THSICE_RESHAPE_LAYERS |
INTEGER myThid |
|
./pkg/thsice/thsice_salt_plume.F |
16 |
THSICE_SALT_PLUME |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_salt_plume.F |
57 |
THSICE_SALT_PLUME |
INTEGER myThid |
|
./pkg/thsice/thsice_slab_ocean.F |
12 |
THSICE_SLAB_OCEAN |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_slab_ocean.F |
149 |
THSICE_SLAB_OCEAN |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_slab_ocean.F |
151 |
THSICE_SLAB_OCEAN |
& 1, thSIce_deltaT, bi, bj, myThid ) |
|
./pkg/thsice/thsice_slab_ocean.F |
166 |
THSICE_SLAB_OCEAN |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_slab_ocean.F |
56 |
THSICE_SLAB_OCEAN |
INTEGER myIter, myThid |
|
./model/src/ini_nlfs_vars.F |
10 |
INI_NLFS_VARS |
SUBROUTINE INI_NLFS_VARS( myThid ) |
|
./model/src/ini_nlfs_vars.F |
134 |
INI_NLFS_VARS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_nlfs_vars.F |
135 |
INI_NLFS_VARS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_nlfs_vars.F |
164 |
INI_NLFS_VARS |
CALL EXCH_XY_RL( Rmin_surf, myThid ) |
|
./model/src/ini_nlfs_vars.F |
170 |
INI_NLFS_VARS |
IF (debugMode) CALL DEBUG_LEAVE('INI_NLFS_VARS',myThid) |
|
./model/src/ini_nlfs_vars.F |
31 |
INI_NLFS_VARS |
INTEGER myThid |
|
./model/src/ini_nlfs_vars.F |
51 |
INI_NLFS_VARS |
IF (debugMode) CALL DEBUG_ENTER('INI_NLFS_VARS',myThid) |
|
./model/src/ini_nlfs_vars.F |
54 |
INI_NLFS_VARS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_nlfs_vars.F |
55 |
INI_NLFS_VARS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/thsice/thsice_solve4temp.F |
124 |
THSICE_SOLVE4TEMP |
INTEGER myThid |
|
./pkg/thsice/thsice_solve4temp.F |
195 |
THSICE_SOLVE4TEMP |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_solve4temp.F |
196 |
THSICE_SOLVE4TEMP |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_solve4temp.F |
197 |
THSICE_SOLVE4TEMP |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_solve4temp.F |
198 |
THSICE_SOLVE4TEMP |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_solve4temp.F |
199 |
THSICE_SOLVE4TEMP |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_solve4temp.F |
22 |
THSICE_SOLVE4TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
351 |
THSICE_SOLVE4TEMP |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
382 |
THSICE_SOLVE4TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
390 |
THSICE_SOLVE4TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
444 |
THSICE_SOLVE4TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
452 |
THSICE_SOLVE4TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_solve4temp.F |
551 |
THSICE_SOLVE4TEMP |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
115 |
THSICE_STEP_FWD |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_step_fwd.F |
116 |
THSICE_STEP_FWD |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_step_fwd.F |
117 |
THSICE_STEP_FWD |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_step_fwd.F |
118 |
THSICE_STEP_FWD |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_step_fwd.F |
119 |
THSICE_STEP_FWD |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_step_fwd.F |
15 |
THSICE_STEP_FWD |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
185 |
THSICE_STEP_FWD |
CALL DIAGNOSTICS_FILL(iceMask,'SI_FrcFx',0,1,1,bi,bj,myThid) |
|
./pkg/thsice/thsice_step_fwd.F |
189 |
THSICE_STEP_FWD |
I 'SIsnwPrc', 0,1,2,bi,bj,myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
191 |
THSICE_STEP_FWD |
I 'SIalbedo', 0,1,1,bi,bj,myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
251 |
THSICE_STEP_FWD |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
340 |
THSICE_STEP_FWD |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
394 |
THSICE_STEP_FWD |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
445 |
THSICE_STEP_FWD |
I isIceFree, myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_fwd.F |
76 |
THSICE_STEP_FWD |
INTEGER myThid |
|
./pkg/thsice/thsice_step_temp.F |
11 |
THSICE_STEP_TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_temp.F |
128 |
THSICE_STEP_TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_temp.F |
185 |
THSICE_STEP_TEMP |
I myTime, myIter, myThid ) |
|
./pkg/thsice/thsice_step_temp.F |
62 |
THSICE_STEP_TEMP |
INTEGER myThid |
|
./pkg/thsice/thsice_step_temp.F |
87 |
THSICE_STEP_TEMP |
act1 = bi - myBxLo(myThid) |
|
./pkg/thsice/thsice_step_temp.F |
88 |
THSICE_STEP_TEMP |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/thsice/thsice_step_temp.F |
89 |
THSICE_STEP_TEMP |
act2 = bj - myByLo(myThid) |
|
./pkg/thsice/thsice_step_temp.F |
90 |
THSICE_STEP_TEMP |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/thsice/thsice_step_temp.F |
91 |
THSICE_STEP_TEMP |
act3 = myThid - 1 |
|
./pkg/thsice/thsice_test_addfluid.h |
14 |
NO PROCEDURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/thsice/thsice_test_addfluid.h |
15 |
NO PROCEDURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/thsice/thsice_turnoff_io.F |
37 |
THSICE_TURNOFF_IO |
INTEGER myThid |
|
./pkg/thsice/thsice_turnoff_io.F |
45 |
THSICE_TURNOFF_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/thsice/thsice_turnoff_io.F |
53 |
THSICE_TURNOFF_IO |
_END_MASTER( myThid ) |
|
./pkg/thsice/thsice_turnoff_io.F |
9 |
THSICE_TURNOFF_IO |
SUBROUTINE THSICE_TURNOFF_IO( seqFlag, myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
101 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'tOceMxL',tOceMxL,myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
102 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'sOceMxL',sOceMxL,myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
39 |
THSICE_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/thsice/thsice_write_pickup.F |
57 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, iceMask, 1, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
58 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, iceHeight,2, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
59 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1,snowHeight,3, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
60 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Tsrf, 4, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
61 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Tice1, 5, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
62 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Tice2, 6, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
63 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Qice1, 7, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
64 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, Qice2, 8, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
65 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec, 1, snowAge, 9, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
68 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec,1, tOceMxL, 10, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
69 |
THSICE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn,prec,1, sOceMxL, 11, myIter,myThid ) |
|
./pkg/thsice/thsice_write_pickup.F |
81 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 0, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
83 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
85 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
88 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
89 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
91 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'iceMask', iceMask, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
92 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'iceHeight', iceHeight, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
93 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'snowHeight',snowHeight,myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
94 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Tsrf', Tsrf, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
95 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Tice1', Tice1, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
96 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Tice2', Tice1, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
97 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Qice1', Qice1, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
98 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Qice2', Qice2, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
99 |
THSICE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'snowAge', snowAge, myThid) |
|
./pkg/thsice/thsice_write_pickup.F |
9 |
THSICE_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_cumul_1k1t.F |
31 |
TIMEAVE_CUMUL_1K1T |
INTEGER k, bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_1k1t.F |
9 |
TIMEAVE_CUMUL_1K1T |
I Ksize, k, bi, bj, myThid ) |
|
./pkg/timeave/timeave_cumul_1t.F |
29 |
TIMEAVE_CUMUL_1T |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_1t.F |
9 |
TIMEAVE_CUMUL_1T |
I bi, bj, myThid ) |
|
./eesupp/src/check_threads.F |
103 |
CHECK_THREADS |
threadIsRunning(myThid) = .TRUE. |
|
./eesupp/src/check_threads.F |
104 |
CHECK_THREADS |
IF ( myThid.EQ.1 ) THEN |
|
./eesupp/src/check_threads.F |
10 |
CHECK_THREADS |
SUBROUTINE CHECK_THREADS( myThid ) |
|
./eesupp/src/check_threads.F |
117 |
CHECK_THREADS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/check_threads.F |
128 |
CHECK_THREADS |
threadIsRunning(myThid) = .TRUE. |
|
./eesupp/src/check_threads.F |
139 |
CHECK_THREADS |
thError(myThid) = .TRUE. |
|
./eesupp/src/check_threads.F |
144 |
CHECK_THREADS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/check_threads.F |
151 |
CHECK_THREADS |
IF ( myThid .EQ. 1 ) THEN |
|
./eesupp/src/check_threads.F |
168 |
CHECK_THREADS |
CALL BAR_CHECK( 1, myThid ) |
|
./eesupp/src/check_threads.F |
44 |
CHECK_THREADS |
INTEGER myThid |
|
./eesupp/src/check_threads.F |
82 |
CHECK_THREADS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/check_threads.F |
85 |
CHECK_THREADS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/check_threads.F |
86 |
CHECK_THREADS |
thError(myThid) = .TRUE. |
|
./eesupp/src/check_threads.F |
88 |
CHECK_THREADS |
IF ( myThid.EQ.1 ) THEN |
|
./model/src/ini_p_ground.F |
103 |
INI_P_GROUND |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_p_ground.F |
104 |
INI_P_GROUND |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_p_ground.F |
12 |
INI_P_GROUND |
I myThid ) |
|
./model/src/ini_p_ground.F |
152 |
INI_P_GROUND |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_p_ground.F |
156 |
INI_P_GROUND |
& tmpVar(1,j), nLevHvR, myThid ) |
|
./model/src/ini_p_ground.F |
162 |
INI_P_GROUND |
_END_MASTER( myThid ) |
|
./model/src/ini_p_ground.F |
173 |
INI_P_GROUND |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_p_ground.F |
174 |
INI_P_GROUND |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_p_ground.F |
185 |
INI_P_GROUND |
& thetaHvR, nLevHvR, myThid ) |
|
./model/src/ini_p_ground.F |
209 |
INI_P_GROUND |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_p_ground.F |
213 |
INI_P_GROUND |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_p_ground.F |
265 |
INI_P_GROUND |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_p_ground.F |
266 |
INI_P_GROUND |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_p_ground.F |
333 |
INI_P_GROUND |
& thetaHvR, kLev, myThid ) |
|
./model/src/ini_p_ground.F |
368 |
ANALYLIC_THETA |
I kSize, myThid ) |
|
./model/src/ini_p_ground.F |
399 |
ANALYLIC_THETA |
INTEGER myThid |
|
./model/src/ini_p_ground.F |
42 |
INI_P_GROUND |
INTEGER myThid |
|
./model/src/ini_p_ground.F |
84 |
INI_P_GROUND |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/timeave/timeave_cumul_1vfc.F |
32 |
TIMEAVE_CUMUL_1VFC |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_1vfc.F |
9 |
TIMEAVE_CUMUL_1VFC |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_cumul_2v.F |
36 |
TIMEAVE_CUMUL_2V |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_2v.F |
9 |
TIMEAVE_CUMUL_2V |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_cumul_2vfc.F |
38 |
TIMEAVE_CUMUL_2VFC |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_2vfc.F |
9 |
TIMEAVE_CUMUL_2VFC |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_cumul_dif_1t.F |
33 |
TIMEAVE_CUMUL_DIF_1T |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumul_dif_1t.F |
9 |
TIMEAVE_CUMUL_DIF_1T |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_cumulate.F |
29 |
TIMEAVE_CUMULATE |
INTEGER bi, bj, myThid |
|
./pkg/timeave/timeave_cumulate.F |
9 |
TIMEAVE_CUMULATE |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_init_fixed.F |
100 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('UStave', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
101 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('UStave','units','psu*m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
103 |
TIMEAVE_INIT_FIXED |
& 'Zonal velocity and Salinity t-ave product', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
105 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('VStave', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
106 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('VStave','units','psu*m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
108 |
TIMEAVE_INIT_FIXED |
& 'Merid velocity and Salinity t-ave product', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
10 |
TIMEAVE_INIT_FIXED |
SUBROUTINE TIMEAVE_INIT_FIXED( myThid ) |
|
./pkg/timeave/timeave_init_fixed.F |
110 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('WStave', 'Cen_xy_Hn__L__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
111 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('WStave','units','psu*m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
113 |
TIMEAVE_INIT_FIXED |
& 'Vert velocity and Salinity t-ave product', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
115 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('TTtave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
116 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('TTtave','units','degC^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
118 |
TIMEAVE_INIT_FIXED |
& 'Potl Temp Squared t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
120 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('UUtave', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
121 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('UUtave','units','m^2/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
123 |
TIMEAVE_INIT_FIXED |
& 'Zonal Vel. Squared t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
125 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('VVtave', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
126 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('VVtave','units','m^2/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
128 |
TIMEAVE_INIT_FIXED |
& 'Merid Vel. Squared t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
130 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('UVtave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
131 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('UVtave','units','m^2/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
133 |
TIMEAVE_INIT_FIXED |
& 'Horiz. Vel. Product t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
135 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('KEtave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
136 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('KEtave','units','m^2/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
138 |
TIMEAVE_INIT_FIXED |
& 'Kinetic Energy t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
140 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('Tdiftave', 'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
142 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('uZtave', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
143 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('uZtave','units','m/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
145 |
TIMEAVE_INIT_FIXED |
& 'Zonal Vel. and Rel. Vorticity Product t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
147 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('vZtave', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
148 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('vZtave','units','m/s^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
150 |
TIMEAVE_INIT_FIXED |
& 'Merid Vel. and Rel. Vorticity Product t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
152 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('PhHytave', 'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
154 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('PHLtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
155 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('PHL2tave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
157 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('Convtave', 'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
159 |
TIMEAVE_INIT_FIXED |
& 'Convection t-ave', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
161 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('uFluxtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
162 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('vFluxtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
163 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('tFluxtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
164 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('sFluxtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
166 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('hUtave', 'U_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
167 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('hVtave', 'V_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
168 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('hFacCtave', 'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
169 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('hFacWtave', 'U_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
170 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('hFacStave', 'V_xy_Hn__C__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
29 |
TIMEAVE_INIT_FIXED |
INTEGER myThid |
|
./pkg/timeave/timeave_init_fixed.F |
37 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('ETAtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
39 |
TIMEAVE_INIT_FIXED |
& 'time-averaged free-surface_r-anomaly', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
40 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('ETAtave','units','m', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
42 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
44 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('Eta2tave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
46 |
TIMEAVE_INIT_FIXED |
& 'time-averaged free-surface_r-anomaly squared', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
47 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('Eta2tave','units','m^2', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
49 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
51 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('Ttave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
52 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('Ttave','units','degC', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
54 |
TIMEAVE_INIT_FIXED |
& 'time-averaged potential_temperature', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
56 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
58 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('Stave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
60 |
TIMEAVE_INIT_FIXED |
& 'time-averaged salinity', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
62 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
64 |
TIMEAVE_INIT_FIXED |
& 'time-averaged salinity', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
66 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('uVeltave', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
67 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('uVeltave','units','m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
69 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XU YU RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
71 |
TIMEAVE_INIT_FIXED |
& 'time-averaged zonal velocity', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
73 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('vVeltave', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
74 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('vVeltave','units','m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
76 |
TIMEAVE_INIT_FIXED |
& 'coordinates','XV YV RC iter', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
78 |
TIMEAVE_INIT_FIXED |
& 'time-averaged merid. velocity', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
80 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('wVeltave', 'Cen_xy_Hn__L__t',4,5,myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
81 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('wVeltave','units','m/s', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
83 |
TIMEAVE_INIT_FIXED |
& 'time-averaged vertical velocity', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
85 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('UTtave', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
86 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('UTtave','units','degC*m/s',myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
88 |
TIMEAVE_INIT_FIXED |
& 'Zonal velocity and potential temp. t-ave product', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
90 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('VTtave', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
91 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('VTtave','units','degC*m/s',myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
93 |
TIMEAVE_INIT_FIXED |
& 'Merid velocity and potential temp. t-ave product', myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
95 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VNAME('WTtave', 'Cen_xy_Hn__L__t', 4,5, myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
96 |
TIMEAVE_INIT_FIXED |
CALL MNC_CW_ADD_VATTR_TEXT('WTtave','units','degC*m/s',myThid) |
|
./pkg/timeave/timeave_init_fixed.F |
98 |
TIMEAVE_INIT_FIXED |
& 'Vert. velocity and potential temp. t-ave product', myThid) |
|
./pkg/timeave/timeave_norma_2v.F |
25 |
TIMEAVE_NORMA_2V |
INTEGER bi, bj, Ksize, myThid |
|
./pkg/timeave/timeave_norma_2v.F |
9 |
TIMEAVE_NORMA_2V |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_normalize.F |
13 |
TIMEAVE_NORMALIZE |
I bi, bj, myThid ) |
|
./pkg/timeave/timeave_normalize.F |
37 |
TIMEAVE_NORMALIZE |
INTEGER myThid |
|
./pkg/timeave/timeave_reset.F |
22 |
TIMEAVE_RESET |
INTEGER bi, bj, Ksize, myThid |
|
./pkg/timeave/timeave_reset.F |
6 |
TIMEAVE_RESET |
SUBROUTINE TIMEAVE_RESET( fldtave, Ksize, bi, bj, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
100 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(VStave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
101 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(WStave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
102 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(Eta2tave, timeAve_half,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
103 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(TTtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
104 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(UUtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
105 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(VVtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
106 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(UVtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
10 |
TIMEAVE_STATV_WRITE |
SUBROUTINE TIMEAVE_STATV_WRITE( myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
110 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(hUtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
111 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(hVtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
118 |
TIMEAVE_STATV_WRITE |
& bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
120 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(uZetatave,timeAve_full,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
121 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(vZetatave,timeAve_full,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
124 |
TIMEAVE_STATV_WRITE |
& bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
126 |
TIMEAVE_STATV_WRITE |
& bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
128 |
TIMEAVE_STATV_WRITE |
& bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
138 |
TIMEAVE_STATV_WRITE |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
139 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XY_RL('ETAtave.' ,suff,etatave ,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
140 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('Ttave.',suff,thetatave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
141 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('Stave.',suff,salttave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
142 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('uVeltave.',suff,uVeltave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
143 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('vVeltave.',suff,vVeltave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
144 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('wVeltave.',suff,wVeltave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
145 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XY_RL('Eta2tave.',suff,Eta2tave ,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
146 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('UTtave.',suff,UTtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
147 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('VTtave.',suff,VTtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
148 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('WTtave.',suff,WTtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
149 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('UStave.',suff,UStave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
150 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('VStave.',suff,VStave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
151 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('WStave.',suff,WStave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
152 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('TTtave.',suff,TTtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
153 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('UUtave.',suff,UUtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
154 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('VVtave.',suff,VVtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
155 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('UVtave.',suff,UVtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
160 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
164 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
166 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
170 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
173 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
175 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
177 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
179 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
181 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
183 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
185 |
TIMEAVE_STATV_WRITE |
& myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
189 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('hUtave.',suff,hUtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
190 |
TIMEAVE_STATV_WRITE |
CALL WRITE_FLD_XYZ_RL('hVtave.',suff,hVtave,myIter,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
197 |
TIMEAVE_STATV_WRITE |
endIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
203 |
TIMEAVE_STATV_WRITE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
205 |
TIMEAVE_STATV_WRITE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
207 |
TIMEAVE_STATV_WRITE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
210 |
TIMEAVE_STATV_WRITE |
_BEGIN_MASTER( myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
214 |
TIMEAVE_STATV_WRITE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
217 |
TIMEAVE_STATV_WRITE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
218 |
TIMEAVE_STATV_WRITE |
_END_MASTER( myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
232 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_SET_UDIM('tave', -1, myThid) |
|
./pkg/timeave/timeave_statv_write.F |
233 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W_S('D','tave',0,0,'T', myTime, myThid) |
|
./pkg/timeave/timeave_statv_write.F |
234 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_SET_UDIM('tave', 0, myThid) |
|
./pkg/timeave/timeave_statv_write.F |
235 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_I_W_S('I','tave',0,0,'iter', myIter, myThid) |
|
./pkg/timeave/timeave_statv_write.F |
237 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'ETAtave',etatave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
238 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'Eta2tave',Eta2tave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
239 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'Ttave',thetatave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
240 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'Stave',salttave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
241 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'uVeltave',uVeltave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
242 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'vVeltave',vVeltave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
243 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'wVeltave',wVeltave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
244 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'UTtave',UTtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
245 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'VTtave',VTtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
246 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'WTtave',WTtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
247 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'UStave',UStave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
248 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'VStave',VStave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
249 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'WStave',WStave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
250 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'TTtave',TTtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
251 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'UUtave',UUtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
252 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'VVtave',VVtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
253 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'UVtave',UVtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
257 |
TIMEAVE_STATV_WRITE |
& TdiffRtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
261 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'uZtave',uZetatave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
262 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'vZtave',vZetatave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
266 |
TIMEAVE_STATV_WRITE |
& phiHydtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
269 |
TIMEAVE_STATV_WRITE |
& phiHydLowtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
271 |
TIMEAVE_STATV_WRITE |
& phiHydLow2tave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
273 |
TIMEAVE_STATV_WRITE |
& ConvectCountTave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
275 |
TIMEAVE_STATV_WRITE |
& uFluxtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
277 |
TIMEAVE_STATV_WRITE |
& vFluxtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
279 |
TIMEAVE_STATV_WRITE |
& tFluxtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
281 |
TIMEAVE_STATV_WRITE |
& sFluxtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
285 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'hUtave',hUtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
286 |
TIMEAVE_STATV_WRITE |
CALL MNC_CW_RL_W(pf,'tave',0,0,'hVtave',hVtave,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
297 |
TIMEAVE_STATV_WRITE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
298 |
TIMEAVE_STATV_WRITE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
305 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_STATVARS(myTime, nIter0, bi, bj, myThid) |
|
./pkg/timeave/timeave_statv_write.F |
34 |
TIMEAVE_STATV_WRITE |
INTEGER myThid |
|
./pkg/timeave/timeave_statv_write.F |
67 |
TIMEAVE_STATV_WRITE |
I myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
77 |
TIMEAVE_STATV_WRITE |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_statv_write.F |
80 |
TIMEAVE_STATV_WRITE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
81 |
TIMEAVE_STATV_WRITE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/timeave/timeave_statv_write.F |
84 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(uFluxtave,timeAve_full,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
85 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(vFluxtave,timeAve_full,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
86 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(tFluxtave,timeAve_full,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
87 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(sFluxtave,timeAve_full,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
88 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(etatave, timeAve_half,1 ,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
89 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(thetatave,timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
90 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(salttave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
91 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(uVeltave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
92 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(vVeltave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
93 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(wVeltave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
95 |
TIMEAVE_STATV_WRITE |
& bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
96 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(UTtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
97 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(VTtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
98 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(WTtave, timeAve_half,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statv_write.F |
99 |
TIMEAVE_STATV_WRITE |
CALL TIMEAVE_NORMALIZE(UStave, timeAve_half,Nr,bi,bj,myThid) |
|
./model/src/ini_parms.F |
1004 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1007 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1013 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1016 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1023 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1026 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1072 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1077 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1079 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1084 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1098 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1107 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1114 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1121 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1128 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1135 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1146 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1162 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1180 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1188 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1192 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1217 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1223 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1246 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1259 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1296 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1304 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1322 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1330 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1343 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1351 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1360 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1369 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1374 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1376 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1381 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1389 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1395 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1401 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1404 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1413 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1416 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1423 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1426 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1435 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1441 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
1480 |
INI_PARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/ini_parms.F |
1486 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1489 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
1496 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
14 |
INI_PARMS |
SUBROUTINE INI_PARMS( myThid ) |
|
./model/src/ini_parms.F |
1501 |
INI_PARMS |
_END_MASTER(myThid) |
|
./model/src/ini_parms.F |
310 |
INI_PARMS |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_parms.F |
316 |
INI_PARMS |
I myThid ) |
|
./model/src/ini_parms.F |
358 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
35 |
INI_PARMS |
INTEGER myThid |
|
./model/src/ini_parms.F |
361 |
INI_PARMS |
O iUnit, myThid ) |
|
./model/src/ini_parms.F |
395 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
400 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
402 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
407 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
428 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
438 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
442 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
470 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
497 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
505 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
531 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
540 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
563 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
571 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
613 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
622 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
633 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
639 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
648 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
654 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
660 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
681 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
684 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
690 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
693 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
699 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
702 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
709 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
713 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
720 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
726 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
732 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
738 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
741 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
747 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
750 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
757 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
760 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
767 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
770 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
777 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
784 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
791 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
798 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
804 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
810 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
815 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
817 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
822 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
833 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
838 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
840 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
845 |
INI_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_parms.F |
852 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
855 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
861 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
864 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
870 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
873 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
882 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
894 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
897 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
917 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
923 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
928 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
934 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_parms.F |
955 |
INI_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/timeave/timeave_statvars.F |
105 |
TIMEAVE_STATVARS |
I myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_statvars.F |
114 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(etatave, etaN, 1 , DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
115 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(thetatave,theta, Nr, DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
116 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(salttave, salt, Nr, DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
117 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(uVeltave, uVel, Nr, DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
118 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(vVeltave, vVel, Nr, DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
119 |
TIMEAVE_STATVARS |
CALL TIMEAVE_CUMULATE(wVeltave, wVel, Nr, DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
11 |
TIMEAVE_STATVARS |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/timeave/timeave_statvars.F |
123 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
125 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
127 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
129 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
131 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
135 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
137 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
147 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
149 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
155 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
157 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
159 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
161 |
TIMEAVE_STATVARS |
& DDTT, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
186 |
TIMEAVE_STATVARS |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
188 |
TIMEAVE_STATVARS |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
190 |
TIMEAVE_STATVARS |
& phiHydLow,phiHydLow, 1, 0, deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
37 |
TIMEAVE_STATVARS |
INTEGER myThid |
|
./pkg/timeave/timeave_statvars.F |
53 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(uFluxtave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
54 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(vFluxtave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
55 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(tFluxtave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
56 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(sFluxtave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
57 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(etatave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
58 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(thetatave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
59 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(salttave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
60 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(uVeltave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
61 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(vVeltave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
62 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(wVeltave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
63 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(phiHydLowtave,1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
64 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(UTtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
65 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(VTtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
66 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(WTtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
67 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(UStave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
68 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(VStave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
69 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(WStave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
70 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(Eta2tave, 1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
71 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(TTtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
72 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(UUtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
73 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(VVtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
74 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(UVtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
76 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(TdiffRtave,Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
78 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(uZetatave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
79 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(vZetatave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
81 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(phiHydtave,Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
82 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(phiHydLow2Tave,1, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
83 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(ConvectCountTave,Nr,bi,bj,myThid) |
|
./pkg/timeave/timeave_statvars.F |
85 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(hUtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_statvars.F |
86 |
TIMEAVE_STATVARS |
CALL TIMEAVE_RESET(hVtave, Nr, bi, bj, myThid) |
|
./pkg/timeave/timeave_surf_flux.F |
108 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_surf_flux.F |
31 |
TIMEAVE_SURF_FLUX |
INTEGER myThid |
|
./pkg/timeave/timeave_surf_flux.F |
53 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_surf_flux.F |
62 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/timeave/timeave_surf_flux.F |
6 |
TIMEAVE_SURF_FLUX |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/timeave/timeave_surf_flux.F |
87 |
TIMEAVE_SURF_FLUX |
& deltaTclock, bi, bj, myThid) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
12 |
ZONAL_FILT_APPLY_TS |
I myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
32 |
ZONAL_FILT_APPLY_TS |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
40 |
ZONAL_FILT_APPLY_TS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
41 |
ZONAL_FILT_APPLY_TS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
46 |
ZONAL_FILT_APPLY_TS |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_ts.F |
50 |
ZONAL_FILT_APPLY_TS |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
12 |
ZONAL_FILT_APPLY_UV |
I myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
32 |
ZONAL_FILT_APPLY_UV |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
42 |
ZONAL_FILT_APPLY_UV |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
43 |
ZONAL_FILT_APPLY_UV |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
57 |
ZONAL_FILT_APPLY_UV |
I 0, sNy+1, 1, bi, bj, 1, myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
71 |
ZONAL_FILT_APPLY_UV |
I 0, sNy+1, Nr, bi, bj, 1, myThid ) |
|
./pkg/zonal_filt/zonal_filt_apply_uv.F |
78 |
ZONAL_FILT_APPLY_UV |
I 0, sNy+1, Nr, bi, bj, 2, myThid ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
117 |
ZONAL_FILT_INIT |
_END_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filt_init.F |
118 |
ZONAL_FILT_INIT |
CALL BAR2(myThid) |
|
./pkg/zonal_filt/zonal_filt_init.F |
120 |
ZONAL_FILT_INIT |
CALL WRITE_REC_XY_RL( 'ampFactor', ampFactor, 1, 0, myThid ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
45 |
ZONAL_FILT_INIT |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_init.F |
76 |
ZONAL_FILT_INIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
79 |
ZONAL_FILT_INIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/zonal_filt/zonal_filt_init.F |
83 |
ZONAL_FILT_INIT |
_BEGIN_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filt_init.F |
9 |
ZONAL_FILT_INIT |
SUBROUTINE ZONAL_FILT_INIT( myThid ) |
|
./pkg/zonal_filt/zonal_filt_nofill.F |
31 |
ZONAL_FILT_NOFILL |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_nofill.F |
8 |
ZONAL_FILT_NOFILL |
I jMin, jMax, kMin, kMax, bi, bj, gridLoc, myThid ) |
|
./model/src/ini_pressure.F |
10 |
INI_PRESSURE |
SUBROUTINE INI_PRESSURE( myThid ) |
|
./model/src/ini_pressure.F |
119 |
INI_PRESSURE |
I startTime, -1, myThid ) |
|
./model/src/ini_pressure.F |
138 |
INI_PRESSURE |
_GLOBAL_SUM_RL( rmspp, myThid ) |
|
./model/src/ini_pressure.F |
139 |
INI_PRESSURE |
_GLOBAL_SUM_RL( count, myThid ) |
|
./model/src/ini_pressure.F |
145 |
INI_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
149 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
150 |
INI_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
157 |
INI_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
163 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
167 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
171 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
176 |
INI_PRESSURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_pressure.F |
183 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
184 |
INI_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
191 |
INI_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
196 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
197 |
INI_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
201 |
INI_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
204 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
205 |
INI_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
37 |
INI_PRESSURE |
INTEGER myThid |
|
./model/src/ini_pressure.F |
62 |
INI_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
66 |
INI_PRESSURE |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_pressure.F |
67 |
INI_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/ini_pressure.F |
69 |
INI_PRESSURE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_pressure.F |
70 |
INI_PRESSURE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_pressure.F |
98 |
INI_PRESSURE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_pressure.F |
99 |
INI_PRESSURE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/zonal_filt/zonal_filt_postsmooth.F |
11 |
ZONAL_FILT_POSTSMOOTH |
I myThid ) |
|
./pkg/zonal_filt/zonal_filt_postsmooth.F |
36 |
ZONAL_FILT_POSTSMOOTH |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_presmooth.F |
11 |
ZONAL_FILT_PRESMOOTH |
I myThid ) |
|
./pkg/zonal_filt/zonal_filt_presmooth.F |
42 |
ZONAL_FILT_PRESMOOTH |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
21 |
ZONAL_FILT_READPARMS |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
38 |
ZONAL_FILT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
43 |
ZONAL_FILT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
51 |
ZONAL_FILT_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
60 |
ZONAL_FILT_READPARMS |
I myThid ) |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
6 |
ZONAL_FILT_READPARMS |
SUBROUTINE ZONAL_FILT_READPARMS( myThid ) |
|
./pkg/zonal_filt/zonal_filt_readparms.F |
88 |
ZONAL_FILT_READPARMS |
_END_MASTER(myThid) |
|
./pkg/zonal_filt/zonal_filter.F |
13 |
ZONAL_FILTER |
I jMin, jMax, kSize, bi, bj, gridLoc, myThid ) |
|
./pkg/zonal_filt/zonal_filter.F |
45 |
ZONAL_FILTER |
INTEGER myThid |
|
./pkg/zonal_filt/zonal_filter.F |
69 |
ZONAL_FILTER |
CALL ZONAL_FILT_PRESMOOTH( phiMask,phi,avPhi,sNx,myThid ) |
|
./pkg/zonal_filt/zonal_filter.F |
96 |
ZONAL_FILTER |
CALL ZONAL_FILT_POSTSMOOTH(phiMask,phi,avPhi,sNx,myThid) |
|
./model/src/ini_psurf.F |
101 |
INI_PSURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_psurf.F |
102 |
INI_PSURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_psurf.F |
10 |
INI_PSURF |
SUBROUTINE INI_PSURF( myThid ) |
|
./model/src/ini_psurf.F |
43 |
INI_PSURF |
INTEGER myThid |
|
./model/src/ini_psurf.F |
54 |
INI_PSURF |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_psurf.F |
55 |
INI_PSURF |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_psurf.F |
65 |
INI_PSURF |
CALL READ_FLD_XY_RL( pSurfInitFile, ' ', etaN, 0, myThid ) |
|
./model/src/ini_psurf.F |
67 |
INI_PSURF |
_EXCH_XY_RL(etaN, myThid) |
|
./model/src/ini_psurf.F |
72 |
INI_PSURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_psurf.F |
73 |
INI_PSURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_psurf.F |
86 |
INI_PSURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/ini_psurf.F |
87 |
INI_PSURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/ini_salt.F |
10 |
INI_SALT |
SUBROUTINE INI_SALT( myThid ) |
|
./model/src/ini_salt.F |
116 |
INI_SALT |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_salt.F |
120 |
INI_SALT |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_salt.F |
127 |
INI_SALT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_salt.F |
133 |
INI_SALT |
& Nr, 1, myThid ) |
|
./model/src/ini_salt.F |
44 |
INI_SALT |
INTEGER myThid |
|
./model/src/ini_salt.F |
56 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_salt.F |
57 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_salt.F |
71 |
INI_SALT |
CALL MNC_FILE_CLOSE_ALL_MATCHING(hydrogSaltFile, myThid) |
|
./model/src/ini_salt.F |
72 |
INI_SALT |
CALL MNC_CW_SET_UDIM(hydrogSaltFile, 1, myThid) |
|
./model/src/ini_salt.F |
73 |
INI_SALT |
CALL MNC_CW_SET_CITER(hydrogSaltFile, 2, -1, -1, -1, myThid) |
|
./model/src/ini_salt.F |
74 |
INI_SALT |
CALL MNC_CW_SET_UDIM(hydrogSaltFile, 1, myThid) |
|
./model/src/ini_salt.F |
75 |
INI_SALT |
CALL MNC_CW_RL_R('D',hydrogSaltFile,0,0,'S',salt, myThid) |
|
./model/src/ini_salt.F |
76 |
INI_SALT |
CALL MNC_FILE_CLOSE_ALL_MATCHING(hydrogSaltFile, myThid) |
|
./model/src/ini_salt.F |
79 |
INI_SALT |
CALL READ_FLD_XYZ_RL( hydrogSaltFile, ' ', salt, 0, myThid ) |
|
./model/src/ini_salt.F |
83 |
INI_SALT |
_EXCH_XYZ_RL( salt, myThid ) |
|
./model/src/ini_salt.F |
88 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_salt.F |
89 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/OpenAD/code_ad_singlelayer/cost_test.F |
29 |
COST_TEST |
integer myThid |
|
./verification/OpenAD/code_ad_singlelayer/cost_test.F |
5 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./model/src/ini_sigma_hfac.F |
10 |
INI_SIGMA_HFAC |
SUBROUTINE INI_SIGMA_HFAC( myThid ) |
|
./model/src/ini_sigma_hfac.F |
123 |
INI_SIGMA_HFAC |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_sigma_hfac.F |
131 |
INI_SIGMA_HFAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
132 |
INI_SIGMA_HFAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
194 |
INI_SIGMA_HFAC |
CALL EXCH_UV_XY_RS( rSurfW, rSurfS, .FALSE., myThid ) |
|
./model/src/ini_sigma_hfac.F |
195 |
INI_SIGMA_HFAC |
CALL EXCH_UV_XY_RS( rLowW, rLowS, .FALSE., myThid ) |
|
./model/src/ini_sigma_hfac.F |
196 |
INI_SIGMA_HFAC |
CALL EXCH_UV_XY_RS( maskInW, maskInS, .FALSE., myThid ) |
|
./model/src/ini_sigma_hfac.F |
201 |
INI_SIGMA_HFAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
202 |
INI_SIGMA_HFAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
213 |
INI_SIGMA_HFAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
214 |
INI_SIGMA_HFAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
33 |
INI_SIGMA_HFAC |
INTEGER myThid |
|
./model/src/ini_sigma_hfac.F |
63 |
INI_SIGMA_HFAC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_sigma_hfac.F |
64 |
INI_SIGMA_HFAC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_spherical_polar_grid.F |
11 |
INI_SPHERICAL_POLAR_GRID |
SUBROUTINE INI_SPHERICAL_POLAR_GRID( myThid ) |
|
./model/src/ini_spherical_polar_grid.F |
280 |
INI_SPHERICAL_POLAR_GRID |
CALL ROTATE_SPHERICAL_POLAR_GRID( xC, yC, myThid ) |
|
./model/src/ini_spherical_polar_grid.F |
281 |
INI_SPHERICAL_POLAR_GRID |
CALL ROTATE_SPHERICAL_POLAR_GRID( xG, yG, myThid ) |
|
./model/src/ini_spherical_polar_grid.F |
283 |
INI_SPHERICAL_POLAR_GRID |
CALL CALC_GRID_ANGLES( skipCalcAngleC, myThid ) |
|
./model/src/ini_spherical_polar_grid.F |
39 |
INI_SPHERICAL_POLAR_GRID |
INTEGER myThid |
|
./model/src/ini_spherical_polar_grid.F |
66 |
INI_SPHERICAL_POLAR_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_spherical_polar_grid.F |
67 |
INI_SPHERICAL_POLAR_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_spherical_polar_grid.F |
75 |
INI_SPHERICAL_POLAR_GRID |
I bi, bj, myThid ) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
113 |
NO PROCEDURE |
INTEGER myThid |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
172 |
NO PROCEDURE |
myThid = I |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
176 |
NO PROCEDURE |
CALL CHECK_THREADS( myThid ) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
182 |
NO PROCEDURE |
CALL ADMTLM_DSVD(myThid) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
184 |
NO PROCEDURE |
CALL HESSIAN_MAIN(myThid) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
186 |
NO PROCEDURE |
WRITE(0,'(3(A,I4))') '-- PId=', myProcId, ' , TId=', myThid, |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
193 |
NO PROCEDURE |
threadIsComplete(myThid) = .TRUE. |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
231 |
PTREENTRY |
I myThid ) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
245 |
PTREENTRY |
INTEGER myThid |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
248 |
PTREENTRY |
WRITE(*,*) 'myThid = ', myThid |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
249 |
PTREENTRY |
CALL CHECK_THREADS( myThid ) |
|
./verification/adjustment.cs-32x32x1/code_min/main.F |
253 |
PTREENTRY |
threadIsComplete(myThid) = .TRUE. |
|
./verification/advect_cs/code/ini_vel.F |
30 |
INI_VEL |
INTEGER myThid |
|
./verification/advect_cs/code/ini_vel.F |
52 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_cs/code/ini_vel.F |
53 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_cs/code/ini_vel.F |
73 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
|
./verification/advect_cs/code/ini_vel.F |
76 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
|
./verification/advect_cs/code/ini_vel.F |
78 |
INI_VEL |
CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./verification/advect_cs/code/ini_vel.F |
81 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_cs/code/ini_vel.F |
82 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_cs/code/ini_vel.F |
9 |
INI_VEL |
SUBROUTINE INI_VEL( myThid ) |
|
./model/src/ini_theta.F |
10 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./model/src/ini_theta.F |
117 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_theta.F |
121 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./model/src/ini_theta.F |
128 |
INI_THETA |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_theta.F |
135 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_theta.F |
136 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_theta.F |
154 |
INI_THETA |
& Nr, 1, myThid ) |
|
./model/src/ini_theta.F |
44 |
INI_THETA |
INTEGER myThid |
|
./model/src/ini_theta.F |
57 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_theta.F |
58 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_theta.F |
72 |
INI_THETA |
CALL MNC_FILE_CLOSE_ALL_MATCHING(hydrogThetaFile, myThid) |
|
./model/src/ini_theta.F |
73 |
INI_THETA |
CALL MNC_CW_SET_UDIM(hydrogThetaFile, 1, myThid) |
|
./model/src/ini_theta.F |
74 |
INI_THETA |
CALL MNC_CW_SET_CITER(hydrogThetaFile, 2, -1, -1, -1, myThid) |
|
./model/src/ini_theta.F |
75 |
INI_THETA |
CALL MNC_CW_SET_UDIM(hydrogThetaFile, 1, myThid) |
|
./model/src/ini_theta.F |
76 |
INI_THETA |
CALL MNC_CW_RL_R('D',hydrogThetaFile,0,0,'Temp',theta,myThid) |
|
./model/src/ini_theta.F |
77 |
INI_THETA |
CALL MNC_FILE_CLOSE_ALL_MATCHING(hydrogThetaFile, myThid) |
|
./model/src/ini_theta.F |
80 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./model/src/ini_theta.F |
84 |
INI_THETA |
_EXCH_XYZ_RL(theta,myThid) |
|
./model/src/ini_theta.F |
89 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_theta.F |
90 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_salt.F |
115 |
INI_SALT |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/advect_xy/code/ini_salt.F |
119 |
INI_SALT |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/advect_xy/code/ini_salt.F |
126 |
INI_SALT |
& SQUEEZE_RIGHT, myThid ) |
|
./verification/advect_xy/code/ini_salt.F |
132 |
INI_SALT |
& Nr, 1, myThid ) |
|
./verification/advect_xy/code/ini_salt.F |
39 |
INI_SALT |
INTEGER myThid |
|
./verification/advect_xy/code/ini_salt.F |
53 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_salt.F |
54 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_salt.F |
77 |
INI_SALT |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/advect_xy/code/ini_salt.F |
81 |
INI_SALT |
CALL READ_FLD_XYZ_RL( hydrogSaltFile, ' ', salt, 0, myThid ) |
|
./verification/advect_xy/code/ini_salt.F |
82 |
INI_SALT |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/advect_xy/code/ini_salt.F |
87 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_salt.F |
88 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_salt.F |
9 |
INI_SALT |
SUBROUTINE INI_SALT( myThid ) |
|
./verification/advect_xy/code/ini_theta.F |
116 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/advect_xy/code/ini_theta.F |
120 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/advect_xy/code/ini_theta.F |
127 |
INI_THETA |
& SQUEEZE_RIGHT, myThid ) |
|
./verification/advect_xy/code/ini_theta.F |
134 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
135 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
151 |
INI_THETA |
& Nr, 1, myThid ) |
|
./verification/advect_xy/code/ini_theta.F |
39 |
INI_THETA |
INTEGER myThid |
|
./verification/advect_xy/code/ini_theta.F |
54 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
55 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
78 |
INI_THETA |
_EXCH_XYZ_RL( theta, myThid ) |
|
./verification/advect_xy/code/ini_theta.F |
82 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./verification/advect_xy/code/ini_theta.F |
83 |
INI_THETA |
_EXCH_XYZ_RL(theta,myThid) |
|
./verification/advect_xy/code/ini_theta.F |
88 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
89 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_theta.F |
9 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./verification/advect_xy/code/ini_vel.F |
30 |
INI_VEL |
INTEGER myThid |
|
./verification/advect_xy/code/ini_vel.F |
46 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_vel.F |
47 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_vel.F |
63 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
|
./verification/advect_xy/code/ini_vel.F |
66 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
|
./verification/advect_xy/code/ini_vel.F |
68 |
INI_VEL |
CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./verification/advect_xy/code/ini_vel.F |
71 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/advect_xy/code/ini_vel.F |
72 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/advect_xy/code/ini_vel.F |
9 |
INI_VEL |
SUBROUTINE INI_VEL( myThid ) |
|
./model/src/ini_vel.F |
30 |
INI_VEL |
INTEGER myThid |
|
./model/src/ini_vel.F |
46 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_vel.F |
47 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_vel.F |
62 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
|
./model/src/ini_vel.F |
65 |
INI_VEL |
& CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
|
./model/src/ini_vel.F |
67 |
INI_VEL |
CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./model/src/ini_vel.F |
70 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/ini_vel.F |
71 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/ini_vel.F |
9 |
INI_VEL |
SUBROUTINE INI_VEL( myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
120 |
AIM_SURF_BC |
fMask1(I2,1,myThid) = aim_landFr(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
12 |
AIM_SURF_BC |
I bi, bj, myTime, myIter, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
160 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
162 |
AIM_SURF_BC |
stl1(I2,myThid) = aim_sWght0*aim_lst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
186 |
AIM_SURF_BC |
soilw1(I2,myThid) = aim_sWght0*soilw_0 |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
188 |
AIM_SURF_BC |
soilw1(I2,myThid) = MIN(1. _d 0, soilw1(I2,myThid) ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
208 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
210 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
211 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
212 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
219 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
274 |
AIM_SURF_BC |
alb1(I2,1,myThid) = alb_land |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
276 |
AIM_SURF_BC |
alb1(I2,2,myThid) = 0.5 _d 0 * ALBSEA |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
278 |
AIM_SURF_BC |
alb1(I2,3,myThid) = ALBICE |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
303 |
AIM_SURF_BC |
alb1(I2,1,myThid) = aim_albedo(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
304 |
AIM_SURF_BC |
alb1(I2,2,myThid) = aim_albedo(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
305 |
AIM_SURF_BC |
alb1(I2,3,myThid) = aim_albedo(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
312 |
AIM_SURF_BC |
alb1(I2,1,myThid) = 0. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
313 |
AIM_SURF_BC |
alb1(I2,2,myThid) = 0. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
314 |
AIM_SURF_BC |
alb1(I2,3,myThid) = 0. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
323 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
324 |
AIM_SURF_BC |
stl1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
325 |
AIM_SURF_BC |
sti1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
332 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
333 |
AIM_SURF_BC |
stl1(I2,myThid) = 300. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
334 |
AIM_SURF_BC |
sti1(I2,myThid) = 300. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
336 |
AIM_SURF_BC |
sst1(I2,myThid) = 280. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
339 |
AIM_SURF_BC |
stl1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
340 |
AIM_SURF_BC |
sti1(I2,myThid) = sst1(I2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
348 |
AIM_SURF_BC |
& 1, bi, bj, 1, myIter, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
358 |
AIM_SURF_BC |
soilw1(I2,myThid) = aim_sw10(i,j,bi,bj) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
365 |
AIM_SURF_BC |
soilw1(I2,myThid) = 0. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
389 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
390 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
398 |
AIM_SURF_BC |
aim_CO2(I2,myThid)= atm_pCO2 |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
404 |
AIM_SURF_BC |
CALL DIAGNOSTICS_SCALE_FILL( aim_CO2(1,myThid), pCO2scl, 1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
405 |
AIM_SURF_BC |
& 'aim_pCO2', 1, 1, 3, bi, bj, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
415 |
AIM_SURF_BC |
U stl1(1,myThid), soilw1(1,myThid), alb1(1,1,myThid), |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
416 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
425 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
426 |
AIM_SURF_BC |
O sti1(1,myThid), alb1(1,3,myThid), |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
427 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
433 |
AIM_SURF_BC |
fMask1(J,3,myThid) =(1. _d 0 - fMask1(J,1,myThid)) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
435 |
AIM_SURF_BC |
fMask1(J,2,myThid) = 1. _d 0 - fMask1(J,1,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
436 |
AIM_SURF_BC |
& - fMask1(J,3,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
441 |
AIM_SURF_BC |
alb1(J,0,myThid) = fMask1(J,1,myThid)*alb1(J,1,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
442 |
AIM_SURF_BC |
& + fMask1(J,2,myThid)*alb1(J,2,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
443 |
AIM_SURF_BC |
& + fMask1(J,3,myThid)*alb1(J,3,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
449 |
AIM_SURF_BC |
dTsurf(J,k,myThid) = 0. |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
455 |
AIM_SURF_BC |
fMask1(J,3,myThid) = 0. _d 0 |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
456 |
AIM_SURF_BC |
fMask1(J,2,myThid) = 1. _d 0 - fMask1(J,1,myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/aim_surf_bc.F |
76 |
AIM_SURF_BC |
INTEGER myIter, myThid |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
10 |
INI_DEPTHS |
SUBROUTINE INI_DEPTHS( myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
110 |
INI_DEPTHS |
CALL MNC_CW_ADD_VNAME('bathy', 'Cen_xy_Hn__-__-', 3,4, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
111 |
INI_DEPTHS |
CALL MNC_FILE_CLOSE_ALL_MATCHING(bathyFile, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
112 |
INI_DEPTHS |
CALL MNC_CW_SET_UDIM(bathyFile, 1, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
113 |
INI_DEPTHS |
CALL MNC_CW_SET_CITER(bathyFile, 2, -1, -1, -1, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
114 |
INI_DEPTHS |
CALL MNC_CW_SET_UDIM(bathyFile, 1, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
115 |
INI_DEPTHS |
CALL MNC_CW_RS_R('D',bathyFile,0,0,'bathy',R_low, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
116 |
INI_DEPTHS |
CALL MNC_FILE_CLOSE_ALL_MATCHING(bathyFile, myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
117 |
INI_DEPTHS |
CALL MNC_CW_DEL_VNAME('bathy', myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
122 |
INI_DEPTHS |
CALL READ_REC_XY_RS( bathyFile, R_low, 1, 0, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
139 |
INI_DEPTHS |
_EXCH_XY_RS(R_low, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
144 |
INI_DEPTHS |
& -1, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
157 |
INI_DEPTHS |
CALL READ_REC_XY_RS( bathyFile, Ro_surf, 1, 0, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
162 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
163 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
177 |
INI_DEPTHS |
CALL READ_REC_XY_RS( topoFile, topoZ, 1, 0, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
188 |
INI_DEPTHS |
I myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
197 |
INI_DEPTHS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
204 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
205 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
220 |
INI_DEPTHS |
_EXCH_XY_RS(Ro_surf, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
228 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
229 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
250 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
251 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
277 |
INI_DEPTHS |
& -1, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
289 |
INI_DEPTHS |
CALL OBCS_CHECK_DEPTHS( myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
291 |
INI_DEPTHS |
_EXCH_XY_RS( R_low, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
297 |
INI_DEPTHS |
CALL EXCH2_CHECK_DEPTHS( R_low, Ro_surf, myThid ) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
48 |
INI_DEPTHS |
INTEGER myThid |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
68 |
INI_DEPTHS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
75 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
76 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
97 |
INI_DEPTHS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F |
98 |
INI_DEPTHS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
28 |
MOM_VI_HFACZ_DISS |
INTEGER myThid |
|
./verification/aim.5l_cs/code/mom_vi_hfacz_diss.F |
9 |
MOM_VI_HFACZ_DISS |
I myThid) |
|
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
10 |
MOM_VI_MASK_VORT3 |
I myThid) |
|
./verification/aim.5l_cs/code/mom_vi_mask_vort3.F |
27 |
MOM_VI_MASK_VORT3 |
INTEGER myThid |
|
./model/src/ini_vertical_grid.F |
116 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
119 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
188 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
192 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
29 |
INI_VERTICAL_GRID |
INTEGER myThid |
|
./model/src/ini_vertical_grid.F |
371 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
376 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
387 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
392 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
399 |
INI_VERTICAL_GRID |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_vertical_grid.F |
403 |
INI_VERTICAL_GRID |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_vertical_grid.F |
407 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
414 |
INI_VERTICAL_GRID |
_END_MASTER(myThid) |
|
./model/src/ini_vertical_grid.F |
43 |
INI_VERTICAL_GRID |
_BEGIN_MASTER(myThid) |
|
./model/src/ini_vertical_grid.F |
49 |
INI_VERTICAL_GRID |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/ini_vertical_grid.F |
65 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
68 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
84 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
87 |
INI_VERTICAL_GRID |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/ini_vertical_grid.F |
9 |
INI_VERTICAL_GRID |
SUBROUTINE INI_VERTICAL_GRID( myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
103 |
ADDUMMY_IN_STEPPING |
& 'ADJtheta.',suff, adtheta, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
105 |
ADDUMMY_IN_STEPPING |
& 'ADJsalt.',suff, adsalt, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
107 |
ADDUMMY_IN_STEPPING |
& 'ADJuvel.',suff, aduvel, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
109 |
ADDUMMY_IN_STEPPING |
& 'ADJvvel.',suff, advvel, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
10 |
ADDUMMY_IN_STEPPING |
subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
111 |
ADDUMMY_IN_STEPPING |
& 'ADJwvel.',suff, adwvel, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
131 |
ADDUMMY_IN_STEPPING |
& adhfacc, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
133 |
ADDUMMY_IN_STEPPING |
& adhfacs, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
135 |
ADDUMMY_IN_STEPPING |
& adhfacw, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
137 |
ADDUMMY_IN_STEPPING |
& adrecip_hfacc, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
139 |
ADDUMMY_IN_STEPPING |
& adrecip_hfacs, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
141 |
ADDUMMY_IN_STEPPING |
& adrecip_hfacw, myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
148 |
ADDUMMY_IN_STEPPING |
endIOErrCount = IO_ERRCOUNT(myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
168 |
ADDUMMY_IN_STEPPING |
_END_MASTER( myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
173 |
ADDUMMY_IN_STEPPING |
call TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
45 |
ADDUMMY_IN_STEPPING |
integer myThid |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
66 |
ADDUMMY_IN_STEPPING |
call TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
75 |
ADDUMMY_IN_STEPPING |
_BEGIN_MASTER( myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
82 |
ADDUMMY_IN_STEPPING |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/bottom_ctrl_5x5/code_ad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
103 |
ADDUMMY_IN_HFAC |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
108 |
ADDUMMY_IN_HFAC |
& myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
112 |
ADDUMMY_IN_HFAC |
& myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
116 |
ADDUMMY_IN_HFAC |
& myIter, myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
121 |
ADDUMMY_IN_HFAC |
endIOErrCount = IO_ERRCOUNT(myThid) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
141 |
ADDUMMY_IN_HFAC |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
22 |
DUMMY_IN_HFAC |
INTEGER myThid |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
31 |
ADDUMMY_IN_HFAC |
subroutine ADDUMMY_IN_HFAC( myname, myIter, myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
68 |
ADDUMMY_IN_HFAC |
integer myThid |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
6 |
DUMMY_IN_HFAC |
subroutine DUMMY_IN_HFAC( myname, myIter, myThid ) |
|
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
96 |
ADDUMMY_IN_HFAC |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./model/src/initialise_fixed.F |
106 |
INITIALISE_FIXED |
CALL BAR_CHECK( 2, myThid ) |
|
./model/src/initialise_fixed.F |
10 |
INITIALISE_FIXED |
SUBROUTINE INITIALISE_FIXED( myThid ) |
|
./model/src/initialise_fixed.F |
112 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_PARMS',myThid) |
|
./model/src/initialise_fixed.F |
114 |
INITIALISE_FIXED |
CALL INI_PARMS( myThid ) |
|
./model/src/initialise_fixed.F |
118 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('PACKAGES_BOOT',myThid) |
|
./model/src/initialise_fixed.F |
120 |
INITIALISE_FIXED |
CALL PACKAGES_BOOT( myThid ) |
|
./model/src/initialise_fixed.F |
126 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('CPL_IMPORT_CPLPARMS',myThid) |
|
./model/src/initialise_fixed.F |
128 |
INITIALISE_FIXED |
CALL CPL_IMPORT_CPLPARMS( myThid ) |
|
./model/src/initialise_fixed.F |
134 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('PACKAGES_READPARMS',myThid) |
|
./model/src/initialise_fixed.F |
136 |
INITIALISE_FIXED |
CALL PACKAGES_READPARMS( myThid ) |
|
./model/src/initialise_fixed.F |
141 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('SET_PARMS',myThid) |
|
./model/src/initialise_fixed.F |
143 |
INITIALISE_FIXED |
CALL SET_PARMS( myThid ) |
|
./model/src/initialise_fixed.F |
147 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_MODEL_IO',myThid) |
|
./model/src/initialise_fixed.F |
149 |
INITIALISE_FIXED |
CALL INI_MODEL_IO( myThid ) |
|
./model/src/initialise_fixed.F |
154 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_GRID',myThid) |
|
./model/src/initialise_fixed.F |
157 |
INITIALISE_FIXED |
CALL OPENAD_INI_GRID( myThid ) |
|
./model/src/initialise_fixed.F |
159 |
INITIALISE_FIXED |
CALL INI_GRID( myThid ) |
|
./model/src/initialise_fixed.F |
164 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('LOAD_REF_FILES',myThid) |
|
./model/src/initialise_fixed.F |
166 |
INITIALISE_FIXED |
CALL LOAD_REF_FILES( myThid ) |
|
./model/src/initialise_fixed.F |
170 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_EOS',myThid) |
|
./model/src/initialise_fixed.F |
172 |
INITIALISE_FIXED |
CALL INI_EOS( myThid ) |
|
./model/src/initialise_fixed.F |
176 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('SET_REF_STATE',myThid) |
|
./model/src/initialise_fixed.F |
178 |
INITIALISE_FIXED |
CALL SET_REF_STATE( myThid ) |
|
./model/src/initialise_fixed.F |
182 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('SET_GRID_FACTORS',myThid) |
|
./model/src/initialise_fixed.F |
184 |
INITIALISE_FIXED |
CALL SET_GRID_FACTORS( myThid ) |
|
./model/src/initialise_fixed.F |
188 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_DEPTHS',myThid) |
|
./model/src/initialise_fixed.F |
191 |
INITIALISE_FIXED |
CALL OPENAD_INI_DEPTHS( myThid ) |
|
./model/src/initialise_fixed.F |
193 |
INITIALISE_FIXED |
CALL INI_DEPTHS( myThid ) |
|
./model/src/initialise_fixed.F |
199 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_MASKS_ETC',myThid) |
|
./model/src/initialise_fixed.F |
202 |
INITIALISE_FIXED |
CALL OPENAD_INI_MASKS_ETC( myThid ) |
|
./model/src/initialise_fixed.F |
204 |
INITIALISE_FIXED |
CALL INI_MASKS_ETC( myThid ) |
|
./model/src/initialise_fixed.F |
212 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_FIXED',myThid) |
|
./model/src/initialise_fixed.F |
214 |
INITIALISE_FIXED |
CALL PACKAGES_INIT_FIXED( myThid ) |
|
./model/src/initialise_fixed.F |
218 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_GLOBAL_DOMAIN',myThid) |
|
./model/src/initialise_fixed.F |
220 |
INITIALISE_FIXED |
CALL INI_GLOBAL_DOMAIN( myThid ) |
|
./model/src/initialise_fixed.F |
224 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_LINEAR_PHISURF',myThid) |
|
./model/src/initialise_fixed.F |
227 |
INITIALISE_FIXED |
CALL OPENAD_INI_LINEAR_PHISURF( myThid ) |
|
./model/src/initialise_fixed.F |
229 |
INITIALISE_FIXED |
CALL INI_LINEAR_PHISURF( myThid ) |
|
./model/src/initialise_fixed.F |
234 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_CORI',myThid) |
|
./model/src/initialise_fixed.F |
237 |
INITIALISE_FIXED |
CALL OPENAD_INI_CORI( myThid ) |
|
./model/src/initialise_fixed.F |
239 |
INITIALISE_FIXED |
CALL INI_CORI( myThid ) |
|
./model/src/initialise_fixed.F |
244 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_CG2D',myThid) |
|
./model/src/initialise_fixed.F |
247 |
INITIALISE_FIXED |
CALL OPENAD_INI_CG2D( myThid ) |
|
./model/src/initialise_fixed.F |
249 |
INITIALISE_FIXED |
CALL INI_CG2D( myThid ) |
|
./model/src/initialise_fixed.F |
255 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('INI_CG3D',myThid) |
|
./model/src/initialise_fixed.F |
257 |
INITIALISE_FIXED |
CALL INI_CG3D( myThid ) |
|
./model/src/initialise_fixed.F |
262 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('CONFIG_SUMMARY',myThid) |
|
./model/src/initialise_fixed.F |
264 |
INITIALISE_FIXED |
CALL CONFIG_SUMMARY( myThid ) |
|
./model/src/initialise_fixed.F |
268 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('PACKAGES_CHECK',myThid) |
|
./model/src/initialise_fixed.F |
270 |
INITIALISE_FIXED |
CALL PACKAGES_CHECK( myThid ) |
|
./model/src/initialise_fixed.F |
274 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('CONFIG_CHECK',myThid) |
|
./model/src/initialise_fixed.F |
276 |
INITIALISE_FIXED |
CALL CONFIG_CHECK( myThid ) |
|
./model/src/initialise_fixed.F |
281 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('WRITE_GRID',myThid) |
|
./model/src/initialise_fixed.F |
283 |
INITIALISE_FIXED |
CALL WRITE_GRID( myThid ) |
|
./model/src/initialise_fixed.F |
291 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_CALL('CPL_EXCH_CONFIGS',myThid) |
|
./model/src/initialise_fixed.F |
293 |
INITIALISE_FIXED |
CALL CPL_EXCH_CONFIGS( myThid ) |
|
./model/src/initialise_fixed.F |
298 |
INITIALISE_FIXED |
CALL BAR_CHECK( 3, myThid ) |
|
./model/src/initialise_fixed.F |
301 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_LEAVE('INITIALISE_FIXED',myThid) |
|
./model/src/initialise_fixed.F |
92 |
INITIALISE_FIXED |
INTEGER myThid |
|
./model/src/initialise_fixed.F |
96 |
INITIALISE_FIXED |
IF (debugMode) CALL DEBUG_ENTER('INITIALISE_FIXED',myThid) |
|
./model/src/initialise_varia.F |
106 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_ENTER('INITIALISE_VARIA',myThid) |
|
./model/src/initialise_varia.F |
116 |
INITIALISE_VARIA |
CALL INI_DEPTHS( myThid ) |
|
./model/src/initialise_varia.F |
118 |
INITIALISE_VARIA |
CALL CTRL_DEPTH_INI( myThid ) |
|
./model/src/initialise_varia.F |
120 |
INITIALISE_VARIA |
CALL UPDATE_MASKS_ETC( myThid ) |
|
./model/src/initialise_varia.F |
122 |
INITIALISE_VARIA |
CALL UPDATE_CG2D( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
127 |
INITIALISE_VARIA |
CALL INI_NLFS_VARS( myThid ) |
|
./model/src/initialise_varia.F |
131 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('INI_DYNVARS',myThid) |
|
./model/src/initialise_varia.F |
133 |
INITIALISE_VARIA |
CALL INI_DYNVARS( myThid ) |
|
./model/src/initialise_varia.F |
137 |
INITIALISE_VARIA |
CALL INI_NH_VARS( myThid ) |
|
./model/src/initialise_varia.F |
141 |
INITIALISE_VARIA |
CALL INI_FFIELDS( myThid ) |
|
./model/src/initialise_varia.F |
148 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('INI_FIELDS',myThid) |
|
./model/src/initialise_varia.F |
150 |
INITIALISE_VARIA |
CALL INI_FIELDS( myThid ) |
|
./model/src/initialise_varia.F |
154 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('INI_MIXING',myThid) |
|
./model/src/initialise_varia.F |
156 |
INITIALISE_VARIA |
CALL INI_MIXING( myThid ) |
|
./model/src/initialise_varia.F |
160 |
INITIALISE_VARIA |
CALL TAUEDDY_INIT_VARIA( myThid ) |
|
./model/src/initialise_varia.F |
165 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('INI_FORCING',myThid) |
|
./model/src/initialise_varia.F |
167 |
INITIALISE_VARIA |
CALL INI_FORCING( myThid ) |
|
./model/src/initialise_varia.F |
16 |
INITIALISE_VARIA |
SUBROUTINE INITIALISE_VARIA( myThid ) |
|
./model/src/initialise_varia.F |
171 |
INITIALISE_VARIA |
if (useAUTODIFF) CALL AUTODIFF_INIT_VARIA( myThid ) |
|
./model/src/initialise_varia.F |
176 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('PACKAGES_INIT_VARIABLES',myThid) |
|
./model/src/initialise_varia.F |
183 |
INITIALISE_VARIA |
CALL PACKAGES_INIT_VARIABLES( myThid ) |
|
./model/src/initialise_varia.F |
188 |
INITIALISE_VARIA |
CALL COST_INIT_VARIA( myThid ) |
|
./model/src/initialise_varia.F |
204 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('CONVECTIVE_ADJUSTMENT_INI',myThid) |
|
./model/src/initialise_varia.F |
207 |
INITIALISE_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/initialise_varia.F |
209 |
INITIALISE_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/initialise_varia.F |
211 |
INITIALISE_VARIA |
I bi, bj, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
222 |
INITIALISE_VARIA |
& CALL CALC_R_STAR(etaH, startTime, -1 , myThid ) |
|
./model/src/initialise_varia.F |
227 |
INITIALISE_VARIA |
CALL UPDATE_R_STAR( .TRUE., startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
231 |
INITIALISE_VARIA |
CALL UPDATE_SIGMA( etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
234 |
INITIALISE_VARIA |
CALL CALC_SURF_DR(etaH, startTime, -1 , myThid ) |
|
./model/src/initialise_varia.F |
235 |
INITIALISE_VARIA |
CALL UPDATE_SURF_DR( .TRUE., startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
240 |
INITIALISE_VARIA |
CALL UPDATE_CG2D( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
245 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('INTEGR_CONTINUITY',myThid) |
|
./model/src/initialise_varia.F |
249 |
INITIALISE_VARIA |
I startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
255 |
INITIALISE_VARIA |
CALL CALC_R_STAR(etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
259 |
INITIALISE_VARIA |
CALL CALC_SURF_DR(etaH, startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
280 |
INITIALISE_VARIA |
CALL TIMER_START('GRIDALT_UPDATE [INITIALISE_VARIA]',myThid) |
|
./model/src/initialise_varia.F |
281 |
INITIALISE_VARIA |
CALL GRIDALT_UPDATE(myThid) |
|
./model/src/initialise_varia.F |
282 |
INITIALISE_VARIA |
CALL TIMER_STOP ('GRIDALT_UPDATE [INITIALISE_VARIA]',myThid) |
|
./model/src/initialise_varia.F |
288 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('STATE_SUMMARY',myThid) |
|
./model/src/initialise_varia.F |
290 |
INITIALISE_VARIA |
CALL STATE_SUMMARY( myThid ) |
|
./model/src/initialise_varia.F |
294 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('MONITOR',myThid) |
|
./model/src/initialise_varia.F |
297 |
INITIALISE_VARIA |
CALL MONITOR( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
302 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('DO_STATEVARS_TAVE',myThid) |
|
./model/src/initialise_varia.F |
305 |
INITIALISE_VARIA |
CALL DO_STATEVARS_TAVE( startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
310 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_CALL('DO_THE_MODEL_IO',myThid) |
|
./model/src/initialise_varia.F |
312 |
INITIALISE_VARIA |
CALL DO_THE_MODEL_IO( .FALSE., startTime, nIter0, myThid ) |
|
./model/src/initialise_varia.F |
315 |
INITIALISE_VARIA |
IF (debugMode) CALL DEBUG_LEAVE('INITIALISE_VARIA',myThid) |
|
./model/src/initialise_varia.F |
319 |
INITIALISE_VARIA |
CALL BAR_CHECK( 4, myThid ) |
|
./model/src/initialise_varia.F |
98 |
INITIALISE_VARIA |
INTEGER myThid |
|
./model/src/integr_continuity.F |
12 |
INTEGR_CONTINUITY |
I myTime, myIter, myThid ) |
|
./model/src/integr_continuity.F |
262 |
INTEGR_CONTINUITY |
I myThid ) |
|
./model/src/integr_continuity.F |
289 |
INTEGR_CONTINUITY |
& CALL OBCS_APPLY_W( bi, bj, k, wVel, myThid ) |
|
./model/src/integr_continuity.F |
303 |
INTEGR_CONTINUITY |
& _EXCH_XY_RL( etaN , myThid ) |
|
./model/src/integr_continuity.F |
305 |
INTEGR_CONTINUITY |
& _EXCH_XYZ_RL( wVel , myThid ) |
|
./model/src/integr_continuity.F |
313 |
INTEGR_CONTINUITY |
IF (debugMode) CALL DEBUG_CALL('UPDATE_ETAH',myThid) |
|
./model/src/integr_continuity.F |
315 |
INTEGR_CONTINUITY |
CALL UPDATE_ETAH( myTime, myIter, myThid ) |
|
./model/src/integr_continuity.F |
321 |
INTEGR_CONTINUITY |
CALL EXCH_XY_RL( dEtaHdt, myThid ) |
|
./model/src/integr_continuity.F |
322 |
INTEGR_CONTINUITY |
CALL UPDATE_ETAWS( myTime, myIter, myThid ) |
|
./model/src/integr_continuity.F |
42 |
INTEGR_CONTINUITY |
INTEGER myThid |
|
./model/src/integr_continuity.F |
79 |
INTEGR_CONTINUITY |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/integr_continuity.F |
80 |
INTEGR_CONTINUITY |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/integrate_for_w.F |
12 |
INTEGRATE_FOR_W |
I myThid ) |
|
./model/src/integrate_for_w.F |
50 |
INTEGRATE_FOR_W |
INTEGER myThid |
|
./verification/dome/code/obcs_calc.F |
100 |
OBCS_CALC |
& myThid ) |
|
./verification/dome/code/obcs_calc.F |
132 |
OBCS_CALC |
& myThid ) |
|
./verification/dome/code/obcs_calc.F |
151 |
OBCS_CALC |
& myThid ) |
|
./verification/dome/code/obcs_calc.F |
212 |
OBCS_CALC |
& myThid ) |
|
./verification/dome/code/obcs_calc.F |
233 |
OBCS_CALC |
CALL OBCS_BALANCE_FLOW( futureTime, futureIter, myThid ) |
|
./verification/dome/code/obcs_calc.F |
238 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_CALC',myThid) |
|
./verification/dome/code/obcs_calc.F |
34 |
OBCS_CALC |
INTEGER myThid |
|
./verification/dome/code/obcs_calc.F |
51 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_ENTER('OBCS_CALC',myThid) |
|
./verification/dome/code/obcs_calc.F |
8 |
OBCS_CALC |
& myThid ) |
|
./verification/dome/code/obcs_calc.F |
92 |
OBCS_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/dome/code/obcs_calc.F |
93 |
OBCS_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/load_fields_driver.F |
111 |
LOAD_FIELDS_DRIVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/load_fields_driver.F |
112 |
LOAD_FIELDS_DRIVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/load_fields_driver.F |
127 |
LOAD_FIELDS_DRIVER |
if (useCTRL) CALL CTRL_MAP_GENTIM2D( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
134 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_CALL('BULKF_FIELDS_LOAD',myThid) |
|
./model/src/load_fields_driver.F |
136 |
LOAD_FIELDS_DRIVER |
CALL TIMER_START('BULKF_FIELDS_LOAD [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
137 |
LOAD_FIELDS_DRIVER |
CALL BULKF_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
138 |
LOAD_FIELDS_DRIVER |
CALL TIMER_STOP ('BULKF_FIELDS_LOAD [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
146 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_CALL('EXF_GETFORCING',myThid) |
|
./model/src/load_fields_driver.F |
148 |
LOAD_FIELDS_DRIVER |
CALL TIMER_START('EXF_GETFORCING [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
149 |
LOAD_FIELDS_DRIVER |
CALL EXF_GETFORCING( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
150 |
LOAD_FIELDS_DRIVER |
CALL TIMER_STOP ('EXF_GETFORCING [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
158 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_CALL('CHEAPAML_FIELDS_LOAD',myThid) |
|
./model/src/load_fields_driver.F |
160 |
LOAD_FIELDS_DRIVER |
CALL CHEAPAML_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
166 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_CALL('EXTERNAL_FIELDS_LOAD',myThid) |
|
./model/src/load_fields_driver.F |
168 |
LOAD_FIELDS_DRIVER |
CALL TIMER_START('EXTERNAL_FLDS_LOAD [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
169 |
LOAD_FIELDS_DRIVER |
CALL EXTERNAL_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
170 |
LOAD_FIELDS_DRIVER |
CALL TIMER_STOP ('EXTERNAL_FLDS_LOAD [LOAD_FLDS_DRIVER]',myThid) |
|
./model/src/load_fields_driver.F |
183 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_CALL('GCHEM_FIELDS_LOAD',myThid) |
|
./model/src/load_fields_driver.F |
185 |
LOAD_FIELDS_DRIVER |
CALL GCHEM_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
191 |
LOAD_FIELDS_DRIVER |
CALL RBCS_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
198 |
LOAD_FIELDS_DRIVER |
CALL AIM_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
203 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_LEAVE( 'LOAD_FIELDS_DRIVER', myThid ) |
|
./model/src/load_fields_driver.F |
22 |
LOAD_FIELDS_DRIVER |
SUBROUTINE LOAD_FIELDS_DRIVER( myTime, myIter, myThid ) |
|
./model/src/load_fields_driver.F |
80 |
LOAD_FIELDS_DRIVER |
INTEGER myThid |
|
./model/src/load_fields_driver.F |
89 |
LOAD_FIELDS_DRIVER |
IF (debugMode) CALL DEBUG_ENTER( 'LOAD_FIELDS_DRIVER', myThid ) |
|
./model/src/load_fields_driver.F |
95 |
LOAD_FIELDS_DRIVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/load_fields_driver.F |
96 |
LOAD_FIELDS_DRIVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/load_grid_spacing.F |
103 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RS( hybSigmFile,' ',aHybSigmF,Nr+1, 1,myThid ) |
|
./model/src/load_grid_spacing.F |
104 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RS( hybSigmFile,' ',bHybSigmF,Nr+1, 2,myThid ) |
|
./model/src/load_grid_spacing.F |
108 |
LOAD_GRID_SPACING |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/load_grid_spacing.F |
125 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
132 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
138 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
14 |
LOAD_GRID_SPACING |
SUBROUTINE LOAD_GRID_SPACING( myThid ) |
|
./model/src/load_grid_spacing.F |
150 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
157 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
163 |
LOAD_GRID_SPACING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_grid_spacing.F |
180 |
LOAD_GRID_SPACING |
_END_MASTER(myThid) |
|
./model/src/load_grid_spacing.F |
33 |
LOAD_GRID_SPACING |
INTEGER myThid |
|
./model/src/load_grid_spacing.F |
59 |
LOAD_GRID_SPACING |
_BEGIN_MASTER( myThid ) |
|
./model/src/load_grid_spacing.F |
64 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RL( delXFile, ' ', delX, gridNx, 1, myThid ) |
|
./model/src/load_grid_spacing.F |
68 |
LOAD_GRID_SPACING |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/load_grid_spacing.F |
74 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RL( delYFile, ' ', delY, gridNy, 1, myThid ) |
|
./model/src/load_grid_spacing.F |
78 |
LOAD_GRID_SPACING |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/load_grid_spacing.F |
84 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RL( delRFile, ' ', delR, Nr, 1, myThid ) |
|
./model/src/load_grid_spacing.F |
88 |
LOAD_GRID_SPACING |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/load_grid_spacing.F |
93 |
LOAD_GRID_SPACING |
CALL READ_GLVEC_RL( delRcFile, ' ', delRc, Nr+1, 1, myThid ) |
|
./model/src/load_grid_spacing.F |
97 |
LOAD_GRID_SPACING |
& SQUEEZE_RIGHT , myThid ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
116 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_CHEM(myThid, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
121 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
122 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
134 |
FIZHI_INIT_FIXED |
call MDSFINDUNIT( kice, myThid ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
136 |
FIZHI_INIT_FIXED |
call MDSFINDUNIT( ksst, myThid ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
38 |
FIZHI_INIT_FIXED |
INTEGER myThid |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
5 |
FIZHI_INIT_FIXED |
SUBROUTINE FIZHI_INIT_FIXED (myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
60 |
FIZHI_INIT_FIXED |
call FIZHI_MNC_INIT(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
66 |
FIZHI_INIT_FIXED |
call FIZHI_DIAGNOSTICS_INIT( myThid ) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
72 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
73 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
83 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( myThid, vegdata,im2,jm2,nSx,nSy, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
88 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
89 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
106 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
107 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
SUBROUTINE FIZHI_INIT_VEG(myThid,vegdata,im,jm,nSx,nSy,Nxg,Nyg, |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
72 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_veg.F |
73 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
10 |
FIZHI_INIT_VEGSURFTILES |
& nymd,nhms,prec,myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
34 |
FIZHI_INIT_VEGSURFTILES |
INTEGER myThid |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
40 |
FIZHI_INIT_VEGSURFTILES |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/fizhi_init_vegsurftiles.F |
41 |
FIZHI_INIT_VEGSURFTILES |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
102 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
103 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
117 |
INI_SALT |
_EXCH_XYZ_RL(salt , myThid ) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
123 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
124 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
142 |
INI_SALT |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
146 |
INI_SALT |
CALL PLOT_FIELD_XYZRL( salt, 'Initial Salinity' , Nr, 1, myThid ) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
39 |
INI_SALT |
INTEGER myThid |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
71 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
72 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
84 |
INI_SALT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
85 |
INI_SALT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
97 |
INI_SALT |
_BEGIN_MASTER( myThid ) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
98 |
INI_SALT |
CALL READ_FLD_XYZ_RL( hydrogSaltFile, ' ', rhum, 0, myThid ) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
99 |
INI_SALT |
_END_MASTER(myThid) |
|
./verification/fizhi-cs-aqualev20/code/ini_salt.F |
9 |
INI_SALT |
SUBROUTINE INI_SALT ( myThid ) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
111 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_RL(sst,myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
112 |
UPDATE_OCEAN_EXPORTS |
_EXCH_XY_RL(sice,myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
25 |
UPDATE_OCEAN_EXPORTS |
integer myIter, myThid |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
5 |
UPDATE_OCEAN_EXPORTS |
subroutine UPDATE_OCEAN_EXPORTS (myTime, myIter, myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
79 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
80 |
UPDATE_OCEAN_EXPORTS |
DO BI = myBxLo(myThid),myBxHi(myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
93 |
UPDATE_OCEAN_EXPORTS |
. ssttimes(1,bi,bj),sst,myThid) |
|
./verification/fizhi-cs-aqualev20/code/update_ocean_exports.F |
98 |
UPDATE_OCEAN_EXPORTS |
. sicetimes(1,bi,bj),sice,myThid) |
|
./model/src/load_ref_files.F |
102 |
LOAD_REF_FILES |
CALL READ_GLVEC_RL( sRefFile, ' ', sRef, Nr, 1, myThid ) |
|
./model/src/load_ref_files.F |
106 |
LOAD_REF_FILES |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/load_ref_files.F |
10 |
LOAD_REF_FILES |
SUBROUTINE LOAD_REF_FILES( myThid ) |
|
./model/src/load_ref_files.F |
113 |
LOAD_REF_FILES |
CALL READ_GLVEC_RL( rhoRefFile, ' ', rho1Ref, Nr, 1, myThid ) |
|
./model/src/load_ref_files.F |
117 |
LOAD_REF_FILES |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/load_ref_files.F |
126 |
LOAD_REF_FILES |
CALL READ_GLVEC_RL( gravityFile, ' ', gravFacC, Nr, 1, myThid ) |
|
./model/src/load_ref_files.F |
130 |
LOAD_REF_FILES |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/load_ref_files.F |
170 |
LOAD_REF_FILES |
_END_MASTER(myThid) |
|
./model/src/load_ref_files.F |
30 |
LOAD_REF_FILES |
INTEGER myThid |
|
./model/src/load_ref_files.F |
45 |
LOAD_REF_FILES |
_BEGIN_MASTER( myThid ) |
|
./model/src/load_ref_files.F |
63 |
LOAD_REF_FILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/load_ref_files.F |
71 |
LOAD_REF_FILES |
CALL READ_GLVEC_RL( tRefFile, ' ', tRef, Nr, 1, myThid ) |
|
./model/src/load_ref_files.F |
75 |
LOAD_REF_FILES |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/load_ref_files.F |
94 |
LOAD_REF_FILES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
116 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_CHEM(myThid, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
121 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
122 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
38 |
FIZHI_INIT_FIXED |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
5 |
FIZHI_INIT_FIXED |
SUBROUTINE FIZHI_INIT_FIXED (myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
60 |
FIZHI_INIT_FIXED |
call FIZHI_MNC_INIT(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
66 |
FIZHI_INIT_FIXED |
call FIZHI_DIAGNOSTICS_INIT( myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
72 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
73 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
83 |
FIZHI_INIT_FIXED |
call FIZHI_INIT_VEG ( myThid, vegdata,im2,jm2,nSx,nSy, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
88 |
FIZHI_INIT_FIXED |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
89 |
FIZHI_INIT_FIXED |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
135 |
FIZHI_INIT_VARS |
call CTOA(myThid,uvel,vvel,maskW,maskS,im1,im2,jm1,jm2,Nr, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
138 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
139 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
286 |
FIZHI_INIT_VARS |
call FIZHI_READ_PICKUP( nIter0, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
287 |
FIZHI_INIT_VARS |
CALL FIZHI_READ_VEGTILES( nIter0, 'D', myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
288 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
289 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
38 |
FIZHI_INIT_VARS |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
5 |
FIZHI_INIT_VARS |
SUBROUTINE FIZHI_INIT_VARS (myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
76 |
FIZHI_INIT_VARS |
do bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_vars.F |
77 |
FIZHI_INIT_VARS |
do bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
119 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
120 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
57 |
FIZHI_INIT_VEG |
INTEGER myThid,im,jm,maxtyp,nchp,nSx,nSy,Nxg,Nyg |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
6 |
FIZHI_INIT_VEG |
SUBROUTINE FIZHI_INIT_VEG(myThid,vegdata,im,jm,nSx,nSy,Nxg,Nyg, |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
76 |
FIZHI_INIT_VEG |
CALL READ_REC_XY_RS(aim_LandFile,aim_landFr,1,0,myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
78 |
FIZHI_INIT_VEG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_init_veg.F |
79 |
FIZHI_INIT_VEG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
102 |
FIZHI_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
132 |
FIZHI_TENDENCY_APPLY_T |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
148 |
FIZHI_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
178 |
FIZHI_TENDENCY_APPLY_S |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
39 |
FIZHI_TENDENCY_APPLY_U |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
55 |
FIZHI_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
86 |
FIZHI_TENDENCY_APPLY_V |
INTEGER myThid |
|
./verification/fizhi-gridalt-hs/code/fizhi_tendency_apply.F |
8 |
FIZHI_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
21 |
UPDATE_OCEAN_EXPORTS |
integer myIter, myThid |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
43 |
UPDATE_OCEAN_EXPORTS |
DO BJ = myByLo(myThid),myByHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
44 |
UPDATE_OCEAN_EXPORTS |
DO BI = myBxLo(myThid),myBxHi(myThid) |
|
./verification/fizhi-gridalt-hs/code/update_ocean_exports.F |
5 |
UPDATE_OCEAN_EXPORTS |
subroutine UPDATE_OCEAN_EXPORTS (myTime, myIter, myThid) |
|
./model/src/main_do_loop.F |
150 |
MAIN_DO_LOOP |
INTEGER myThid |
|
./model/src/main_do_loop.F |
161 |
MAIN_DO_LOOP |
IF (debugMode) CALL DEBUG_ENTER('MAIN_DO_LOOP',myThid) |
|
./model/src/main_do_loop.F |
176 |
MAIN_DO_LOOP |
IF (debugMode) CALL DEBUG_CALL('FORWARD_STEP',myThid) |
|
./model/src/main_do_loop.F |
181 |
MAIN_DO_LOOP |
CALL TIMER_START('FORWARD_STEP_ATM2D [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
182 |
MAIN_DO_LOOP |
CALL FORWARD_STEP_ATM2D( iloop, myTime, myIter, myThid ) |
|
./model/src/main_do_loop.F |
183 |
MAIN_DO_LOOP |
CALL TIMER_STOP ('FORWARD_STEP_ATM2D [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
185 |
MAIN_DO_LOOP |
CALL TIMER_START('FORWARD_STEP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
186 |
MAIN_DO_LOOP |
CALL FORWARD_STEP( iloop, myTime, myIter, myThid ) |
|
./model/src/main_do_loop.F |
187 |
MAIN_DO_LOOP |
CALL TIMER_STOP ('FORWARD_STEP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
191 |
MAIN_DO_LOOP |
CALL TIMER_START('INNER_DO_LOOP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
193 |
MAIN_DO_LOOP |
CALL INNER_DO_LOOP( iloop, myTime, myIter, myThid ) |
|
./model/src/main_do_loop.F |
194 |
MAIN_DO_LOOP |
CALL TIMER_STOP ('INNER_DO_LOOP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
196 |
MAIN_DO_LOOP |
CALL TIMER_START('FORWARD_STEP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
198 |
MAIN_DO_LOOP |
CALL FORWARD_STEP( iloop, myTime, myIter, myThid ) |
|
./model/src/main_do_loop.F |
199 |
MAIN_DO_LOOP |
CALL TIMER_STOP ('FORWARD_STEP [MAIN_DO_LOOP]',myThid) |
|
./model/src/main_do_loop.F |
210 |
MAIN_DO_LOOP |
IF (debugMode) CALL DEBUG_LEAVE('MAIN_DO_LOOP',myThid) |
|
./model/src/main_do_loop.F |
52 |
MAIN_DO_LOOP |
SUBROUTINE MAIN_DO_LOOP( iloop, myTime, myIter, myThid ) |
|
./model/src/momentum_correction_step.F |
10 |
MOMENTUM_CORRECTION_STEP |
SUBROUTINE MOMENTUM_CORRECTION_STEP( myTime, myIter, myThid ) |
|
./model/src/momentum_correction_step.F |
112 |
MOMENTUM_CORRECTION_STEP |
CALL TIMER_START('SHAP_FILT_UV [MOM_CORR_STEP]',myThid) |
|
./model/src/momentum_correction_step.F |
113 |
MOMENTUM_CORRECTION_STEP |
CALL SHAP_FILT_APPLY_UV( uVel, vVel, myTime, myIter, myThid ) |
|
./model/src/momentum_correction_step.F |
114 |
MOMENTUM_CORRECTION_STEP |
CALL TIMER_STOP ('SHAP_FILT_UV [MOM_CORR_STEP]',myThid) |
|
./model/src/momentum_correction_step.F |
121 |
MOMENTUM_CORRECTION_STEP |
CALL TIMER_START('ZONAL_FILT_UV [MOM_CORR_STEP]',myThid) |
|
./model/src/momentum_correction_step.F |
122 |
MOMENTUM_CORRECTION_STEP |
CALL ZONAL_FILT_APPLY_UV( uVel, vVel, myThid ) |
|
./model/src/momentum_correction_step.F |
123 |
MOMENTUM_CORRECTION_STEP |
CALL TIMER_STOP ('ZONAL_FILT_UV [MOM_CORR_STEP]',myThid) |
|
./model/src/momentum_correction_step.F |
131 |
MOMENTUM_CORRECTION_STEP |
& CALL EXCH_UV_3D_RL( uVel, vVel, .TRUE., Nr, myThid ) |
|
./model/src/momentum_correction_step.F |
52 |
MOMENTUM_CORRECTION_STEP |
INTEGER myThid |
|
./model/src/momentum_correction_step.F |
63 |
MOMENTUM_CORRECTION_STEP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/momentum_correction_step.F |
64 |
MOMENTUM_CORRECTION_STEP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/momentum_correction_step.F |
87 |
MOMENTUM_CORRECTION_STEP |
I myThid ) |
|
./model/src/momentum_correction_step.F |
93 |
MOMENTUM_CORRECTION_STEP |
I myTime, myIter, myThid ) |
|
./model/src/momentum_correction_step.F |
98 |
MOMENTUM_CORRECTION_STEP |
CALL OBCS_APPLY_UV( bi, bj, 0, uVel, vVel, myThid ) |
|
./model/src/packages_boot.F |
101 |
PACKAGES_BOOT |
_BEGIN_MASTER(myThid) |
|
./model/src/packages_boot.F |
105 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/packages_boot.F |
10 |
PACKAGES_BOOT |
SUBROUTINE PACKAGES_BOOT( myThid ) |
|
./model/src/packages_boot.F |
110 |
PACKAGES_BOOT |
I myThid ) |
|
./model/src/packages_boot.F |
181 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/packages_boot.F |
196 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
200 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
204 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
228 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
230 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
234 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
236 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
240 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
244 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
252 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
37 |
PACKAGES_BOOT |
INTEGER myThid |
|
./model/src/packages_boot.F |
499 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
502 |
PACKAGES_BOOT |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_boot.F |
504 |
PACKAGES_BOOT |
_END_MASTER(myThid) |
|
./eesupp/src/cumulsum_z_tile.F |
20 |
CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
|
./eesupp/src/cumulsum_z_tile.F |
230 |
CUMULSUM_Z_TILE_RL |
_END_MASTER( myThid ) |
|
./eesupp/src/cumulsum_z_tile.F |
232 |
CUMULSUM_Z_TILE_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/cumulsum_z_tile.F |
235 |
CUMULSUM_Z_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/cumulsum_z_tile.F |
236 |
CUMULSUM_Z_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/cumulsum_z_tile.F |
52 |
CUMULSUM_Z_TILE_RL |
INTEGER myThid |
|
./eesupp/src/cumulsum_z_tile.F |
76 |
CUMULSUM_Z_TILE_RL |
I dPsiX, dPsiY, myThid ) |
|
./eesupp/src/cumulsum_z_tile.F |
80 |
CUMULSUM_Z_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/cumulsum_z_tile.F |
81 |
CUMULSUM_Z_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/cumulsum_z_tile.F |
90 |
CUMULSUM_Z_TILE_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/cumulsum_z_tile.F |
91 |
CUMULSUM_Z_TILE_RL |
_BEGIN_MASTER( myThid ) |
|
./model/src/packages_check.F |
107 |
PACKAGES_CHECK |
INTEGER myThid |
|
./model/src/packages_check.F |
10 |
PACKAGES_CHECK |
SUBROUTINE PACKAGES_CHECK( myThid ) |
|
./model/src/packages_check.F |
115 |
PACKAGES_CHECK |
_BEGIN_MASTER(myThid) |
|
./model/src/packages_check.F |
119 |
PACKAGES_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_check.F |
122 |
PACKAGES_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_check.F |
123 |
PACKAGES_CHECK |
_END_MASTER(myThid) |
|
./model/src/packages_check.F |
129 |
PACKAGES_CHECK |
_BEGIN_MASTER(myThid) |
|
./model/src/packages_check.F |
133 |
PACKAGES_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_check.F |
137 |
PACKAGES_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_check.F |
138 |
PACKAGES_CHECK |
_END_MASTER(myThid) |
|
./model/src/packages_check.F |
147 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
150 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
151 |
PACKAGES_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_check.F |
160 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
163 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
164 |
PACKAGES_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_check.F |
174 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
177 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
178 |
PACKAGES_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_check.F |
186 |
PACKAGES_CHECK |
& 'MONITOR', 'monitorFreq <> 0', myThid ) |
|
./model/src/packages_check.F |
192 |
PACKAGES_CHECK |
& 'TIMEAVE', 'taveFreq <> 0', myThid ) |
|
./model/src/packages_check.F |
197 |
PACKAGES_CHECK |
& 'CD_CODE', 'useCDscheme=.T.', myThid ) |
|
./model/src/packages_check.F |
203 |
PACKAGES_CHECK |
IF (useOBCS) CALL OBCS_CHECK( myThid ) |
|
./model/src/packages_check.F |
205 |
PACKAGES_CHECK |
IF (useOBCS) CALL PACKAGES_ERROR_MSG('OBCS',' ',myThid) |
|
./model/src/packages_check.F |
210 |
PACKAGES_CHECK |
& CALL PACKAGES_ERROR_MSG( 'SHAP_FILT', ' ', myThid ) |
|
./model/src/packages_check.F |
215 |
PACKAGES_CHECK |
& CALL PACKAGES_ERROR_MSG( 'ZONAL_FILT', ' ', myThid ) |
|
./model/src/packages_check.F |
219 |
PACKAGES_CHECK |
IF (useOPPS) CALL OPPS_CHECK( myThid ) |
|
./model/src/packages_check.F |
221 |
PACKAGES_CHECK |
IF (useOPPS) CALL PACKAGES_ERROR_MSG('OPPS',' ',myThid) |
|
./model/src/packages_check.F |
225 |
PACKAGES_CHECK |
IF (usePP81) CALL PP81_CHECK( myThid ) |
|
./model/src/packages_check.F |
227 |
PACKAGES_CHECK |
IF (usePP81) CALL PACKAGES_ERROR_MSG('PP81',' ',myThid) |
|
./model/src/packages_check.F |
231 |
PACKAGES_CHECK |
IF (useKL10) CALL KL10_CHECK( myThid ) |
|
./model/src/packages_check.F |
233 |
PACKAGES_CHECK |
IF (useKL10) CALL PACKAGES_ERROR_MSG('KL10',' ',myThid) |
|
./model/src/packages_check.F |
237 |
PACKAGES_CHECK |
IF (useMY82) CALL MY82_CHECK( myThid ) |
|
./model/src/packages_check.F |
239 |
PACKAGES_CHECK |
IF (useMY82) CALL PACKAGES_ERROR_MSG('MY82',' ',myThid) |
|
./model/src/packages_check.F |
243 |
PACKAGES_CHECK |
IF (useGGL90) CALL GGL90_CHECK( myThid ) |
|
./model/src/packages_check.F |
245 |
PACKAGES_CHECK |
IF (useGGL90) CALL PACKAGES_ERROR_MSG('GGL90',' ',myThid) |
|
./model/src/packages_check.F |
249 |
PACKAGES_CHECK |
IF (useKPP) CALL KPP_CHECK( myThid ) |
|
./model/src/packages_check.F |
251 |
PACKAGES_CHECK |
IF (useKPP) CALL PACKAGES_ERROR_MSG('KPP',' ',myThid) |
|
./model/src/packages_check.F |
255 |
PACKAGES_CHECK |
IF (useGMRedi) CALL GMREDI_CHECK( myThid ) |
|
./model/src/packages_check.F |
257 |
PACKAGES_CHECK |
IF (useGMRedi) CALL PACKAGES_ERROR_MSG('GMRedi',' ',myThid) |
|
./model/src/packages_check.F |
261 |
PACKAGES_CHECK |
IF (useBBL) CALL BBL_CHECK( myThid ) |
|
./model/src/packages_check.F |
263 |
PACKAGES_CHECK |
IF (useBBL) CALL PACKAGES_ERROR_MSG('BBL',' ',myThid) |
|
./model/src/packages_check.F |
268 |
PACKAGES_CHECK |
& CALL PACKAGES_ERROR_MSG('DOWN_SLOPE',' ',myThid) |
|
./model/src/packages_check.F |
272 |
PACKAGES_CHECK |
IF (useCAL) CALL PACKAGES_ERROR_MSG('CAL',' ',myThid) |
|
./model/src/packages_check.F |
276 |
PACKAGES_CHECK |
IF (useEXF) CALL EXF_CHECK( myThid ) |
|
./model/src/packages_check.F |
278 |
PACKAGES_CHECK |
IF (useEXF) CALL PACKAGES_ERROR_MSG('EXF',' ',myThid) |
|
./model/src/packages_check.F |
283 |
PACKAGES_CHECK |
& 'BULK_FORCE', 'useBulkForce=.T.', myThid ) |
|
./model/src/packages_check.F |
287 |
PACKAGES_CHECK |
IF (useEBM) CALL PACKAGES_ERROR_MSG('EBM',' ',myThid) |
|
./model/src/packages_check.F |
291 |
PACKAGES_CHECK |
IF (useCheapAML) CALL PACKAGES_ERROR_MSG('CheapAML',' ',myThid) |
|
./model/src/packages_check.F |
295 |
PACKAGES_CHECK |
IF (useFLT) CALL PACKAGES_ERROR_MSG('FLT',' ',myThid) |
|
./model/src/packages_check.F |
299 |
PACKAGES_CHECK |
IF (usePTRACERS) CALL PTRACERS_CHECK( myThid ) |
|
./model/src/packages_check.F |
301 |
PACKAGES_CHECK |
IF (usePTRACERS) CALL PACKAGES_ERROR_MSG('PTRACERS',' ',myThid) |
|
./model/src/packages_check.F |
305 |
PACKAGES_CHECK |
IF (useGCHEM) CALL GCHEM_CHECK( myThid ) |
|
./model/src/packages_check.F |
307 |
PACKAGES_CHECK |
IF (useGCHEM) CALL PACKAGES_ERROR_MSG('GCHEM',' ',myThid) |
|
./model/src/packages_check.F |
311 |
PACKAGES_CHECK |
IF (useRBCS) CALL PACKAGES_ERROR_MSG('RBCS',' ',myThid) |
|
./model/src/packages_check.F |
315 |
PACKAGES_CHECK |
IF (useOffLine) CALL OFFLINE_CHECK( myThid ) |
|
./model/src/packages_check.F |
317 |
PACKAGES_CHECK |
IF (useOffLine) CALL PACKAGES_ERROR_MSG('OffLine',' ',myThid) |
|
./model/src/packages_check.F |
321 |
PACKAGES_CHECK |
IF (useMATRIX) CALL PACKAGES_ERROR_MSG('MATRIX',' ',myThid) |
|
./model/src/packages_check.F |
325 |
PACKAGES_CHECK |
IF (useFRAZIL) CALL PACKAGES_ERROR_MSG('FRAZIL',' ',myThid) |
|
./model/src/packages_check.F |
329 |
PACKAGES_CHECK |
IF (useSEAICE) CALL SEAICE_CHECK( myThid ) |
|
./model/src/packages_check.F |
331 |
PACKAGES_CHECK |
IF (useSEAICE) CALL PACKAGES_ERROR_MSG('SEAICE',' ',myThid) |
|
./model/src/packages_check.F |
335 |
PACKAGES_CHECK |
IF (useSALT_PLUME)CALL SALT_PLUME_CHECK( myThid ) |
|
./model/src/packages_check.F |
337 |
PACKAGES_CHECK |
IF (useSALT_PLUME)CALL PACKAGES_ERROR_MSG('SALT_PLUME',' ',myThid) |
|
./model/src/packages_check.F |
341 |
PACKAGES_CHECK |
IF (useShelfIce) CALL SHELFICE_CHECK( myThid ) |
|
./model/src/packages_check.F |
343 |
PACKAGES_CHECK |
IF (useShelfIce) CALL PACKAGES_ERROR_MSG('ShelfIce',' ',myThid) |
|
./model/src/packages_check.F |
347 |
PACKAGES_CHECK |
IF (useStreamIce) CALL STREAMICE_CHECK( myThid ) |
|
./model/src/packages_check.F |
349 |
PACKAGES_CHECK |
IF (useStreamIce) CALL PACKAGES_ERROR_MSG('StreamIce',' ',myThid) |
|
./model/src/packages_check.F |
353 |
PACKAGES_CHECK |
IF (useICEFRONT) CALL ICEFRONT_CHECK( myThid ) |
|
./model/src/packages_check.F |
355 |
PACKAGES_CHECK |
IF (useICEFRONT) CALL PACKAGES_ERROR_MSG('ICEFRONT',' ',myThid) |
|
./model/src/packages_check.F |
359 |
PACKAGES_CHECK |
IF (useThSIce) CALL THSICE_CHECK( myThid ) |
|
./model/src/packages_check.F |
361 |
PACKAGES_CHECK |
IF (useThSIce) CALL PACKAGES_ERROR_MSG('ThSIce',' ',myThid) |
|
./model/src/packages_check.F |
365 |
PACKAGES_CHECK |
IF (useLand) CALL LAND_CHECK( myThid ) |
|
./model/src/packages_check.F |
367 |
PACKAGES_CHECK |
IF (useLand) CALL PACKAGES_ERROR_MSG('Land',' ',myThid) |
|
./model/src/packages_check.F |
371 |
PACKAGES_CHECK |
IF (useATM2D) CALL PACKAGES_ERROR_MSG('ATM2D',' ',myThid) |
|
./model/src/packages_check.F |
375 |
PACKAGES_CHECK |
IF (useAIM) CALL PACKAGES_ERROR_MSG('AIM',' ',myThid) |
|
./model/src/packages_check.F |
379 |
PACKAGES_CHECK |
IF (useAtm_Phys) CALL ATM_PHYS_CHECK( myThid ) |
|
./model/src/packages_check.F |
381 |
PACKAGES_CHECK |
IF (useAtm_Phys) CALL PACKAGES_ERROR_MSG('Atm_Phys',' ',myThid) |
|
./model/src/packages_check.F |
385 |
PACKAGES_CHECK |
IF (useFizhi) CALL PACKAGES_ERROR_MSG('Fizhi',' ',myThid) |
|
./model/src/packages_check.F |
389 |
PACKAGES_CHECK |
IF (useGridAlt) CALL PACKAGES_ERROR_MSG('GridAlt',' ',myThid) |
|
./model/src/packages_check.F |
393 |
PACKAGES_CHECK |
IF (useAUTODIFF) CALL AUTODIFF_CHECK( myThid ) |
|
./model/src/packages_check.F |
397 |
PACKAGES_CHECK |
IF (useCTRL) CALL CTRL_CHECK( myThid ) |
|
./model/src/packages_check.F |
401 |
PACKAGES_CHECK |
CALL COST_CHECK( myThid ) |
|
./model/src/packages_check.F |
405 |
PACKAGES_CHECK |
IF (useGrdChk) CALL GRDCHK_CHECK( myThid ) |
|
./model/src/packages_check.F |
407 |
PACKAGES_CHECK |
IF (useGrdChk) CALL PACKAGES_ERROR_MSG('GrdChk',' ',myThid) |
|
./model/src/packages_check.F |
411 |
PACKAGES_CHECK |
IF (useSMOOTH) CALL PACKAGES_ERROR_MSG('SMOOTH',' ',myThid) |
|
./model/src/packages_check.F |
415 |
PACKAGES_CHECK |
IF (usePROFILES) CALL PACKAGES_ERROR_MSG('PROFILES',' ',myThid) |
|
./model/src/packages_check.F |
419 |
PACKAGES_CHECK |
IF (useSBO) CALL SBO_CHECK( myThid ) |
|
./model/src/packages_check.F |
421 |
PACKAGES_CHECK |
IF (useSBO) CALL PACKAGES_ERROR_MSG('SBO',' ',myThid) |
|
./model/src/packages_check.F |
425 |
PACKAGES_CHECK |
IF (useECCO) CALL ECCO_CHECK( myThid ) |
|
./model/src/packages_check.F |
429 |
PACKAGES_CHECK |
IF (useDiagnostics) CALL DIAGNOSTICS_CHECK( myThid ) |
|
./model/src/packages_check.F |
432 |
PACKAGES_CHECK |
& CALL PACKAGES_ERROR_MSG( 'Diagnostics', ' ', myThid ) |
|
./model/src/packages_check.F |
436 |
PACKAGES_CHECK |
IF (useREGRID) CALL REGRID_CHECK( myThid ) |
|
./model/src/packages_check.F |
438 |
PACKAGES_CHECK |
IF (useREGRID) CALL PACKAGES_ERROR_MSG('REGRID',' ',myThid) |
|
./model/src/packages_check.F |
442 |
PACKAGES_CHECK |
IF ( useLayers ) CALL LAYERS_CHECK( myThid ) |
|
./model/src/packages_check.F |
444 |
PACKAGES_CHECK |
IF ( useLayers ) CALL PACKAGES_ERROR_MSG('LAYERS',' ',myThid) |
|
./model/src/packages_check.F |
448 |
PACKAGES_CHECK |
IF (useNEST_CHILD) CALL NEST_CHILD_CHECK( myThid ) |
|
./model/src/packages_check.F |
451 |
PACKAGES_CHECK |
& 'NEST_CHILD',' ',myThid) |
|
./model/src/packages_check.F |
455 |
PACKAGES_CHECK |
IF (useNEST_PARENT) CALL NEST_PARENT_CHECK( myThid ) |
|
./model/src/packages_check.F |
458 |
PACKAGES_CHECK |
& 'NEST_PARENT',' ',myThid) |
|
./model/src/packages_check.F |
462 |
PACKAGES_CHECK |
IF (useOASIS) CALL OASIS_CHECK( myThid ) |
|
./model/src/packages_check.F |
464 |
PACKAGES_CHECK |
IF (useOASIS) CALL PACKAGES_ERROR_MSG('OASIS',' ',myThid) |
|
./model/src/packages_check.F |
468 |
PACKAGES_CHECK |
IF (useRunClock) CALL RUNCLOCK_CHECK( myThid ) |
|
./model/src/packages_check.F |
470 |
PACKAGES_CHECK |
IF (useRunClock) CALL PACKAGES_ERROR_MSG('RunClock',' ',myThid) |
|
./model/src/packages_check.F |
475 |
PACKAGES_CHECK |
& 'EMBED_FILES',' ',myThid) |
|
./model/src/packages_check.F |
479 |
PACKAGES_CHECK |
IF (useMYPACKAGE) CALL MYPACKAGE_CHECK( myThid ) |
|
./model/src/packages_check.F |
481 |
PACKAGES_CHECK |
IF (useMYPACKAGE) CALL PACKAGES_ERROR_MSG('MYPACKAGE',' ',myThid) |
|
./model/src/packages_check.F |
487 |
PACKAGES_CHECK |
IF (useGAD) CALL GAD_CHECK( myThid ) |
|
./model/src/packages_check.F |
494 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
497 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
498 |
PACKAGES_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_check.F |
506 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
509 |
PACKAGES_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/packages_check.F |
510 |
PACKAGES_CHECK |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_error_msg.F |
34 |
PACKAGES_ERROR_MSG |
INTEGER myThid |
|
./model/src/packages_error_msg.F |
56 |
PACKAGES_ERROR_MSG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/packages_error_msg.F |
59 |
PACKAGES_ERROR_MSG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/packages_error_msg.F |
63 |
PACKAGES_ERROR_MSG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/packages_error_msg.F |
64 |
PACKAGES_ERROR_MSG |
CALL ALL_PROC_DIE( myThid ) |
|
./model/src/packages_error_msg.F |
9 |
PACKAGES_ERROR_MSG |
SUBROUTINE PACKAGES_ERROR_MSG( msg1, msg2, myThid ) |
|
./verification/global_ocean.cs32x15/code_ad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/global_ocean.cs32x15/code_ad/cost_test.F |
54 |
COST_TEST |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', thetaLev, 0, myThid ) |
|
./verification/global_ocean.cs32x15/code_ad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
108 |
PLOT_FIELD_XYRL |
I fld, fldNam , myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
137 |
PLOT_FIELD_XYRL |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
14 |
PLOT_FIELD_XYRS |
I fld, fldNam , myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
154 |
PLOT_FIELD_XYRL |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
202 |
PLOT_FIELD_XYZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
236 |
PLOT_FIELD_XYZRS |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
250 |
PLOT_FIELD_XYZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
295 |
PLOT_FIELD_XYZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
329 |
PLOT_FIELD_XYZRL |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
343 |
PLOT_FIELD_XYZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
389 |
PLOT_FIELD_XZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
423 |
PLOT_FIELD_XZRS |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
437 |
PLOT_FIELD_XZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
43 |
PLOT_FIELD_XYRS |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
477 |
PLOT_FIELD_XZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
511 |
PLOT_FIELD_XZRL |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
525 |
PLOT_FIELD_XZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
567 |
PLOT_FIELD_YZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
601 |
PLOT_FIELD_YZRS |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
60 |
PLOT_FIELD_XYRS |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
615 |
PLOT_FIELD_YZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
656 |
PLOT_FIELD_YZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
690 |
PLOT_FIELD_YZRL |
INTEGER myThid |
|
./verification/global_ocean.cs32x15/code_alt/code.192t_8x4/plot_field.F |
704 |
PLOT_FIELD_YZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/packages_init_fixed.F |
10 |
PACKAGES_INIT_FIXED |
SUBROUTINE PACKAGES_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
136 |
PACKAGES_INIT_FIXED |
INTEGER myThid |
|
./model/src/packages_init_fixed.F |
140 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_ENTER('PACKAGES_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
146 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('RUNCLOCK_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
148 |
PACKAGES_INIT_FIXED |
CALL RUNCLOCK_INIT( myThid ) |
|
./model/src/packages_init_fixed.F |
156 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CAL_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
158 |
PACKAGES_INIT_FIXED |
CALL CAL_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
166 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_INIT_EARLY',myThid) |
|
./model/src/packages_init_fixed.F |
168 |
PACKAGES_INIT_FIXED |
CALL DIAGNOSTICS_INIT_EARLY( myThid ) |
|
./model/src/packages_init_fixed.F |
170 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_MAIN_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
172 |
PACKAGES_INIT_FIXED |
CALL DIAGNOSTICS_MAIN_INIT( myThid ) |
|
./model/src/packages_init_fixed.F |
179 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GAD_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
181 |
PACKAGES_INIT_FIXED |
CALL GAD_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
188 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('MOM_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
190 |
PACKAGES_INIT_FIXED |
CALL MOM_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
197 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CD_CODE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
199 |
PACKAGES_INIT_FIXED |
CALL CD_CODE_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
207 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
209 |
PACKAGES_INIT_FIXED |
CALL OBCS_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
217 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SHAP_FILT_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
219 |
PACKAGES_INIT_FIXED |
CALL SHAP_FILT_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
227 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('ZONAL_FILT_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
229 |
PACKAGES_INIT_FIXED |
CALL ZONAL_FILT_INIT(myThid) |
|
./model/src/packages_init_fixed.F |
237 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('EXF_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
239 |
PACKAGES_INIT_FIXED |
CALL EXF_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
246 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CHEAPAML_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
248 |
PACKAGES_INIT_FIXED |
CALL CHEAPAML_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
255 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('OPPS_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
257 |
PACKAGES_INIT_FIXED |
CALL OPPS_INIT( myThid ) |
|
./model/src/packages_init_fixed.F |
265 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('PP81_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
267 |
PACKAGES_INIT_FIXED |
CALL PP81_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
275 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('KL10_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
277 |
PACKAGES_INIT_FIXED |
CALL KL10_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
285 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('MY82_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
287 |
PACKAGES_INIT_FIXED |
CALL MY82_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
295 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GGL90_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
297 |
PACKAGES_INIT_FIXED |
CALL GGL90_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
305 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('KPP_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
307 |
PACKAGES_INIT_FIXED |
CALL KPP_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
315 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GMREDI_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
317 |
PACKAGES_INIT_FIXED |
CALL GMREDI_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
325 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('BBL_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
327 |
PACKAGES_INIT_FIXED |
CALL BBL_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
335 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('DWNSLP_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
337 |
PACKAGES_INIT_FIXED |
CALL DWNSLP_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
347 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SEAICE_COST_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
349 |
PACKAGES_INIT_FIXED |
CALL SEAICE_COST_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
356 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SMOOTH_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
358 |
PACKAGES_INIT_FIXED |
CALL SMOOTH_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
367 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('ECCO_COST_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
369 |
PACKAGES_INIT_FIXED |
CALL ECCO_COST_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
376 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('PROFILES_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
378 |
PACKAGES_INIT_FIXED |
CALL PROFILES_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
388 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('FLT_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
390 |
PACKAGES_INIT_FIXED |
CALL FLT_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
397 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('LONGSTEP_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
399 |
PACKAGES_INIT_FIXED |
CALL LONGSTEP_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
406 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
408 |
PACKAGES_INIT_FIXED |
CALL PTRACERS_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
415 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GCHEM_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
417 |
PACKAGES_INIT_FIXED |
CALL GCHEM_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
424 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('RBCS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
426 |
PACKAGES_INIT_FIXED |
CALL RBCS_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
433 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('FRAZIL_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
435 |
PACKAGES_INIT_FIXED |
CALL FRAZIL_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
442 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
444 |
PACKAGES_INIT_FIXED |
CALL SEAICE_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
451 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SALT_PLUME_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
453 |
PACKAGES_INIT_FIXED |
CALL SALT_PLUME_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
460 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('SHELFICE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
462 |
PACKAGES_INIT_FIXED |
CALL SHELFICE_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
469 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
472 |
PACKAGES_INIT_FIXED |
CALL STREAMICE_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
474 |
PACKAGES_INIT_FIXED |
CALL OPENAD_STREAMICE_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
482 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('ICEFRONT_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
484 |
PACKAGES_INIT_FIXED |
CALL ICEFRONT_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
491 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('THSICE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
493 |
PACKAGES_INIT_FIXED |
CALL THSICE_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
501 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('LAND_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
503 |
PACKAGES_INIT_FIXED |
CALL LAND_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
510 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('ATM2D_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
512 |
PACKAGES_INIT_FIXED |
CALL ATM2D_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
520 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('AIM_INITIALISE',myThid) |
|
./model/src/packages_init_fixed.F |
522 |
PACKAGES_INIT_FIXED |
CALL AIM_INITIALISE( myThid ) |
|
./model/src/packages_init_fixed.F |
530 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('ATM_PHYS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
532 |
PACKAGES_INIT_FIXED |
CALL ATM_PHYS_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
540 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
542 |
PACKAGES_INIT_FIXED |
CALL FIZHI_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
550 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('GRIDALT_INITIALISE',myThid) |
|
./model/src/packages_init_fixed.F |
552 |
PACKAGES_INIT_FIXED |
CALL GRIDALT_INITIALISE( myThid ) |
|
./model/src/packages_init_fixed.F |
560 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('TIMEAVE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
562 |
PACKAGES_INIT_FIXED |
CALL TIMEAVE_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
569 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('REGRID_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
571 |
PACKAGES_INIT_FIXED |
CALL REGRID_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
578 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('LAYERS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
580 |
PACKAGES_INIT_FIXED |
CALL LAYERS_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
587 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CPL_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
589 |
PACKAGES_INIT_FIXED |
CALL CPL_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
597 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('OASIS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
599 |
PACKAGES_INIT_FIXED |
CALL OASIS_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
606 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('EMBED_FILES_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
608 |
PACKAGES_INIT_FIXED |
CALL EMBED_FILES_INIT( myThid ) |
|
./model/src/packages_init_fixed.F |
615 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('MYPACKAGE_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
617 |
PACKAGES_INIT_FIXED |
CALL MYPACKAGE_INIT_FIXED(myThid) |
|
./model/src/packages_init_fixed.F |
626 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CTRL_INIT',myThid) |
|
./model/src/packages_init_fixed.F |
628 |
PACKAGES_INIT_FIXED |
CALL CTRL_INIT( myThid ) |
|
./model/src/packages_init_fixed.F |
635 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('CTRL_ADMTLM',myThid) |
|
./model/src/packages_init_fixed.F |
637 |
PACKAGES_INIT_FIXED |
CALL CTRL_ADMTLM( myThid ) |
|
./model/src/packages_init_fixed.F |
646 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_CALL('DIAGNOSTICS_INIT_FIXED',myThid) |
|
./model/src/packages_init_fixed.F |
648 |
PACKAGES_INIT_FIXED |
CALL DIAGNOSTICS_INIT_FIXED( myThid ) |
|
./model/src/packages_init_fixed.F |
653 |
PACKAGES_INIT_FIXED |
IF (debugMode) CALL DEBUG_LEAVE('PACKAGES_INIT_FIXED',myThid) |
|
./model/src/packages_init_variables.F |
127 |
PACKAGES_INIT_VARIABLES |
INTEGER myThid |
|
./model/src/packages_init_variables.F |
132 |
PACKAGES_INIT_VARIABLES |
& CALL DEBUG_ENTER('PACKAGES_INIT_VARIABLES',myThid) |
|
./model/src/packages_init_variables.F |
137 |
PACKAGES_INIT_VARIABLES |
CALL DIAGNOSTICS_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
148 |
PACKAGES_INIT_VARIABLES |
CALL OFFLINE_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
157 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('GAD_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
159 |
PACKAGES_INIT_VARIABLES |
CALL GAD_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
169 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('CD_CODE_INI_VARS',myThid) |
|
./model/src/packages_init_variables.F |
16 |
PACKAGES_INIT_VARIABLES |
SUBROUTINE PACKAGES_INIT_VARIABLES( myThid ) |
|
./model/src/packages_init_variables.F |
171 |
PACKAGES_INIT_VARIABLES |
CALL CD_CODE_INI_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
179 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('PP81_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
181 |
PACKAGES_INIT_VARIABLES |
CALL PP81_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
189 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('KL10_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
191 |
PACKAGES_INIT_VARIABLES |
CALL KL10_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
198 |
PACKAGES_INIT_VARIABLES |
CALL MY82_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
206 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('GGL90_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
208 |
PACKAGES_INIT_VARIABLES |
CALL GGL90_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
216 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('KPP_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
218 |
PACKAGES_INIT_VARIABLES |
CALL KPP_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
226 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('GMREDI_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
228 |
PACKAGES_INIT_VARIABLES |
CALL GMREDI_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
234 |
PACKAGES_INIT_VARIABLES |
CALL BBL_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
240 |
PACKAGES_INIT_VARIABLES |
CALL DWNSLP_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
247 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('EXF_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
249 |
PACKAGES_INIT_VARIABLES |
CALL EXF_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
255 |
PACKAGES_INIT_VARIABLES |
CALL BULKF_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
264 |
PACKAGES_INIT_VARIABLES |
CALL EBM_INI_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
270 |
PACKAGES_INIT_VARIABLES |
CALL CHEAPAML_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
277 |
PACKAGES_INIT_VARIABLES |
CALL FLT_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
286 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('PTRACERS_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
288 |
PACKAGES_INIT_VARIABLES |
CALL PTRACERS_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
291 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('LONGSTEP_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
293 |
PACKAGES_INIT_VARIABLES |
CALL LONGSTEP_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
302 |
PACKAGES_INIT_VARIABLES |
CALL GCHEM_INIT_VARI( myThid ) |
|
./model/src/packages_init_variables.F |
308 |
PACKAGES_INIT_VARIABLES |
CALL RBCS_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
315 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('MATRIX_INIT',myThid) |
|
./model/src/packages_init_variables.F |
317 |
PACKAGES_INIT_VARIABLES |
CALL MATRIX_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
324 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('FRAZIL_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
326 |
PACKAGES_INIT_VARIABLES |
CALL FRAZIL_INIT_VARIA( myThid) |
|
./model/src/packages_init_variables.F |
334 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('SEAICE_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
336 |
PACKAGES_INIT_VARIABLES |
CALL SEAICE_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
342 |
PACKAGES_INIT_VARIABLES |
CALL SALT_PLUME_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
349 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('SHELFICE_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
351 |
PACKAGES_INIT_VARIABLES |
CALL SHELFICE_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
358 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('STREAMICE_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
360 |
PACKAGES_INIT_VARIABLES |
CALL STREAMICE_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
367 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('ICEFRONT_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
369 |
PACKAGES_INIT_VARIABLES |
CALL ICEFRONT_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
376 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('THSICE_INI_VARS',myThid) |
|
./model/src/packages_init_variables.F |
378 |
PACKAGES_INIT_VARIABLES |
CALL THSICE_INI_VARS( myThid) |
|
./model/src/packages_init_variables.F |
385 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('LAND_INI_VARS',myThid) |
|
./model/src/packages_init_variables.F |
387 |
PACKAGES_INIT_VARIABLES |
CALL LAND_INI_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
394 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('ATM2D_INIT_VARS',myThid) |
|
./model/src/packages_init_variables.F |
396 |
PACKAGES_INIT_VARIABLES |
CALL ATM2D_INIT_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
403 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('ATM_PHYS_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
405 |
PACKAGES_INIT_VARIABLES |
CALL ATM_PHYS_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
413 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('FIZHI_INIT_VARS',myThid) |
|
./model/src/packages_init_variables.F |
415 |
PACKAGES_INIT_VARIABLES |
CALL FIZHI_INIT_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
421 |
PACKAGES_INIT_VARIABLES |
CALL REGRID_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
427 |
PACKAGES_INIT_VARIABLES |
CALL LAYERS_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
436 |
PACKAGES_INIT_VARIABLES |
& CALL DEBUG_CALL('NEST_CHILD_INIT_VARIA',myThid) |
|
./model/src/packages_init_variables.F |
438 |
PACKAGES_INIT_VARIABLES |
CALL NEST_CHILD_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
447 |
PACKAGES_INIT_VARIABLES |
& CALL DEBUG_CALL('NEST_PARENT_INIT',myThid) |
|
./model/src/packages_init_variables.F |
449 |
PACKAGES_INIT_VARIABLES |
CALL NEST_PARENT_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
456 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('CPL_INI_VARS',myThid) |
|
./model/src/packages_init_variables.F |
458 |
PACKAGES_INIT_VARIABLES |
CALL CPL_INI_VARS( myThid ) |
|
./model/src/packages_init_variables.F |
464 |
PACKAGES_INIT_VARIABLES |
CALL MYPACKAGE_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
479 |
PACKAGES_INIT_VARIABLES |
CALL SMOOTH_INIT_VARIA(myThid) |
|
./model/src/packages_init_variables.F |
486 |
PACKAGES_INIT_VARIABLES |
CALL PROFILES_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
492 |
PACKAGES_INIT_VARIABLES |
IF ( useECCO ) CALL ECCO_INIT_VARIA( myThid ) |
|
./model/src/packages_init_variables.F |
499 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('CTRL_INIT_VARIABLES',myThid) |
|
./model/src/packages_init_variables.F |
501 |
PACKAGES_INIT_VARIABLES |
CALL CTRL_INIT_VARIABLES ( myThid ) |
|
./model/src/packages_init_variables.F |
509 |
PACKAGES_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('OBCS_INIT_VARIABLES',myThid) |
|
./model/src/packages_init_variables.F |
511 |
PACKAGES_INIT_VARIABLES |
CALL OBCS_INIT_VARIABLES( myThid ) |
|
./model/src/packages_init_variables.F |
517 |
PACKAGES_INIT_VARIABLES |
& CALL DEBUG_LEAVE('PACKAGES_INIT_VARIABLES',myThid) |
|
./verification/halfpipe_streamice/code_ad/cost_test.F |
35 |
COST_TEST |
integer myThid |
|
./verification/halfpipe_streamice/code_ad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
11 |
CTRL_MAP_GENTIM2D |
I myTime, myIter, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
147 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
148 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
161 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
162 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
46 |
CTRL_MAP_GENTIM2D |
INTEGER myThid |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
85 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
86 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
96 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_gentim2d.F |
97 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/packages_readparms.F |
11 |
PACKAGES_READPARMS |
SUBROUTINE PACKAGES_READPARMS(myThid) |
|
./model/src/packages_readparms.F |
141 |
PACKAGES_READPARMS |
INTEGER myThid |
|
./model/src/packages_readparms.F |
146 |
PACKAGES_READPARMS |
CALL MNC_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
152 |
PACKAGES_READPARMS |
CALL CAL_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
157 |
PACKAGES_READPARMS |
CALL EXF_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
162 |
PACKAGES_READPARMS |
CALL OBCS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
167 |
PACKAGES_READPARMS |
CALL SHAP_FILT_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
172 |
PACKAGES_READPARMS |
CALL ZONAL_FILT_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
177 |
PACKAGES_READPARMS |
CALL OPPS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
182 |
PACKAGES_READPARMS |
CALL PP81_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
187 |
PACKAGES_READPARMS |
CALL KL10_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
192 |
PACKAGES_READPARMS |
CALL MY82_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
197 |
PACKAGES_READPARMS |
CALL GGL90_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
202 |
PACKAGES_READPARMS |
CALL KPP_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
207 |
PACKAGES_READPARMS |
CALL GMREDI_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
212 |
PACKAGES_READPARMS |
CALL BBL_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
217 |
PACKAGES_READPARMS |
CALL DWNSLP_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
222 |
PACKAGES_READPARMS |
CALL BULKF_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
227 |
PACKAGES_READPARMS |
CALL EBM_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
232 |
PACKAGES_READPARMS |
CALL CHEAPAML_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
237 |
PACKAGES_READPARMS |
CALL FLT_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
243 |
PACKAGES_READPARMS |
CALL LONGSTEP_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
247 |
PACKAGES_READPARMS |
CALL PTRACERS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
252 |
PACKAGES_READPARMS |
CALL GCHEM_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
257 |
PACKAGES_READPARMS |
CALL RBCS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
262 |
PACKAGES_READPARMS |
CALL OFFLINE_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
267 |
PACKAGES_READPARMS |
CALL MATRIX_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
272 |
PACKAGES_READPARMS |
CALL SEAICE_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
277 |
PACKAGES_READPARMS |
CALL SALT_PLUME_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
282 |
PACKAGES_READPARMS |
CALL SHELFICE_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
287 |
PACKAGES_READPARMS |
CALL STREAMICE_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
292 |
PACKAGES_READPARMS |
CALL ICEFRONT_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
297 |
PACKAGES_READPARMS |
CALL THSICE_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
302 |
PACKAGES_READPARMS |
CALL LAND_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
307 |
PACKAGES_READPARMS |
CALL AUTODIFF_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
312 |
PACKAGES_READPARMS |
CALL OPTIM_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
314 |
PACKAGES_READPARMS |
CALL CTRL_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
319 |
PACKAGES_READPARMS |
CALL COST_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
324 |
PACKAGES_READPARMS |
CALL GRDCHK_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
329 |
PACKAGES_READPARMS |
CALL SMOOTH_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
334 |
PACKAGES_READPARMS |
CALL ECCO_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
339 |
PACKAGES_READPARMS |
CALL PROFILES_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
344 |
PACKAGES_READPARMS |
CALL SBO_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
349 |
PACKAGES_READPARMS |
CALL ATM_PHYS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
354 |
PACKAGES_READPARMS |
CALL FIZHI_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
360 |
PACKAGES_READPARMS |
CALL DIAGNOSTICS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
365 |
PACKAGES_READPARMS |
CALL REGRID_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
370 |
PACKAGES_READPARMS |
CALL LAYERS_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
375 |
PACKAGES_READPARMS |
IF (useNEST_CHILD) CALL NEST_CHILD_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
380 |
PACKAGES_READPARMS |
IF (useNEST_PARENT) CALL NEST_PARENT_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
385 |
PACKAGES_READPARMS |
IF ( useCoupler ) CALL CPL_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
389 |
PACKAGES_READPARMS |
IF (useOASIS) CALL OASIS_READPARMS ( myThid ) |
|
./model/src/packages_readparms.F |
394 |
PACKAGES_READPARMS |
CALL RUNCLOCK_READPARMS( myThid ) |
|
./model/src/packages_readparms.F |
399 |
PACKAGES_READPARMS |
CALL MYPACKAGE_READPARMS( myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
10 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
128 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( H_streamice, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
129 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( R_low_si, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
130 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( C_basal_friction, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
150 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
151 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
152 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
175 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( theta, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
176 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
178 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( diffkr, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
47 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F |
94 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
12 |
CTRL_MAP_INI_GENTIM2D |
SUBROUTINE CTRL_MAP_INI_GENTIM2D( myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
139 |
CTRL_MAP_INI_GENTIM2D |
& 1, wgentim2d(1-Olx,1-Oly,1,1,iarr), irec, myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
147 |
CTRL_MAP_INI_GENTIM2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
148 |
CTRL_MAP_INI_GENTIM2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
163 |
CTRL_MAP_INI_GENTIM2D |
CALL EXCH_XY_RL ( xx_gen , myThid ) |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
46 |
CTRL_MAP_INI_GENTIM2D |
INTEGER myThid |
|
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_gentim2d.F |
94 |
CTRL_MAP_INI_GENTIM2D |
I myThid ) |
|
./model/src/packages_unused_msg.F |
106 |
PACKAGES_UNUSED_MSG |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_unused_msg.F |
110 |
PACKAGES_UNUSED_MSG |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/packages_unused_msg.F |
52 |
PACKAGES_UNUSED_MSG |
INTEGER myThid |
|
./model/src/packages_unused_msg.F |
99 |
PACKAGES_UNUSED_MSG |
myThid = 1 |
|
./verification/halfpipe_streamice/code_oad/cost_test.F |
35 |
COST_TEST |
integer myThid |
|
./verification/halfpipe_streamice/code_oad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
11 |
CTRL_MAP_GENTIM2D |
I myTime, myIter, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
147 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
148 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
161 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
162 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
46 |
CTRL_MAP_GENTIM2D |
INTEGER myThid |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
85 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
86 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
96 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_gentim2d.F |
97 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
10 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
128 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( H_streamice, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
129 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( R_low_si, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
130 |
CTRL_MAP_INI_GENARR |
_EXCH_XY_RL( C_basal_friction, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
150 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
151 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
152 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
175 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( theta, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
176 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
178 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( diffkr, myThid ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
47 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F |
94 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.128x64x5/code/external_forcing.F |
110 |
EXTERNAL_FORCING_V |
INTEGER myThid |
|
./verification/hs94.128x64x5/code/external_forcing.F |
11 |
EXTERNAL_FORCING_U |
I myTime, myThid ) |
|
./verification/hs94.128x64x5/code/external_forcing.F |
147 |
EXTERNAL_FORCING_T |
I myTime, myThid ) |
|
./verification/hs94.128x64x5/code/external_forcing.F |
178 |
EXTERNAL_FORCING_T |
INTEGER myThid |
|
./verification/hs94.128x64x5/code/external_forcing.F |
220 |
EXTERNAL_FORCING_S |
I myTime, myThid ) |
|
./verification/hs94.128x64x5/code/external_forcing.F |
252 |
EXTERNAL_FORCING_S |
INTEGER myThid |
|
./verification/hs94.128x64x5/code/external_forcing.F |
42 |
EXTERNAL_FORCING_U |
INTEGER myThid |
|
./verification/hs94.128x64x5/code/external_forcing.F |
79 |
EXTERNAL_FORCING_V |
I myTime, myThid ) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
113 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
149 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
206 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
20 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
241 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
305 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
341 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/hs94.1x64x5/code/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./verification/hs94.1x64x5/code/ini_theta.F |
10 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
121 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
125 |
INI_THETA |
_EXCH_XYZ_RL(theta , myThid ) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
129 |
INI_THETA |
& Nr, 1, myThid ) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
41 |
INI_THETA |
INTEGER myThid |
|
./verification/hs94.1x64x5/code/ini_theta.F |
57 |
INI_THETA |
J = 99+myBxLo(myThid)+nPx*myByLo(myThid) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
63 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
64 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
86 |
INI_THETA |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
92 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
96 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code/ini_theta.F |
97 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/packages_write_pickup.F |
104 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
111 |
PACKAGES_WRITE_PICKUP |
& suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
118 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
125 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
133 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid) |
|
./model/src/packages_write_pickup.F |
141 |
PACKAGES_WRITE_PICKUP |
& suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
149 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
157 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
164 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
16 |
PACKAGES_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
171 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
178 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
185 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
193 |
PACKAGES_WRITE_PICKUP |
& suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
200 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
207 |
PACKAGES_WRITE_PICKUP |
CALL FIZHI_WRITE_PICKUP(suffix,myTime,myIter,myThid) |
|
./model/src/packages_write_pickup.F |
208 |
PACKAGES_WRITE_PICKUP |
CALL FIZHI_WRITE_VEGTILES(suffix,0,myTime,myIter,myThid) |
|
./model/src/packages_write_pickup.F |
209 |
PACKAGES_WRITE_PICKUP |
CALL FIZHI_WRITE_DATETIME(myTime,myIter,myThid) |
|
./model/src/packages_write_pickup.F |
217 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
224 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
231 |
PACKAGES_WRITE_PICKUP |
& suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
238 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./model/src/packages_write_pickup.F |
84 |
PACKAGES_WRITE_PICKUP |
INTEGER myThid |
|
./model/src/packages_write_pickup.F |
97 |
PACKAGES_WRITE_PICKUP |
I suffix, myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
113 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
149 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
206 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
20 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
241 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
305 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
341 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/hs94.1x64x5/code_ad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
107 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
108 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
10 |
CTRL_MAP_GENTIM2D |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
125 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
126 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
138 |
CTRL_MAP_GENTIM2D |
CALL GLOBAL_SUM_TILE_RL( LOCsumTile, LOCsumGlob, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
140 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
141 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
154 |
CTRL_MAP_GENTIM2D |
& SQUEEZE_RIGHT, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
158 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
159 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
42 |
CTRL_MAP_GENTIM2D |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
83 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F |
84 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
110 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( theta, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
111 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
131 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
132 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
133 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
43 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
91 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F |
9 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./model/src/plot_field.F |
126 |
PLOT_FIELD_XYRL |
INTEGER myThid |
|
./model/src/plot_field.F |
140 |
PLOT_FIELD_XYRL |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
14 |
PLOT_FIELD_XYRS |
I fld, fldNam , myIter, myThid ) |
|
./model/src/plot_field.F |
180 |
PLOT_FIELD_XYZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
214 |
PLOT_FIELD_XYZRS |
INTEGER myThid |
|
./model/src/plot_field.F |
228 |
PLOT_FIELD_XYZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
273 |
PLOT_FIELD_XYZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
307 |
PLOT_FIELD_XYZRL |
INTEGER myThid |
|
./model/src/plot_field.F |
321 |
PLOT_FIELD_XYZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
367 |
PLOT_FIELD_XZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
401 |
PLOT_FIELD_XZRS |
INTEGER myThid |
|
./model/src/plot_field.F |
415 |
PLOT_FIELD_XZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
43 |
PLOT_FIELD_XYRS |
INTEGER myThid |
|
./model/src/plot_field.F |
455 |
PLOT_FIELD_XZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
489 |
PLOT_FIELD_XZRL |
INTEGER myThid |
|
./model/src/plot_field.F |
503 |
PLOT_FIELD_XZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
545 |
PLOT_FIELD_YZRS |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
579 |
PLOT_FIELD_YZRS |
INTEGER myThid |
|
./model/src/plot_field.F |
57 |
PLOT_FIELD_XYRS |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
593 |
PLOT_FIELD_YZRS |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
634 |
PLOT_FIELD_YZRL |
I fld, fldNam , fldNz, myIter, myThid ) |
|
./model/src/plot_field.F |
668 |
PLOT_FIELD_YZRL |
INTEGER myThid |
|
./model/src/plot_field.F |
682 |
PLOT_FIELD_YZRL |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/plot_field.F |
97 |
PLOT_FIELD_XYRL |
I fld, fldNam , myIter, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
10 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
121 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
125 |
INI_THETA |
_EXCH_XYZ_RL(theta , myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
129 |
INI_THETA |
& Nr, 1, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
41 |
INI_THETA |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
57 |
INI_THETA |
J = 99+myBxLo(myThid)+nPx*myByLo(myThid) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
63 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
64 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
86 |
INI_THETA |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
92 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
96 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_ad/ini_theta.F |
97 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
113 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
149 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
206 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
20 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
241 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
305 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
341 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/hs94.1x64x5/code_oad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
107 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
108 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
10 |
CTRL_MAP_GENTIM2D |
I myTime, myIter, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
125 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
126 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
138 |
CTRL_MAP_GENTIM2D |
CALL GLOBAL_SUM_TILE_RL( LOCsumTile, LOCsumGlob, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
140 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
141 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
154 |
CTRL_MAP_GENTIM2D |
& SQUEEZE_RIGHT, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
158 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
159 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
42 |
CTRL_MAP_GENTIM2D |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
83 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F |
84 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
110 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( theta, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
111 |
CTRL_MAP_INI_GENARR |
_EXCH_XYZ_RL( salt, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
131 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
132 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
133 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
43 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
91 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F |
9 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
10 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
121 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
125 |
INI_THETA |
_EXCH_XYZ_RL(theta , myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
129 |
INI_THETA |
& Nr, 1, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
41 |
INI_THETA |
INTEGER myThid |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
57 |
INI_THETA |
J = 99+myBxLo(myThid)+nPx*myByLo(myThid) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
63 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
64 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
86 |
INI_THETA |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
92 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
96 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.1x64x5/code_oad/ini_theta.F |
97 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
113 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
149 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
206 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
20 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
241 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
305 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
341 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/hs94.cs-32x32x5/code/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
10 |
INI_THETA |
SUBROUTINE INI_THETA( myThid ) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
121 |
INI_THETA |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
125 |
INI_THETA |
_EXCH_XYZ_RL(theta , myThid ) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
129 |
INI_THETA |
& Nr, 1, myThid ) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
41 |
INI_THETA |
INTEGER myThid |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
57 |
INI_THETA |
J = 99+myBxLo(myThid)+nPx*myByLo(myThid) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
63 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
64 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
86 |
INI_THETA |
I 1, sNy, Nr, bi, bj, 1, myThid ) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
92 |
INI_THETA |
CALL READ_FLD_XYZ_RL( hydrogThetaFile, ' ', theta, 0, myThid ) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
96 |
INI_THETA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/hs94.cs-32x32x5/code/ini_theta.F |
97 |
INI_THETA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/post_cg3d.F |
105 |
POST_CG3D |
CALL EXCH_XY_RL( dPhiNH, myThid ) |
|
./model/src/post_cg3d.F |
112 |
POST_CG3D |
CALL WRITE_FLD_XYZ_RL( 'cg3d_x','I10', phi_nh, myIter, myThid ) |
|
./model/src/post_cg3d.F |
114 |
POST_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/post_cg3d.F |
115 |
POST_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/post_cg3d.F |
11 |
POST_CG3D |
I myTime, myIter, myThid ) |
|
./model/src/post_cg3d.F |
45 |
POST_CG3D |
INTEGER myThid |
|
./model/src/post_cg3d.F |
59 |
POST_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/post_cg3d.F |
60 |
POST_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/internal_wave/code/obcs_calc.F |
111 |
OBCS_CALC |
& myThid ) |
|
./verification/internal_wave/code/obcs_calc.F |
164 |
OBCS_CALC |
& myThid ) |
|
./verification/internal_wave/code/obcs_calc.F |
184 |
OBCS_CALC |
& myThid ) |
|
./verification/internal_wave/code/obcs_calc.F |
205 |
OBCS_CALC |
CALL OBCS_BALANCE_FLOW( futureTime, futureIter, myThid ) |
|
./verification/internal_wave/code/obcs_calc.F |
210 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_LEAVE('OBCS_CALC',myThid) |
|
./verification/internal_wave/code/obcs_calc.F |
38 |
OBCS_CALC |
INTEGER myThid |
|
./verification/internal_wave/code/obcs_calc.F |
53 |
OBCS_CALC |
IF (debugMode) CALL DEBUG_ENTER('OBCS_CALC',myThid) |
|
./verification/internal_wave/code/obcs_calc.F |
83 |
OBCS_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/internal_wave/code/obcs_calc.F |
84 |
OBCS_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/internal_wave/code/obcs_calc.F |
8 |
OBCS_CALC |
& myThid ) |
|
./verification/internal_wave/code/obcs_calc.F |
91 |
OBCS_CALC |
& myThid ) |
|
./model/src/pre_cg3d.F |
14 |
PRE_CG3D |
I myTime, myIter, myThid ) |
|
./model/src/pre_cg3d.F |
51 |
PRE_CG3D |
INTEGER myThid |
|
./model/src/pre_cg3d.F |
72 |
PRE_CG3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/pre_cg3d.F |
73 |
PRE_CG3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/isomip/code_ad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/isomip/code_ad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./model/src/pressure_for_eos.F |
11 |
PRESSURE_FOR_EOS |
I myThid ) |
|
./model/src/pressure_for_eos.F |
41 |
PRESSURE_FOR_EOS |
INTEGER myThid |
|
./model/src/read_pickup.F |
110 |
READ_PICKUP |
I Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
112 |
READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./model/src/read_pickup.F |
117 |
READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/read_pickup.F |
120 |
READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/read_pickup.F |
123 |
READ_PICKUP |
_END_MASTER( myThid ) |
|
./model/src/read_pickup.F |
12 |
READ_PICKUP |
I myIter, myThid ) |
|
./model/src/read_pickup.F |
135 |
READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/read_pickup.F |
139 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
144 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
149 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
154 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
157 |
READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/read_pickup.F |
168 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, uVel, 1, myIter,myThid ) |
|
./model/src/read_pickup.F |
169 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gU, 2, myIter,myThid ) |
|
./model/src/read_pickup.F |
170 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm1, 3, myIter,myThid ) |
|
./model/src/read_pickup.F |
171 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, vVel, 4, myIter,myThid ) |
|
./model/src/read_pickup.F |
172 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gV, 5, myIter,myThid ) |
|
./model/src/read_pickup.F |
173 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gvNm1, 6, myIter,myThid ) |
|
./model/src/read_pickup.F |
174 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, theta, 7, myIter,myThid ) |
|
./model/src/read_pickup.F |
176 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gtNm1, 9, myIter,myThid ) |
|
./model/src/read_pickup.F |
177 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, salt, 10, myIter,myThid ) |
|
./model/src/read_pickup.F |
179 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gsNm1,12, myIter,myThid ) |
|
./model/src/read_pickup.F |
182 |
READ_PICKUP |
& 12*Nr+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
186 |
READ_PICKUP |
& 12*Nr+2, myIter,myThid ) |
|
./model/src/read_pickup.F |
194 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, uVel, nj+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
196 |
READ_PICKUP |
& nj+2, myIter,myThid ) |
|
./model/src/read_pickup.F |
198 |
READ_PICKUP |
& nj+j, myIter,myThid ) |
|
./model/src/read_pickup.F |
200 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, vVel, nj+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
202 |
READ_PICKUP |
& nj+2, myIter,myThid ) |
|
./model/src/read_pickup.F |
204 |
READ_PICKUP |
& nj+j, myIter,myThid ) |
|
./model/src/read_pickup.F |
206 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, theta,nj+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
208 |
READ_PICKUP |
& nj+2, myIter,myThid ) |
|
./model/src/read_pickup.F |
210 |
READ_PICKUP |
& nj+j, myIter,myThid ) |
|
./model/src/read_pickup.F |
212 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, salt, nj+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
214 |
READ_PICKUP |
& nj+2, myIter,myThid ) |
|
./model/src/read_pickup.F |
216 |
READ_PICKUP |
& nj+j, myIter,myThid ) |
|
./model/src/read_pickup.F |
219 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, uVel, 1, myIter,myThid ) |
|
./model/src/read_pickup.F |
220 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, guNm1, 2, myIter,myThid ) |
|
./model/src/read_pickup.F |
221 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, vVel, 3, myIter,myThid ) |
|
./model/src/read_pickup.F |
222 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gvNm1, 4, myIter,myThid ) |
|
./model/src/read_pickup.F |
223 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, theta, 5, myIter,myThid ) |
|
./model/src/read_pickup.F |
224 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gtNm1, 6, myIter,myThid ) |
|
./model/src/read_pickup.F |
225 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, salt, 7, myIter,myThid ) |
|
./model/src/read_pickup.F |
226 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gsNm1, 8, myIter,myThid ) |
|
./model/src/read_pickup.F |
229 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn,fp,1, etaN, nj*Nr+1, myIter,myThid ) |
|
./model/src/read_pickup.F |
232 |
READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1,dEtaHdt,nj*Nr+2,myIter,myThid ) |
|
./model/src/read_pickup.F |
235 |
READ_PICKUP |
CALL READ_REC_3D_RL(fn,fp,1, etaH, nj*Nr+3, myIter,myThid ) |
|
./model/src/read_pickup.F |
242 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, totPhiHyd,1,myIter,myThid ) |
|
./model/src/read_pickup.F |
247 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, phi_nh, 1, myIter,myThid ) |
|
./model/src/read_pickup.F |
250 |
READ_PICKUP |
& 2, myIter,myThid ) |
|
./model/src/read_pickup.F |
252 |
READ_PICKUP |
& 2, myIter,myThid ) |
|
./model/src/read_pickup.F |
254 |
READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, gwNm1, 2, myIter,myThid ) |
|
./model/src/read_pickup.F |
263 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
265 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
269 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
271 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
275 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
277 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
286 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
290 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
295 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
299 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
306 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
310 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
315 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
319 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
326 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
330 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
335 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
339 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
347 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
351 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
359 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
362 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
367 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
370 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
375 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
378 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
383 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
391 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
396 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
403 |
READ_PICKUP |
& nj, fp, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
410 |
READ_PICKUP |
& nj, fp, Nr, 1, Nr, myIter, myThid ) |
|
./model/src/read_pickup.F |
417 |
READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./model/src/read_pickup.F |
421 |
READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./model/src/read_pickup.F |
427 |
READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./model/src/read_pickup.F |
431 |
READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./model/src/read_pickup.F |
442 |
READ_PICKUP |
I myIter, myThid ) |
|
./model/src/read_pickup.F |
446 |
READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/read_pickup.F |
452 |
READ_PICKUP |
I myIter, myThid ) |
|
./model/src/read_pickup.F |
460 |
READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./model/src/read_pickup.F |
461 |
READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./model/src/read_pickup.F |
462 |
READ_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, -1, myThid) |
|
./model/src/read_pickup.F |
463 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'U',uVel, myThid) |
|
./model/src/read_pickup.F |
464 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'V',vVel, myThid) |
|
./model/src/read_pickup.F |
467 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'UEulerM',uEulerMean, myThid) |
|
./model/src/read_pickup.F |
468 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'VEulerM',vEulerMean, myThid) |
|
./model/src/read_pickup.F |
46 |
READ_PICKUP |
INTEGER myThid |
|
./model/src/read_pickup.F |
471 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Temp',theta, myThid) |
|
./model/src/read_pickup.F |
472 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'S',salt, myThid) |
|
./model/src/read_pickup.F |
473 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Eta',etaN, myThid) |
|
./model/src/read_pickup.F |
475 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gUnm1',guNm1, myThid) |
|
./model/src/read_pickup.F |
476 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gVnm1',gvNm1, myThid) |
|
./model/src/read_pickup.F |
477 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gTnm1',gtNm1, myThid) |
|
./model/src/read_pickup.F |
478 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gSnm1',gsNm1, myThid) |
|
./model/src/read_pickup.F |
486 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'dEtaHdt',dEtaHdt,myThid) |
|
./model/src/read_pickup.F |
489 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'EtaH', etaH, myThid) |
|
./model/src/read_pickup.F |
494 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'phi_nh', phi_nh, myThid) |
|
./model/src/read_pickup.F |
497 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'gWnm1', gwNm1, myThid) |
|
./model/src/read_pickup.F |
502 |
READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'phiHyd',totPhiHyd,myThid) |
|
./model/src/read_pickup.F |
510 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( uVel, vVel, .TRUE., Nr, myThid ) |
|
./model/src/read_pickup.F |
513 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( uEulerMean, vEulerMean, .TRUE., Nr, myThid ) |
|
./model/src/read_pickup.F |
516 |
READ_PICKUP |
CALL EXCH_3D_RL( theta, Nr, myThid ) |
|
./model/src/read_pickup.F |
517 |
READ_PICKUP |
CALL EXCH_3D_RL( salt, Nr, myThid ) |
|
./model/src/read_pickup.F |
520 |
READ_PICKUP |
& gvNm(1-OLx,1-OLy,1,1,1,1),.TRUE.,Nr,myThid ) |
|
./model/src/read_pickup.F |
522 |
READ_PICKUP |
& gvNm(1-OLx,1-OLy,1,1,1,2),.TRUE.,Nr,myThid ) |
|
./model/src/read_pickup.F |
523 |
READ_PICKUP |
CALL EXCH_3D_RL( gtNm(1-OLx,1-OLy,1,1,1,1), Nr, myThid ) |
|
./model/src/read_pickup.F |
524 |
READ_PICKUP |
CALL EXCH_3D_RL( gtNm(1-OLx,1-OLy,1,1,1,2), Nr, myThid ) |
|
./model/src/read_pickup.F |
525 |
READ_PICKUP |
CALL EXCH_3D_RL( gsNm(1-OLx,1-OLy,1,1,1,1), Nr, myThid ) |
|
./model/src/read_pickup.F |
526 |
READ_PICKUP |
CALL EXCH_3D_RL( gsNm(1-OLx,1-OLy,1,1,1,2), Nr, myThid ) |
|
./model/src/read_pickup.F |
528 |
READ_PICKUP |
CALL EXCH_UV_3D_RL( guNm1, gvNm1, .TRUE., Nr, myThid ) |
|
./model/src/read_pickup.F |
529 |
READ_PICKUP |
CALL EXCH_3D_RL( gtNm1, Nr, myThid ) |
|
./model/src/read_pickup.F |
530 |
READ_PICKUP |
CALL EXCH_3D_RL( gsNm1, Nr, myThid ) |
|
./model/src/read_pickup.F |
532 |
READ_PICKUP |
CALL EXCH_XY_RL( etaN, myThid ) |
|
./model/src/read_pickup.F |
533 |
READ_PICKUP |
CALL EXCH_XY_RL( etaH, myThid ) |
|
./model/src/read_pickup.F |
535 |
READ_PICKUP |
CALL EXCH_XY_RL( detaHdt, myThid ) |
|
./model/src/read_pickup.F |
539 |
READ_PICKUP |
& CALL EXCH_3D_RL( totPhiHyd, Nr, myThid ) |
|
./model/src/read_pickup.F |
543 |
READ_PICKUP |
CALL EXCH_3D_RL( phi_nh, Nr, myThid ) |
|
./model/src/read_pickup.F |
547 |
READ_PICKUP |
CALL EXCH_3D_RL( gwNm(1-OLx,1-OLy,1,1,1,1), Nr, myThid ) |
|
./model/src/read_pickup.F |
548 |
READ_PICKUP |
CALL EXCH_3D_RL( gwNm(1-OLx,1-OLy,1,1,1,2), Nr, myThid ) |
|
./model/src/read_pickup.F |
550 |
READ_PICKUP |
CALL EXCH_3D_RL( gwNm1, Nr, myThid ) |
|
./model/src/read_pickup.F |
554 |
READ_PICKUP |
CALL EXCH_XY_RL( dPhiNH, myThid ) |
|
./model/src/read_pickup.F |
91 |
READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./verification/isomip/code_oad/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./verification/isomip/code_oad/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./model/src/remove_mean.F |
104 |
REMOVE_MEAN_RL |
_END_MASTER( myThid ) |
|
./model/src/remove_mean.F |
117 |
REMOVE_MEAN_RS |
I myThid ) |
|
./model/src/remove_mean.F |
12 |
REMOVE_MEAN_RL |
I myThid ) |
|
./model/src/remove_mean.F |
146 |
REMOVE_MEAN_RS |
INTEGER myThid |
|
./model/src/remove_mean.F |
161 |
REMOVE_MEAN_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/remove_mean.F |
162 |
REMOVE_MEAN_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/remove_mean.F |
178 |
REMOVE_MEAN_RS |
_GLOBAL_SUM_RS(theVol,myThid) |
|
./model/src/remove_mean.F |
179 |
REMOVE_MEAN_RS |
_GLOBAL_SUM_RS(theMean,myThid) |
|
./model/src/remove_mean.F |
184 |
REMOVE_MEAN_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/remove_mean.F |
185 |
REMOVE_MEAN_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/remove_mean.F |
203 |
REMOVE_MEAN_RS |
_BEGIN_MASTER( myThid ) |
|
./model/src/remove_mean.F |
209 |
REMOVE_MEAN_RS |
_END_MASTER( myThid ) |
|
./model/src/remove_mean.F |
41 |
REMOVE_MEAN_RL |
INTEGER myThid |
|
./model/src/remove_mean.F |
56 |
REMOVE_MEAN_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/remove_mean.F |
57 |
REMOVE_MEAN_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/remove_mean.F |
73 |
REMOVE_MEAN_RL |
_GLOBAL_SUM_RL(theVol,myThid) |
|
./model/src/remove_mean.F |
74 |
REMOVE_MEAN_RL |
_GLOBAL_SUM_RL(theMean,myThid) |
|
./model/src/remove_mean.F |
79 |
REMOVE_MEAN_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/remove_mean.F |
80 |
REMOVE_MEAN_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/remove_mean.F |
98 |
REMOVE_MEAN_RL |
_BEGIN_MASTER( myThid ) |
|
./model/src/reset_nlfs_vars.F |
36 |
RESET_NLFS_VARS |
INTEGER myThid |
|
./model/src/reset_nlfs_vars.F |
47 |
RESET_NLFS_VARS |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/reset_nlfs_vars.F |
48 |
RESET_NLFS_VARS |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/reset_nlfs_vars.F |
9 |
RESET_NLFS_VARS |
SUBROUTINE RESET_NLFS_VARS( myTime, myIter, myThid ) |
|
./model/src/rotate_spherical_polar_grid.F |
12 |
ROTATE_SPHERICAL_POLAR_GRID |
I myThid ) |
|
./model/src/rotate_spherical_polar_grid.F |
137 |
ROTATE_SPHERICAL_POLAR_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/rotate_spherical_polar_grid.F |
138 |
ROTATE_SPHERICAL_POLAR_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/rotate_spherical_polar_grid.F |
53 |
ROTATE_SPHERICAL_POLAR_GRID |
INTEGER myThid |
|
./model/src/rotate_uv2en.F |
253 |
ROTATE_UV2EN_RS |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./model/src/rotate_uv2en.F |
72 |
ROTATE_UV2EN_RL |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./verification/rotating_tank/code/apply_forcing.F |
1001 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1008 |
APPLY_FORCING_S |
I k, bi, bj, myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1016 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1024 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1033 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
103 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1041 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
1049 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
110 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
117 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
147 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
155 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
165 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
174 |
APPLY_FORCING_U |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
190 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
21 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
225 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/rotating_tank/code/apply_forcing.F |
248 |
APPLY_FORCING_V |
I myTime, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
272 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
279 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
286 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
316 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
324 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
333 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
342 |
APPLY_FORCING_V |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
358 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
394 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/rotating_tank/code/apply_forcing.F |
471 |
APPLY_FORCING_T |
I myTime, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
498 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
505 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
512 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./verification/rotating_tank/code/apply_forcing.F |
624 |
APPLY_FORCING_T |
& 'MoistCor', kc, 1, 3, bi,bj,myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
669 |
APPLY_FORCING_T |
I myTime, 1, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
761 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
769 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
776 |
APPLY_FORCING_T |
I k, bi, bj, myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
784 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
792 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
79 |
APPLY_FORCING_U |
I myTime, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
801 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
809 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
817 |
APPLY_FORCING_T |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
833 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
869 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/rotating_tank/code/apply_forcing.F |
892 |
APPLY_FORCING_S |
I myTime, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
918 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
925 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./verification/rotating_tank/code/apply_forcing.F |
932 |
APPLY_FORCING_S |
I myTime, 0, myThid ) |
|
./model/src/salt_integrate.F |
166 |
SALT_INTEGRATE |
& diagForcing = DIAGNOSTICS_IS_ON( 'gS_Forc ', myThid ) |
|
./model/src/salt_integrate.F |
168 |
SALT_INTEGRATE |
& diagAB_tend = DIAGNOSTICS_IS_ON( 'AB_gS ', myThid ) |
|
./model/src/salt_integrate.F |
172 |
SALT_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./model/src/salt_integrate.F |
173 |
SALT_INTEGRATE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/salt_integrate.F |
174 |
SALT_INTEGRATE |
act2 = bj - myByLo(myThid) |
|
./model/src/salt_integrate.F |
175 |
SALT_INTEGRATE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/salt_integrate.F |
176 |
SALT_INTEGRATE |
act3 = myThid - 1 |
|
./model/src/salt_integrate.F |
194 |
SALT_INTEGRATE |
I saltStartAB, iterNb, myThid ) |
|
./model/src/salt_integrate.F |
200 |
SALT_INTEGRATE |
I saltStartAB, iterNb, myThid ) |
|
./model/src/salt_integrate.F |
20 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
241 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
261 |
SALT_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid) |
|
./model/src/salt_integrate.F |
269 |
SALT_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
275 |
SALT_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid) |
|
./model/src/salt_integrate.F |
282 |
SALT_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
318 |
SALT_INTEGRATE |
I k, bi, bj, myThid ) |
|
./model/src/salt_integrate.F |
330 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
333 |
SALT_INTEGRATE |
CALL DIAGNOSTICS_FILL(gsForc,'gS_Forc ',k,1,2,bi,bj,myThid) |
|
./model/src/salt_integrate.F |
354 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
369 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
387 |
SALT_INTEGRATE |
I saltStartAB, iterNb, myThid ) |
|
./model/src/salt_integrate.F |
393 |
SALT_INTEGRATE |
I saltStartAB, iterNb, myThid ) |
|
./model/src/salt_integrate.F |
397 |
SALT_INTEGRATE |
CALL DIAGNOSTICS_FILL(gs_AB,'AB_gS ',k,1,2,bi,bj,myThid) |
|
./model/src/salt_integrate.F |
416 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
428 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
432 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
437 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
454 |
SALT_INTEGRATE |
I dTtracerLev, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
461 |
SALT_INTEGRATE |
I dTtracerLev, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
471 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
491 |
SALT_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
504 |
SALT_INTEGRATE |
I myThid ) |
|
./model/src/salt_integrate.F |
514 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
520 |
SALT_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
527 |
SALT_INTEGRATE |
I gS_loc, myTime, myIter, myThid ) |
|
./model/src/salt_integrate.F |
88 |
SALT_INTEGRATE |
INTEGER myThid |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
28 |
INI_PSURF |
INTEGER myThid |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
41 |
INI_PSURF |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
42 |
INI_PSURF |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
52 |
INI_PSURF |
_BEGIN_MASTER( myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
53 |
INI_PSURF |
CALL READ_FLD_XY_RL( pSurfInitFile, ' ', etaN, 0, myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
54 |
INI_PSURF |
_END_MASTER(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
57 |
INI_PSURF |
_EXCH_XY_RL(etaN, myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
61 |
INI_PSURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
62 |
INI_PSURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_psurf.F |
7 |
INI_PSURF |
SUBROUTINE INI_PSURF( myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
30 |
INI_VEL |
INTEGER myThid |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
49 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
50 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
69 |
INI_VEL |
_BEGIN_MASTER( myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
70 |
INI_VEL |
CALL READ_FLD_XYZ_RL( uVelInitFile, ' ', uVel, 0, myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
71 |
INI_VEL |
_END_MASTER(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
76 |
INI_VEL |
_BEGIN_MASTER( myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
77 |
INI_VEL |
CALL READ_FLD_XYZ_RL( vVelInitFile, ' ', vVel, 0, myThid ) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
78 |
INI_VEL |
_END_MASTER(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
83 |
INI_VEL |
CALL EXCH_UV_XYZ_RL(uVel,vVel,.TRUE.,myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
86 |
INI_VEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
87 |
INI_VEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
9 |
INI_VEL |
SUBROUTINE INI_VEL( myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
115 |
EXTERNAL_FORCING_V |
I myTime, myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
12 |
EXTERNAL_FORCING_U |
I myTime, myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
146 |
EXTERNAL_FORCING_V |
INTEGER myThid |
|
./verification/tidal_basin_2d/code/external_forcing.F |
188 |
EXTERNAL_FORCING_T |
I myTime, myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
219 |
EXTERNAL_FORCING_T |
INTEGER myThid |
|
./verification/tidal_basin_2d/code/external_forcing.F |
267 |
EXTERNAL_FORCING_T |
I myTime, 1, myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
294 |
EXTERNAL_FORCING_S |
I myTime, myThid ) |
|
./verification/tidal_basin_2d/code/external_forcing.F |
326 |
EXTERNAL_FORCING_S |
INTEGER myThid |
|
./verification/tidal_basin_2d/code/external_forcing.F |
43 |
EXTERNAL_FORCING_U |
INTEGER myThid |
|
./model/src/set_defaults.F |
14 |
SET_DEFAULTS |
I myThid ) |
|
./model/src/set_defaults.F |
31 |
SET_DEFAULTS |
INTEGER myThid |
|
./model/src/set_grid_factors.F |
29 |
SET_GRID_FACTORS |
INTEGER myThid |
|
./model/src/set_grid_factors.F |
40 |
SET_GRID_FACTORS |
_BEGIN_MASTER(myThid) |
|
./model/src/set_grid_factors.F |
97 |
SET_GRID_FACTORS |
_END_MASTER(myThid) |
|
./model/src/set_grid_factors.F |
9 |
SET_GRID_FACTORS |
SUBROUTINE SET_GRID_FACTORS( myThid ) |
|
./model/src/set_parms.F |
139 |
SET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_parms.F |
14 |
SET_PARMS |
SUBROUTINE SET_PARMS( myThid ) |
|
./model/src/set_parms.F |
160 |
SET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_parms.F |
244 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/set_parms.F |
253 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/set_parms.F |
275 |
SET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_parms.F |
279 |
SET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_parms.F |
283 |
SET_PARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_parms.F |
290 |
SET_PARMS |
CALL LONGSTEP_CHECK_ITERS(myThid) |
|
./model/src/set_parms.F |
299 |
SET_PARMS |
_END_MASTER(myThid) |
|
./model/src/set_parms.F |
33 |
SET_PARMS |
INTEGER myThid |
|
./model/src/set_parms.F |
50 |
SET_PARMS |
CALL OFFLINE_RESET_PARMS( myThid ) |
|
./model/src/set_parms.F |
54 |
SET_PARMS |
_BEGIN_MASTER(myThid) |
|
./model/src/set_parms.F |
78 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/set_parms.F |
81 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/set_parms.F |
90 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/set_parms.F |
93 |
SET_PARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./verification/tutorial_global_oce_biogeo/code_ad/cost_tracer.F |
37 |
COST_TRACER |
integer myThid |
|
./verification/tutorial_global_oce_biogeo/code_ad/cost_tracer.F |
6 |
COST_TRACER |
subroutine COST_TRACER( bi, bj, myThid ) |
|
./model/src/set_ref_state.F |
10 |
SET_REF_STATE |
I myThid ) |
|
./model/src/set_ref_state.F |
141 |
SET_REF_STATE |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/set_ref_state.F |
144 |
SET_REF_STATE |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/set_ref_state.F |
150 |
SET_REF_STATE |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/set_ref_state.F |
153 |
SET_REF_STATE |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./model/src/set_ref_state.F |
159 |
SET_REF_STATE |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/set_ref_state.F |
163 |
SET_REF_STATE |
& SQUEEZE_RIGHT , myThid) |
|
./model/src/set_ref_state.F |
173 |
SET_REF_STATE |
O rhoRef(k), myThid ) |
|
./model/src/set_ref_state.F |
185 |
SET_REF_STATE |
I belowCritNb, maxIterNb, myThid ) |
|
./model/src/set_ref_state.F |
194 |
SET_REF_STATE |
O rhoUp, myThid ) |
|
./model/src/set_ref_state.F |
197 |
SET_REF_STATE |
O rhoDw, myThid ) |
|
./model/src/set_ref_state.F |
217 |
SET_REF_STATE |
O rhoRef(k), myThid ) |
|
./model/src/set_ref_state.F |
226 |
SET_REF_STATE |
O rhoDw, myThid ) |
|
./model/src/set_ref_state.F |
229 |
SET_REF_STATE |
O rhoUp, myThid ) |
|
./model/src/set_ref_state.F |
35 |
SET_REF_STATE |
INTEGER myThid |
|
./model/src/set_ref_state.F |
369 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'GravFacC',' ',gravFacC, Nr, -1, myThid ) |
|
./model/src/set_ref_state.F |
370 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'GravFacF',' ',gravFacF,Nr+1,-1, myThid ) |
|
./model/src/set_ref_state.F |
374 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'PRef4EOS',' ',pRef4EOS, Nr, -1, myThid ) |
|
./model/src/set_ref_state.F |
379 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_ref_state.F |
382 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_ref_state.F |
385 |
SET_REF_STATE |
CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_ref_state.F |
390 |
SET_REF_STATE |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/set_ref_state.F |
394 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'RhoRef', ' ', rhoRef, Nr, -1, myThid ) |
|
./model/src/set_ref_state.F |
398 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'RhoFacC',' ',rhoFacC, Nr , -1, myThid ) |
|
./model/src/set_ref_state.F |
399 |
SET_REF_STATE |
CALL WRITE_GLVEC_RL( 'RhoFacF',' ',rhoFacF, Nr+1, -1, myThid ) |
|
./model/src/set_ref_state.F |
404 |
SET_REF_STATE |
_END_MASTER( myThid ) |
|
./model/src/set_ref_state.F |
51 |
SET_REF_STATE |
_BEGIN_MASTER( myThid ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/cost_tracer.F |
37 |
COST_TRACER |
integer myThid |
|
./verification/tutorial_global_oce_biogeo/code_oad/cost_tracer.F |
6 |
COST_TRACER |
subroutine COST_TRACER( bi, bj, myThid ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
126 |
CTRL_MAP_INI_GENARR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
139 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
140 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
141 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
160 |
CTRL_MAP_INI_GENARR |
& Nr, myThid ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
43 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
91 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F |
9 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./model/src/solve_for_pressure.F |
107 |
SOLVE_FOR_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
10 |
SOLVE_FOR_PRESSURE |
SUBROUTINE SOLVE_FOR_PRESSURE( myTime, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
111 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
115 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
118 |
SOLVE_FOR_PRESSURE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./model/src/solve_for_pressure.F |
120 |
SOLVE_FOR_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
125 |
SOLVE_FOR_PRESSURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_for_pressure.F |
126 |
SOLVE_FOR_PRESSURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_for_pressure.F |
159 |
SOLVE_FOR_PRESSURE |
CALL GLOBAL_SUM_TILE_RL( tileEmP, sumEmP, myThid ) |
|
./model/src/solve_for_pressure.F |
162 |
SOLVE_FOR_PRESSURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_for_pressure.F |
163 |
SOLVE_FOR_PRESSURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_for_pressure.F |
181 |
SOLVE_FOR_PRESSURE |
I myThid ) |
|
./model/src/solve_for_pressure.F |
186 |
SOLVE_FOR_PRESSURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_for_pressure.F |
187 |
SOLVE_FOR_PRESSURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_for_pressure.F |
260 |
SOLVE_FOR_PRESSURE |
& myThid) |
|
./model/src/solve_for_pressure.F |
264 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XY_RL( 'cg2d_b', 'I10', cg2d_b, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
281 |
SOLVE_FOR_PRESSURE |
I myThid ) |
|
./model/src/solve_for_pressure.F |
289 |
SOLVE_FOR_PRESSURE |
I myThid ) |
|
./model/src/solve_for_pressure.F |
298 |
SOLVE_FOR_PRESSURE |
I myThid ) |
|
./model/src/solve_for_pressure.F |
308 |
SOLVE_FOR_PRESSURE |
I myThid ) |
|
./model/src/solve_for_pressure.F |
312 |
SOLVE_FOR_PRESSURE |
_EXCH_XY_RL( cg2d_x, myThid ) |
|
./model/src/solve_for_pressure.F |
318 |
SOLVE_FOR_PRESSURE |
& myThid) |
|
./model/src/solve_for_pressure.F |
326 |
SOLVE_FOR_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
339 |
SOLVE_FOR_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
347 |
SOLVE_FOR_PRESSURE |
IF ( DIAGNOSTICS_IS_ON(diagName,myThid) ) THEN |
|
./model/src/solve_for_pressure.F |
348 |
SOLVE_FOR_PRESSURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_for_pressure.F |
349 |
SOLVE_FOR_PRESSURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_for_pressure.F |
357 |
SOLVE_FOR_PRESSURE |
CALL DIAGNOSTICS_FILL( tmpVar,diagName,1,1,2,bi,bj,myThid ) |
|
./model/src/solve_for_pressure.F |
362 |
SOLVE_FOR_PRESSURE |
CALL DIAGNOSTICS_FILL( cg2d_x,'PHI_SURF', 0,1, 0,1,1, myThid ) |
|
./model/src/solve_for_pressure.F |
367 |
SOLVE_FOR_PRESSURE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_for_pressure.F |
368 |
SOLVE_FOR_PRESSURE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_for_pressure.F |
380 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XY_RL( 'cg2d_x','I10', cg2d_x, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
394 |
SOLVE_FOR_PRESSURE |
I myTime, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
399 |
SOLVE_FOR_PRESSURE |
& myThid) |
|
./model/src/solve_for_pressure.F |
403 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XYZ_RL('cg3d_b','I10', cg3d_b, myIter,myThid ) |
|
./model/src/solve_for_pressure.F |
409 |
SOLVE_FOR_PRESSURE |
CALL TIMER_START('CG3D [SOLVE_FOR_PRESSURE]',myThid) |
|
./model/src/solve_for_pressure.F |
415 |
SOLVE_FOR_PRESSURE |
I myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
421 |
SOLVE_FOR_PRESSURE |
I myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
423 |
SOLVE_FOR_PRESSURE |
_EXCH_XYZ_RL( phi_nh, myThid ) |
|
./model/src/solve_for_pressure.F |
424 |
SOLVE_FOR_PRESSURE |
CALL TIMER_STOP ('CG3D [SOLVE_FOR_PRESSURE]',myThid) |
|
./model/src/solve_for_pressure.F |
429 |
SOLVE_FOR_PRESSURE |
_BEGIN_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
436 |
SOLVE_FOR_PRESSURE |
_END_MASTER( myThid ) |
|
./model/src/solve_for_pressure.F |
444 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XYZ_RL('cg3d_x','I10', phi_nh, myIter,myThid ) |
|
./model/src/solve_for_pressure.F |
448 |
SOLVE_FOR_PRESSURE |
I myTime, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
455 |
SOLVE_FOR_PRESSURE |
CALL SHOWFLOPS_INSOLVE( myThid) |
|
./model/src/solve_for_pressure.F |
54 |
SOLVE_FOR_PRESSURE |
INTEGER myThid |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
114 |
PTRACERS_APPLY_FORCING |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
14 |
PTRACERS_APPLY_FORCING |
I iTracer, myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
46 |
PTRACERS_APPLY_FORCING |
INTEGER myThid |
|
./verification/tutorial_global_oce_latlon/code/ptracers_apply_forcing.F |
75 |
PTRACERS_APPLY_FORCING |
I iTracer, myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
108 |
PTRACERS_FORCING_SURF |
CALL DIAGNOSTICS_FILL(add2EmP,'Add2EmP ',0,1,2,bi,bj,myThid) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
13 |
PTRACERS_FORCING_SURF |
I myTime,myIter,myThid ) |
|
./verification/tutorial_global_oce_latlon/code/ptracers_forcing_surf.F |
44 |
PTRACERS_FORCING_SURF |
INTEGER myThid |
|
./model/src/solve_pentadiagonal.F |
14 |
SOLVE_PENTADIAGONAL |
I bi, bj, myThid ) |
|
./model/src/solve_pentadiagonal.F |
65 |
SOLVE_PENTADIAGONAL |
INTEGER bi, bj, myThid |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
32 |
COST_HFLUX |
integer myThid |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
41 |
COST_HFLUX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
42 |
COST_HFLUX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
50 |
COST_HFLUX |
_GLOBAL_SUM_RL( tmpC , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
53 |
COST_HFLUX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
54 |
COST_HFLUX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_hflux.F |
9 |
COST_HFLUX |
SUBROUTINE COST_HFLUX( myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
28 |
COST_TEMP |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
41 |
COST_TEMP |
CALL READ_FLD_XYZ_RL('lev_t_an.bin',' ',thetalev,0,myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
45 |
COST_TEMP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
46 |
COST_TEMP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
56 |
COST_TEMP |
_GLOBAL_SUM_RL( tmp , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
59 |
COST_TEMP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
60 |
COST_TEMP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_temp.F |
9 |
COST_TEMP |
SUBROUTINE COST_TEMP( myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
102 |
COST_WEIGHTS |
& SQUEEZE_RIGHT , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
119 |
COST_WEIGHTS |
& whfluxm, 1, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
120 |
COST_WEIGHTS |
_EXCH_XY_RL(whfluxm , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
137 |
COST_WEIGHTS |
CALL ACTIVE_WRITE_XY('whfluxm',whfluxm,1,0,myThid,dummy) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
31 |
COST_WEIGHTS |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
51 |
COST_WEIGHTS |
jtlo = myByLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
52 |
COST_WEIGHTS |
jthi = myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
53 |
COST_WEIGHTS |
itlo = myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
54 |
COST_WEIGHTS |
ithi = myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
83 |
COST_WEIGHTS |
_BEGIN_MASTER(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
84 |
COST_WEIGHTS |
CALL MDSFINDUNIT( iUnit, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
85 |
COST_WEIGHTS |
length_of_rec = MDS_RECLEN( precFloat64, Nr, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
93 |
COST_WEIGHTS |
_END_MASTER(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F |
9 |
COST_WEIGHTS |
SUBROUTINE COST_WEIGHTS( myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
106 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( EmPmR, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
108 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qnet, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
110 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qsw, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
112 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( saltFlux, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
125 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
126 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
139 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
140 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
156 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
166 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
167 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
171 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
182 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
183 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
186 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
188 |
EXTERNAL_FORCING_SURF |
act2 = bj - myByLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
189 |
EXTERNAL_FORCING_SURF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
190 |
EXTERNAL_FORCING_SURF |
act3 = myThid - 1 |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
22 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
241 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
393 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
56 |
EXTERNAL_FORCING_SURF |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
92 |
EXTERNAL_FORCING_SURF |
& 'EmPmR', myTime, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/external_forcing_surf.F |
96 |
EXTERNAL_FORCING_SURF |
& 'Qnet ', myTime, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
121 |
INI_FORCING |
CALL READ_FLD_XY_RS( zonalWindFile, ' ', fu, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
124 |
INI_FORCING |
CALL READ_FLD_XY_RS( meridWindFile, ' ', fv, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
127 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
129 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQnetFile, ' ', Qnet, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
132 |
INI_FORCING |
CALL READ_FLD_XY_RS( EmPmRfile, ' ', EmPmR, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
136 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
137 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
13 |
INI_FORCING |
SUBROUTINE INI_FORCING( myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
148 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltFluxFile, ' ', saltFlux, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
151 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
154 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
158 |
INI_FORCING |
& lambdaThetaClimRelax, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
162 |
INI_FORCING |
& lambdaSaltClimRelax, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
166 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQswFile, ' ', Qsw, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
170 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
171 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
184 |
INI_FORCING |
CALL READ_FLD_XY_RS( pLoadFile, ' ', pLoad, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
188 |
INI_FORCING |
CALL EXCH_UV_XY_RS( fu,fv, .TRUE., myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
189 |
INI_FORCING |
CALL EXCH_XY_RS( Qnet , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
190 |
INI_FORCING |
CALL EXCH_XY_RS( EmPmR, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
191 |
INI_FORCING |
CALL EXCH_XY_RS( saltFlux, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
192 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
193 |
INI_FORCING |
CALL EXCH_XY_RS( SSS , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
194 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaThetaClimRelax, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
195 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaSaltClimRelax , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
197 |
INI_FORCING |
CALL EXCH_XY_RS(Qsw , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
200 |
INI_FORCING |
CALL EXCH_XY_RS(pLoad , myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
204 |
INI_FORCING |
CALL EXCH_XY_RS( Qnetm, myThid ) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
34 |
INI_FORCING |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
45 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
46 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
96 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_ad/ini_forcing.F |
97 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/solve_tridiagonal.F |
14 |
SOLVE_TRIDIAGONAL |
I bi, bj, myThid ) |
|
./model/src/solve_tridiagonal.F |
61 |
SOLVE_TRIDIAGONAL |
INTEGER bi, bj, myThid |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
32 |
COST_HFLUX |
integer myThid |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
41 |
COST_HFLUX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
42 |
COST_HFLUX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
50 |
COST_HFLUX |
_GLOBAL_SUM_RL( tmpC , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
53 |
COST_HFLUX |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
54 |
COST_HFLUX |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_hflux.F |
9 |
COST_HFLUX |
SUBROUTINE COST_HFLUX( myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
28 |
COST_TEMP |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
41 |
COST_TEMP |
CALL READ_FLD_XYZ_RL('lev_t_an.bin',' ',thetalev,0,myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
45 |
COST_TEMP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
46 |
COST_TEMP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
56 |
COST_TEMP |
_GLOBAL_SUM_RL( tmp , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
59 |
COST_TEMP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
60 |
COST_TEMP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_temp.F |
9 |
COST_TEMP |
SUBROUTINE COST_TEMP( myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
102 |
COST_WEIGHTS |
& SQUEEZE_RIGHT , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
119 |
COST_WEIGHTS |
& whfluxm, 1, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
120 |
COST_WEIGHTS |
_EXCH_XY_RL(whfluxm , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
137 |
COST_WEIGHTS |
CALL ACTIVE_WRITE_XY('whfluxm',whfluxm,1,0,myThid,dummy) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
31 |
COST_WEIGHTS |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
51 |
COST_WEIGHTS |
jtlo = myByLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
52 |
COST_WEIGHTS |
jthi = myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
53 |
COST_WEIGHTS |
itlo = myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
54 |
COST_WEIGHTS |
ithi = myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
83 |
COST_WEIGHTS |
_BEGIN_MASTER(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
84 |
COST_WEIGHTS |
CALL MDSFINDUNIT( iUnit, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
85 |
COST_WEIGHTS |
length_of_rec = MDS_RECLEN( precFloat64, Nr, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
93 |
COST_WEIGHTS |
_END_MASTER(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F |
9 |
COST_WEIGHTS |
SUBROUTINE COST_WEIGHTS( myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
106 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( EmPmR, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
108 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qnet, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
110 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( Qsw, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
112 |
EXTERNAL_FORCING_SURF |
CALL RESET_HALO_RS ( saltFlux, fixVal, 1, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
125 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
126 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
139 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
140 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
156 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
166 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
167 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
171 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
182 |
EXTERNAL_FORCING_SURF |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
183 |
EXTERNAL_FORCING_SURF |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
186 |
EXTERNAL_FORCING_SURF |
act1 = bi - myBxLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
187 |
EXTERNAL_FORCING_SURF |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
188 |
EXTERNAL_FORCING_SURF |
act2 = bj - myByLo(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
189 |
EXTERNAL_FORCING_SURF |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
190 |
EXTERNAL_FORCING_SURF |
act3 = myThid - 1 |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
22 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
241 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
393 |
EXTERNAL_FORCING_SURF |
I myTime, myIter, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
56 |
EXTERNAL_FORCING_SURF |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
92 |
EXTERNAL_FORCING_SURF |
& 'EmPmR', myTime, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/external_forcing_surf.F |
96 |
EXTERNAL_FORCING_SURF |
& 'Qnet ', myTime, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
121 |
INI_FORCING |
CALL READ_FLD_XY_RS( zonalWindFile, ' ', fu, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
124 |
INI_FORCING |
CALL READ_FLD_XY_RS( meridWindFile, ' ', fv, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
127 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQFile, ' ', Qnet, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
129 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQnetFile, ' ', Qnet, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
132 |
INI_FORCING |
CALL READ_FLD_XY_RS( EmPmRfile, ' ', EmPmR, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
136 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
137 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
13 |
INI_FORCING |
SUBROUTINE INI_FORCING( myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
148 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltFluxFile, ' ', saltFlux, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
151 |
INI_FORCING |
CALL READ_FLD_XY_RS( thetaClimFile, ' ', SST, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
154 |
INI_FORCING |
CALL READ_FLD_XY_RS( saltClimFile, ' ', SSS, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
158 |
INI_FORCING |
& lambdaThetaClimRelax, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
162 |
INI_FORCING |
& lambdaSaltClimRelax, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
166 |
INI_FORCING |
CALL READ_FLD_XY_RS( surfQswFile, ' ', Qsw, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
170 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
171 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
184 |
INI_FORCING |
CALL READ_FLD_XY_RS( pLoadFile, ' ', pLoad, 0, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
188 |
INI_FORCING |
CALL EXCH_UV_XY_RS( fu,fv, .TRUE., myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
189 |
INI_FORCING |
CALL EXCH_XY_RS( Qnet , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
190 |
INI_FORCING |
CALL EXCH_XY_RS( EmPmR, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
191 |
INI_FORCING |
CALL EXCH_XY_RS( saltFlux, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
192 |
INI_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
193 |
INI_FORCING |
CALL EXCH_XY_RS( SSS , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
194 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaThetaClimRelax, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
195 |
INI_FORCING |
CALL EXCH_XY_RS( lambdaSaltClimRelax , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
197 |
INI_FORCING |
CALL EXCH_XY_RS(Qsw , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
200 |
INI_FORCING |
CALL EXCH_XY_RS(pLoad , myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
204 |
INI_FORCING |
CALL EXCH_XY_RS( Qnetm, myThid ) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
34 |
INI_FORCING |
INTEGER myThid |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
45 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
46 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
96 |
INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_global_oce_optim/code_oad/ini_forcing.F |
97 |
INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
15 |
SOLVE_UV_TRIDIAGO |
I subIter, myIter, myThid ) |
|
./model/src/solve_uv_tridiago.F |
194 |
SOLVE_UV_TRIDIAGO |
_BEGIN_MASTER(myThid) |
|
./model/src/solve_uv_tridiago.F |
276 |
SOLVE_UV_TRIDIAGO |
_END_MASTER(myThid) |
|
./model/src/solve_uv_tridiago.F |
279 |
SOLVE_UV_TRIDIAGO |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
280 |
SOLVE_UV_TRIDIAGO |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
297 |
SOLVE_UV_TRIDIAGO |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
298 |
SOLVE_UV_TRIDIAGO |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
381 |
SOLVE_UV_TRIDIAGO |
_BEGIN_MASTER(myThid) |
|
./model/src/solve_uv_tridiago.F |
463 |
SOLVE_UV_TRIDIAGO |
_END_MASTER(myThid) |
|
./model/src/solve_uv_tridiago.F |
466 |
SOLVE_UV_TRIDIAGO |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
467 |
SOLVE_UV_TRIDIAGO |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
61 |
SOLVE_UV_TRIDIAGO |
INTEGER subIter, myIter, myThid |
|
./model/src/solve_uv_tridiago.F |
98 |
SOLVE_UV_TRIDIAGO |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/solve_uv_tridiago.F |
99 |
SOLVE_UV_TRIDIAGO |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
113 |
APPLY_FORCING_V |
I myTime, myIter, myThid ) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
149 |
APPLY_FORCING_V |
INTEGER myThid |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
206 |
APPLY_FORCING_T |
I myTime, myIter, myThid ) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
20 |
APPLY_FORCING_U |
I myTime, myIter, myThid ) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
241 |
APPLY_FORCING_T |
INTEGER myThid |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
305 |
APPLY_FORCING_S |
I myTime, myIter, myThid ) |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
341 |
APPLY_FORCING_S |
INTEGER myThid |
|
./verification/tutorial_held_suarez_cs/code/apply_forcing.F |
56 |
APPLY_FORCING_U |
INTEGER myThid |
|
./model/src/state_summary.F |
39 |
STATE_SUMMARY |
INTEGER myThid |
|
./model/src/state_summary.F |
46 |
STATE_SUMMARY |
_BEGIN_MASTER(myThid) |
|
./model/src/state_summary.F |
50 |
STATE_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/state_summary.F |
53 |
STATE_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/state_summary.F |
57 |
STATE_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/state_summary.F |
60 |
STATE_SUMMARY |
& SQUEEZE_RIGHT , myThid ) |
|
./model/src/state_summary.F |
61 |
STATE_SUMMARY |
_END_MASTER(myThid) |
|
./model/src/state_summary.F |
9 |
STATE_SUMMARY |
SUBROUTINE STATE_SUMMARY( myThid ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
124 |
CTRL_MAP_INI_GENARR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
136 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
137 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
138 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
157 |
CTRL_MAP_INI_GENARR |
& Nr, myThid ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
43 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
89 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
90 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
91 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F |
9 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
103 |
PTRACERS_FORCING_SURF |
CALL DIAGNOSTICS_FILL(add2EmP,'Add2EmP ',0,1,2,bi,bj,myThid) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
13 |
PTRACERS_FORCING_SURF |
I myTime,myIter,myThid ) |
|
./verification/tutorial_tracer_adjsens/code_ad/ptracers_forcing_surf.F |
43 |
PTRACERS_FORCING_SURF |
INTEGER myThid |
|
./model/src/swfrac.F |
13 |
SWFRAC |
I myTime, myIter, myThid ) |
|
./model/src/swfrac.F |
50 |
SWFRAC |
INTEGER myThid |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
126 |
CTRL_MAP_INI_GENARR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
139 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr3d_dummy(iarr) ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
140 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
141 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
154 |
CTRL_MAP_INI_GENARR |
& Nr, myThid ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
43 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
91 |
CTRL_MAP_INI_GENARR |
& myThid, xx_genarr2d_dummy(iarr) ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
93 |
CTRL_MAP_INI_GENARR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F |
9 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./model/src/taueddy_init_varia.F |
28 |
TAUEDDY_INIT_VARIA |
INTEGER myThid |
|
./model/src/taueddy_init_varia.F |
41 |
TAUEDDY_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/taueddy_init_varia.F |
42 |
TAUEDDY_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/taueddy_init_varia.F |
56 |
TAUEDDY_INIT_VARIA |
& eddyPsiX, nIter0, myThid ) |
|
./model/src/taueddy_init_varia.F |
60 |
TAUEDDY_INIT_VARIA |
& eddyPsiY, nIter0, myThid ) |
|
./model/src/taueddy_init_varia.F |
63 |
TAUEDDY_INIT_VARIA |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |
|
./model/src/taueddy_init_varia.F |
9 |
TAUEDDY_INIT_VARIA |
SUBROUTINE TAUEDDY_INIT_VARIA( myThid ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
103 |
PTRACERS_FORCING_SURF |
CALL DIAGNOSTICS_FILL(add2EmP,'Add2EmP ',0,1,2,bi,bj,myThid) |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
13 |
PTRACERS_FORCING_SURF |
I myTime,myIter,myThid ) |
|
./verification/tutorial_tracer_adjsens/code_oad/ptracers_forcing_surf.F |
43 |
PTRACERS_FORCING_SURF |
INTEGER myThid |
|
./model/src/taueddy_tendency_apply.F |
103 |
TAUEDDY_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
|
./model/src/taueddy_tendency_apply.F |
140 |
TAUEDDY_TENDENCY_APPLY_V |
INTEGER myThid |
|
./model/src/taueddy_tendency_apply.F |
22 |
TAUEDDY_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
|
./model/src/taueddy_tendency_apply.F |
59 |
TAUEDDY_TENDENCY_APPLY_U |
INTEGER myThid |
|
./model/src/temp_integrate.F |
174 |
TEMP_INTEGRATE |
& diagForcing = DIAGNOSTICS_IS_ON( 'gT_Forc ', myThid ) |
|
./model/src/temp_integrate.F |
176 |
TEMP_INTEGRATE |
& diagAB_tend = DIAGNOSTICS_IS_ON( 'AB_gT ', myThid ) |
|
./model/src/temp_integrate.F |
180 |
TEMP_INTEGRATE |
act1 = bi - myBxLo(myThid) |
|
./model/src/temp_integrate.F |
181 |
TEMP_INTEGRATE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/temp_integrate.F |
182 |
TEMP_INTEGRATE |
act2 = bj - myByLo(myThid) |
|
./model/src/temp_integrate.F |
183 |
TEMP_INTEGRATE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/temp_integrate.F |
184 |
TEMP_INTEGRATE |
act3 = myThid - 1 |
|
./model/src/temp_integrate.F |
202 |
TEMP_INTEGRATE |
I tempStartAB, iterNb, myThid ) |
|
./model/src/temp_integrate.F |
208 |
TEMP_INTEGRATE |
I tempStartAB, iterNb, myThid ) |
|
./model/src/temp_integrate.F |
20 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
249 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
269 |
TEMP_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_SOM_ADVECT',myThid) |
|
./model/src/temp_integrate.F |
277 |
TEMP_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
283 |
TEMP_INTEGRATE |
IF (debugMode) CALL DEBUG_CALL('GAD_ADVECTION',myThid) |
|
./model/src/temp_integrate.F |
290 |
TEMP_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
326 |
TEMP_INTEGRATE |
I k, bi, bj, myThid ) |
|
./model/src/temp_integrate.F |
338 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
341 |
TEMP_INTEGRATE |
CALL DIAGNOSTICS_FILL(gtForc,'gT_Forc ',k,1,2,bi,bj,myThid) |
|
./model/src/temp_integrate.F |
362 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
377 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
395 |
TEMP_INTEGRATE |
I tempStartAB, iterNb, myThid ) |
|
./model/src/temp_integrate.F |
401 |
TEMP_INTEGRATE |
I tempStartAB, iterNb, myThid ) |
|
./model/src/temp_integrate.F |
405 |
TEMP_INTEGRATE |
CALL DIAGNOSTICS_FILL(gt_AB,'AB_gT ',k,1,2,bi,bj,myThid) |
|
./model/src/temp_integrate.F |
424 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
436 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
440 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
445 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
462 |
TEMP_INTEGRATE |
I dTtracerLev, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
469 |
TEMP_INTEGRATE |
I dTtracerLev, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
479 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
499 |
TEMP_INTEGRATE |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
512 |
TEMP_INTEGRATE |
I myThid ) |
|
./model/src/temp_integrate.F |
522 |
TEMP_INTEGRATE |
I Nr, 3, deltaTClock, bi, bj, myThid ) |
|
./model/src/temp_integrate.F |
533 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
539 |
TEMP_INTEGRATE |
I myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
546 |
TEMP_INTEGRATE |
I gT_loc, myTime, myIter, myThid ) |
|
./model/src/temp_integrate.F |
91 |
TEMP_INTEGRATE |
INTEGER myThid |
|
./model/src/the_main_loop.F |
227 |
THE_MAIN_LOOP |
INTEGER myThid |
|
./model/src/the_main_loop.F |
241 |
THE_MAIN_LOOP |
IF (debugMode) CALL DEBUG_ENTER('THE_MAIN_LOOP',myThid) |
|
./model/src/the_main_loop.F |
324 |
THE_MAIN_LOOP |
IF (debugMode) CALL DEBUG_CALL('INITIALISE_VARIA',myThid) |
|
./model/src/the_main_loop.F |
327 |
THE_MAIN_LOOP |
CALL TIMER_START('INITIALISE_VARIA [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
328 |
THE_MAIN_LOOP |
CALL INITIALISE_VARIA( myThid ) |
|
./model/src/the_main_loop.F |
329 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('INITIALISE_VARIA [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
339 |
THE_MAIN_LOOP |
CALL TIMER_START('SHOWFLOPS_INIT [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
340 |
THE_MAIN_LOOP |
CALL SHOWFLOPS_INIT( myThid ) |
|
./model/src/the_main_loop.F |
341 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('SHOWFLOPS_INIT [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
345 |
THE_MAIN_LOOP |
CALL TIMER_START('MAIN LOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
352 |
THE_MAIN_LOOP |
CALL TIMER_START('INIT_PDAF [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
353 |
THE_MAIN_LOOP |
CALL INIT_PDAF( nIter0, myTime, myIter, myThid ) |
|
./model/src/the_main_loop.F |
354 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('INIT_PDAF [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
378 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 4 , 0, myThid ) |
|
./model/src/the_main_loop.F |
380 |
THE_MAIN_LOOP |
CALL AUTODIFF_STORE( myThid ) |
|
./model/src/the_main_loop.F |
382 |
THE_MAIN_LOOP |
CALL AUTODIFF_RESTORE( myThid ) |
|
./model/src/the_main_loop.F |
384 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 4 , 1, myThid ) |
|
./model/src/the_main_loop.F |
396 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 3 , 0, myThid ) |
|
./model/src/the_main_loop.F |
398 |
THE_MAIN_LOOP |
CALL AUTODIFF_STORE( myThid ) |
|
./model/src/the_main_loop.F |
400 |
THE_MAIN_LOOP |
CALL AUTODIFF_RESTORE( myThid ) |
|
./model/src/the_main_loop.F |
402 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 3 , 1, myThid ) |
|
./model/src/the_main_loop.F |
413 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 2 , 0, myThid ) |
|
./model/src/the_main_loop.F |
415 |
THE_MAIN_LOOP |
CALL AUTODIFF_STORE( myThid ) |
|
./model/src/the_main_loop.F |
417 |
THE_MAIN_LOOP |
CALL AUTODIFF_RESTORE( myThid ) |
|
./model/src/the_main_loop.F |
419 |
THE_MAIN_LOOP |
CALL AUTODIFF_WHTAPEIO_SYNC( 2 , 1, myThid ) |
|
./model/src/the_main_loop.F |
52 |
THE_MAIN_LOOP |
SUBROUTINE THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./model/src/the_main_loop.F |
543 |
THE_MAIN_LOOP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/the_main_loop.F |
544 |
THE_MAIN_LOOP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/the_main_loop.F |
596 |
THE_MAIN_LOOP |
IF (debugMode) CALL DEBUG_CALL('cost_averagesfields',myThid) |
|
./model/src/the_main_loop.F |
599 |
THE_MAIN_LOOP |
CALL TIMER_START('COST_AVERAGESFIELDS [MAIN_DO_LOOP]',myThid) |
|
./model/src/the_main_loop.F |
600 |
THE_MAIN_LOOP |
CALL COST_AVERAGESFIELDS( myTime, myThid ) |
|
./model/src/the_main_loop.F |
601 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('COST_AVERAGESFIELDS [MAIN_DO_LOOP]',myThid) |
|
./model/src/the_main_loop.F |
608 |
THE_MAIN_LOOP |
IF (debugMode) CALL DEBUG_CALL('profiles_inloop',myThid) |
|
./model/src/the_main_loop.F |
616 |
THE_MAIN_LOOP |
CALL TIMER_START('PROFILES_INLOOP [MAIN_DO_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
617 |
THE_MAIN_LOOP |
CALL PROFILES_INLOOP( myTime, myThid ) |
|
./model/src/the_main_loop.F |
618 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('PROFILES_INLOOP [MAIN_DO_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
622 |
THE_MAIN_LOOP |
CALL TIMER_START('MAIN_DO_LOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
623 |
THE_MAIN_LOOP |
CALL MAIN_DO_LOOP( iloop, myTime, myIter, myThid ) |
|
./model/src/the_main_loop.F |
624 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('MAIN_DO_LOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
628 |
THE_MAIN_LOOP |
CALL TIMER_START('ASSIMILATE_PDAF [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
629 |
THE_MAIN_LOOP |
CALL ASSIMILATE_PDAF( myTime, myIter, myThid ) |
|
./model/src/the_main_loop.F |
630 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('ASSIMILATE_PDAF [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
662 |
THE_MAIN_LOOP |
CALL TIMER_START('COST_AVERAGESFIELDS [THE_MAIN_LOOP]',myThid) |
|
./model/src/the_main_loop.F |
663 |
THE_MAIN_LOOP |
CALL COST_AVERAGESFIELDS( endtime, myThid ) |
|
./model/src/the_main_loop.F |
664 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('COST_AVERAGESFIELDS [THE_MAIN_LOOP]',myThid) |
|
./model/src/the_main_loop.F |
670 |
THE_MAIN_LOOP |
CALL TIMER_START('PROFILES_INLOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
671 |
THE_MAIN_LOOP |
CALL PROFILES_INLOOP( endtime, myThid ) |
|
./model/src/the_main_loop.F |
672 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('PROFILES_INLOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
674 |
THE_MAIN_LOOP |
CALL COST_PROFILES( myIter, myTime, myThid ) |
|
./model/src/the_main_loop.F |
681 |
THE_MAIN_LOOP |
CALL TIMER_START('ECCO_COST_DRIVER [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
682 |
THE_MAIN_LOOP |
CALL ECCO_COST_DRIVER ( endTime, myIter, myThid ) |
|
./model/src/the_main_loop.F |
683 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('ECCO_COST_DRIVER [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
689 |
THE_MAIN_LOOP |
CALL TIMER_START('COST_FINAL [ADJOINT SPIN-DOWN]', myThid) |
|
./model/src/the_main_loop.F |
690 |
THE_MAIN_LOOP |
CALL COST_FINAL ( myThid ) |
|
./model/src/the_main_loop.F |
691 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('COST_FINAL [ADJOINT SPIN-DOWN]', myThid) |
|
./model/src/the_main_loop.F |
705 |
THE_MAIN_LOOP |
CALL TIMER_STOP ('MAIN LOOP [THE_MAIN_LOOP]', myThid) |
|
./model/src/the_main_loop.F |
708 |
THE_MAIN_LOOP |
IF (debugMode) CALL DEBUG_LEAVE('THE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
523 |
THE_MODEL_MAIN |
SUBROUTINE THE_MODEL_MAIN(myThid) |
|
./model/src/the_model_main.F |
591 |
THE_MODEL_MAIN |
INTEGER myThid |
|
./model/src/the_model_main.F |
612 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_ENTER('THE_MODEL_MAIN',myThid) |
|
./model/src/the_model_main.F |
616 |
THE_MODEL_MAIN |
CALL TIMER_CONTROL('','INIT','THE_MODEL_MAIN',myThid) |
|
./model/src/the_model_main.F |
619 |
THE_MODEL_MAIN |
CALL TIMER_START('ALL [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
622 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('INITIALISE_FIXED',myThid) |
|
./model/src/the_model_main.F |
625 |
THE_MODEL_MAIN |
CALL TIMER_START('INITIALISE_FIXED [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
626 |
THE_MODEL_MAIN |
CALL INITIALISE_FIXED( myThid ) |
|
./model/src/the_model_main.F |
627 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('INITIALISE_FIXED [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
645 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_UNPACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
646 |
THE_MODEL_MAIN |
CALL CTRL_UNPACK( .TRUE. , myThid ) |
|
./model/src/the_model_main.F |
647 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_UNPACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
655 |
THE_MODEL_MAIN |
CALL COST_DEPENDENT_INIT ( myThid ) |
|
./model/src/the_model_main.F |
661 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('G_THE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
663 |
THE_MODEL_MAIN |
CALL TIMER_START('G_THE_MAIN_LOOP [TANGENT RUN]',myThid) |
|
./model/src/the_model_main.F |
664 |
THE_MODEL_MAIN |
CALL G_THE_MAIN_LOOP ( myTime, myIter, myThid ) |
|
./model/src/the_model_main.F |
665 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('G_THE_MAIN_LOOP [TANGENT RUN]',myThid) |
|
./model/src/the_model_main.F |
675 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('MDTHE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
677 |
THE_MODEL_MAIN |
CALL TIMER_START('MDTHE_MAIN_LOOP [MD RUN]', myThid) |
|
./model/src/the_model_main.F |
678 |
THE_MODEL_MAIN |
CALL MDTHE_MAIN_LOOP ( myTime, myIter, myThid ) |
|
./model/src/the_model_main.F |
679 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('MDTHE_MAIN_LOOP [MD RUN]', myThid) |
|
./model/src/the_model_main.F |
680 |
THE_MODEL_MAIN |
CALL COST_FINAL_STORE ( myThid, lastdiva ) |
|
./model/src/the_model_main.F |
683 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
685 |
THE_MODEL_MAIN |
CALL TIMER_START('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./model/src/the_model_main.F |
686 |
THE_MODEL_MAIN |
CALL ADTHE_MAIN_LOOP ( myThid ) |
|
./model/src/the_model_main.F |
687 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./model/src/the_model_main.F |
688 |
THE_MODEL_MAIN |
CALL COST_FINAL_RESTORE ( myThid, lastdiva ) |
|
./model/src/the_model_main.F |
693 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('ADTHE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
695 |
THE_MODEL_MAIN |
CALL TIMER_START('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./model/src/the_model_main.F |
696 |
THE_MODEL_MAIN |
CALL ADTHE_MAIN_LOOP ( myThid ) |
|
./model/src/the_model_main.F |
697 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ADTHE_MAIN_LOOP [ADJOINT RUN]', myThid) |
|
./model/src/the_model_main.F |
703 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
706 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
707 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./model/src/the_model_main.F |
708 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
716 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
717 |
THE_MODEL_MAIN |
CALL CTRL_PACK( .FALSE. , myThid ) |
|
./model/src/the_model_main.F |
718 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
721 |
THE_MODEL_MAIN |
CALL TIMER_START('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
722 |
THE_MODEL_MAIN |
CALL CTRL_PACK( .TRUE. , myThid ) |
|
./model/src/the_model_main.F |
723 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('CTRL_PACK [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
732 |
THE_MODEL_MAIN |
CALL TIMER_START('GRDCHK_MAIN [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
733 |
THE_MODEL_MAIN |
CALL GRDCHK_MAIN( myThid ) |
|
./model/src/the_model_main.F |
734 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('GRDCHK_MAIN [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
741 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_CALL('THE_MAIN_LOOP',myThid) |
|
./model/src/the_model_main.F |
744 |
THE_MODEL_MAIN |
CALL TIMER_START('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
745 |
THE_MODEL_MAIN |
CALL THE_MAIN_LOOP( myTime, myIter, myThid ) |
|
./model/src/the_model_main.F |
746 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('THE_MAIN_LOOP [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
759 |
THE_MODEL_MAIN |
_BEGIN_MASTER( myThid ) |
|
./model/src/the_model_main.F |
760 |
THE_MODEL_MAIN |
CALL MNC_FILE_CLOSE_ALL( myThid ) |
|
./model/src/the_model_main.F |
761 |
THE_MODEL_MAIN |
_END_MASTER( myThid ) |
|
./model/src/the_model_main.F |
766 |
THE_MODEL_MAIN |
CALL TIMER_STOP ('ALL [THE_MODEL_MAIN]',myThid) |
|
./model/src/the_model_main.F |
769 |
THE_MODEL_MAIN |
IF ( myThid .EQ. 1 ) THEN |
|
./model/src/the_model_main.F |
770 |
THE_MODEL_MAIN |
CALL TIMER_PRINTALL( myThid ) |
|
./model/src/the_model_main.F |
775 |
THE_MODEL_MAIN |
CALL BAR_CHECK( 9, myThid ) |
|
./model/src/the_model_main.F |
778 |
THE_MODEL_MAIN |
IF (debugMode) CALL DEBUG_LEAVE('THE_MODEL_MAIN',myThid) |
|
./model/src/thermodynamics.F |
110 |
THERMODYNAMICS |
IF (debugMode) CALL DEBUG_ENTER('THERMODYNAMICS',myThid) |
|
./model/src/thermodynamics.F |
144 |
THERMODYNAMICS |
& myTime, myIter, myThid ) |
|
./model/src/thermodynamics.F |
149 |
THERMODYNAMICS |
& myTime, myIter, myThid ) |
|
./model/src/thermodynamics.F |
163 |
THERMODYNAMICS |
CALL PTRACERS_CALC_WSURF_TR(wVel,myTime,myIter,myThid) |
|
./model/src/thermodynamics.F |
167 |
THERMODYNAMICS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/thermodynamics.F |
168 |
THERMODYNAMICS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/thermodynamics.F |
171 |
THERMODYNAMICS |
act1 = bi - myBxLo(myThid) |
|
./model/src/thermodynamics.F |
172 |
THERMODYNAMICS |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./model/src/thermodynamics.F |
173 |
THERMODYNAMICS |
act2 = bj - myByLo(myThid) |
|
./model/src/thermodynamics.F |
174 |
THERMODYNAMICS |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./model/src/thermodynamics.F |
175 |
THERMODYNAMICS |
act3 = myThid - 1 |
|
./model/src/thermodynamics.F |
25 |
THERMODYNAMICS |
SUBROUTINE THERMODYNAMICS(myTime, myIter, myThid) |
|
./model/src/thermodynamics.F |
269 |
THERMODYNAMICS |
I bi, bj, myIter, myThid ) |
|
./model/src/thermodynamics.F |
277 |
THERMODYNAMICS |
I myIter, myThid ) |
|
./model/src/thermodynamics.F |
317 |
THERMODYNAMICS |
IF (debugMode) CALL DEBUG_CALL('TEMP_INTEGRATE',myThid) |
|
./model/src/thermodynamics.F |
323 |
THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./model/src/thermodynamics.F |
328 |
THERMODYNAMICS |
IF (debugMode) CALL DEBUG_CALL('SALT_INTEGRATE',myThid) |
|
./model/src/thermodynamics.F |
334 |
THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./model/src/thermodynamics.F |
344 |
THERMODYNAMICS |
IF (debugMode) CALL DEBUG_CALL('PTRACERS_INTEGRATE',myThid) |
|
./model/src/thermodynamics.F |
350 |
THERMODYNAMICS |
I myTime, myIter, myThid ) |
|
./model/src/thermodynamics.F |
357 |
THERMODYNAMICS |
CALL OBCS_APPLY_TS( bi, bj, 0, theta, salt, myThid ) |
|
./model/src/thermodynamics.F |
365 |
THERMODYNAMICS |
& 0, Nr, 1, bi, bj, myThid ) |
|
./model/src/thermodynamics.F |
387 |
THERMODYNAMICS |
I trAdvCFL, myIter, myThid ) |
|
./model/src/thermodynamics.F |
393 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,uVel,'Uvel (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
394 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,vVel,'Vvel (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
395 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,wVel,'Wvel (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
396 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,theta,'Theta (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
397 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,salt,'Salt (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
399 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,gtNm1,'GtNm1 (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
400 |
THERMODYNAMICS |
CALL DEBUG_STATS_RL(Nr,gsNm1,'GsNm1 (THERMODYNAMICS)',myThid) |
|
./model/src/thermodynamics.F |
404 |
THERMODYNAMICS |
CALL PTRACERS_DEBUG(myThid) |
|
./model/src/thermodynamics.F |
411 |
THERMODYNAMICS |
IF (debugMode) CALL DEBUG_LEAVE('THERMODYNAMICS',myThid) |
|
./model/src/thermodynamics.F |
79 |
THERMODYNAMICS |
INTEGER myThid |
|
./model/src/timestep.F |
109 |
TIMESTEP |
I myTime, myIter, myThid ) |
|
./model/src/timestep.F |
113 |
TIMESTEP |
I myTime, myIter, myThid ) |
|
./model/src/timestep.F |
169 |
TIMESTEP |
I mom_StartAB, myIter, myThid ) |
|
./model/src/timestep.F |
16 |
TIMESTEP |
I myTime, myIter, myThid ) |
|
./model/src/timestep.F |
174 |
TIMESTEP |
I mom_StartAB, myIter, myThid ) |
|
./model/src/timestep.F |
181 |
TIMESTEP |
I mom_StartAB, myIter, myThid ) |
|
./model/src/timestep.F |
187 |
TIMESTEP |
I mom_StartAB, myIter, myThid ) |
|
./model/src/timestep.F |
191 |
TIMESTEP |
CALL DIAGNOSTICS_FILL(gu_AB,'AB_gU ',k,1,2,bi,bj,myThid) |
|
./model/src/timestep.F |
192 |
TIMESTEP |
CALL DIAGNOSTICS_FILL(gv_AB,'AB_gV ',k,1,2,bi,bj,myThid) |
|
./model/src/timestep.F |
237 |
TIMESTEP |
I myTime, myIter, myThid) |
|
./model/src/timestep.F |
383 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( guDissip,'Um_Diss ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
384 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( gvDissip,'Vm_Diss ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
387 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( guExt,'Um_Ext ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
388 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( gvExt,'Vm_Ext ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
392 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( guCor,'Um_Cori ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
393 |
TIMESTEP |
CALL DIAGNOSTICS_FILL( gvCor,'Vm_Cori ',k,1,2,bi,bj,myThid ) |
|
./model/src/timestep.F |
55 |
TIMESTEP |
INTEGER myIter, myThid |
|
./model/src/timestep_tracer.F |
14 |
TIMESTEP_TRACER |
I myTime, myIter, myThid ) |
|
./model/src/timestep_tracer.F |
44 |
TIMESTEP_TRACER |
INTEGER myIter, myThid |
|
./model/src/timestep_wvel.F |
10 |
TIMESTEP_WVEL |
I bi,bj, myTime, myIter, myThid ) |
|
./model/src/timestep_wvel.F |
37 |
TIMESTEP_WVEL |
INTEGER myIter, myThid |
|
./model/src/tracers_correction_step.F |
108 |
TRACERS_CORRECTION_STEP |
I myTime, myIter, myThid ) |
|
./model/src/tracers_correction_step.F |
10 |
TRACERS_CORRECTION_STEP |
SUBROUTINE TRACERS_CORRECTION_STEP(myTime, myIter, myThid) |
|
./model/src/tracers_correction_step.F |
114 |
TRACERS_CORRECTION_STEP |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/tracers_correction_step.F |
119 |
TRACERS_CORRECTION_STEP |
& CALL MATRIX_STORE_TENDENCY_IMP( bi, bj, myTime, myIter, myThid ) |
|
./model/src/tracers_correction_step.F |
41 |
TRACERS_CORRECTION_STEP |
INTEGER myThid |
|
./model/src/tracers_correction_step.F |
53 |
TRACERS_CORRECTION_STEP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/tracers_correction_step.F |
54 |
TRACERS_CORRECTION_STEP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/tracers_correction_step.F |
55 |
TRACERS_CORRECTION_STEP |
CALL TRACERS_IIGW_CORRECTION(bi,bj, myTime,myIter,myThid) |
|
./model/src/tracers_correction_step.F |
69 |
TRACERS_CORRECTION_STEP |
CALL TIMER_START('SHAP_FILT_TS [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
70 |
TRACERS_CORRECTION_STEP |
CALL SHAP_FILT_APPLY_TS( theta,salt, myTime, myIter, myThid ) |
|
./model/src/tracers_correction_step.F |
71 |
TRACERS_CORRECTION_STEP |
CALL TIMER_STOP ('SHAP_FILT_TS [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
76 |
TRACERS_CORRECTION_STEP |
CALL TIMER_START('ZONAL_FILT_TS [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
77 |
TRACERS_CORRECTION_STEP |
CALL ZONAL_FILT_APPLY_TS( theta, salt, myThid ) |
|
./model/src/tracers_correction_step.F |
78 |
TRACERS_CORRECTION_STEP |
CALL TIMER_STOP ('ZONAL_FILT_TS [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
82 |
TRACERS_CORRECTION_STEP |
CALL PTRACERS_ZONAL_FILT_APPLY( myThid ) |
|
./model/src/tracers_correction_step.F |
90 |
TRACERS_CORRECTION_STEP |
CALL TIMER_START('SALT_FILL [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
91 |
TRACERS_CORRECTION_STEP |
CALL SALT_FILL( uVel,vVel,salt,1,myTime,myIter,myThid ) |
|
./model/src/tracers_correction_step.F |
92 |
TRACERS_CORRECTION_STEP |
CALL TIMER_STOP ('SALT_FILL [TRC_CORR_STEP]',myThid) |
|
./model/src/tracers_correction_step.F |
96 |
TRACERS_CORRECTION_STEP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/tracers_correction_step.F |
97 |
TRACERS_CORRECTION_STEP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./eesupp/src/eeboot_minimal.F |
117 |
EEBOOT_MINIMAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
183 |
EEBOOT_MINIMAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
217 |
EEBOOT_MINIMAL |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
221 |
EEBOOT_MINIMAL |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
239 |
EEBOOT_MINIMAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
249 |
EEBOOT_MINIMAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
265 |
EEBOOT_MINIMAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/eeboot_minimal.F |
50 |
EEBOOT_MINIMAL |
INTEGER myThid |
|
./eesupp/src/eeboot_minimal.F |
80 |
EEBOOT_MINIMAL |
myThid = 1 |
|
./model/src/tracers_iigw_correction.F |
10 |
TRACERS_IIGW_CORRECTION |
I bi, bj, myTime, myIter, myThid ) |
|
./model/src/tracers_iigw_correction.F |
41 |
TRACERS_IIGW_CORRECTION |
INTEGER myThid |
|
./model/src/turnoff_model_io.F |
103 |
TURNOFF_MODEL_IO |
CALL SEAICE_TURNOFF_IO( seqFlag, myThid ) |
|
./model/src/turnoff_model_io.F |
109 |
TURNOFF_MODEL_IO |
CALL THSICE_TURNOFF_IO( seqFlag, myThid ) |
|
./model/src/turnoff_model_io.F |
10 |
TURNOFF_MODEL_IO |
SUBROUTINE TURNOFF_MODEL_IO( seqFlag, myThid ) |
|
./model/src/turnoff_model_io.F |
115 |
TURNOFF_MODEL_IO |
CALL PTRACERS_TURNOFF_IO( seqFlag, myThid ) |
|
./model/src/turnoff_model_io.F |
45 |
TURNOFF_MODEL_IO |
INTEGER myThid |
|
./model/src/turnoff_model_io.F |
54 |
TURNOFF_MODEL_IO |
_BEGIN_MASTER( myThid ) |
|
./model/src/turnoff_model_io.F |
97 |
TURNOFF_MODEL_IO |
_END_MASTER( myThid ) |
|
./model/src/update_cg2d.F |
10 |
UPDATE_CG2D |
SUBROUTINE UPDATE_CG2D( myTime, myIter, myThid ) |
|
./model/src/update_cg2d.F |
164 |
UPDATE_CG2D |
CALL EXCH_XY_RS(aC2d, myThid) |
|
./model/src/update_cg2d.F |
167 |
UPDATE_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/update_cg2d.F |
168 |
UPDATE_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/update_cg2d.F |
43 |
UPDATE_CG2D |
INTEGER myThid |
|
./model/src/update_cg2d.F |
70 |
UPDATE_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/update_cg2d.F |
71 |
UPDATE_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/update_etah.F |
10 |
UPDATE_ETAH |
SUBROUTINE UPDATE_ETAH( myTime, myIter, myThid ) |
|
./model/src/update_etah.F |
36 |
UPDATE_ETAH |
INTEGER myThid |
|
./model/src/update_etah.F |
49 |
UPDATE_ETAH |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/update_etah.F |
50 |
UPDATE_ETAH |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/update_etah.F |
83 |
UPDATE_ETAH |
& CALL OBCS_APPLY_ETA( bi, bj, etaH, myThid ) |
|
./model/src/update_etah.F |
94 |
UPDATE_ETAH |
& CALL EXCH_XY_RL( etaH, myThid ) |
|
./model/src/update_etaws.F |
36 |
UPDATE_ETAWS |
INTEGER myThid |
|
./model/src/update_etaws.F |
51 |
UPDATE_ETAWS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/update_etaws.F |
52 |
UPDATE_ETAWS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/update_etaws.F |
84 |
UPDATE_ETAWS |
CALL EXCH_UV_XY_RL( etaHw, etaHs, .FALSE., myThid ) |
|
./model/src/update_etaws.F |
86 |
UPDATE_ETAWS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./model/src/update_etaws.F |
87 |
UPDATE_ETAWS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./model/src/update_etaws.F |
9 |
UPDATE_ETAWS |
SUBROUTINE UPDATE_ETAWS( myTime, myIter, myThid ) |
|
./model/src/update_masks_etc.F |
137 |
UPDATE_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_masks_etc.F |
138 |
UPDATE_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_masks_etc.F |
175 |
UPDATE_MASKS_ETC |
& 'Model R_low (update_masks_etc)', 1, myThid ) |
|
./model/src/update_masks_etc.F |
184 |
UPDATE_MASKS_ETC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/update_masks_etc.F |
185 |
UPDATE_MASKS_ETC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_masks_etc.F |
210 |
UPDATE_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_masks_etc.F |
211 |
UPDATE_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_masks_etc.F |
24 |
UPDATE_MASKS_ETC |
SUBROUTINE UPDATE_MASKS_ETC( myThid ) |
|
./model/src/update_masks_etc.F |
255 |
UPDATE_MASKS_ETC |
CALL EXCH_UV_XYZ_RS(hFacW,hFacS,.FALSE.,myThid) |
|
./model/src/update_masks_etc.F |
269 |
UPDATE_MASKS_ETC |
CALL WRITE_FLD_XY_RS( 'Depth.',suff,tmpfld,optimcycle,myThid) |
|
./model/src/update_masks_etc.F |
270 |
UPDATE_MASKS_ETC |
CALL WRITE_FLD_XYZ_RS( 'hFacC.',suff,hFacC,optimcycle,myThid) |
|
./model/src/update_masks_etc.F |
271 |
UPDATE_MASKS_ETC |
CALL WRITE_FLD_XYZ_RS( 'hFacW.',suff,hFacW,optimcycle,myThid) |
|
./model/src/update_masks_etc.F |
272 |
UPDATE_MASKS_ETC |
CALL WRITE_FLD_XYZ_RS( 'hFacS.',suff,hFacS,optimcycle,myThid) |
|
./model/src/update_masks_etc.F |
278 |
UPDATE_MASKS_ETC |
& Nr, 1, myThid ) |
|
./model/src/update_masks_etc.F |
280 |
UPDATE_MASKS_ETC |
& Nr, 1, myThid ) |
|
./model/src/update_masks_etc.F |
282 |
UPDATE_MASKS_ETC |
& Nr, 1, myThid ) |
|
./model/src/update_masks_etc.F |
292 |
UPDATE_MASKS_ETC |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/update_masks_etc.F |
293 |
UPDATE_MASKS_ETC |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_masks_etc.F |
57 |
UPDATE_MASKS_ETC |
INTEGER myThid |
|
./model/src/update_masks_etc.F |
82 |
UPDATE_MASKS_ETC |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_masks_etc.F |
83 |
UPDATE_MASKS_ETC |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_r_star.F |
37 |
UPDATE_R_STAR |
INTEGER myThid |
|
./model/src/update_r_star.F |
46 |
UPDATE_R_STAR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_r_star.F |
47 |
UPDATE_R_STAR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_r_star.F |
9 |
UPDATE_R_STAR |
SUBROUTINE UPDATE_R_STAR( useLatest, myTime, myIter, myThid ) |
|
./model/src/update_sigma.F |
13 |
UPDATE_SIGMA |
SUBROUTINE UPDATE_SIGMA( etaHc, myTime, myIter, myThid ) |
|
./model/src/update_sigma.F |
45 |
UPDATE_SIGMA |
INTEGER myThid |
|
./model/src/update_sigma.F |
67 |
UPDATE_SIGMA |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_sigma.F |
68 |
UPDATE_SIGMA |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_surf_dr.F |
37 |
UPDATE_SURF_DR |
INTEGER myThid |
|
./model/src/update_surf_dr.F |
47 |
UPDATE_SURF_DR |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./model/src/update_surf_dr.F |
48 |
UPDATE_SURF_DR |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./model/src/update_surf_dr.F |
9 |
UPDATE_SURF_DR |
SUBROUTINE UPDATE_SURF_DR( useLatest, myTime, myIter, myThid ) |
|
./model/src/write_grid.F |
100 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'V2zonDir',' ',v2zonDir,-1,myThid) |
|
./model/src/write_grid.F |
103 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'Depth',' ',tmpfld,-1,myThid) |
|
./model/src/write_grid.F |
105 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowC', ' ', R_low, -1,myThid) |
|
./model/src/write_grid.F |
106 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowW', ' ', rLowW, -1,myThid) |
|
./model/src/write_grid.F |
107 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rLowS', ' ', rLowS, -1,myThid) |
|
./model/src/write_grid.F |
108 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfC',' ',Ro_surf,-1,myThid) |
|
./model/src/write_grid.F |
109 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfW',' ',rSurfW, -1,myThid) |
|
./model/src/write_grid.F |
110 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'rSurfS',' ',rSurfS, -1,myThid) |
|
./model/src/write_grid.F |
112 |
WRITE_GRID |
CALL WRITE_FLD_XYZ_RS( 'hFacC',' ',hFacC, 0,myThid) |
|
./model/src/write_grid.F |
113 |
WRITE_GRID |
CALL WRITE_FLD_XYZ_RS( 'hFacW',' ',hFacW, 0,myThid) |
|
./model/src/write_grid.F |
114 |
WRITE_GRID |
CALL WRITE_FLD_XYZ_RS( 'hFacS',' ',hFacS, 0,myThid) |
|
./model/src/write_grid.F |
116 |
WRITE_GRID |
& CALL WRITE_FLD_XY_RS( 'topo_P',' ',Ro_surf,-1,myThid) |
|
./model/src/write_grid.F |
118 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInC',' ', maskInC, -1, myThid ) |
|
./model/src/write_grid.F |
119 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInW',' ', maskInW, -1, myThid ) |
|
./model/src/write_grid.F |
120 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'maskInS',' ', maskInS, -1, myThid ) |
|
./model/src/write_grid.F |
127 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'RC', ' ', rC, Nr, -1, myThid ) |
|
./model/src/write_grid.F |
128 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'RF', ' ', rF, 1+Nr,-1, myThid ) |
|
./model/src/write_grid.F |
129 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'DRC',' ', drC,1+Nr,-1, myThid ) |
|
./model/src/write_grid.F |
130 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'DRF',' ', drF, Nr, -1, myThid ) |
|
./model/src/write_grid.F |
132 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'AHybSigF',' ',aHybSigmF,1+Nr,-1,myThid ) |
|
./model/src/write_grid.F |
133 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'BHybSigF',' ',bHybSigmF,1+Nr,-1,myThid ) |
|
./model/src/write_grid.F |
134 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'AHybSigC',' ',aHybSigmC, Nr, -1,myThid ) |
|
./model/src/write_grid.F |
135 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'BHybSigC',' ',bHybSigmC, Nr, -1,myThid ) |
|
./model/src/write_grid.F |
136 |
WRITE_GRID |
CALL WRITE_GLVEC_RS('DAHybSigF',' ',dAHybSigF, Nr, -1,myThid ) |
|
./model/src/write_grid.F |
137 |
WRITE_GRID |
CALL WRITE_GLVEC_RS('DBHybSigF',' ',dBHybSigF, Nr, -1,myThid ) |
|
./model/src/write_grid.F |
138 |
WRITE_GRID |
CALL WRITE_GLVEC_RS('DAHybSigC',' ',dAHybSigC,1+Nr,-1,myThid ) |
|
./model/src/write_grid.F |
139 |
WRITE_GRID |
CALL WRITE_GLVEC_RS('DBHybSigC',' ',dBHybSigC,1+Nr,-1,myThid ) |
|
./model/src/write_grid.F |
151 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'PHrefF',' ',tmpVar,1+Nr,-1, myThid ) |
|
./model/src/write_grid.F |
155 |
WRITE_GRID |
CALL WRITE_GLVEC_RS( 'PHrefC',' ',tmpVar, Nr, -1, myThid ) |
|
./model/src/write_grid.F |
163 |
WRITE_GRID |
_BEGIN_MASTER( myThid ) |
|
./model/src/write_grid.F |
167 |
WRITE_GRID |
CALL MNC_CW_SET_UDIM(bfname, 0, myThid) |
|
./model/src/write_grid.F |
168 |
WRITE_GRID |
CALL MNC_CW_SET_CITER(bfname, 2, -1, -1, -1, myThid) |
|
./model/src/write_grid.F |
169 |
WRITE_GRID |
CALL MNC_CW_SET_UDIM(bfname, 1, myThid) |
|
./model/src/write_grid.F |
16 |
WRITE_GRID |
I myThid ) |
|
./model/src/write_grid.F |
170 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'RC',rC,myThid) |
|
./model/src/write_grid.F |
171 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'RF',rF,myThid) |
|
./model/src/write_grid.F |
172 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'RU',rF(2),myThid) |
|
./model/src/write_grid.F |
173 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'RL',rF,myThid) |
|
./model/src/write_grid.F |
174 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'drC',drC,myThid) |
|
./model/src/write_grid.F |
175 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'drF',drF,myThid) |
|
./model/src/write_grid.F |
176 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'XC',xC,myThid) |
|
./model/src/write_grid.F |
177 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'YC',yC,myThid) |
|
./model/src/write_grid.F |
182 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'XG',xG,myThid) |
|
./model/src/write_grid.F |
183 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'YG',yG,myThid) |
|
./model/src/write_grid.F |
184 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dxC',dxC,myThid) |
|
./model/src/write_grid.F |
185 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyC',dyC,myThid) |
|
./model/src/write_grid.F |
186 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dxF',dxF,myThid) |
|
./model/src/write_grid.F |
187 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyF',dyF,myThid) |
|
./model/src/write_grid.F |
188 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dxG',dxG,myThid) |
|
./model/src/write_grid.F |
189 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyG',dyG,myThid) |
|
./model/src/write_grid.F |
190 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dxV',dxV,myThid) |
|
./model/src/write_grid.F |
191 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'dyU',dyU,myThid) |
|
./model/src/write_grid.F |
192 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'rA',rA,myThid) |
|
./model/src/write_grid.F |
193 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'rAw',rAw,myThid) |
|
./model/src/write_grid.F |
194 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'rAs',rAs,myThid) |
|
./model/src/write_grid.F |
195 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'rAz',rAz,myThid) |
|
./model/src/write_grid.F |
197 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'AngleCS',angleCosC,myThid) |
|
./model/src/write_grid.F |
198 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'AngleSN',angleSinC,myThid) |
|
./model/src/write_grid.F |
200 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'fCori',fCori,myThid) |
|
./model/src/write_grid.F |
201 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'fCoriG',fCoriG,myThid) |
|
./model/src/write_grid.F |
202 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'R_low',R_low,myThid) |
|
./model/src/write_grid.F |
203 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'Ro_surf',Ro_surf,myThid) |
|
./model/src/write_grid.F |
204 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'Depth',tmpfld,myThid) |
|
./model/src/write_grid.F |
205 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'HFacC',HFacC,myThid) |
|
./model/src/write_grid.F |
206 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'HFacW',HFacW,myThid) |
|
./model/src/write_grid.F |
207 |
WRITE_GRID |
CALL MNC_CW_RS_W('D',bfname,0,0,'HFacS',HFacS,myThid) |
|
./model/src/write_grid.F |
209 |
WRITE_GRID |
_END_MASTER(myThid) |
|
./model/src/write_grid.F |
218 |
WRITE_GRID |
& CALL MNC_CW_WRITE_GRID_COORD('state', myThid) |
|
./model/src/write_grid.F |
223 |
WRITE_GRID |
CALL MNC_CW_WRITE_GRID_COORD('adstate', myThid) |
|
./model/src/write_grid.F |
225 |
WRITE_GRID |
IF (useEXF) CALL MNC_CW_WRITE_GRID_COORD('adexf',myThid) |
|
./model/src/write_grid.F |
228 |
WRITE_GRID |
IF (useSEAICE) CALL MNC_CW_WRITE_GRID_COORD('adseaice',myThid) |
|
./model/src/write_grid.F |
42 |
WRITE_GRID |
INTEGER myThid |
|
./model/src/write_grid.F |
62 |
WRITE_GRID |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./model/src/write_grid.F |
63 |
WRITE_GRID |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./model/src/write_grid.F |
84 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'XC',' ',xC,-1,myThid) |
|
./model/src/write_grid.F |
85 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'YC',' ',yC,-1,myThid) |
|
./model/src/write_grid.F |
86 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'XG',' ',xG,-1,myThid) |
|
./model/src/write_grid.F |
87 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'YG',' ',yG,-1,myThid) |
|
./model/src/write_grid.F |
88 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAC',' ',rA,-1,myThid) |
|
./model/src/write_grid.F |
89 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAW',' ',rAw,-1,myThid) |
|
./model/src/write_grid.F |
90 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAS',' ',rAs,-1,myThid) |
|
./model/src/write_grid.F |
91 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'RAZ',' ',rAz,-1,myThid) |
|
./model/src/write_grid.F |
92 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXG',' ',dxG,-1,myThid) |
|
./model/src/write_grid.F |
93 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYG',' ',dyG,-1,myThid) |
|
./model/src/write_grid.F |
94 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DXC',' ',dxC,-1,myThid) |
|
./model/src/write_grid.F |
95 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'DYC',' ',dyC,-1,myThid) |
|
./model/src/write_grid.F |
97 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'AngleCS',' ',angleCosC,-1,myThid) |
|
./model/src/write_grid.F |
98 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'AngleSN',' ',angleSinC,-1,myThid) |
|
./model/src/write_grid.F |
99 |
WRITE_GRID |
CALL WRITE_FLD_XY_RS( 'U2zonDir',' ',u2zonDir,-1,myThid) |
|
./model/src/write_pickup.F |
112 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, uVel, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
115 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, vVel, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
122 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
126 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
132 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, theta, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
135 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, salt, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
13 |
WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./model/src/write_pickup.F |
146 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
152 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
159 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
165 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
174 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
183 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
195 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
204 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
217 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
223 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
231 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, guNm1, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
234 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gvNm1, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
239 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gtNm1, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
247 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gsNm1, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
256 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, gwNm1, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
265 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr,totPhiHyd,-j,myIter, myThid ) |
|
./model/src/write_pickup.F |
271 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, phi_nh, -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
279 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, Nr, addMass,-j, myIter, myThid ) |
|
./model/src/write_pickup.F |
288 |
WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./model/src/write_pickup.F |
297 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1 , etaN, nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
303 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, dPhiNH, nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
311 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, dEtaHdt, nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
319 |
WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, fp, 1, etaHnm1, nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
328 |
WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/write_pickup.F |
331 |
WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./model/src/write_pickup.F |
345 |
WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./model/src/write_pickup.F |
358 |
WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 0, myThid) |
|
./model/src/write_pickup.F |
360 |
WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./model/src/write_pickup.F |
362 |
WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./model/src/write_pickup.F |
365 |
WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./model/src/write_pickup.F |
366 |
WRITE_PICKUP |
CALL MNC_CW_RL_W_S('D',fn,0,0,'T', myTime, myThid) |
|
./model/src/write_pickup.F |
367 |
WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',fn,0,0,'iter', myIter, myThid) |
|
./model/src/write_pickup.F |
368 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'U', uVel, myThid) |
|
./model/src/write_pickup.F |
369 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'V', vVel, myThid) |
|
./model/src/write_pickup.F |
372 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'UEulerM', uEulerMean, myThid) |
|
./model/src/write_pickup.F |
373 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'VEulerM', vEulerMean, myThid) |
|
./model/src/write_pickup.F |
376 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Temp', theta, myThid) |
|
./model/src/write_pickup.F |
377 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'S', salt, myThid) |
|
./model/src/write_pickup.F |
378 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Eta', etaN, myThid) |
|
./model/src/write_pickup.F |
380 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gUnm1', guNm1, myThid) |
|
./model/src/write_pickup.F |
381 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gVnm1', gvNm1, myThid) |
|
./model/src/write_pickup.F |
382 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gTnm1', gtNm1, myThid) |
|
./model/src/write_pickup.F |
383 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gSnm1', gsNm1, myThid) |
|
./model/src/write_pickup.F |
386 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'dEtaHdt', dEtaHdt, myThid) |
|
./model/src/write_pickup.F |
387 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'EtaH', etaHnm1, myThid) |
|
./model/src/write_pickup.F |
391 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'phi_nh', phi_nh, myThid) |
|
./model/src/write_pickup.F |
394 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'gWnm1', gwNm1, myThid) |
|
./model/src/write_pickup.F |
399 |
WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'phiHyd', totPhiHyd, myThid) |
|
./model/src/write_pickup.F |
401 |
WRITE_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./model/src/write_pickup.F |
54 |
WRITE_PICKUP |
INTEGER myThid |
|
./model/src/write_state.F |
104 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'U', uVel,iRec,myIter,myThid) |
|
./model/src/write_state.F |
105 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'V', vVel,iRec,myIter,myThid) |
|
./model/src/write_state.F |
106 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'T', theta,iRec,myIter,myThid) |
|
./model/src/write_state.F |
107 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'S', salt,iRec,myIter,myThid) |
|
./model/src/write_state.F |
108 |
WRITE_STATE |
CALL WRITE_REC_XY_RL('Eta',etaN,iRec,myIter,myThid) |
|
./model/src/write_state.F |
109 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'W',wVel,iRec,myIter,myThid) |
|
./model/src/write_state.F |
112 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'PNH',phi_nh,iRec,myIter,myThid) |
|
./model/src/write_state.F |
129 |
WRITE_STATE |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./model/src/write_state.F |
134 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'U.',suff,uVelv,myIter,myThid) |
|
./model/src/write_state.F |
135 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'V.',suff,vVelv,myIter,myThid) |
|
./model/src/write_state.F |
136 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'T.',suff,thetav,myIter,myThid) |
|
./model/src/write_state.F |
137 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'S.',suff,saltv,myIter,myThid) |
|
./model/src/write_state.F |
138 |
WRITE_STATE |
CALL WRITE_FLD_XY_RL('Eta.',suff,etaNv,myIter,myThid) |
|
./model/src/write_state.F |
139 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'W.',suff,wVelv,myIter,myThid) |
|
./model/src/write_state.F |
141 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL('PH.',suff,totPhiHydv,myIter,myThid) |
|
./model/src/write_state.F |
145 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'U.',suff,uVel,myIter,myThid) |
|
./model/src/write_state.F |
146 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'V.',suff,vVel,myIter,myThid) |
|
./model/src/write_state.F |
147 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'T.',suff,theta,myIter,myThid) |
|
./model/src/write_state.F |
148 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'S.',suff,salt,myIter,myThid) |
|
./model/src/write_state.F |
149 |
WRITE_STATE |
CALL WRITE_FLD_XY_RL('Eta.',suff,etaN,myIter,myThid) |
|
./model/src/write_state.F |
14 |
WRITE_STATE |
SUBROUTINE WRITE_STATE ( myTime, myIter, myThid ) |
|
./model/src/write_state.F |
150 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'W.',suff,wVel,myIter,myThid) |
|
./model/src/write_state.F |
152 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL('PH.',suff,totPhiHyd,myIter,myThid) |
|
./model/src/write_state.F |
157 |
WRITE_STATE |
CALL WRITE_FLD_XY_RL('PHL.',suff,phiHydLow,myIter,myThid) |
|
./model/src/write_state.F |
161 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'PNH.',suff,phi_nh,myIter,myThid ) |
|
./model/src/write_state.F |
164 |
WRITE_STATE |
CALL WRITE_FLD_XY_RL( 'dPnh.',suff,dPhiNH,myIter,myThid ) |
|
./model/src/write_state.F |
187 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('state', -1, myThid) |
|
./model/src/write_state.F |
188 |
WRITE_STATE |
CALL MNC_CW_RL_W_S('D','state',0,0,'T', myTime, myThid) |
|
./model/src/write_state.F |
189 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('state', 0, myThid) |
|
./model/src/write_state.F |
190 |
WRITE_STATE |
CALL MNC_CW_I_W_S('I','state',0,0,'iter', myIter, myThid) |
|
./model/src/write_state.F |
192 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'U', uVel, myThid) |
|
./model/src/write_state.F |
193 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'V', vVel, myThid) |
|
./model/src/write_state.F |
194 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'Temp', theta, myThid) |
|
./model/src/write_state.F |
195 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'S', salt, myThid) |
|
./model/src/write_state.F |
196 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'Eta', etaN, myThid) |
|
./model/src/write_state.F |
197 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'W', wVel, myThid) |
|
./model/src/write_state.F |
199 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('phiHyd', -1, myThid) |
|
./model/src/write_state.F |
200 |
WRITE_STATE |
CALL MNC_CW_RL_W_S('D','phiHyd',0,0,'T',myTime,myThid) |
|
./model/src/write_state.F |
201 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('phiHyd', 0, myThid) |
|
./model/src/write_state.F |
202 |
WRITE_STATE |
CALL MNC_CW_I_W_S('I','phiHyd',0,0,'iter',myIter,myThid) |
|
./model/src/write_state.F |
204 |
WRITE_STATE |
& totPhiHyd, myThid) |
|
./model/src/write_state.F |
207 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('phiHydLow', -1, myThid) |
|
./model/src/write_state.F |
208 |
WRITE_STATE |
CALL MNC_CW_RL_W_S('D','phiHydLow',0,0,'T', myTime, myThid) |
|
./model/src/write_state.F |
209 |
WRITE_STATE |
CALL MNC_CW_SET_UDIM('phiHydLow', 0, myThid) |
|
./model/src/write_state.F |
210 |
WRITE_STATE |
CALL MNC_CW_I_W_S('I','phiHydLow',0,0,'iter',myIter,myThid) |
|
./model/src/write_state.F |
212 |
WRITE_STATE |
& phiHydLow, myThid) |
|
./model/src/write_state.F |
216 |
WRITE_STATE |
CALL MNC_CW_RL_W(pf,'state',0,0,'phi_nh',phi_nh,myThid) |
|
./model/src/write_state.F |
71 |
WRITE_STATE |
INTEGER myThid |
|
./optim/utils.F |
120 |
DATE |
INTEGER FUNCTION IO_ERRCOUNT(myThid) |
|
./optim/utils.F |
131 |
DATE |
INTEGER myThid |
|
./optim/utils.F |
134 |
DATE |
IO_ERRCOUNT = ioErrorCount(myThid) |
|
./pkg/admtlm/admtlm_bypassad.F |
28 |
ADMTLM_BYPASSAD |
integer myThid |
|
./pkg/admtlm/admtlm_bypassad.F |
6 |
ADMTLM_BYPASSAD |
subroutine ADMTLM_BYPASSAD( myThid ) |
|
./pkg/admtlm/admtlm_driver.F |
11 |
ADMTLM_DRIVER |
SUBROUTINE ADMTLM_DRIVER( myThid ) |
|
./pkg/admtlm/admtlm_driver.F |
37 |
ADMTLM_DRIVER |
INTEGER myThid |
|
./pkg/admtlm/admtlm_driver.F |
46 |
ADMTLM_DRIVER |
IF (debugMode) CALL DEBUG_ENTER('ADMTLM_DRIVER',myThid) |
|
./pkg/admtlm/admtlm_driver.F |
58 |
ADMTLM_DRIVER |
CALL G_THE_MAIN_LOOP ( myCurrentTime, myCurrentIter, myThid ) |
|
./pkg/admtlm/admtlm_driver.F |
89 |
ADMTLM_DRIVER |
IF (debugMode) CALL DEBUG_LEAVE('ADMTLM_DRIVER',myThid) |
|
./pkg/admtlm/admtlm_dsvd.F |
387 |
ADMTLM_DSVD |
CALL INITIALISE_FIXED( myThid ) |
|
./pkg/admtlm/admtlm_init_fixed.F |
24 |
ADMTLM_INIT_FIXED |
integer myThid |
|
./pkg/admtlm/admtlm_init_fixed.F |
34 |
ADMTLM_INIT_FIXED |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/admtlm/admtlm_init_fixed.F |
35 |
ADMTLM_INIT_FIXED |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/admtlm/admtlm_init_fixed.F |
6 |
ADMTLM_INIT_FIXED |
subroutine ADMTLM_INIT_FIXED( myThid ) |
|
./pkg/admtlm/admtlm_map.F |
24 |
ADMTLM_MAP |
integer myThid |
|
./pkg/admtlm/admtlm_map.F |
31 |
ADMTLM_MAP |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/admtlm/admtlm_map.F |
32 |
ADMTLM_MAP |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/admtlm/admtlm_map.F |
6 |
ADMTLM_MAP |
subroutine ADMTLM_MAP( myThid ) |
|
./pkg/admtlm/admtlm_metric.F |
27 |
ADMTLM_METRIC |
integer myThid |
|
./pkg/admtlm/admtlm_metric.F |
51 |
ADMTLM_METRIC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/admtlm/admtlm_metric.F |
52 |
ADMTLM_METRIC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/admtlm/admtlm_metric.F |
69 |
ADMTLM_METRIC |
_GLOBAL_SUM_RL( myMetric , myThid ) |
|
./pkg/admtlm/admtlm_metric.F |
6 |
ADMTLM_METRIC |
subroutine ADMTLM_METRIC( myThid ) |
|
./pkg/admtlm/admtlm_metric.F |
73 |
ADMTLM_METRIC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/admtlm/admtlm_metric.F |
74 |
ADMTLM_METRIC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
10 |
AIM_AIM2DYN |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
114 |
AIM_AIM2DYN |
aim_dTdt(i,j,k,bi,bj) = ( TT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
115 |
AIM_AIM2DYN |
& +TT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
116 |
AIM_AIM2DYN |
& +TT_RSW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
117 |
AIM_AIM2DYN |
& +TT_RLW(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
118 |
AIM_AIM2DYN |
& +TT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
121 |
AIM_AIM2DYN |
aim_dSdt(i,j,k,bi,bj) = QT_CNV(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
122 |
AIM_AIM2DYN |
& +QT_PBL(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
123 |
AIM_AIM2DYN |
& +QT_LSC(I2,Katm,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
140 |
AIM_AIM2DYN |
& k, Nr, 1,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
142 |
AIM_AIM2DYN |
& k, Nr, 1,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
55 |
AIM_AIM2DYN |
INTEGER myIter, myThid |
|
./pkg/aim_v23/aim_aim2dyn.F |
80 |
AIM_AIM2DYN |
physTendDiag = DIAGNOSTICS_IS_ON( 'DIABT ', myThid ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
81 |
AIM_AIM2DYN |
& .OR. DIAGNOSTICS_IS_ON( 'DIABQ ', myThid ) |
|
./pkg/aim_v23/aim_aim2dyn.F |
89 |
AIM_AIM2DYN |
aim_drag(i,j,bi,bj) = DRAG(I2,0,myThid) |
|
./pkg/aim_v23/aim_aim2dyn.F |
98 |
AIM_AIM2DYN |
aim_surfWind(i,j,bi,bj) = SPEED0(I2,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
105 |
AIM_AIM2LAND |
& - EVAP(I2,1,myThid)*ALHF |
|
./pkg/aim_v23/aim_aim2land.F |
107 |
AIM_AIM2LAND |
& EVAP(I2,1,myThid)*ALHF |
|
./pkg/aim_v23/aim_aim2land.F |
124 |
AIM_AIM2LAND |
& + conv_precip*( PRECNV(I2,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
125 |
AIM_AIM2LAND |
& + PRECLS(I2,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
126 |
AIM_AIM2LAND |
& - EVAP(I2,1,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
139 |
AIM_AIM2LAND |
& + EnPrec(I2,myThid)*( PRECNV(I2,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
13 |
AIM_AIM2LAND |
I land_frc, bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
140 |
AIM_AIM2LAND |
& +PRECLS(I2,myThid) ) |
|
./pkg/aim_v23/aim_aim2land.F |
51 |
AIM_AIM2LAND |
INTEGER bi, bj, myIter, myThid |
|
./pkg/aim_v23/aim_aim2land.F |
90 |
AIM_AIM2LAND |
& SSR(I2,k,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
91 |
AIM_AIM2LAND |
& - SLR(I2,k,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
92 |
AIM_AIM2LAND |
& - SHF(I2,1,myThid) |
|
./pkg/aim_v23/aim_aim2land.F |
93 |
AIM_AIM2LAND |
& - EVAP(I2,1,myThid)*ALHC |
|
./pkg/aim_v23/aim_aim2sioce.F |
112 |
AIM_AIM2SIOCE |
prcAtm(i,j) = ( PRECNV(I2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
113 |
AIM_AIM2SIOCE |
& + PRECLS(I2,myThid) ) |
|
./pkg/aim_v23/aim_aim2sioce.F |
119 |
AIM_AIM2SIOCE |
& SSR(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
120 |
AIM_AIM2SIOCE |
& - SLR(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
121 |
AIM_AIM2SIOCE |
& - SHF(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
122 |
AIM_AIM2SIOCE |
& - EVAP(I2,2,myThid)*ALHC |
|
./pkg/aim_v23/aim_aim2sioce.F |
125 |
AIM_AIM2SIOCE |
EmPmR(i,j,bi,bj) = ( EVAP(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
129 |
AIM_AIM2SIOCE |
Qsw(i,j,bi,bj) = SSR(I2,2,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
145 |
AIM_AIM2SIOCE |
icFrwAtm(i,j,bi,bj) = EVAP(I2,3,myThid)*convPrcEvp |
|
./pkg/aim_v23/aim_aim2sioce.F |
15 |
AIM_AIM2SIOCE |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
165 |
AIM_AIM2SIOCE |
IF ( EnPrec(I2,myThid).GE.0. _d 0 ) THEN |
|
./pkg/aim_v23/aim_aim2sioce.F |
168 |
AIM_AIM2SIOCE |
& + EnPrec(I2,myThid)*prcAtm(i,j) |
|
./pkg/aim_v23/aim_aim2sioce.F |
196 |
AIM_AIM2SIOCE |
& + ( SSR(I2,3,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
197 |
AIM_AIM2SIOCE |
& - SLR(I2,3,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
198 |
AIM_AIM2SIOCE |
& - SHF(I2,3,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
199 |
AIM_AIM2SIOCE |
& - EVAP(I2,3,myThid)*ALHC |
|
./pkg/aim_v23/aim_aim2sioce.F |
203 |
AIM_AIM2SIOCE |
& + ( EVAP(I2,3,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
208 |
AIM_AIM2SIOCE |
& + icFrac*SSR(I2,3,myThid) |
|
./pkg/aim_v23/aim_aim2sioce.F |
223 |
AIM_AIM2SIOCE |
& + EnPrec(I2,myThid)*prcAtm(i,j) |
|
./pkg/aim_v23/aim_aim2sioce.F |
79 |
AIM_AIM2SIOCE |
INTEGER bi, bj, myIter, myThid |
|
./pkg/aim_v23/aim_diagnostics.F |
100 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
102 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
104 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
106 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
108 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
113 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
115 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
137 |
AIM_DIAGNOSTICS |
CALL MNC_CW_SET_UDIM(suff, -1, myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
138 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W_S('D',suff,0,0,'T',myTime,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
139 |
AIM_DIAGNOSTICS |
CALL MNC_CW_SET_UDIM(suff, 0, myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
140 |
AIM_DIAGNOSTICS |
CALL MNC_CW_I_W_S('I',suff,0,0,'iter',myIter,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
143 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dT_RSW',TT_RSW,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
144 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dT_RLW',TT_RLW,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
145 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dT_CNV',TT_CNV,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
146 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dT_PBL',TT_PBL,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
147 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dT_LSC',TT_LSC,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
148 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dQ_CNV',QT_CNV,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
149 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dQ_PBL',QT_PBL,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
150 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W(pf,suff,bi,bj,'aim_dQ_LSC',QT_LSC,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
170 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
175 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
179 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
181 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 2, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
183 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 3, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
185 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 4, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
187 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 5, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
189 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 6, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
191 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 7, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
193 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 8, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
195 |
AIM_DIAGNOSTICS |
& 1, bi, bj, 9, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
197 |
AIM_DIAGNOSTICS |
& 1, bi, bj,10, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
199 |
AIM_DIAGNOSTICS |
& 1, bi, bj,11, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
201 |
AIM_DIAGNOSTICS |
& 1, bi, bj,12, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
203 |
AIM_DIAGNOSTICS |
& 1, bi, bj,13, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
205 |
AIM_DIAGNOSTICS |
& 1, bi, bj,14, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
207 |
AIM_DIAGNOSTICS |
& 1, bi, bj,15, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
209 |
AIM_DIAGNOSTICS |
& 1, bi, bj,16, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
211 |
AIM_DIAGNOSTICS |
& 1, bi, bj,17, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
213 |
AIM_DIAGNOSTICS |
& 1, bi, bj,18, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
218 |
AIM_DIAGNOSTICS |
& 1, bi, bj,19, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
220 |
AIM_DIAGNOSTICS |
& 1, bi, bj,20, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
222 |
AIM_DIAGNOSTICS |
& 1, bi, bj,21, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
224 |
AIM_DIAGNOSTICS |
& 1, bi, bj,22, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
243 |
AIM_DIAGNOSTICS |
CALL MNC_CW_SET_UDIM(suff, -1, myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
244 |
AIM_DIAGNOSTICS |
CALL MNC_CW_RL_W_S('D',suff,0,0,'T',myTime+deltaTClock,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
245 |
AIM_DIAGNOSTICS |
CALL MNC_CW_SET_UDIM(suff, 0, myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
246 |
AIM_DIAGNOSTICS |
CALL MNC_CW_I_W_S('I',suff,0,0,'iter',myIter+1,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
250 |
AIM_DIAGNOSTICS |
& 'aim_DRAG0',DRAG(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
252 |
AIM_DIAGNOSTICS |
& 'aim_SPEED0',SPEED0(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
254 |
AIM_DIAGNOSTICS |
& 'aim_TSR',TSR(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
256 |
AIM_DIAGNOSTICS |
& 'aim_OLR',OLR(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
258 |
AIM_DIAGNOSTICS |
& 'aim_SSR0',SSR(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
260 |
AIM_DIAGNOSTICS |
& 'aim_SLR0',SLR(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
262 |
AIM_DIAGNOSTICS |
& 'aim_SHF0',SHF(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
264 |
AIM_DIAGNOSTICS |
& 'aim_EVAP0',EVAP(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
266 |
AIM_DIAGNOSTICS |
& 'aim_PRECNV',PRECNV(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
268 |
AIM_DIAGNOSTICS |
& 'aim_PRECLS',PRECLS(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
270 |
AIM_DIAGNOSTICS |
& 'aim_CLOUDC',CLOUDC(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
272 |
AIM_DIAGNOSTICS |
& 'aim_CLTOP',CLTOP(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
274 |
AIM_DIAGNOSTICS |
& 'aim_CBMF',CBMF(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
276 |
AIM_DIAGNOSTICS |
& 'aim_T0',T0(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
278 |
AIM_DIAGNOSTICS |
& 'aim_Q0',Q0(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
280 |
AIM_DIAGNOSTICS |
& 'aim_EnPrec',EnPrec(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
282 |
AIM_DIAGNOSTICS |
& 'aim_alb10',alb1(1,0,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
284 |
AIM_DIAGNOSTICS |
& 'aim_dTsurf1',dTsurf(1,1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
289 |
AIM_DIAGNOSTICS |
& 'aim_TSWclr',TSWclr(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
291 |
AIM_DIAGNOSTICS |
& 'aim_OLWclr',OLWclr(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
293 |
AIM_DIAGNOSTICS |
& 'aim_SSWclr',SSWclr(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
295 |
AIM_DIAGNOSTICS |
& 'aim_SLWclr',SLWclr(1,myThid),myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
310 |
AIM_DIAGNOSTICS |
CLTOP(J,myThid)=CLTOP(J,myThid)*CLOUDC(J,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
323 |
AIM_DIAGNOSTICS |
& + TSR(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
325 |
AIM_DIAGNOSTICS |
& + OLR(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
327 |
AIM_DIAGNOSTICS |
& + SSR(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
329 |
AIM_DIAGNOSTICS |
& + SLR(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
331 |
AIM_DIAGNOSTICS |
& + SHF(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
333 |
AIM_DIAGNOSTICS |
& + EVAP(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
335 |
AIM_DIAGNOSTICS |
& + PRECNV(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
337 |
AIM_DIAGNOSTICS |
& + PRECLS(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
339 |
AIM_DIAGNOSTICS |
& + CLOUDC(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
341 |
AIM_DIAGNOSTICS |
& + CLTOP(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
343 |
AIM_DIAGNOSTICS |
& + CBMF(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
345 |
AIM_DIAGNOSTICS |
& + DRAG(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
347 |
AIM_DIAGNOSTICS |
& + SPEED0(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
349 |
AIM_DIAGNOSTICS |
& + T0(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
351 |
AIM_DIAGNOSTICS |
& + Q0(I2,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
353 |
AIM_DIAGNOSTICS |
& + EnPrec(I2,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
354 |
AIM_DIAGNOSTICS |
& *(PRECNV(I2,myThid)+ |
|
./pkg/aim_v23/aim_diagnostics.F |
355 |
AIM_DIAGNOSTICS |
& PRECLS(I2,myThid))*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
357 |
AIM_DIAGNOSTICS |
& + alb1(I2,0,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
359 |
AIM_DIAGNOSTICS |
& + dTsurf(I2,1,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
370 |
AIM_DIAGNOSTICS |
& + RH(I2,Katm,myThid)*DDTT |
|
./pkg/aim_v23/aim_diagnostics.F |
386 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_RSW(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
387 |
AIM_DIAGNOSTICS |
& 'RADSW ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
388 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_RLW(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
389 |
AIM_DIAGNOSTICS |
& 'RADLW ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
390 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_CNV(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
391 |
AIM_DIAGNOSTICS |
& 'DTCONV ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
392 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_PBL(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
393 |
AIM_DIAGNOSTICS |
& 'TURBT ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
394 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_LSC(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
395 |
AIM_DIAGNOSTICS |
& 'DTLS ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
396 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( QT_CNV(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
397 |
AIM_DIAGNOSTICS |
& 'DQCONV ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
398 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( QT_PBL(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
399 |
AIM_DIAGNOSTICS |
& 'TURBQ ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
400 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( QT_LSC(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
401 |
AIM_DIAGNOSTICS |
& 'DQLS ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
402 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( RH(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
403 |
AIM_DIAGNOSTICS |
& 'RELHUM ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
404 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TSR(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
405 |
AIM_DIAGNOSTICS |
& 'TSR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
406 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( OLR(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
407 |
AIM_DIAGNOSTICS |
& 'OLR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
408 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SSR(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
409 |
AIM_DIAGNOSTICS |
& 'RADSWG ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
410 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SLR(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
411 |
AIM_DIAGNOSTICS |
& 'RADLWG ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
412 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SHF(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
413 |
AIM_DIAGNOSTICS |
& 'HFLUX ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
414 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( EVAP(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
415 |
AIM_DIAGNOSTICS |
& 'EVAP ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
416 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( PRECNV(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
417 |
AIM_DIAGNOSTICS |
& 'PRECON ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
418 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( PRECLS(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
419 |
AIM_DIAGNOSTICS |
& 'PRECLS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
420 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( CLOUDC(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
421 |
AIM_DIAGNOSTICS |
& 'CLDFRC ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
422 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( CLTOP(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
423 |
AIM_DIAGNOSTICS |
& 'CLDPRS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
426 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( CBMF(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
427 |
AIM_DIAGNOSTICS |
& 'CLDMAS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
428 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( DRAG(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
429 |
AIM_DIAGNOSTICS |
& 'DRAG ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
430 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SPEED0(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
431 |
AIM_DIAGNOSTICS |
& 'WINDS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
432 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( T0(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
433 |
AIM_DIAGNOSTICS |
& 'TS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
434 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( Q0(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
435 |
AIM_DIAGNOSTICS |
& 'QS ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
436 |
AIM_DIAGNOSTICS |
IF ( DIAGNOSTICS_IS_ON('ENPREC ',myThid) ) THEN |
|
./pkg/aim_v23/aim_diagnostics.F |
438 |
AIM_DIAGNOSTICS |
tmpVar(J) = EnPrec(J,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
439 |
AIM_DIAGNOSTICS |
& *(PRECNV(J,myThid)+PRECLS(J,myThid)) |
|
./pkg/aim_v23/aim_diagnostics.F |
43 |
AIM_DIAGNOSTICS |
INTEGER myIter, myThid |
|
./pkg/aim_v23/aim_diagnostics.F |
442 |
AIM_DIAGNOSTICS |
& 'ENPREC ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
444 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( alb1(1,0,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
445 |
AIM_DIAGNOSTICS |
& 'ALBVISDF', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
446 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( dTsurf(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
447 |
AIM_DIAGNOSTICS |
& 'DTSIMPL ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
450 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_SWclr(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
451 |
AIM_DIAGNOSTICS |
& 'SWCLR ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
452 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TT_LWclr(1,1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
453 |
AIM_DIAGNOSTICS |
& 'LWCLR ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
454 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( TSWclr(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
455 |
AIM_DIAGNOSTICS |
& 'TSRCLR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
456 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( OLWclr(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
457 |
AIM_DIAGNOSTICS |
& 'OLRCLR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
458 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SSWclr(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
459 |
AIM_DIAGNOSTICS |
& 'SWGCLR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
460 |
AIM_DIAGNOSTICS |
CALL DIAGNOSTICS_FILL( SLWclr(1,myThid), |
|
./pkg/aim_v23/aim_diagnostics.F |
461 |
AIM_DIAGNOSTICS |
& 'LWGCLR ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
73 |
AIM_DIAGNOSTICS |
dTsurf(J,1,myThid) = fMask1(J,1,myThid)*dTsurf(J,1,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
75 |
AIM_DIAGNOSTICS |
& + fMask1(J,3,myThid)*dTsurf(J,3,myThid) |
|
./pkg/aim_v23/aim_diagnostics.F |
76 |
AIM_DIAGNOSTICS |
dTsurf(J,1,myThid) = ABS(dTsurf(J,1,myThid)) |
|
./pkg/aim_v23/aim_diagnostics.F |
90 |
AIM_DIAGNOSTICS |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
94 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
96 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
98 |
AIM_DIAGNOSTICS |
& 0, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics.F |
9 |
AIM_DIAGNOSTICS |
SUBROUTINE AIM_DIAGNOSTICS( bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
102 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
109 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
117 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
125 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
132 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
139 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
146 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
153 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
160 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
167 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
174 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
181 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
188 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
196 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
204 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
212 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
219 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
226 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
233 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
240 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
247 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
254 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
261 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
269 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
277 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
27 |
AIM_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/aim_v23/aim_diagnostics_init.F |
284 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
291 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
298 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
305 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
313 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
321 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
329 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
337 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
345 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
354 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
363 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
370 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
378 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
387 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
55 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
63 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
71 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
79 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
86 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
94 |
AIM_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/aim_v23/aim_diagnostics_init.F |
9 |
AIM_DIAGNOSTICS_INIT |
SUBROUTINE AIM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
108 |
AIM_DO_CO2 |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
117 |
AIM_DO_CO2 |
I 0, 0, 1, myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
126 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
128 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
130 |
AIM_DO_CO2 |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
163 |
AIM_DO_CO2 |
& myTime+deltaTClock, myIter+1, myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
175 |
AIM_DO_CO2 |
I 0, 0, -1, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_co2.F |
177 |
AIM_DO_CO2 |
_END_MASTER(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
40 |
AIM_DO_CO2 |
INTEGER myIter, myThid |
|
./pkg/aim_v23/aim_do_co2.F |
68 |
AIM_DO_CO2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
69 |
AIM_DO_CO2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
83 |
AIM_DO_CO2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
84 |
AIM_DO_CO2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
94 |
AIM_DO_CO2 |
CALL GLOBAL_SUM_TILE_RL(flxCO2tile,total_flux,myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
97 |
AIM_DO_CO2 |
_BEGIN_MASTER(myThid) |
|
./pkg/aim_v23/aim_do_co2.F |
9 |
AIM_DO_CO2 |
SUBROUTINE AIM_DO_CO2( myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
112 |
AIM_DO_PHYSICS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
129 |
AIM_DO_PHYSICS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
144 |
AIM_DO_PHYSICS |
CALL SFLSET (PHI0, fOrogr(1,myThid), bi,bj,myThid) |
|
./pkg/aim_v23/aim_do_physics.F |
152 |
AIM_DO_PHYSICS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
154 |
AIM_DO_PHYSICS |
CALL AIM_AIM2DYN( bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
160 |
AIM_DO_PHYSICS |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
164 |
AIM_DO_PHYSICS |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
168 |
AIM_DO_PHYSICS |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
175 |
AIM_DO_PHYSICS |
CALL AIM_AIM2SIOCE( aim_landFr, fmask1(1,3,myThid), |
|
./pkg/aim_v23/aim_do_physics.F |
177 |
AIM_DO_PHYSICS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
189 |
AIM_DO_PHYSICS |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
194 |
AIM_DO_PHYSICS |
CALL AIM_DIAGNOSTICS( bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
205 |
AIM_DO_PHYSICS |
CALL THSICE_DO_EXCH( myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
208 |
AIM_DO_PHYSICS |
I 0, 0, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
211 |
AIM_DO_PHYSICS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/aim_v23/aim_do_physics.F |
212 |
AIM_DO_PHYSICS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_do_physics.F |
216 |
AIM_DO_PHYSICS |
O dTsurf(1,2,myThid), |
|
./pkg/aim_v23/aim_do_physics.F |
217 |
AIM_DO_PHYSICS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
225 |
AIM_DO_PHYSICS |
_EXCH_XY_RL( aim_drag, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
231 |
AIM_DO_PHYSICS |
CALL THSICE_DO_EXCH( myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
238 |
AIM_DO_PHYSICS |
CALL ATM_STORE_MY_DATA( myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
54 |
AIM_DO_PHYSICS |
INTEGER myThid |
|
./pkg/aim_v23/aim_do_physics.F |
87 |
AIM_DO_PHYSICS |
CALL AIM_DO_CO2( myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_do_physics.F |
91 |
AIM_DO_PHYSICS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/aim_v23/aim_do_physics.F |
92 |
AIM_DO_PHYSICS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_do_physics.F |
9 |
AIM_DO_PHYSICS |
SUBROUTINE AIM_DO_PHYSICS( myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
12 |
AIM_DYN2AIM |
I bi,bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_dyn2aim.F |
227 |
AIM_DYN2AIM |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/aim_dyn2aim.F |
230 |
AIM_DYN2AIM |
& i,j,k,bi,bj,myThid,I2,xC(i,j,bi,bj),yC(i,j,bi,bj) |
|
./pkg/aim_v23/aim_dyn2aim.F |
231 |
AIM_DYN2AIM |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/aim_dyn2aim.F |
251 |
AIM_DYN2AIM |
WVSurf(I2,myThid) = 0. |
|
./pkg/aim_v23/aim_dyn2aim.F |
257 |
AIM_DYN2AIM |
WVSurf(I2,myThid) = (LOG(PSA(I2))-SIGL(k))*WVI(k-1,1) |
|
./pkg/aim_v23/aim_dyn2aim.F |
265 |
AIM_DYN2AIM |
& 1, bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_dyn2aim.F |
58 |
AIM_DYN2AIM |
INTEGER bi, bj, myIter, myThid |
|
./pkg/aim_v23/aim_dyn2aim.F |
79 |
AIM_DYN2AIM |
snLat(I2,myThid) = SIN(yC(i,j,bi,bj)*deg2rad) |
|
./pkg/aim_v23/aim_dyn2aim.F |
80 |
AIM_DYN2AIM |
csLat(I2,myThid) = COS(yC(i,j,bi,bj)*deg2rad) |
|
./pkg/aim_v23/aim_fields_load.F |
122 |
AIM_FIELDS_LOAD |
_BEGIN_MASTER( myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
124 |
AIM_FIELDS_LOAD |
_END_MASTER( myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
129 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS( fNam, aim_albedo, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
139 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS( fNam, aim_sst0, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
144 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS( fNam, aim_sw10, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
154 |
AIM_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
155 |
AIM_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
188 |
AIM_FIELDS_LOAD |
CALL WRITE_FLD_XY_RS( 'aim_Tsurf',' ', aim_sst0, 0, myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
201 |
AIM_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
202 |
AIM_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
236 |
AIM_FIELDS_LOAD |
_BEGIN_MASTER( myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
238 |
AIM_FIELDS_LOAD |
_END_MASTER( myThid ) |
|
./pkg/aim_v23/aim_fields_load.F |
247 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_albFile,aim_albedo, 1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
251 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_vegFile,aim_veget,1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
258 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_sstFile,aim_sst0,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
259 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_sstFile,aim_sst1,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
262 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_lstFile,aim_lst0,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
263 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_lstFile,aim_lst1,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
266 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_oiceFile,aim_oic0,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
267 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_oiceFile,aim_oic1,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
270 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_snowFile,aim_snw0,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
271 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_snowFile,aim_snw1,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
274 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_swcFile,aim_sw10,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
275 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_swcFile,aim_sw11,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
278 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_swcFile,aim_sw20,nm2,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
279 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_swcFile,aim_sw21,nm3,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
282 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_qfxFile,aim_qfx0,nm0,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
283 |
AIM_FIELDS_LOAD |
CALL READ_REC_XY_RS(aim_qfxFile,aim_qfx1,nm1,myIter,myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
288 |
AIM_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
289 |
AIM_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_fields_load.F |
42 |
AIM_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/aim_v23/aim_fields_load.F |
8 |
AIM_FIELDS_LOAD |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
106 |
AIM_INITIALISE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_initialise.F |
107 |
AIM_INITIALISE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_initialise.F |
118 |
AIM_INITIALISE |
CALL READ_REC_XY_RS(aim_LandFile,aim_landFr,1,nIter0,myThid) |
|
./pkg/aim_v23/aim_initialise.F |
120 |
AIM_INITIALISE |
CALL EXCH_XY_RS( aim_landFr, myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
125 |
AIM_INITIALISE |
CALL AIM_MNC_INIT( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
131 |
AIM_INITIALISE |
CALL AIM_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
37 |
AIM_INITIALISE |
INTEGER myThid |
|
./pkg/aim_v23/aim_initialise.F |
55 |
AIM_INITIALISE |
_BEGIN_MASTER(myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
67 |
AIM_INITIALISE |
_END_MASTER( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
70 |
AIM_INITIALISE |
CALL INPHYS( HSG, myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
73 |
AIM_INITIALISE |
CALL AIM_READPARMS( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
77 |
AIM_INITIALISE |
_BEGIN_MASTER(myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
78 |
AIM_INITIALISE |
CALL RADSET( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
79 |
AIM_INITIALISE |
_END_MASTER( myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
83 |
AIM_INITIALISE |
CALL INI_P_GROUND(1, topoZ, truncSurfP, myThid ) |
|
./pkg/aim_v23/aim_initialise.F |
84 |
AIM_INITIALISE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_initialise.F |
85 |
AIM_INITIALISE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_initialise.F |
9 |
AIM_INITIALISE |
SUBROUTINE AIM_INITIALISE( myThid ) |
|
./pkg/aim_v23/aim_land2aim.F |
15 |
AIM_LAND2AIM |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_land2aim.F |
184 |
AIM_LAND2AIM |
I bi,bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_land2aim.F |
69 |
AIM_LAND2AIM |
INTEGER myIter, bi, bj, myThid |
|
./pkg/aim_v23/aim_land_impl.F |
118 |
AIM_LAND_IMPL |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_land_impl.F |
18 |
AIM_LAND_IMPL |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_land_impl.F |
73 |
AIM_LAND_IMPL |
INTEGER bi, bj, myIter, myThid |
|
./pkg/aim_v23/aim_mnc_init.F |
100 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CLTOPtave','units','---', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
102 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('CBMFtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
104 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CBMFtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
105 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CBMFtave','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
107 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('DRAGtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
109 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('DRAGtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
10 |
AIM_MNC_INIT |
SUBROUTINE AIM_MNC_INIT( myThid ) |
|
./pkg/aim_v23/aim_mnc_init.F |
110 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('DRAGtave','units','---', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
112 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aimV0tave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
114 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimV0tave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
115 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimV0tave','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
117 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aimT0tave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
119 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimT0tave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
120 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimT0tave','units','K',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
122 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aimQ0tave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
124 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimQ0tave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
125 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimQ0tave','units','g/kg',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
127 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('EnFxPrtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
129 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('EnFxPrtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
130 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('EnFxPrtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
132 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('albedotave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
134 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('albedotave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
135 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('albedotave','units','fraction',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
137 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('dTsurftave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
139 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('dTsurftave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
140 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('dTsurftave','units','K', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
142 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aimRHtave', 'Cen_xy_Hn__C__t',4,5,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
144 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimRHtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
145 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aimRHtave','units','fraction',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
172 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_GNAME('AIM_xyt', ndim, dim,dn,ib,ie, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
183 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_GNAME('AIM_xyzt', ndim, dim,dn,ib,ie, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
186 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_DRAG0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
187 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_DRAG0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
189 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SPEED0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
190 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SPEED0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
192 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_TSR','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
193 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_TSR','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
195 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_OLR','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
196 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_OLR','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
198 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SSR0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
199 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SSR0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
201 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SLR0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
202 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SLR0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
204 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SHF0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
205 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SHF0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
207 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_EVAP0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
208 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_EVAP0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
210 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_PRECNV','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
211 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_PRECNV','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
213 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_PRECLS','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
214 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_PRECLS','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
216 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_CLOUDC','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
217 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_CLOUDC','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
219 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_CLTOP','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
220 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_CLTOP','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
222 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_CBMF','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
223 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_CBMF','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
225 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_T0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
226 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_T0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
228 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_Q0','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
229 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_Q0','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
231 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_EnPrec','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
232 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_EnPrec','units','J/g',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
234 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_alb10','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
235 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_alb10','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
237 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_dTsurf1','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
238 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_dTsurf1','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
240 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_TSWclr','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
241 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_TSWclr','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
243 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_OLWclr','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
244 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_OLWclr','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
246 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SSWclr','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
247 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SSWclr','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
249 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('aim_SLWclr','AIM_xyt',0,0,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
250 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('aim_SLWclr','units','---',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
27 |
AIM_MNC_INIT |
INTEGER myThid |
|
./pkg/aim_v23/aim_mnc_init.F |
42 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('USTRtave', 'U_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
44 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('USTRtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
45 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('USTRtave','units','Pa',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
47 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('VSTRtave', 'V_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
49 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('VSTRtave','long_name',ln_var, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
50 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('VSTRtave','units','Pa', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
52 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('TSRtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
54 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('TSRtave','long_name',ln_var, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
55 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('TSRtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
57 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('OLRtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
59 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('OLRtave','long_name',ln_var, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
60 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('OLRtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
62 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('SSRtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
64 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SSRtave','long_name',ln_var, myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
65 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SSRtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
67 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('SLRtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
69 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SLRtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
70 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SLRtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
72 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('SHFtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
74 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SHFtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
75 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('SHFtave','units','W/m2', myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
77 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('EVAPtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
79 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('EVAPtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
80 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('EVAPtave','units','g/(m2 s)',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
82 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('PRECNVtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
84 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PRECNVtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
85 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PRECNVtave','units','g/(m2 s)',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
87 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('PRECLStave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
89 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PRECLStave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
90 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('PRECLStave','units','g/(m2 s)',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
92 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('CLOUDCtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
94 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CLOUDCtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
95 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CLOUDCtave','units','fraction',myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
97 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VNAME('CLTOPtave', 'Cen_xy_Hn__-__t',3,4,myThid) |
|
./pkg/aim_v23/aim_mnc_init.F |
99 |
AIM_MNC_INIT |
CALL MNC_CW_ADD_VATTR_TEXT('CLTOPtave','long_name',ln_var,myThid) |
|
./pkg/aim_v23/aim_readparms.F |
219 |
AIM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/aim_v23/aim_readparms.F |
276 |
AIM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
279 |
AIM_READPARMS |
O iUnit, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
307 |
AIM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
323 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
330 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
333 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
344 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
353 |
AIM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
361 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
364 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
374 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
377 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
408 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
410 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
412 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
414 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
452 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
458 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
461 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
464 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
467 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
468 |
AIM_READPARMS |
CALL PRINT_MESSAGE(endList, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
47 |
AIM_READPARMS |
INTEGER myThid |
|
./pkg/aim_v23/aim_readparms.F |
586 |
AIM_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
630 |
AIM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_readparms.F |
643 |
AIM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/aim_v23/aim_readparms.F |
9 |
AIM_READPARMS |
SUBROUTINE AIM_READPARMS( myThid ) |
|
./pkg/aim_v23/aim_sice2aim.F |
110 |
AIM_SICE2AIM |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_sice2aim.F |
147 |
AIM_SICE2AIM |
& bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_sice2aim.F |
150 |
AIM_SICE2AIM |
& bi, bj, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_sice2aim.F |
16 |
AIM_SICE2AIM |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_sice2aim.F |
68 |
AIM_SICE2AIM |
INTEGER myIter, bi, bj, myThid |
|
./pkg/aim_v23/aim_sice_impl.F |
17 |
AIM_SICE_IMPL |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_sice_impl.F |
71 |
AIM_SICE_IMPL |
INTEGER bi, bj, myIter, myThid |
|
./pkg/aim_v23/aim_sice_impl.F |
95 |
AIM_SICE_IMPL |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
103 |
AIM_SURF_BC |
fMask1(I2,1,myThid) = aim_landFr(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
12 |
AIM_SURF_BC |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_surf_bc.F |
143 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sWght0*aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
145 |
AIM_SURF_BC |
stl1(I2,myThid) = aim_sWght0*aim_lst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
169 |
AIM_SURF_BC |
soilw1(I2,myThid) = aim_sWght0*soilw_0 |
|
./pkg/aim_v23/aim_surf_bc.F |
171 |
AIM_SURF_BC |
soilw1(I2,myThid) = MIN(1. _d 0, soilw1(I2,myThid) ) |
|
./pkg/aim_v23/aim_surf_bc.F |
191 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
193 |
AIM_SURF_BC |
sst1(J,myThid) = MAX(sst1(J,myThid),oceTfreez) |
|
./pkg/aim_v23/aim_surf_bc.F |
194 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
195 |
AIM_SURF_BC |
& +(sti1(J,myThid)-sst1(J,myThid))/oice1(J) |
|
./pkg/aim_v23/aim_surf_bc.F |
202 |
AIM_SURF_BC |
sti1(J,myThid) = sst1(J,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
257 |
AIM_SURF_BC |
alb1(I2,1,myThid) = alb_land |
|
./pkg/aim_v23/aim_surf_bc.F |
259 |
AIM_SURF_BC |
alb1(I2,2,myThid) = 0.5 _d 0 * ALBSEA |
|
./pkg/aim_v23/aim_surf_bc.F |
261 |
AIM_SURF_BC |
alb1(I2,3,myThid) = ALBICE |
|
./pkg/aim_v23/aim_surf_bc.F |
286 |
AIM_SURF_BC |
alb1(I2,1,myThid) = aim_albedo(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
287 |
AIM_SURF_BC |
alb1(I2,2,myThid) = aim_albedo(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
288 |
AIM_SURF_BC |
alb1(I2,3,myThid) = aim_albedo(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
295 |
AIM_SURF_BC |
alb1(I2,1,myThid) = 0. |
|
./pkg/aim_v23/aim_surf_bc.F |
296 |
AIM_SURF_BC |
alb1(I2,2,myThid) = 0. |
|
./pkg/aim_v23/aim_surf_bc.F |
297 |
AIM_SURF_BC |
alb1(I2,3,myThid) = 0. |
|
./pkg/aim_v23/aim_surf_bc.F |
306 |
AIM_SURF_BC |
sst1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
307 |
AIM_SURF_BC |
stl1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
308 |
AIM_SURF_BC |
sti1(I2,myThid) = aim_sst0(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
315 |
AIM_SURF_BC |
sst1(I2,myThid) = 300. |
|
./pkg/aim_v23/aim_surf_bc.F |
316 |
AIM_SURF_BC |
stl1(I2,myThid) = 300. |
|
./pkg/aim_v23/aim_surf_bc.F |
317 |
AIM_SURF_BC |
sti1(I2,myThid) = 300. |
|
./pkg/aim_v23/aim_surf_bc.F |
327 |
AIM_SURF_BC |
soilw1(I2,myThid) = aim_sw10(i,j,bi,bj) |
|
./pkg/aim_v23/aim_surf_bc.F |
334 |
AIM_SURF_BC |
soilw1(I2,myThid) = 0. |
|
./pkg/aim_v23/aim_surf_bc.F |
358 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./pkg/aim_v23/aim_surf_bc.F |
359 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_surf_bc.F |
373 |
AIM_SURF_BC |
& pCO2scl, 1, 'aim_pCO2', 1, 1, 2, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_surf_bc.F |
383 |
AIM_SURF_BC |
U stl1(1,myThid), soilw1(1,myThid), alb1(1,1,myThid), |
|
./pkg/aim_v23/aim_surf_bc.F |
384 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_surf_bc.F |
393 |
AIM_SURF_BC |
U sst1(1,myThid), oice1, |
|
./pkg/aim_v23/aim_surf_bc.F |
394 |
AIM_SURF_BC |
O sti1(1,myThid), alb1(1,3,myThid), |
|
./pkg/aim_v23/aim_surf_bc.F |
395 |
AIM_SURF_BC |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_surf_bc.F |
401 |
AIM_SURF_BC |
fMask1(J,3,myThid) =(1. _d 0 - fMask1(J,1,myThid)) |
|
./pkg/aim_v23/aim_surf_bc.F |
403 |
AIM_SURF_BC |
fMask1(J,2,myThid) = 1. _d 0 - fMask1(J,1,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
404 |
AIM_SURF_BC |
& - fMask1(J,3,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
409 |
AIM_SURF_BC |
alb1(J,0,myThid) = fMask1(J,1,myThid)*alb1(J,1,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
410 |
AIM_SURF_BC |
& + fMask1(J,2,myThid)*alb1(J,2,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
411 |
AIM_SURF_BC |
& + fMask1(J,3,myThid)*alb1(J,3,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
417 |
AIM_SURF_BC |
dTsurf(J,k,myThid) = 0. |
|
./pkg/aim_v23/aim_surf_bc.F |
423 |
AIM_SURF_BC |
fMask1(J,3,myThid) = 0. _d 0 |
|
./pkg/aim_v23/aim_surf_bc.F |
424 |
AIM_SURF_BC |
fMask1(J,2,myThid) = 1. _d 0 - fMask1(J,1,myThid) |
|
./pkg/aim_v23/aim_surf_bc.F |
70 |
AIM_SURF_BC |
INTEGER myIter, myThid |
|
./eesupp/src/exch_cycle_ebl.F |
10 |
EXCH_CYCLE_EBL |
SUBROUTINE EXCH_CYCLE_EBL( myThid ) |
|
./eesupp/src/exch_cycle_ebl.F |
45 |
EXCH_CYCLE_EBL |
INTEGER myThid |
|
./eesupp/src/exch_cycle_ebl.F |
53 |
EXCH_CYCLE_EBL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./eesupp/src/exch_cycle_ebl.F |
54 |
EXCH_CYCLE_EBL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/aim_v23/aim_tendency_apply.F |
168 |
AIM_TENDENCY_APPLY_U |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
189 |
AIM_TENDENCY_APPLY_U |
& 0,1,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_tendency_apply.F |
191 |
AIM_TENDENCY_APPLY_U |
& 0,1,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_tendency_apply.F |
208 |
AIM_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
20 |
AIM_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
247 |
AIM_TENDENCY_APPLY_V |
INTEGER myThid |
|
./pkg/aim_v23/aim_tendency_apply.F |
356 |
AIM_TENDENCY_APPLY_V |
& deltaTClock, bi, bj, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
377 |
AIM_TENDENCY_APPLY_V |
& 0,1,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_tendency_apply.F |
379 |
AIM_TENDENCY_APPLY_V |
& 0,1,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_tendency_apply.F |
396 |
AIM_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
430 |
AIM_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/aim_v23/aim_tendency_apply.F |
458 |
AIM_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_tendency_apply.F |
492 |
AIM_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/aim_v23/aim_tendency_apply.F |
59 |
AIM_TENDENCY_APPLY_U |
INTEGER myThid |
|
./pkg/aim_v23/aim_write_local.F |
11 |
AIM_WRITE_LOCAL |
I bi, bj, iRec, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_local.F |
40 |
AIM_WRITE_LOCAL |
INTEGER bi, bj, iRec, myIter, myThid |
|
./pkg/aim_v23/aim_write_local.F |
63 |
AIM_WRITE_LOCAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_write_local.F |
66 |
AIM_WRITE_LOCAL |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/aim_write_local.F |
94 |
AIM_WRITE_LOCAL |
& bi, bj, iRec, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
11 |
AIM_WRITE_PHYS |
I kLev, bi, bj, iRec, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
139 |
AIM_WRITE_PHYS |
_END_MASTER( myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
43 |
AIM_WRITE_PHYS |
INTEGER kLev, bi, bj, iRec, myIter, myThid |
|
./pkg/aim_v23/aim_write_phys.F |
63 |
AIM_WRITE_PHYS |
ith = myThid |
|
./pkg/aim_v23/aim_write_phys.F |
69 |
AIM_WRITE_PHYS |
_BEGIN_MASTER( myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
83 |
AIM_WRITE_PHYS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
86 |
AIM_WRITE_PHYS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/aim_write_phys.F |
93 |
AIM_WRITE_PHYS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/aim_v23/aim_write_phys.F |
97 |
AIM_WRITE_PHYS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
100 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(SHFtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
101 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(EVAPtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
102 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(PRECNVtave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
103 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(PRECLStave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
104 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(CLOUDCtave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
105 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(CLTOPtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
106 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(CBMFtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
107 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(DRAGtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
108 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(aimV0tave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
109 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(aimT0tave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
110 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(aimQ0tave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
111 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(EnFxPrtave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
112 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(albedotave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
113 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(dTsurftave,aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
115 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(aimRHtave,aim_timeAve,Nr,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
130 |
AIM_WRITE_TAVE |
CALL MNC_CW_SET_UDIM(mncfn, -1, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
131 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W_S('D',mncfn,0,0,'T',myTime,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
132 |
AIM_WRITE_TAVE |
CALL MNC_CW_SET_UDIM(mncfn, 0, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
133 |
AIM_WRITE_TAVE |
CALL MNC_CW_I_W_S('I',mncfn,0,0,'iter',myIter,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
135 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'USTRtave', USTRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
136 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'VSTRtave', VSTRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
137 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'TSRtave', TSRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
138 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'OLRtave', OLRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
139 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'SSRtave', SSRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
140 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'SLRtave', SLRtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
141 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'SHFtave', SHFtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
142 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'EVAPtave', EVAPtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
143 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'PRECNVtave',PRECNVtave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
144 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'PRECLStave',PRECLStave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
145 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'CLOUDCtave',CLOUDCtave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
146 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'CLTOPtave', CLTOPtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
147 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'CBMFtave', CBMFtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
148 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'DRAGtave', DRAGtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
149 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimV0tave', aimV0tave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
150 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimT0tave', aimT0tave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
151 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimQ0tave', aimQ0tave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
152 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'EnFxPrtave',EnFxPrtave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
153 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'albedotave',albedotave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
154 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'dTsurftave',dTsurftave,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
155 |
AIM_WRITE_TAVE |
CALL MNC_CW_RL_W(pf,mncfn,0,0,'aimRHtave', aimRHtave, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
165 |
AIM_WRITE_TAVE |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
169 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, USTRtave, 1, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
170 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, VSTRtave, 2, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
171 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, TSRtave , 3, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
172 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, OLRtave , 4, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
173 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SSRtave , 5, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
174 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SLRtave , 6, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
175 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, SHFtave , 7, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
176 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, EVAPtave, 8, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
177 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, PRECNVtave, 9, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
178 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, PRECLStave, 10, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
179 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CLOUDCtave, 11, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
180 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CLTOPtave, 12, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
181 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, CBMFtave, 13, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
182 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, DRAGtave, 14, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
183 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimV0tave, 15, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
184 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimT0tave, 16, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
185 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, aimQ0tave, 17, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
186 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, EnFxPrtave, 18, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
187 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, albedotave, 19, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
188 |
AIM_WRITE_TAVE |
CALL WRITE_REC_XY_RL( fn, dTsurftave, 20, myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
191 |
AIM_WRITE_TAVE |
& myIter, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
196 |
AIM_WRITE_TAVE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
199 |
AIM_WRITE_TAVE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/aim_v23/aim_write_tave.F |
204 |
AIM_WRITE_TAVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
205 |
AIM_WRITE_TAVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
206 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(USTRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
207 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(VSTRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
208 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(TSRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
209 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(OLRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
210 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SSRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
211 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SLRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
212 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SHFtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
213 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(EVAPtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
214 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(PRECNVtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
215 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(PRECLStave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
216 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CLOUDCtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
217 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CLTOPtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
218 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CBMFtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
219 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(DRAGtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
220 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimV0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
221 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimT0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
222 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimQ0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
223 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(EnFxPrtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
224 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(albedotave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
225 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(dTsurftave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
226 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimRHtave,Nr, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
34 |
AIM_WRITE_TAVE |
INTEGER myThid |
|
./pkg/aim_v23/aim_write_tave.F |
58 |
AIM_WRITE_TAVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
59 |
AIM_WRITE_TAVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
60 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(USTRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
61 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(VSTRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
62 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(TSRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
63 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(OLRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
64 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SSRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
65 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SLRtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
66 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(SHFtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
67 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(EVAPtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
68 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(PRECNVtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
69 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(PRECLStave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
70 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CLOUDCtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
71 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CLTOPtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
72 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(CBMFtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
73 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(DRAGtave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
74 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimV0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
75 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimT0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
76 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimQ0tave, 1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
77 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(EnFxPrtave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
78 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(albedotave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
79 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(dTsurftave,1, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
80 |
AIM_WRITE_TAVE |
CALL TIMEAVE_RESET(aimRHtave,Nr, bi, bj, myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
92 |
AIM_WRITE_TAVE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
93 |
AIM_WRITE_TAVE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
94 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(USTRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
95 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(VSTRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
96 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(TSRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
97 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(OLRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
98 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(SSRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
99 |
AIM_WRITE_TAVE |
CALL TIMEAVE_NORMALIZE(SLRtave, aim_timeAve,1,bi,bj,myThid) |
|
./pkg/aim_v23/aim_write_tave.F |
9 |
AIM_WRITE_TAVE |
SUBROUTINE AIM_WRITE_TAVE( myTime, myIter, myThid ) |
|
./pkg/aim_v23/phy_convmf.F |
55 |
CONVMF |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_convmf.F |
8 |
CONVMF |
I kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
10 |
PHY_DRIVER |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
143 |
PHY_DRIVER |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
169 |
PHY_DRIVER |
O RH(1,K,myThid),QSAT(1,K), |
|
./pkg/aim_v23/phy_driver.F |
170 |
PHY_DRIVER |
I myThid) |
|
./pkg/aim_v23/phy_driver.F |
180 |
PHY_DRIVER |
O ICLTOP,CBMF(1,myThid),PRECNV(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
181 |
PHY_DRIVER |
O TT_CNV(1,1,myThid),QT_CNV(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
182 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
186 |
PHY_DRIVER |
TT_CNV(J,K,myThid)=TT_CNV(J,K,myThid)*RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
187 |
PHY_DRIVER |
QT_CNV(J,K,myThid)=QT_CNV(J,K,myThid)*RPS_1*GRDSIG(K) |
|
./pkg/aim_v23/phy_driver.F |
196 |
PHY_DRIVER |
O PRECLS(1,myThid),TT_LSC(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
197 |
PHY_DRIVER |
O QT_LSC(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
198 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
204 |
PHY_DRIVER |
I PRECNV(1,myThid), QT_CNV(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
205 |
PHY_DRIVER |
I PRECLS(1,myThid), QT_LSC(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
206 |
PHY_DRIVER |
U TT_CNV(1,1,myThid), TT_LSC(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
207 |
PHY_DRIVER |
O EnPrec(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
208 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
211 |
PHY_DRIVER |
EnPrec(J,myThid) = 0. _d 0 |
|
./pkg/aim_v23/phy_driver.F |
223 |
PHY_DRIVER |
CALL SOL_OZ (SOLC,tYear, snLat(1,myThid), csLat(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
225 |
PHY_DRIVER |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
248 |
PHY_DRIVER |
CALL RADSW (PSG,dpFac,QG1,RH(1,1,myThid),ALB1(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
251 |
PHY_DRIVER |
O ICLTOP,CLOUDC(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
252 |
PHY_DRIVER |
O TSR(1,myThid),SSR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
253 |
PHY_DRIVER |
O UPSWG,TT_RSW(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
254 |
PHY_DRIVER |
I absLW_CO2, kGround, bi, bj, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
257 |
PHY_DRIVER |
CLTOP(J,myThid)=SIGH(ICLTOP(J)-1)*PSG_1(J) |
|
./pkg/aim_v23/phy_driver.F |
262 |
PHY_DRIVER |
TT_RSW(J,K,myThid)=TT_RSW(J,K,myThid)*RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
269 |
PHY_DRIVER |
& 'UPSWG ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
279 |
PHY_DRIVER |
CALL RADLW (-1,TG1,TS(1,myThid),ST4S, |
|
./pkg/aim_v23/phy_driver.F |
281 |
PHY_DRIVER |
O OLR(1,myThid),SLR(1,0,myThid),TT_RLW(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
282 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
292 |
PHY_DRIVER |
I PSG, TG1, QG1, RH(1,1,myThid), SE, VsurfSq, |
|
./pkg/aim_v23/phy_driver.F |
293 |
PHY_DRIVER |
I WVSurf(1,myThid),csLat(1,myThid),fOrogr(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
294 |
PHY_DRIVER |
I FMASK1(1,1,myThid),STL1(1,myThid),SST1(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
295 |
PHY_DRIVER |
I sti1(1,myThid), SSR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
296 |
PHY_DRIVER |
O SPEED0(1,myThid),DRAG(1,0,myThid),DENVV, |
|
./pkg/aim_v23/phy_driver.F |
297 |
PHY_DRIVER |
O dTskin,T1s,T0(1,myThid),Q0(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
298 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
301 |
PHY_DRIVER |
I PSG, FMASK1(1,1,myThid), EMISFC, |
|
./pkg/aim_v23/phy_driver.F |
302 |
PHY_DRIVER |
I STL1(1,myThid), dTskin, |
|
./pkg/aim_v23/phy_driver.F |
303 |
PHY_DRIVER |
I SOILW1(1,myThid), SSR(1,1,myThid), SLR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
304 |
PHY_DRIVER |
I T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
305 |
PHY_DRIVER |
O SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
307 |
PHY_DRIVER |
O TS(1,myThid), TSKIN(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
308 |
PHY_DRIVER |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
311 |
PHY_DRIVER |
I FMASK1(1,1,myThid), dTskin, |
|
./pkg/aim_v23/phy_driver.F |
313 |
PHY_DRIVER |
U sFlx, STL1(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
314 |
PHY_DRIVER |
U SHF(1,1,myThid), EVAP(1,1,myThid), SLR(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
315 |
PHY_DRIVER |
O dTsurf(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
316 |
PHY_DRIVER |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/phy_driver.F |
320 |
PHY_DRIVER |
I PSG, FMASK1(1,2,myThid), |
|
./pkg/aim_v23/phy_driver.F |
321 |
PHY_DRIVER |
I SST1(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
322 |
PHY_DRIVER |
I SSR(1,2,myThid), SLR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
323 |
PHY_DRIVER |
O T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
324 |
PHY_DRIVER |
O SHF(1,2,myThid), EVAP(1,2,myThid), SLR(1,2,myThid), |
|
./pkg/aim_v23/phy_driver.F |
325 |
PHY_DRIVER |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
329 |
PHY_DRIVER |
I PSG, FMASK1(1,3,myThid), EMISFC, |
|
./pkg/aim_v23/phy_driver.F |
330 |
PHY_DRIVER |
I STI1(1,myThid), dTskin, |
|
./pkg/aim_v23/phy_driver.F |
331 |
PHY_DRIVER |
I SSR(1,3,myThid), SLR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
332 |
PHY_DRIVER |
I T1s, T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
333 |
PHY_DRIVER |
O SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid), |
|
./pkg/aim_v23/phy_driver.F |
335 |
PHY_DRIVER |
O TS(1,myThid), TSKIN(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
336 |
PHY_DRIVER |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
339 |
PHY_DRIVER |
I FMASK1(1,3,myThid), SSR(1,3,myThid), sFlx, |
|
./pkg/aim_v23/phy_driver.F |
341 |
PHY_DRIVER |
U STI1(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
342 |
PHY_DRIVER |
U SHF(1,3,myThid), EVAP(1,3,myThid), SLR(1,3,myThid), |
|
./pkg/aim_v23/phy_driver.F |
343 |
PHY_DRIVER |
O dTsurf(1,3,myThid), |
|
./pkg/aim_v23/phy_driver.F |
344 |
PHY_DRIVER |
I bi, bj, myTime, myIter, myThid) |
|
./pkg/aim_v23/phy_driver.F |
348 |
PHY_DRIVER |
SHF (J,3,myThid) = 0. _d 0 |
|
./pkg/aim_v23/phy_driver.F |
349 |
PHY_DRIVER |
EVAP(J,3,myThid) = 0. _d 0 |
|
./pkg/aim_v23/phy_driver.F |
350 |
PHY_DRIVER |
SLR (J,3,myThid) = 0. _d 0 |
|
./pkg/aim_v23/phy_driver.F |
355 |
PHY_DRIVER |
I FMASK1(1,1,myThid), EMISFC, |
|
./pkg/aim_v23/phy_driver.F |
356 |
PHY_DRIVER |
I STL1(1,myThid), SST1(1,myThid), sti1(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
357 |
PHY_DRIVER |
I dTskin, SLR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
358 |
PHY_DRIVER |
I T0(1,myThid), Q0(1,myThid), DENVV, |
|
./pkg/aim_v23/phy_driver.F |
359 |
PHY_DRIVER |
U DRAG(1,0,myThid), SHF(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
360 |
PHY_DRIVER |
U EVAP(1,0,myThid), SLR(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
361 |
PHY_DRIVER |
O ST4S, TS(1,myThid), TSKIN(1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
362 |
PHY_DRIVER |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
366 |
PHY_DRIVER |
CALL DIAGNOSTICS_FILL( SLR(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
367 |
PHY_DRIVER |
& 'DWNLWG ', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
377 |
PHY_DRIVER |
CALL RADLW (1,TG1,TS(1,myThid),ST4S, |
|
./pkg/aim_v23/phy_driver.F |
379 |
PHY_DRIVER |
O OLR(1,myThid),SLR(1,0,myThid),TT_RLW(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
380 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
384 |
PHY_DRIVER |
TT_RLW(J,K,myThid)=TT_RLW(J,K,myThid)*RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
395 |
PHY_DRIVER |
CALL RADSW (PSG,dpFac,QG1,RH(1,1,myThid),ALB1(1,0,myThid), |
|
./pkg/aim_v23/phy_driver.F |
399 |
PHY_DRIVER |
O TSWclr(1,myThid), SSWclr(1,myThid), UPSWG, TT_SWclr(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
400 |
PHY_DRIVER |
I absLW_CO2, kGround, bi, bj, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
405 |
PHY_DRIVER |
& 'UPSWGclr', 1, 1 , 3,bi,bj, myThid ) |
|
./pkg/aim_v23/phy_driver.F |
411 |
PHY_DRIVER |
CALL RADLW (-1,TG1,TS(1,myThid),ST4S, |
|
./pkg/aim_v23/phy_driver.F |
413 |
PHY_DRIVER |
O OLWclr(1,myThid), SLWclr(1,myThid), TT_LWclr(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
414 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
418 |
PHY_DRIVER |
CALL RADLW (1,TG1,TS(1,myThid),ST4S, |
|
./pkg/aim_v23/phy_driver.F |
420 |
PHY_DRIVER |
O OLWclr(1,myThid), SLWclr(1,myThid), TT_LWclr(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
421 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
425 |
PHY_DRIVER |
TT_SWclr(J,K,myThid)=TT_SWclr(J,K,myThid)*RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
426 |
PHY_DRIVER |
TT_LWclr(J,K,myThid)=TT_LWclr(J,K,myThid)*RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
439 |
PHY_DRIVER |
CALL VDIFSC (dpFac, SE, RH(1,1,myThid), QG1, QSAT, |
|
./pkg/aim_v23/phy_driver.F |
440 |
PHY_DRIVER |
O TT_PBL(1,1,myThid),QT_PBL(1,1,myThid), |
|
./pkg/aim_v23/phy_driver.F |
441 |
PHY_DRIVER |
I kGround,bi,bj,myThid) |
|
./pkg/aim_v23/phy_driver.F |
452 |
PHY_DRIVER |
TT_PBL(J,K,myThid) = TT_PBL(J,K,myThid) |
|
./pkg/aim_v23/phy_driver.F |
453 |
PHY_DRIVER |
& + SHF(J,0,myThid) *RPS_1*GRDSCP(K) |
|
./pkg/aim_v23/phy_driver.F |
454 |
PHY_DRIVER |
QT_PBL(J,K,myThid) = QT_PBL(J,K,myThid) |
|
./pkg/aim_v23/phy_driver.F |
455 |
PHY_DRIVER |
& + EVAP(J,0,myThid)*RPS_1*GRDSIG(K) |
|
./pkg/aim_v23/phy_driver.F |
80 |
PHY_DRIVER |
INTEGER myIter, myThid |
|
./pkg/aim_v23/phy_inphys.F |
129 |
INPHYS |
_END_MASTER(myThid) |
|
./pkg/aim_v23/phy_inphys.F |
45 |
INPHYS |
INTEGER myThid |
|
./pkg/aim_v23/phy_inphys.F |
54 |
INPHYS |
_BEGIN_MASTER(myThid) |
|
./pkg/aim_v23/phy_inphys.F |
6 |
INPHYS |
SUBROUTINE INPHYS (HSG, myThid) |
|
./pkg/aim_v23/phy_lscond.F |
48 |
LSCOND |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_lscond.F |
8 |
LSCOND |
I kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_radiat.F |
144 |
SOL_OZ |
& 'FSOL ', 1, 1, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/phy_radiat.F |
162 |
RADSW |
I absCO2, kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_radiat.F |
19 |
SOL_OZ |
I bi, bj, myThid) |
|
./pkg/aim_v23/phy_radiat.F |
211 |
RADSW |
INTEGER bi, bj, myThid |
|
./pkg/aim_v23/phy_radiat.F |
494 |
RADSW |
& 'CLDCLW ',-1, Nr, 3,bi,bj, myThid ) |
|
./pkg/aim_v23/phy_radiat.F |
513 |
RADLW |
I kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_radiat.F |
53 |
SOL_OZ |
INTEGER bi, bj, myThid |
|
./pkg/aim_v23/phy_radiat.F |
559 |
RADLW |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_radiat.F |
742 |
RADSET |
SUBROUTINE RADSET( myThid ) |
|
./pkg/aim_v23/phy_radiat.F |
761 |
RADSET |
INTEGER myThid |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
15 |
FILL_CS_CORNER_AG_RL |
I bi,bj, myThid) |
|
./eesupp/src/fill_cs_corner_ag_rl.F |
54 |
FILL_CS_CORNER_AG_RL |
INTEGER myThid |
|
./pkg/aim_v23/phy_shtorh.F |
30 |
SHTORH |
INTEGER myThid |
|
./pkg/aim_v23/phy_shtorh.F |
6 |
SHTORH |
SUBROUTINE SHTORH (IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
|
./pkg/aim_v23/phy_snow_precip.F |
14 |
SNOW_PRECIP |
I kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_snow_precip.F |
65 |
SNOW_PRECIP |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_land.F |
139 |
SUFLUX_LAND |
& QSAT0(1,1), myThid) |
|
./pkg/aim_v23/phy_suflux_land.F |
141 |
SUFLUX_LAND |
& QSAT0(1,2), myThid) |
|
./pkg/aim_v23/phy_suflux_land.F |
16 |
SUFLUX_LAND |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_land.F |
88 |
SUFLUX_LAND |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_ocean.F |
101 |
SUFLUX_OCEAN |
& QSAT0, myThid) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
14 |
SUFLUX_OCEAN |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_ocean.F |
65 |
SUFLUX_OCEAN |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_post.F |
151 |
SUFLUX_POST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/phy_suflux_post.F |
155 |
SUFLUX_POST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/phy_suflux_post.F |
158 |
SUFLUX_POST |
& i1,j1,bi,bj,myThid,J,xC(i1,j1,bi,bj),yC(i1,j1,bi,bj) |
|
./pkg/aim_v23/phy_suflux_post.F |
159 |
SUFLUX_POST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/aim_v23/phy_suflux_post.F |
15 |
SUFLUX_POST |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_post.F |
85 |
SUFLUX_POST |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_prep.F |
13 |
SUFLUX_PREP |
I kGrd,bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_prep.F |
155 |
SUFLUX_PREP |
CALL SHTORH (-1,NGP,T0, PSA, 1. _d 0, Q0, tmpRH, QSAT0, myThid) |
|
./pkg/aim_v23/phy_suflux_prep.F |
217 |
SFLSET |
SUBROUTINE SFLSET (PHI0, FOROG, bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_prep.F |
242 |
SFLSET |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_prep.F |
91 |
SUFLUX_PREP |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_suflux_sice.F |
149 |
SUFLUX_SICE |
& QSAT0(1,1), myThid) |
|
./pkg/aim_v23/phy_suflux_sice.F |
151 |
SUFLUX_SICE |
& QSAT0(1,2), myThid) |
|
./pkg/aim_v23/phy_suflux_sice.F |
16 |
SUFLUX_SICE |
I bi,bj,myThid) |
|
./pkg/aim_v23/phy_suflux_sice.F |
88 |
SUFLUX_SICE |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_vdifsc.F |
63 |
VDIFSC |
INTEGER bi,bj,myThid |
|
./pkg/aim_v23/phy_vdifsc.F |
8 |
VDIFSC |
I kGrd,bi,bj,myThid) |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
15 |
FILL_CS_CORNER_TR_RL |
I bi,bj, myThid) |
|
./eesupp/src/fill_cs_corner_tr_rl.F |
54 |
FILL_CS_CORNER_TR_RL |
INTEGER myThid |
|
./pkg/atm2d/atm2d_finish.F |
26 |
ATM2D_FINISH |
INTEGER myThid |
|
./pkg/atm2d/atm2d_finish.F |
9 |
ATM2D_FINISH |
SUBROUTINE ATM2D_FINISH( myThid) |
|
./pkg/atm2d/atm2d_init_fixed.F |
101 |
ATM2D_INIT_FIXED |
CALL INIT_ATM2D(dtatm, dtocn, dtcouple, myThid) |
|
./pkg/atm2d/atm2d_init_fixed.F |
10 |
ATM2D_INIT_FIXED |
SUBROUTINE ATM2D_INIT_FIXED(nCouplePer, myThid) |
|
./pkg/atm2d/atm2d_init_fixed.F |
12 |
ATM2D_INIT_FIXED |
SUBROUTINE ATM2D_INIT_FIXED(myThid) |
|
./pkg/atm2d/atm2d_init_fixed.F |
34 |
ATM2D_INIT_FIXED |
INTEGER myThid |
|
./pkg/atm2d/atm2d_init_fixed.F |
64 |
ATM2D_INIT_FIXED |
CALL ATM2D_READPARMS(myThid) |
|
./eesupp/src/fill_cs_corner_uv_rl.F |
15 |
FILL_CS_CORNER_UV_RL |
I bi,bj, myThid) |
|
./eesupp/src/fill_cs_corner_uv_rl.F |
53 |
FILL_CS_CORNER_UV_RL |
INTEGER myThid |
|
./pkg/atm2d/atm2d_init_vars.F |
18 |
ATM2D_INIT_VARS |
INTEGER myThid |
|
./pkg/atm2d/atm2d_init_vars.F |
6 |
ATM2D_INIT_VARS |
SUBROUTINE ATM2D_INIT_VARS(myThid) |
|
./pkg/atm2d/atm2d_init_vars.F |
74 |
ATM2D_INIT_VARS |
CALL ATM2D_READ_PICKUP(myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
31 |
ATM2D_READ_PICKUP |
INTEGER myThid |
|
./pkg/atm2d/atm2d_read_pickup.F |
43 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_slp, 1, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
44 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_qnet, 2, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
45 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_solarnet, 3, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
46 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_fu, 4, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
47 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_fv, 5, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
48 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_precip, 6, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
49 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_evap, 7, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
50 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_runoff, 8, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
51 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_wspeed, 9, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
52 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_pCO2, 10, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
53 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_sIceLoad,11, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
55 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,sHeating, 12, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
56 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,flxCndBt, 13, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
57 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,pass_prcAtm, 14, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
58 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,snowPrc, 15, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
59 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,icFrwAtm, 16, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
60 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,icFlxSw, 17, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
61 |
ATM2D_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec,1,siceAlb, 18, nIter0, myThid) |
|
./pkg/atm2d/atm2d_read_pickup.F |
8 |
ATM2D_READ_PICKUP |
SUBROUTINE ATM2D_READ_PICKUP( myThid ) |
|
./pkg/atm2d/atm2d_readparms.F |
22 |
ATM2D_READPARMS |
INTEGER myThid |
|
./pkg/atm2d/atm2d_readparms.F |
59 |
ATM2D_READPARMS |
I myThid ) |
|
./pkg/atm2d/atm2d_readparms.F |
8 |
ATM2D_READPARMS |
SUBROUTINE ATM2D_READPARMS( myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
105 |
ATM2D_WRITE_PICKUP_NOW |
I myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
10 |
ATM2D_WRITE_PICKUP |
I myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
128 |
ATM2D_WRITE_PICKUP_NOW |
INTEGER myThid |
|
./pkg/atm2d/atm2d_write_pickup.F |
153 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_slp, 1,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
154 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_qnet, 2,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
155 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_solarnet, 3,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
156 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_fu, 4,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
157 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_fv, 5,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
158 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_precip, 6,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
159 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_evap, 7,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
160 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_runoff, 8,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
161 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_wspeed, 9,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
162 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_pCO2, 10,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
163 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_sIceLoad,11,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
165 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,sHeating, 12,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
166 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,flxCndBt, 13,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
167 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,pass_prcAtm, 14,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
168 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,snowPrc, 15,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
169 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,icFrwAtm, 16,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
170 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,icFlxSw, 17,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
171 |
ATM2D_WRITE_PICKUP_NOW |
CALL WRITE_REC_3D_RL( fn,prec,1,siceAlb, 18,myIter,myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
42 |
ATM2D_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/atm2d/atm2d_write_pickup.F |
66 |
ATM2D_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
69 |
ATM2D_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/atm2d/atm2d_write_pickup.F |
83 |
ATM2D_WRITE_PICKUP |
& permCheckPoint, myTime, myIter, myThid ) |
|
./pkg/atm2d/atm2ocn_main.F |
33 |
ATM2OCN_MAIN |
INTEGER myThid |
|
./pkg/atm2d/atm2ocn_main.F |
45 |
ATM2OCN_MAIN |
& intime0, intime1, ifTime, myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
47 |
ATM2OCN_MAIN |
CALL READ_ATMOS( inMonth,myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
52 |
ATM2OCN_MAIN |
& intime0, intime1, myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
55 |
ATM2OCN_MAIN |
CALL CALC_1DTO2D( myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
58 |
ATM2OCN_MAIN |
& intime0,intime1,ifTime,myIter,myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
61 |
ATM2OCN_MAIN |
& intime0,intime1,ifTime,myIter,myThid) |
|
./pkg/atm2d/atm2ocn_main.F |
8 |
ATM2OCN_MAIN |
& myIter, myThid ) |
|
./pkg/atm2d/calc_1dto2d.F |
193 |
INIT_2DFLD |
SUBROUTINE INIT_2DFLD( myThid) |
|
./pkg/atm2d/calc_1dto2d.F |
208 |
INIT_2DFLD |
INTEGER myThid |
|
./pkg/atm2d/calc_1dto2d.F |
31 |
CALC_1DTO2D |
INTEGER myThid |
|
./pkg/atm2d/calc_1dto2d.F |
39 |
CALC_1DTO2D |
CALL INIT_2DFLD(myThid) |
|
./pkg/atm2d/calc_1dto2d.F |
8 |
CALC_1DTO2D |
SUBROUTINE CALC_1DTO2D( myThid ) |
|
./pkg/atm2d/calc_fileload.F |
10 |
CALC_FILELOAD |
& ifTime, myThid) |
|
./pkg/atm2d/calc_fileload.F |
41 |
CALC_FILELOAD |
INTEGER myThid |
|
./pkg/atm2d/calc_zonal_means.F |
43 |
CALC_ZONAL_MEANS |
INTEGER myThid |
|
./pkg/atm2d/calc_zonal_means.F |
68 |
CALC_ZONAL_MEANS |
I myTime, myIter, myThid ) |
|
./pkg/atm2d/calc_zonal_means.F |
8 |
CALC_ZONAL_MEANS |
SUBROUTINE CALC_ZONAL_MEANS(doAll, myTime, myIter, myThid ) |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
15 |
FILL_CS_CORNER_UV_RS |
I bi,bj, myThid) |
|
./eesupp/src/fill_cs_corner_uv_rs.F |
51 |
FILL_CS_CORNER_UV_RS |
INTEGER myThid |
|
./pkg/atm2d/fixed_flux_add.F |
104 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
110 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
116 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
39 |
FIXED_FLUX_ADD |
INTEGER myThid |
|
./pkg/atm2d/fixed_flux_add.F |
76 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
78 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
82 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
84 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
88 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
90 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
94 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
96 |
FIXED_FLUX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/fixed_flux_add.F |
9 |
FIXED_FLUX_ADD |
& intime0, intime1, iftime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
203 |
FORWARD_STEP_ATM2D |
CALL GET_OCNVARS( myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
214 |
FORWARD_STEP_ATM2D |
& myTime, myIter, myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
215 |
FORWARD_STEP_ATM2D |
CALL THSICE_AVE( 1,1, myTime, myIter, myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
217 |
FORWARD_STEP_ATM2D |
CALL CALC_ZONAL_MEANS(.TRUE.,myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
218 |
FORWARD_STEP_ATM2D |
CALL PUT_OCNVARS(myTime,myIter,myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
219 |
FORWARD_STEP_ATM2D |
CALL SUM_YR_END_DIAGS(myTime,myIter,myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
229 |
FORWARD_STEP_ATM2D |
CALL ATM2OCN_MAIN(iloop, na, monid, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
230 |
FORWARD_STEP_ATM2D |
CALL SUM_OCN_FLUXES(myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
231 |
FORWARD_STEP_ATM2D |
CALL PASS_THSICE_FLUXES(myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
233 |
FORWARD_STEP_ATM2D |
& myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
234 |
FORWARD_STEP_ATM2D |
CALL SUM_THSICE_OUT(myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
235 |
FORWARD_STEP_ATM2D |
CALL CALC_ZONAL_MEANS(.FALSE.,myThid) !just mean Tsrf recalculated |
|
./pkg/atm2d/forward_step_atm2d.F |
245 |
FORWARD_STEP_ATM2D |
CALL FORWARD_STEP(iloop_ocn, myTime, myIter, myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
249 |
FORWARD_STEP_ATM2D |
CALL DO_THE_MODEL_IO( .FALSE., myTime, myIter, myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
250 |
FORWARD_STEP_ATM2D |
CALL DO_WRITE_PICKUP( .FALSE., myTime, myIter, myThid ) |
|
./pkg/atm2d/forward_step_atm2d.F |
262 |
FORWARD_STEP_ATM2D |
CALL NORM_OCN_FLUXES(myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
263 |
FORWARD_STEP_ATM2D |
CALL ATM2D_WRITE_PICKUP(.FALSE., myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
312 |
FORWARD_STEP_ATM2D |
CALL MONTH_END_DIAGS( monid, myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
377 |
FORWARD_STEP_ATM2D |
CALL TAVE_END_DIAGS( taveDump, myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
379 |
FORWARD_STEP_ATM2D |
CALL TAVE_END_DIAGS( idyear, myTime, myIter, myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
381 |
FORWARD_STEP_ATM2D |
CALL YR_END_DIAGS(iyr,myTime,myIter,myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
383 |
FORWARD_STEP_ATM2D |
IF (iloop.EQ.nTimeSteps) CALL ATM2D_FINISH(myThid) |
|
./pkg/atm2d/forward_step_atm2d.F |
41 |
FORWARD_STEP_ATM2D |
INTEGER myThid |
|
./pkg/atm2d/forward_step_atm2d.F |
9 |
FORWARD_STEP_ATM2D |
SUBROUTINE FORWARD_STEP_ATM2D(iloop, myTime, myIter, myThid) |
|
./pkg/atm2d/get_ocnvars.F |
44 |
GET_OCNVARS |
INTEGER myThid |
|
./pkg/atm2d/get_ocnvars.F |
8 |
GET_OCNVARS |
SUBROUTINE GET_OCNVARS( myTime, myIter, myThid ) |
|
./pkg/atm2d/init_atm2d.F |
208 |
INIT_ATM2D |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/atm2d/init_atm2d.F |
245 |
INIT_ATM2D |
& runoffVal, 0, myThid ) |
|
./pkg/atm2d/init_atm2d.F |
283 |
INIT_ATM2D |
CALL INIT_SUMVARS(myThid) |
|
./pkg/atm2d/init_atm2d.F |
44 |
INIT_ATM2D |
INTEGER myThid |
|
./pkg/atm2d/init_atm2d.F |
8 |
INIT_ATM2D |
SUBROUTINE INIT_ATM2D(dtatm, dtocn, dtcouple, myThid ) |
|
./pkg/atm2d/init_sumvars.F |
23 |
INIT_SUMVARS |
INTEGER myThid |
|
./pkg/atm2d/init_sumvars.F |
8 |
INIT_SUMVARS |
SUBROUTINE INIT_SUMVARS( myThid) |
|
./pkg/atm2d/month_end_diags.F |
100 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
102 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
104 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
30 |
MONTH_END_DIAGS |
INTEGER myThid |
|
./pkg/atm2d/month_end_diags.F |
84 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
86 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
88 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
8 |
MONTH_END_DIAGS |
SUBROUTINE MONTH_END_DIAGS( monid, myTime, myIter, myThid ) |
|
./pkg/atm2d/month_end_diags.F |
90 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
92 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
94 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
96 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/month_end_diags.F |
98 |
MONTH_END_DIAGS |
& myIter, myThid) |
|
./pkg/atm2d/norm_ocn_fluxes.F |
31 |
NORM_OCN_FLUXES |
INTEGER myThid |
|
./pkg/atm2d/norm_ocn_fluxes.F |
86 |
NORM_OCN_FLUXES |
CALL INIT_SUMVARS( myThid) |
|
./pkg/atm2d/norm_ocn_fluxes.F |
8 |
NORM_OCN_FLUXES |
SUBROUTINE NORM_OCN_FLUXES( myThid ) |
|
./pkg/atm2d/pass_thsice_fluxes.F |
31 |
PASS_THSICE_FLUXES |
INTEGER myThid |
|
./pkg/atm2d/pass_thsice_fluxes.F |
8 |
PASS_THSICE_FLUXES |
SUBROUTINE PASS_THSICE_FLUXES( myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
101 |
PUT_OCNVARS |
_EXCH_XY_RL(AtmospCO2 , myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
102 |
PUT_OCNVARS |
_EXCH_XY_RL(wind , myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
42 |
PUT_OCNVARS |
INTEGER myThid |
|
./pkg/atm2d/put_ocnvars.F |
83 |
PUT_OCNVARS |
CALL EXCH_UV_XY_RS(fu,fv,.TRUE.,myThid) |
|
./pkg/atm2d/put_ocnvars.F |
84 |
PUT_OCNVARS |
_EXCH_XY_RS(EmPmR, myThid ) !for NL Free surf? |
|
./pkg/atm2d/put_ocnvars.F |
85 |
PUT_OCNVARS |
_EXCH_XY_RS(saltFlux, myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
86 |
PUT_OCNVARS |
_EXCH_XY_RS(Qnet, myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
87 |
PUT_OCNVARS |
_EXCH_XY_RS(Qsw, myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
8 |
PUT_OCNVARS |
SUBROUTINE PUT_OCNVARS( myTime, myIter, myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
91 |
PUT_OCNVARS |
_EXCH_XY_RS(pLoad, myThid ) |
|
./pkg/atm2d/put_ocnvars.F |
92 |
PUT_OCNVARS |
_EXCH_XY_RS( sIceLoad, myThid ) |
|
./pkg/atm2d/read_atmos.F |
32 |
READ_ATMOS |
INTEGER myThid |
|
./pkg/atm2d/read_atmos.F |
8 |
READ_ATMOS |
SUBROUTINE READ_ATMOS(inMonth,myThid ) |
|
./pkg/atm2d/relax_add.F |
41 |
RELAX_ADD |
INTEGER myThid |
|
./pkg/atm2d/relax_add.F |
67 |
RELAX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/relax_add.F |
69 |
RELAX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/relax_add.F |
73 |
RELAX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/relax_add.F |
75 |
RELAX_ADD |
& myIter,myThid ) |
|
./pkg/atm2d/relax_add.F |
9 |
RELAX_ADD |
& intime0, intime1, iftime, myIter, myThid) |
|
./pkg/atm2d/subtract_means.F |
28 |
SUBTRACT_MEANS |
INTEGER myThid |
|
./pkg/atm2d/subtract_means.F |
9 |
SUBTRACT_MEANS |
& intime0, intime1, myThid ) |
|
./pkg/atm2d/sum_ocn_fluxes.F |
33 |
SUM_OCN_FLUXES |
INTEGER myThid |
|
./pkg/atm2d/sum_ocn_fluxes.F |
8 |
SUM_OCN_FLUXES |
SUBROUTINE SUM_OCN_FLUXES( myThid ) |
|
./pkg/atm2d/sum_thsice_out.F |
29 |
SUM_THSICE_OUT |
INTEGER myThid |
|
./pkg/atm2d/sum_thsice_out.F |
8 |
SUM_THSICE_OUT |
SUBROUTINE SUM_THSICE_OUT( myThid ) |
|
./eesupp/src/gather_xz.F |
29 |
GATHER_XZ |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/gather_xz.F |
6 |
GATHER_XZ |
SUBROUTINE GATHER_XZ( global, local, myThid ) |
|
./eesupp/src/gather_xz.F |
96 |
GATHER_XZ |
_END_MASTER( myThid ) |
|
./pkg/atm2d/sum_yr_end_diags.F |
31 |
SUM_YR_END_DIAGS |
INTEGER myThid |
|
./pkg/atm2d/sum_yr_end_diags.F |
8 |
SUM_YR_END_DIAGS |
SUBROUTINE SUM_YR_END_DIAGS( myTime, myIter, myThid ) |
|
./pkg/atm2d/tave_end_diags.F |
132 |
TAVE_END_DIAGS |
& qnet_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
134 |
TAVE_END_DIAGS |
& evap_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
136 |
TAVE_END_DIAGS |
& precip_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
138 |
TAVE_END_DIAGS |
& runoff_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
140 |
TAVE_END_DIAGS |
& qrel_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
142 |
TAVE_END_DIAGS |
& frel_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
144 |
TAVE_END_DIAGS |
& iceMask_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
146 |
TAVE_END_DIAGS |
& iceHeight_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
148 |
TAVE_END_DIAGS |
& iceTime_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
150 |
TAVE_END_DIAGS |
& oceMxLT_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
152 |
TAVE_END_DIAGS |
& oceMxLS_mon, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
158 |
TAVE_END_DIAGS |
& qnet_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
160 |
TAVE_END_DIAGS |
& evap_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
162 |
TAVE_END_DIAGS |
& precip_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
164 |
TAVE_END_DIAGS |
& runoff_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
166 |
TAVE_END_DIAGS |
& qrel_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
168 |
TAVE_END_DIAGS |
& frel_ann, myIter, myThid) |
|
./pkg/atm2d/tave_end_diags.F |
31 |
TAVE_END_DIAGS |
INTEGER myThid |
|
./pkg/atm2d/tave_end_diags.F |
8 |
TAVE_END_DIAGS |
SUBROUTINE TAVE_END_DIAGS( nYears, myTime, myIter, myThid ) |
|
./pkg/atm2d/yr_end_diags.F |
32 |
YR_END_DIAGS |
INTEGER myThid |
|
./pkg/atm2d/yr_end_diags.F |
8 |
YR_END_DIAGS |
SUBROUTINE YR_END_DIAGS( iyr, myTime, myIter, myThid ) |
|
./pkg/atm_common/atm_diagnostics_init.F |
19 |
ATM_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/atm_common/atm_diagnostics_init.F |
7 |
ATM_DIAGNOSTICS_INIT |
SUBROUTINE ATM_DIAGNOSTICS_INIT(myThid ) |
|
./pkg/atm_compon_interf/atm_apply_import.F |
12 |
ATM_APPLY_IMPORT |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/atm_compon_interf/atm_apply_import.F |
53 |
ATM_APPLY_IMPORT |
INTEGER myIter, bi, bj, myThid |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
109 |
ATM_CHECK_CPLCONFIG |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
13 |
ATM_CHECK_CPLCONFIG |
I landMask, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
45 |
ATM_CHECK_CPLCONFIG |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
56 |
ATM_CHECK_CPLCONFIG |
CALL WRITE_FLD_XY_RL( 'Ocn_MxlD', ' ', ocMxlD, 0, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
61 |
ATM_CHECK_CPLCONFIG |
& 1, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
65 |
ATM_CHECK_CPLCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
71 |
ATM_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
93 |
ATM_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
96 |
ATM_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_check_cplconfig.F |
99 |
ATM_CHECK_CPLCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/gather_yz.F |
29 |
GATHER_YZ |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/gather_yz.F |
6 |
GATHER_YZ |
SUBROUTINE GATHER_YZ( global, local, myThid ) |
|
./eesupp/src/gather_yz.F |
96 |
GATHER_YZ |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
103 |
ATM_CPL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
104 |
ATM_CPL_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
109 |
ATM_CPL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
114 |
ATM_CPL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
119 |
ATM_CPL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
122 |
ATM_CPL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
142 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, HeatFlux , 6, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
143 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, qShortWave, 7, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
144 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, tauX , 8, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
145 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, tauY , 9, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
146 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, EvMPrFlux , 10, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
148 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, RunOffFlux, 11, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
149 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, RunOffEnFx, 12, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
152 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, iceSaltFlx, 13, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
158 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn,fp, 1, airCO2 , 16, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
159 |
ATM_CPL_READ_PICKUP |
CALL READ_REC_3D_RL( fn,fp, 1, sWSpeed , 17, myIter,myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
174 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
176 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
178 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
180 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
182 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
186 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
188 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
194 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
198 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
204 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
206 |
ATM_CPL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
218 |
ATM_CPL_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
222 |
ATM_CPL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
223 |
ATM_CPL_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
231 |
ATM_CPL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
233 |
ATM_CPL_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
244 |
ATM_CPL_READ_PICKUP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
245 |
ATM_CPL_READ_PICKUP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
33 |
ATM_CPL_READ_PICKUP |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
66 |
ATM_CPL_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
77 |
ATM_CPL_READ_PICKUP |
I Nr, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
78 |
ATM_CPL_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
83 |
ATM_CPL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
86 |
ATM_CPL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
90 |
ATM_CPL_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
99 |
ATM_CPL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_cpl_read_pickup.F |
9 |
ATM_CPL_READ_PICKUP |
SUBROUTINE ATM_CPL_READ_PICKUP( myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_export_atmconfig.F |
12 |
ATM_EXPORT_ATMCONFIG |
I landMask, myThid ) |
|
./pkg/atm_compon_interf/atm_export_atmconfig.F |
39 |
ATM_EXPORT_ATMCONFIG |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_export_atmconfig.F |
49 |
ATM_EXPORT_ATMCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_export_atmconfig.F |
56 |
ATM_EXPORT_ATMCONFIG |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_export_atmconfig.F |
66 |
ATM_EXPORT_ATMCONFIG |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
100 |
ATM_EXPORT_FIELDS |
U airCO2, airCO2Time, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
104 |
ATM_EXPORT_FIELDS |
U sWSpeed, sWSpeedTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
113 |
ATM_EXPORT_FIELDS |
U sIceFrac_cpl, sIceFracTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
118 |
ATM_EXPORT_FIELDS |
U sIceThick_cpl, sIceThickTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
121 |
ATM_EXPORT_FIELDS |
U sIceSnowH_cpl, sIceSnowHTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
124 |
ATM_EXPORT_FIELDS |
U sIceQ1_cpl, sIceQ1Time, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
127 |
ATM_EXPORT_FIELDS |
U sIceQ2_cpl, sIceQ2Time, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
37 |
ATM_EXPORT_FIELDS |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_export_fields.F |
55 |
ATM_EXPORT_FIELDS |
U atmSLPr, atmSLPrTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
58 |
ATM_EXPORT_FIELDS |
U heatFlux, HeatFluxTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
61 |
ATM_EXPORT_FIELDS |
U qShortWave, qShortWaveTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
64 |
ATM_EXPORT_FIELDS |
U tauX, tauXTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
66 |
ATM_EXPORT_FIELDS |
U tauY, tauYTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
69 |
ATM_EXPORT_FIELDS |
U EvMPrFlux, EvMPrTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
74 |
ATM_EXPORT_FIELDS |
U RunOffFlux, RunOffTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
77 |
ATM_EXPORT_FIELDS |
U RunOffEnFx, ROEnFxTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
84 |
ATM_EXPORT_FIELDS |
U iceSaltFlx, saltFxTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
87 |
ATM_EXPORT_FIELDS |
U seaIceMass, sIceMassTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
92 |
ATM_EXPORT_FIELDS |
U saltPlmFlx_cpl, saltPlmFlxTime, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fields.F |
9 |
ATM_EXPORT_FIELDS |
SUBROUTINE ATM_EXPORT_FIELDS( myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
12 |
ATM_EXPORT_FLD |
I myThid ) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
44 |
ATM_EXPORT_FLD |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_export_fld.F |
56 |
ATM_EXPORT_FLD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
57 |
ATM_EXPORT_FLD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
75 |
ATM_EXPORT_FLD |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
79 |
ATM_EXPORT_FLD |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
83 |
ATM_EXPORT_FLD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_export_fld.F |
84 |
ATM_EXPORT_FLD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_compon_interf/atm_get_atmconfig.F |
15 |
ATM_GET_ATMCONFIG |
I myThid ) |
|
./pkg/atm_compon_interf/atm_get_atmconfig.F |
45 |
ATM_GET_ATMCONFIG |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_get_atmconfig.F |
51 |
ATM_GET_ATMCONFIG |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_get_atmconfig.F |
52 |
ATM_GET_ATMCONFIG |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/atm_compon_interf/atm_import_fields.F |
104 |
ATM_IMPORT_FIELDS |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_import_fields.F |
37 |
ATM_IMPORT_FIELDS |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_import_fields.F |
49 |
ATM_IMPORT_FIELDS |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_import_fields.F |
9 |
ATM_IMPORT_FIELDS |
SUBROUTINE ATM_IMPORT_FIELDS( myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
10 |
ATM_IMPORT_OCNCONFIG |
SUBROUTINE ATM_IMPORT_OCNCONFIG( myThid ) |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
33 |
ATM_IMPORT_OCNCONFIG |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
43 |
ATM_IMPORT_OCNCONFIG |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
44 |
ATM_IMPORT_OCNCONFIG |
DO bi=myBxLo(myThid),myByLo(myThid) |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
55 |
ATM_IMPORT_OCNCONFIG |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_import_ocnconfig.F |
62 |
ATM_IMPORT_OCNCONFIG |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/atm_store_aim_fields.F |
14 |
ATM_STORE_AIM_FIELDS |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_aim_fields.F |
55 |
ATM_STORE_AIM_FIELDS |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
14 |
ATM_STORE_AIM_WNDSTR |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
59 |
ATM_STORE_AIM_WNDSTR |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_store_dynvars.F |
11 |
ATM_STORE_DYNVARS |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_dynvars.F |
44 |
ATM_STORE_DYNVARS |
INTEGER myThid |
|
./eesupp/src/get_periodic_interval.F |
13 |
GET_PERIODIC_INTERVAL |
I currentTime, myThid ) |
|
./eesupp/src/get_periodic_interval.F |
41 |
GET_PERIODIC_INTERVAL |
INTEGER myThid |
|
./eesupp/src/get_periodic_interval.F |
80 |
GET_PERIODIC_INTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/get_periodic_interval.F |
83 |
GET_PERIODIC_INTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/get_periodic_interval.F |
92 |
GET_PERIODIC_INTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/get_periodic_interval.F |
95 |
GET_PERIODIC_INTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/atm_store_land.F |
11 |
ATM_STORE_LAND |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_land.F |
51 |
ATM_STORE_LAND |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
10 |
ATM_STORE_MY_DATA |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
39 |
ATM_STORE_MY_DATA |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
47 |
ATM_STORE_MY_DATA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
48 |
ATM_STORE_MY_DATA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
51 |
ATM_STORE_MY_DATA |
CALL ATM_STORE_SURFFLUX( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
53 |
ATM_STORE_MY_DATA |
CALL ATM_STORE_AIM_WNDSTR( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
56 |
ATM_STORE_MY_DATA |
CALL ATM_STORE_AIM_FIELDS( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_my_data.F |
59 |
ATM_STORE_MY_DATA |
CALL ATM_STORE_LAND( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_surfflux.F |
11 |
ATM_STORE_SURFFLUX |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_surfflux.F |
45 |
ATM_STORE_SURFFLUX |
INTEGER myThid |
|
./pkg/atm_compon_interf/atm_store_thsice.F |
11 |
ATM_STORE_THSICE |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/atm_store_thsice.F |
47 |
ATM_STORE_THSICE |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
12 |
CPL_DIAGNOSTICS_FILL |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
30 |
CPL_DIAGNOSTICS_FILL |
INTEGER myIter, myThid |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
51 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
53 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
55 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
57 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
61 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
67 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
73 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
77 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 0, 1, 1, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
80 |
CPL_DIAGNOSTICS_FILL |
IF ( DIAGNOSTICS_IS_ON('CPL_Qic1',myThid) .OR. |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
81 |
CPL_DIAGNOSTICS_FILL |
& DIAGNOSTICS_IS_ON('CPL_Qic2',myThid) ) THEN |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
82 |
CPL_DIAGNOSTICS_FILL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
83 |
CPL_DIAGNOSTICS_FILL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
94 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 2,bi,bj, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_fill.F |
98 |
CPL_DIAGNOSTICS_FILL |
I 0, 1, 2,bi,bj, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
104 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
112 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numFract, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
119 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
11 |
CPL_DIAGNOSTICS_INIT |
SUBROUTINE CPL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
126 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, numThick, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
25 |
CPL_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
57 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
64 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
71 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
79 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
87 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_diagnostics_init.F |
96 |
CPL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
10 |
CPL_EXCH_CONFIGS |
SUBROUTINE CPL_EXCH_CONFIGS( myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
44 |
CPL_EXCH_CONFIGS |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
62 |
CPL_EXCH_CONFIGS |
I myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
67 |
CPL_EXCH_CONFIGS |
I landMask_loc, myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
71 |
CPL_EXCH_CONFIGS |
CALL ATM_IMPORT_OCNCONFIG( myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
77 |
CPL_EXCH_CONFIGS |
I landMask_loc, myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
80 |
CPL_EXCH_CONFIGS |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_exch_configs.F |
82 |
CPL_EXCH_CONFIGS |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
100 |
CPL_EXPORT_IMPORT_DATA |
CALL CPL_DIAGNOSTICS_FILL( myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
10 |
CPL_EXPORT_IMPORT_DATA |
I myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
40 |
CPL_EXPORT_IMPORT_DATA |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
58 |
CPL_EXPORT_IMPORT_DATA |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
63 |
CPL_EXPORT_IMPORT_DATA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
66 |
CPL_EXPORT_IMPORT_DATA |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
69 |
CPL_EXPORT_IMPORT_DATA |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
70 |
CPL_EXPORT_IMPORT_DATA |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
71 |
CPL_EXPORT_IMPORT_DATA |
CALL ATM_STORE_DYNVARS( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
73 |
CPL_EXPORT_IMPORT_DATA |
CALL ATM_STORE_THSICE( bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
79 |
CPL_EXPORT_IMPORT_DATA |
CALL ATM_EXPORT_FIELDS( myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
87 |
CPL_EXPORT_IMPORT_DATA |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
92 |
CPL_EXPORT_IMPORT_DATA |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
95 |
CPL_EXPORT_IMPORT_DATA |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_export_import_data.F |
97 |
CPL_EXPORT_IMPORT_DATA |
CALL ATM_IMPORT_FIELDS( myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
10 |
CPL_IMPORT_CPLPARMS |
SUBROUTINE CPL_IMPORT_CPLPARMS( myThid ) |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
32 |
CPL_IMPORT_CPLPARMS |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
45 |
CPL_IMPORT_CPLPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
86 |
CPL_IMPORT_CPLPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
89 |
CPL_IMPORT_CPLPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_import_cplparms.F |
92 |
CPL_IMPORT_CPLPARMS |
_END_MASTER( myThid ) |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
118 |
CPL_INI_VARS |
CALL ATM_CPL_READ_PICKUP( nIter0, myThid ) |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
39 |
CPL_INI_VARS |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
47 |
CPL_INI_VARS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
48 |
CPL_INI_VARS |
DO bi=myBxLo(myThid),myByLo(myThid) |
|
./pkg/atm_compon_interf/cpl_ini_vars.F |
9 |
CPL_INI_VARS |
SUBROUTINE CPL_INI_VARS( myThid ) |
|
./eesupp/src/global_max.F |
102 |
GLOBAL_MAX_R8 |
I myThid ) |
|
./eesupp/src/global_max.F |
134 |
GLOBAL_MAX_R8 |
INTEGER myThid |
|
./eesupp/src/global_max.F |
148 |
GLOBAL_MAX_R8 |
phiGMR8(1,myThid) = maxPhi |
|
./eesupp/src/global_max.F |
151 |
GLOBAL_MAX_R8 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_max.F |
154 |
GLOBAL_MAX_R8 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_max.F |
168 |
GLOBAL_MAX_R8 |
_END_MASTER( myThid ) |
|
./eesupp/src/global_max.F |
171 |
GLOBAL_MAX_R8 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_max.F |
19 |
GLOBAL_MAX_R4 |
I myThid ) |
|
./eesupp/src/global_max.F |
51 |
GLOBAL_MAX_R4 |
INTEGER myThid |
|
./eesupp/src/global_max.F |
65 |
GLOBAL_MAX_R4 |
phiGMR4(1,myThid) = maxPhi |
|
./eesupp/src/global_max.F |
68 |
GLOBAL_MAX_R4 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_max.F |
71 |
GLOBAL_MAX_R4 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_max.F |
84 |
GLOBAL_MAX_R4 |
_END_MASTER( myThid ) |
|
./eesupp/src/global_max.F |
87 |
GLOBAL_MAX_R4 |
CALL BAR2( myThid ) |
|
./pkg/atm_compon_interf/cpl_init_fixed.F |
11 |
CPL_INIT_FIXED |
SUBROUTINE CPL_INIT_FIXED( myThid ) |
|
./pkg/atm_compon_interf/cpl_init_fixed.F |
23 |
CPL_INIT_FIXED |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_init_fixed.F |
33 |
CPL_INIT_FIXED |
CALL CPL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/atm_compon_interf/cpl_output.F |
28 |
CPL_OUTPUT |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_output.F |
7 |
CPL_OUTPUT |
SUBROUTINE CPL_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
120 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
123 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
133 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
136 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
144 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
147 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
153 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
156 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
162 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
165 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
173 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
176 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
184 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
187 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
193 |
CPL_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
197 |
CPL_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
202 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
205 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
213 |
CPL_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
226 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
228 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
230 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
232 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
236 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
239 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
262 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
265 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
297 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
299 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
301 |
CPL_READPARMS |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
305 |
CPL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
33 |
CPL_READPARMS |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_readparms.F |
76 |
CPL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
83 |
CPL_READPARMS |
O iUnit, myThid ) |
|
./pkg/atm_compon_interf/cpl_readparms.F |
9 |
CPL_READPARMS |
SUBROUTINE CPL_READPARMS( myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
103 |
CPL_WRITE_PICKUP |
& EvMPrFlux , -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
10 |
CPL_WRITE_PICKUP |
I suff, myTime, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
110 |
CPL_WRITE_PICKUP |
& RunOffFlux, -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
114 |
CPL_WRITE_PICKUP |
& RunOffEnFx, -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
122 |
CPL_WRITE_PICKUP |
& iceSaltFlx, -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
128 |
CPL_WRITE_PICKUP |
& saltPlmFlx_cpl, -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
136 |
CPL_WRITE_PICKUP |
& airCO2 , -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
140 |
CPL_WRITE_PICKUP |
& sWSpeed , -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
152 |
CPL_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
155 |
CPL_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
156 |
CPL_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
173 |
CPL_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
39 |
CPL_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
83 |
CPL_WRITE_PICKUP |
& HeatFlux , -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
88 |
CPL_WRITE_PICKUP |
& qShortWave, -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
93 |
CPL_WRITE_PICKUP |
& tauX , -j, myIter, myThid ) |
|
./pkg/atm_compon_interf/cpl_write_pickup.F |
98 |
CPL_WRITE_PICKUP |
& tauY , -j, myIter, myThid ) |
|
./eesupp/src/global_sum.F |
103 |
GLOBAL_SUM_R8 |
I myThid ) |
|
./eesupp/src/global_sum.F |
133 |
GLOBAL_SUM_R8 |
INTEGER myThid |
|
./eesupp/src/global_sum.F |
147 |
GLOBAL_SUM_R8 |
phiGSR8(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
152 |
GLOBAL_SUM_R8 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum.F |
158 |
GLOBAL_SUM_R8 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
172 |
GLOBAL_SUM_R8 |
_END_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
179 |
GLOBAL_SUM_R8 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum.F |
194 |
GLOBAL_SUM_INT |
I myThid ) |
|
./eesupp/src/global_sum.F |
20 |
GLOBAL_SUM_R4 |
I myThid ) |
|
./eesupp/src/global_sum.F |
224 |
GLOBAL_SUM_INT |
INTEGER myThid |
|
./eesupp/src/global_sum.F |
238 |
GLOBAL_SUM_INT |
phiGSI(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
244 |
GLOBAL_SUM_INT |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
258 |
GLOBAL_SUM_INT |
_END_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
50 |
GLOBAL_SUM_R4 |
INTEGER myThid |
|
./eesupp/src/global_sum.F |
64 |
GLOBAL_SUM_R4 |
phiGSR4(1,myThid) = sumPhi |
|
./eesupp/src/global_sum.F |
67 |
GLOBAL_SUM_R4 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum.F |
70 |
GLOBAL_SUM_R4 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
85 |
GLOBAL_SUM_R4 |
_END_MASTER( myThid ) |
|
./eesupp/src/global_sum.F |
87 |
GLOBAL_SUM_R4 |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
100 |
GLOBAL_SUM_SINGLECPU_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
101 |
GLOBAL_SUM_SINGLECPU_RL |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
108 |
GLOBAL_SUM_SINGLECPU_RL |
I useExch2GlobLayOut, zeroBuff, myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
140 |
GLOBAL_SUM_SINGLECPU_RL |
_END_MASTER( myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
142 |
GLOBAL_SUM_SINGLECPU_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
21 |
GLOBAL_SUM_SINGLECPU_RL |
I oLi, oLj, myThid ) |
|
./eesupp/src/global_sum_singlecpu.F |
54 |
GLOBAL_SUM_SINGLECPU_RL |
INTEGER myThid |
|
./eesupp/src/global_sum_singlecpu.F |
88 |
GLOBAL_SUM_SINGLECPU_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/global_sum_singlecpu.F |
89 |
GLOBAL_SUM_SINGLECPU_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/global_sum_tile.F |
20 |
GLOBAL_SUM_TILE_RL |
I myThid ) |
|
./eesupp/src/global_sum_tile.F |
225 |
GLOBAL_SUM_TILE_RL |
_END_MASTER( myThid ) |
|
./eesupp/src/global_sum_tile.F |
227 |
GLOBAL_SUM_TILE_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum_tile.F |
47 |
GLOBAL_SUM_TILE_RL |
INTEGER myThid |
|
./eesupp/src/global_sum_tile.F |
78 |
GLOBAL_SUM_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/global_sum_tile.F |
79 |
GLOBAL_SUM_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/global_sum_tile.F |
85 |
GLOBAL_SUM_TILE_RL |
CALL BAR2( myThid ) |
|
./eesupp/src/global_sum_tile.F |
86 |
GLOBAL_SUM_TILE_RL |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
101 |
GLOBAL_VEC_SUM_R8 |
I myThid ) |
|
./eesupp/src/global_vec_sum.F |
121 |
GLOBAL_VEC_SUM_R8 |
INTEGER ndim, nval, myThid |
|
./eesupp/src/global_vec_sum.F |
134 |
GLOBAL_VEC_SUM_R8 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
169 |
GLOBAL_VEC_SUM_R8 |
_END_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
183 |
GLOBAL_VEC_SUM_INT |
I myThid ) |
|
./eesupp/src/global_vec_sum.F |
19 |
GLOBAL_VEC_SUM_R4 |
I myThid ) |
|
./eesupp/src/global_vec_sum.F |
203 |
GLOBAL_VEC_SUM_INT |
INTEGER ndim, nval, myThid |
|
./eesupp/src/global_vec_sum.F |
216 |
GLOBAL_VEC_SUM_INT |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
251 |
GLOBAL_VEC_SUM_INT |
_END_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
39 |
GLOBAL_VEC_SUM_R4 |
INTEGER ndim, nval, myThid |
|
./eesupp/src/global_vec_sum.F |
52 |
GLOBAL_VEC_SUM_R4 |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/global_vec_sum.F |
87 |
GLOBAL_VEC_SUM_R4 |
_END_MASTER( myThid ) |
|
./pkg/atm_phys/atm_phys_check.F |
11 |
ATM_PHYS_CHECK |
SUBROUTINE ATM_PHYS_CHECK( myThid ) |
|
./pkg/atm_phys/atm_phys_check.F |
25 |
ATM_PHYS_CHECK |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_check.F |
33 |
ATM_PHYS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_check.F |
87 |
ATM_PHYS_CHECK |
_END_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
103 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
109 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
115 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
11 |
ATM_PHYS_DIAGNOSTICS_INIT |
SUBROUTINE ATM_PHYS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
123 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
129 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
130 |
ATM_PHYS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nr+1, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
136 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
137 |
ATM_PHYS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nr+1, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
143 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
144 |
ATM_PHYS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nr+1, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
150 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
151 |
ATM_PHYS_DIAGNOSTICS_INIT |
CALL DIAGNOSTICS_SETKLEV( diagName, Nr+1, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
157 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
163 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
169 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
175 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
181 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
187 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
193 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
199 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
205 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
212 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
219 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
227 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
233 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
239 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
246 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
24 |
ATM_PHYS_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
252 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
258 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
264 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
270 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
276 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
283 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
289 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
295 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
53 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
60 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
67 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
75 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
83 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
90 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_diagnostics_init.F |
96 |
ATM_PHYS_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
11 |
ATM_PHYS_DRIVER |
I myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
151 |
ATM_PHYS_DRIVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_phys/atm_phys_driver.F |
152 |
ATM_PHYS_DRIVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_phys/atm_phys_driver.F |
164 |
ATM_PHYS_DRIVER |
I myTime, myIter, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
171 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
190 |
ATM_PHYS_DRIVER |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
215 |
ATM_PHYS_DRIVER |
I bi,bj,myIter,myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
232 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
234 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
236 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
238 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
240 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
242 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
244 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
246 |
ATM_PHYS_DRIVER |
& -1,Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
248 |
ATM_PHYS_DRIVER |
& -1,Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
250 |
ATM_PHYS_DRIVER |
& -1,Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
267 |
ATM_PHYS_DRIVER |
I myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
280 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
284 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
294 |
ATM_PHYS_DRIVER |
O lw_down_3d, sw_down_3d, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
323 |
ATM_PHYS_DRIVER |
I deltaT, land(:,:), avail(:,:), myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
332 |
ATM_PHYS_DRIVER |
I b_3d, b_win, lw_down_3d, sw_down_3d, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
351 |
ATM_PHYS_DRIVER |
I myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
369 |
ATM_PHYS_DRIVER |
I myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
385 |
ATM_PHYS_DRIVER |
I myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
391 |
ATM_PHYS_DRIVER |
I myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
43 |
ATM_PHYS_DRIVER |
INTEGER myIter, myThid |
|
./pkg/atm_phys/atm_phys_driver.F |
445 |
ATM_PHYS_DRIVER |
& 0, Nr, 1, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
447 |
ATM_PHYS_DRIVER |
& 0, Nr, 1, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
453 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
455 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
457 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
459 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
461 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
463 |
ATM_PHYS_DRIVER |
& -1, Nr+1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
465 |
ATM_PHYS_DRIVER |
& -1, Nr+1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
467 |
ATM_PHYS_DRIVER |
& -1, Nr+1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
469 |
ATM_PHYS_DRIVER |
& -1, Nr+1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
471 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
473 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
475 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
477 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
479 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
481 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
483 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
485 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
487 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
489 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
491 |
ATM_PHYS_DRIVER |
& 0, 1, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
493 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
495 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
497 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
499 |
ATM_PHYS_DRIVER |
& -1, Nr, 3, bi, bj, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
508 |
ATM_PHYS_DRIVER |
& .TRUE., Nr, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
513 |
ATM_PHYS_DRIVER |
& .TRUE., 1, myThid ) |
|
./pkg/atm_phys/atm_phys_driver.F |
514 |
ATM_PHYS_DRIVER |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/atm_phys/atm_phys_driver.F |
515 |
ATM_PHYS_DRIVER |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/atm_phys/atm_phys_driver.F |
526 |
ATM_PHYS_DRIVER |
CALL ATM_STORE_MY_DATA( myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
14 |
ATM_PHYS_DYN2PHYS |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_dyn2phys.F |
40 |
ATM_PHYS_DYN2PHYS |
INTEGER myIter, myThid |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
101 |
ATM_PHYS_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
106 |
ATM_PHYS_INIT_FIXED |
& startTime, cst_mxlDepth, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
108 |
ATM_PHYS_INIT_FIXED |
I .true., myThid, do_virtual ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
110 |
ATM_PHYS_INIT_FIXED |
CALL LSCALE_COND_INIT( myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
113 |
ATM_PHYS_INIT_FIXED |
CALL DARGAN_BETTSMILLER_INIT( myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
118 |
ATM_PHYS_INIT_FIXED |
& startTime, cst_albedo, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
11 |
ATM_PHYS_INIT_FIXED |
SUBROUTINE ATM_PHYS_INIT_FIXED( myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
123 |
ATM_PHYS_INIT_FIXED |
& startTime, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
128 |
ATM_PHYS_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
129 |
ATM_PHYS_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
141 |
ATM_PHYS_INIT_FIXED |
& atmPhys_Qflx, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
142 |
ATM_PHYS_INIT_FIXED |
CALL EXCH_XY_RL( atmPhys_Qflx, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
146 |
ATM_PHYS_INIT_FIXED |
& atmPhys_MxLD, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
147 |
ATM_PHYS_INIT_FIXED |
CALL EXCH_XY_RL( atmPhys_MxLD, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
151 |
ATM_PHYS_INIT_FIXED |
& atmPhys_Albedo, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
152 |
ATM_PHYS_INIT_FIXED |
CALL EXCH_XY_RL( atmPhys_Albedo, myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
163 |
ATM_PHYS_INIT_FIXED |
CALL ATM_PHYS_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
35 |
ATM_PHYS_INIT_FIXED |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
57 |
ATM_PHYS_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
74 |
ATM_PHYS_INIT_FIXED |
I myThid ) |
|
./pkg/atm_phys/atm_phys_init_fixed.F |
98 |
ATM_PHYS_INIT_FIXED |
I myThid ) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
11 |
ATM_PHYS_INIT_VARIA |
SUBROUTINE ATM_PHYS_INIT_VARIA( myThid ) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
27 |
ATM_PHYS_INIT_VARIA |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_init_varia.F |
36 |
ATM_PHYS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
37 |
ATM_PHYS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
66 |
ATM_PHYS_INIT_VARIA |
& atmPhys_SST, 0, myThid ) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
67 |
ATM_PHYS_INIT_VARIA |
CALL EXCH_XY_RL( atmPhys_SST, myThid ) |
|
./pkg/atm_phys/atm_phys_init_varia.F |
77 |
ATM_PHYS_INIT_VARIA |
CALL ATM_PHYS_READ_PICKUP( nIter0, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
101 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
102 |
ATM_PHYS_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
107 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
112 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
11 |
ATM_PHYS_READ_PICKUP |
SUBROUTINE ATM_PHYS_READ_PICKUP( myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
123 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
124 |
ATM_PHYS_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
143 |
ATM_PHYS_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
153 |
ATM_PHYS_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
157 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
158 |
ATM_PHYS_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
166 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
168 |
ATM_PHYS_READ_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
173 |
ATM_PHYS_READ_PICKUP |
CALL EXCH_XY_RL( atmPhys_SST, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
28 |
ATM_PHYS_READ_PICKUP |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
64 |
ATM_PHYS_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
75 |
ATM_PHYS_READ_PICKUP |
I Nr, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
76 |
ATM_PHYS_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
81 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
84 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
88 |
ATM_PHYS_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/atm_phys/atm_phys_read_pickup.F |
97 |
ATM_PHYS_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/gsum.F |
106 |
GSUM_R8 |
IF ( myThid .NE. 1 ) THEN |
|
./eesupp/src/gsum.F |
109 |
GSUM_R8 |
GSR8_value(curLev,myThid) = myPhi |
|
./eesupp/src/gsum.F |
10 |
GSUM_R8_INIT |
SUBROUTINE GSUM_R8_INIT( myThid ) |
|
./eesupp/src/gsum.F |
115 |
GSUM_R8 |
GSR8_value(curLev,myThid) = _NOT_SET_ |
|
./eesupp/src/gsum.F |
37 |
GSUM_R8_INIT |
INTEGER myThid |
|
./eesupp/src/gsum.F |
45 |
GSUM_R8_INIT |
GSR8_value(I,myThid) = _NOT_SET_ |
|
./eesupp/src/gsum.F |
55 |
GSUM_R8 |
SUBROUTINE GSUM_R8( myPhi, answer, myThid ) |
|
./eesupp/src/gsum.F |
84 |
GSUM_R8 |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_readparms.F |
111 |
ATM_PHYS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_readparms.F |
11 |
ATM_PHYS_READPARMS |
SUBROUTINE ATM_PHYS_READPARMS( myThid ) |
|
./pkg/atm_phys/atm_phys_readparms.F |
24 |
ATM_PHYS_READPARMS |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_readparms.F |
44 |
ATM_PHYS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_readparms.F |
48 |
ATM_PHYS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_readparms.F |
52 |
ATM_PHYS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/atm_phys/atm_phys_readparms.F |
74 |
ATM_PHYS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_readparms.F |
78 |
ATM_PHYS_READPARMS |
I myThid ) |
|
./pkg/atm_phys/atm_phys_readparms.F |
85 |
ATM_PHYS_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
108 |
ATM_PHYS_TENDENCY_APPLY_V |
I myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
139 |
ATM_PHYS_TENDENCY_APPLY_V |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
196 |
ATM_PHYS_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
20 |
ATM_PHYS_TENDENCY_APPLY_U |
I myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
225 |
ATM_PHYS_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
251 |
ATM_PHYS_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
280 |
ATM_PHYS_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_tendency_apply.F |
51 |
ATM_PHYS_TENDENCY_APPLY_U |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
114 |
ATM_PHYS_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
11 |
ATM_PHYS_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
34 |
ATM_PHYS_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
85 |
ATM_PHYS_WRITE_PICKUP |
& atmPhys_SST, nj, myIter, myThid ) |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
93 |
ATM_PHYS_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
96 |
ATM_PHYS_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/atm_phys/atm_phys_write_pickup.F |
97 |
ATM_PHYS_WRITE_PICKUP |
CALL ALL_PROC_DIE( myThid ) |
|
./pkg/autodiff/active_file.F |
106 |
ACTIVE_READ_XYZ |
I myThid |
|
./pkg/autodiff/active_file.F |
142 |
ACTIVE_READ_XYZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
157 |
ACTIVE_READ_XYZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
173 |
ACTIVE_READ_XZ |
I myThid |
|
./pkg/autodiff/active_file.F |
209 |
ACTIVE_READ_XZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
224 |
ACTIVE_READ_XZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
240 |
ACTIVE_READ_YZ |
I myThid |
|
./pkg/autodiff/active_file.F |
275 |
ACTIVE_READ_YZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
290 |
ACTIVE_READ_YZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
304 |
ACTIVE_WRITE_XY |
I myThid |
|
./pkg/autodiff/active_file.F |
336 |
ACTIVE_WRITE_XY |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
351 |
ACTIVE_WRITE_XY |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
365 |
ACTIVE_WRITE_XYZ |
I myThid |
|
./pkg/autodiff/active_file.F |
397 |
ACTIVE_WRITE_XYZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
39 |
ACTIVE_READ_XY |
I myThid |
|
./pkg/autodiff/active_file.F |
412 |
ACTIVE_WRITE_XYZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
426 |
ACTIVE_WRITE_XZ |
I myThid |
|
./pkg/autodiff/active_file.F |
458 |
ACTIVE_WRITE_XZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
473 |
ACTIVE_WRITE_XZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
487 |
ACTIVE_WRITE_YZ |
I myThid |
|
./pkg/autodiff/active_file.F |
519 |
ACTIVE_WRITE_YZ |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
534 |
ACTIVE_WRITE_YZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file.F |
75 |
ACTIVE_READ_XY |
INTEGER myThid |
|
./pkg/autodiff/active_file.F |
90 |
ACTIVE_READ_XY |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
115 |
ADACTIVE_READ_XY |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
131 |
ADACTIVE_READ_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
142 |
ADACTIVE_READ_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
177 |
ADACTIVE_READ_XYZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
204 |
ADACTIVE_READ_XYZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
220 |
ADACTIVE_READ_XZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
231 |
ADACTIVE_READ_XZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
266 |
ADACTIVE_READ_XZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
293 |
ADACTIVE_READ_XZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
309 |
ADACTIVE_READ_YZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
320 |
ADACTIVE_READ_YZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
355 |
ADACTIVE_READ_YZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
382 |
ADACTIVE_READ_YZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
396 |
ADACTIVE_WRITE_XY |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
406 |
ADACTIVE_WRITE_XY |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
42 |
ADACTIVE_READ_XY |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
437 |
ADACTIVE_WRITE_XY |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
464 |
ADACTIVE_WRITE_XY |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
478 |
ADACTIVE_WRITE_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
488 |
ADACTIVE_WRITE_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
519 |
ADACTIVE_WRITE_XYZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
53 |
ADACTIVE_READ_XY |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
546 |
ADACTIVE_WRITE_XYZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
560 |
ADACTIVE_WRITE_XZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
570 |
ADACTIVE_WRITE_XZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
600 |
ADACTIVE_WRITE_XZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
627 |
ADACTIVE_WRITE_XZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
641 |
ADACTIVE_WRITE_YZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
651 |
ADACTIVE_WRITE_YZ |
I myThid, |
|
./pkg/autodiff/active_file_ad.F |
682 |
ADACTIVE_WRITE_YZ |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_ad.F |
709 |
ADACTIVE_WRITE_YZ |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_ad.F |
88 |
ADACTIVE_READ_XY |
INTEGER myIter,myThid |
|
./eesupp/src/ini_communication_patterns.F |
102 |
INI_COMMUNICATION_PATTERNS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
103 |
INI_COMMUNICATION_PATTERNS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
11 |
INI_COMMUNICATION_PATTERNS |
SUBROUTINE INI_COMMUNICATION_PATTERNS( myThid ) |
|
./eesupp/src/ini_communication_patterns.F |
230 |
INI_COMMUNICATION_PATTERNS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
231 |
INI_COMMUNICATION_PATTERNS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
268 |
INI_COMMUNICATION_PATTERNS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
269 |
INI_COMMUNICATION_PATTERNS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
315 |
INI_COMMUNICATION_PATTERNS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
316 |
INI_COMMUNICATION_PATTERNS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./eesupp/src/ini_communication_patterns.F |
33 |
INI_COMMUNICATION_PATTERNS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control.F |
118 |
ACTIVE_READ_3D_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
124 |
ACTIVE_READ_3D_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
125 |
ACTIVE_READ_3D_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
140 |
ACTIVE_READ_3D_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
153 |
ACTIVE_READ_3D_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
156 |
ACTIVE_READ_3D_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
157 |
ACTIVE_READ_3D_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
175 |
ACTIVE_READ_3D_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
178 |
ACTIVE_READ_3D_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
179 |
ACTIVE_READ_3D_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
199 |
ACTIVE_READ_3D_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
219 |
ACTIVE_READ_3D_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control.F |
266 |
ACTIVE_READ_3D_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control.F |
300 |
ACTIVE_READ_3D_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
306 |
ACTIVE_READ_3D_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
307 |
ACTIVE_READ_3D_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
322 |
ACTIVE_READ_3D_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
335 |
ACTIVE_READ_3D_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
338 |
ACTIVE_READ_3D_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
339 |
ACTIVE_READ_3D_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
357 |
ACTIVE_READ_3D_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
360 |
ACTIVE_READ_3D_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
361 |
ACTIVE_READ_3D_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
381 |
ACTIVE_READ_3D_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
38 |
ACTIVE_READ_3D_RL |
I myThid ) |
|
./pkg/autodiff/active_file_control.F |
400 |
ACTIVE_WRITE_3D_RL |
I myThid ) |
|
./pkg/autodiff/active_file_control.F |
441 |
ACTIVE_WRITE_3D_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control.F |
460 |
ACTIVE_WRITE_3D_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
470 |
ACTIVE_WRITE_3D_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
473 |
ACTIVE_WRITE_3D_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
474 |
ACTIVE_WRITE_3D_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
490 |
ACTIVE_WRITE_3D_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
500 |
ACTIVE_WRITE_3D_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
519 |
ACTIVE_WRITE_3D_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control.F |
560 |
ACTIVE_WRITE_3D_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control.F |
579 |
ACTIVE_WRITE_3D_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
589 |
ACTIVE_WRITE_3D_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control.F |
592 |
ACTIVE_WRITE_3D_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
593 |
ACTIVE_WRITE_3D_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control.F |
609 |
ACTIVE_WRITE_3D_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
619 |
ACTIVE_WRITE_3D_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control.F |
84 |
ACTIVE_READ_3D_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
1016 |
ACTIVE_WRITE_YZ_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
1035 |
ACTIVE_WRITE_YZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1045 |
ACTIVE_WRITE_YZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1048 |
ACTIVE_WRITE_YZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
1049 |
ACTIVE_WRITE_YZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
1063 |
ACTIVE_WRITE_YZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1073 |
ACTIVE_WRITE_YZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1092 |
ACTIVE_WRITE_YZ_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1133 |
ACTIVE_WRITE_YZ_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
1152 |
ACTIVE_WRITE_YZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1162 |
ACTIVE_WRITE_YZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1165 |
ACTIVE_WRITE_YZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
1166 |
ACTIVE_WRITE_YZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
1180 |
ACTIVE_WRITE_YZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
1190 |
ACTIVE_WRITE_YZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
120 |
ACTIVE_READ_XZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
126 |
ACTIVE_READ_XZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
127 |
ACTIVE_READ_XZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
140 |
ACTIVE_READ_XZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
153 |
ACTIVE_READ_XZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
156 |
ACTIVE_READ_XZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
157 |
ACTIVE_READ_XZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
173 |
ACTIVE_READ_XZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
176 |
ACTIVE_READ_XZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
177 |
ACTIVE_READ_XZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
195 |
ACTIVE_READ_XZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
215 |
ACTIVE_READ_XZ_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
262 |
ACTIVE_READ_XZ_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
296 |
ACTIVE_READ_XZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
302 |
ACTIVE_READ_XZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
303 |
ACTIVE_READ_XZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
316 |
ACTIVE_READ_XZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
329 |
ACTIVE_READ_XZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
332 |
ACTIVE_READ_XZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
333 |
ACTIVE_READ_XZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
349 |
ACTIVE_READ_XZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
352 |
ACTIVE_READ_XZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
353 |
ACTIVE_READ_XZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
371 |
ACTIVE_READ_XZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
391 |
ACTIVE_READ_YZ_RL |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
40 |
ACTIVE_READ_XZ_RL |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
437 |
ACTIVE_READ_YZ_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
471 |
ACTIVE_READ_YZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
477 |
ACTIVE_READ_YZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
478 |
ACTIVE_READ_YZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
491 |
ACTIVE_READ_YZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
504 |
ACTIVE_READ_YZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
507 |
ACTIVE_READ_YZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
508 |
ACTIVE_READ_YZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
524 |
ACTIVE_READ_YZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
527 |
ACTIVE_READ_YZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
528 |
ACTIVE_READ_YZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
546 |
ACTIVE_READ_YZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
566 |
ACTIVE_READ_YZ_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
613 |
ACTIVE_READ_YZ_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
647 |
ACTIVE_READ_YZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
653 |
ACTIVE_READ_YZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
654 |
ACTIVE_READ_YZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
667 |
ACTIVE_READ_YZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
680 |
ACTIVE_READ_YZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
683 |
ACTIVE_READ_YZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
684 |
ACTIVE_READ_YZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
700 |
ACTIVE_READ_YZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
703 |
ACTIVE_READ_YZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
704 |
ACTIVE_READ_YZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
722 |
ACTIVE_READ_YZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
741 |
ACTIVE_WRITE_XZ_RL |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
782 |
ACTIVE_WRITE_XZ_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
801 |
ACTIVE_WRITE_XZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
811 |
ACTIVE_WRITE_XZ_RL |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
814 |
ACTIVE_WRITE_XZ_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
815 |
ACTIVE_WRITE_XZ_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
829 |
ACTIVE_WRITE_XZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
839 |
ACTIVE_WRITE_XZ_RL |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
858 |
ACTIVE_WRITE_XZ_RS |
I myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
86 |
ACTIVE_READ_XZ_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
899 |
ACTIVE_WRITE_XZ_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_control_slice.F |
918 |
ACTIVE_WRITE_XZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
928 |
ACTIVE_WRITE_XZ_RS |
I iRec, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
931 |
ACTIVE_WRITE_XZ_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
932 |
ACTIVE_WRITE_XZ_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/active_file_control_slice.F |
946 |
ACTIVE_WRITE_XZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
956 |
ACTIVE_WRITE_XZ_RS |
I iRec, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_control_slice.F |
975 |
ACTIVE_WRITE_YZ_RL |
I myThid ) |
|
./pkg/autodiff/active_file_g.F |
105 |
G_ACTIVE_READ_XY |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
110 |
G_ACTIVE_READ_XY |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
127 |
G_ACTIVE_READ_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
165 |
G_ACTIVE_READ_XYZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
192 |
G_ACTIVE_READ_XYZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
197 |
G_ACTIVE_READ_XYZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
214 |
G_ACTIVE_READ_XZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
252 |
G_ACTIVE_READ_XZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
279 |
G_ACTIVE_READ_XZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
284 |
G_ACTIVE_READ_XZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
301 |
G_ACTIVE_READ_YZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
339 |
G_ACTIVE_READ_YZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
366 |
G_ACTIVE_READ_YZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
371 |
G_ACTIVE_READ_YZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
386 |
G_ACTIVE_WRITE_XY |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
40 |
G_ACTIVE_READ_XY |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
420 |
G_ACTIVE_WRITE_XY |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
448 |
G_ACTIVE_WRITE_XY |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
453 |
G_ACTIVE_WRITE_XY |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
468 |
G_ACTIVE_WRITE_XYZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
502 |
G_ACTIVE_WRITE_XYZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
530 |
G_ACTIVE_WRITE_XYZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
535 |
G_ACTIVE_WRITE_XYZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
550 |
G_ACTIVE_WRITE_XZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
584 |
G_ACTIVE_WRITE_XZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
612 |
G_ACTIVE_WRITE_XZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
617 |
G_ACTIVE_WRITE_XZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
632 |
G_ACTIVE_WRITE_YZ |
I myThid, |
|
./pkg/autodiff/active_file_g.F |
666 |
G_ACTIVE_WRITE_YZ |
INTEGER myThid |
|
./pkg/autodiff/active_file_g.F |
694 |
G_ACTIVE_WRITE_YZ |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
699 |
G_ACTIVE_WRITE_YZ |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_g.F |
78 |
G_ACTIVE_READ_XY |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen.F |
101 |
ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
124 |
ACTIVE_READ_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen.F |
166 |
ACTIVE_READ_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen.F |
177 |
ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
184 |
ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
191 |
ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
212 |
ACTIVE_WRITE_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen.F |
249 |
ACTIVE_WRITE_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen.F |
263 |
ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
270 |
ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
277 |
ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
298 |
ACTIVE_WRITE_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen.F |
335 |
ACTIVE_WRITE_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen.F |
349 |
ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
34 |
ACTIVE_READ_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen.F |
356 |
ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
363 |
ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
76 |
ACTIVE_READ_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen.F |
87 |
ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen.F |
94 |
ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
114 |
ADACTIVE_READ_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
121 |
ADACTIVE_READ_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
128 |
ADACTIVE_READ_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
151 |
ADACTIVE_READ_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
164 |
ADACTIVE_READ_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
208 |
ADACTIVE_READ_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_ad.F |
231 |
ADACTIVE_READ_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
238 |
ADACTIVE_READ_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
245 |
ADACTIVE_READ_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
266 |
ADACTIVE_WRITE_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
277 |
ADACTIVE_WRITE_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
315 |
ADACTIVE_WRITE_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_ad.F |
341 |
ADACTIVE_WRITE_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
348 |
ADACTIVE_WRITE_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
34 |
ADACTIVE_READ_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
355 |
ADACTIVE_WRITE_GEN_RL |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
376 |
ADACTIVE_WRITE_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
387 |
ADACTIVE_WRITE_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
425 |
ADACTIVE_WRITE_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_ad.F |
451 |
ADACTIVE_WRITE_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
458 |
ADACTIVE_WRITE_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
465 |
ADACTIVE_WRITE_GEN_RS |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_gen_ad.F |
47 |
ADACTIVE_READ_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_ad.F |
91 |
ADACTIVE_READ_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_g.F |
101 |
G_ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
105 |
G_ACTIVE_READ_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
112 |
G_ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
116 |
G_ACTIVE_READ_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
123 |
G_ACTIVE_READ_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
127 |
G_ACTIVE_READ_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
151 |
G_ACTIVE_READ_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_g.F |
194 |
G_ACTIVE_READ_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_g.F |
217 |
G_ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
221 |
G_ACTIVE_READ_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
228 |
G_ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
232 |
G_ACTIVE_READ_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
239 |
G_ACTIVE_READ_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
243 |
G_ACTIVE_READ_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
265 |
G_ACTIVE_WRITE_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_g.F |
303 |
G_ACTIVE_WRITE_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_g.F |
329 |
G_ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
333 |
G_ACTIVE_WRITE_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
340 |
G_ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
344 |
G_ACTIVE_WRITE_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
351 |
G_ACTIVE_WRITE_GEN_RL |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
355 |
G_ACTIVE_WRITE_GEN_RL |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
35 |
G_ACTIVE_READ_GEN_RL |
I myThid, |
|
./pkg/autodiff/active_file_gen_g.F |
377 |
G_ACTIVE_WRITE_GEN_RS |
I myThid, |
|
./pkg/autodiff/active_file_gen_g.F |
415 |
G_ACTIVE_WRITE_GEN_RS |
INTEGER myThid |
|
./pkg/autodiff/active_file_gen_g.F |
441 |
G_ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
445 |
G_ACTIVE_WRITE_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
452 |
G_ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
456 |
G_ACTIVE_WRITE_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
463 |
G_ACTIVE_WRITE_GEN_RS |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
467 |
G_ACTIVE_WRITE_GEN_RS |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_gen_g.F |
78 |
G_ACTIVE_READ_GEN_RL |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
104 |
ACTIVE_READ_XYZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
138 |
ACTIVE_READ_XYZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
153 |
ACTIVE_READ_XYZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
169 |
ACTIVE_READ_XZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
203 |
ACTIVE_READ_XZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
218 |
ACTIVE_READ_XZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
234 |
ACTIVE_READ_YZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
267 |
ACTIVE_READ_YZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
282 |
ACTIVE_READ_YZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
296 |
ACTIVE_WRITE_XY_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
326 |
ACTIVE_WRITE_XY_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
341 |
ACTIVE_WRITE_XY_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
355 |
ACTIVE_WRITE_XYZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
385 |
ACTIVE_WRITE_XYZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
39 |
ACTIVE_READ_XY_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
400 |
ACTIVE_WRITE_XYZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
414 |
ACTIVE_WRITE_XZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
444 |
ACTIVE_WRITE_XZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
459 |
ACTIVE_WRITE_XZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
473 |
ACTIVE_WRITE_YZ_LOC |
I myThid |
|
./pkg/autodiff/active_file_loc.F |
503 |
ACTIVE_WRITE_YZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
518 |
ACTIVE_WRITE_YZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc.F |
73 |
ACTIVE_READ_XY_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc.F |
88 |
ACTIVE_READ_XY_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
115 |
ADACTIVE_READ_XY_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
131 |
ADACTIVE_READ_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
142 |
ADACTIVE_READ_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
177 |
ADACTIVE_READ_XYZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
204 |
ADACTIVE_READ_XYZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
220 |
ADACTIVE_READ_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
231 |
ADACTIVE_READ_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
266 |
ADACTIVE_READ_XZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
293 |
ADACTIVE_READ_XZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
309 |
ADACTIVE_READ_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
320 |
ADACTIVE_READ_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
355 |
ADACTIVE_READ_YZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
382 |
ADACTIVE_READ_YZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
396 |
ADACTIVE_WRITE_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
406 |
ADACTIVE_WRITE_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
42 |
ADACTIVE_READ_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
437 |
ADACTIVE_WRITE_XY_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
464 |
ADACTIVE_WRITE_XY_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
478 |
ADACTIVE_WRITE_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
488 |
ADACTIVE_WRITE_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
519 |
ADACTIVE_WRITE_XYZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
53 |
ADACTIVE_READ_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
546 |
ADACTIVE_WRITE_XYZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
560 |
ADACTIVE_WRITE_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
570 |
ADACTIVE_WRITE_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
600 |
ADACTIVE_WRITE_XZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
627 |
ADACTIVE_WRITE_XZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
641 |
ADACTIVE_WRITE_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
651 |
ADACTIVE_WRITE_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_ad.F |
682 |
ADACTIVE_WRITE_YZ_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_ad.F |
709 |
ADACTIVE_WRITE_YZ_LOC |
& REVERSE_SIMULATION, myIter, myThid ) |
|
./pkg/autodiff/active_file_loc_ad.F |
88 |
ADACTIVE_READ_XY_LOC |
INTEGER myIter,myThid |
|
./pkg/autodiff/active_file_loc_g.F |
103 |
G_ACTIVE_READ_XY_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
108 |
G_ACTIVE_READ_XY_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
125 |
G_ACTIVE_READ_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
161 |
G_ACTIVE_READ_XYZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
188 |
G_ACTIVE_READ_XYZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
193 |
G_ACTIVE_READ_XYZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
210 |
G_ACTIVE_READ_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
246 |
G_ACTIVE_READ_XZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
273 |
G_ACTIVE_READ_XZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
278 |
G_ACTIVE_READ_XZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
295 |
G_ACTIVE_READ_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
331 |
G_ACTIVE_READ_YZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
358 |
G_ACTIVE_READ_YZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
363 |
G_ACTIVE_READ_YZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
378 |
G_ACTIVE_WRITE_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
40 |
G_ACTIVE_READ_XY_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
410 |
G_ACTIVE_WRITE_XY_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
438 |
G_ACTIVE_WRITE_XY_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
443 |
G_ACTIVE_WRITE_XY_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
458 |
G_ACTIVE_WRITE_XYZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
490 |
G_ACTIVE_WRITE_XYZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
518 |
G_ACTIVE_WRITE_XYZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
523 |
G_ACTIVE_WRITE_XYZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
538 |
G_ACTIVE_WRITE_XZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
570 |
G_ACTIVE_WRITE_XZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
598 |
G_ACTIVE_WRITE_XZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
603 |
G_ACTIVE_WRITE_XZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
618 |
G_ACTIVE_WRITE_YZ_LOC |
I myThid, |
|
./pkg/autodiff/active_file_loc_g.F |
650 |
G_ACTIVE_WRITE_YZ_LOC |
INTEGER myThid |
|
./pkg/autodiff/active_file_loc_g.F |
678 |
G_ACTIVE_WRITE_YZ_LOC |
& FORWARD_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
683 |
G_ACTIVE_WRITE_YZ_LOC |
& TANGENT_SIMULATION, myOptimIter, myThid ) |
|
./pkg/autodiff/active_file_loc_g.F |
76 |
G_ACTIVE_READ_XY_LOC |
INTEGER myThid |
|
./pkg/autodiff/adautodiff_whtapeio_sync.F |
24 |
ADAUTODIFF_WHTAPEIO_SYNC |
integer myThid |
|
./pkg/autodiff/adautodiff_whtapeio_sync.F |
7 |
ADAUTODIFF_WHTAPEIO_SYNC |
subroutine ADAUTODIFF_WHTAPEIO_SYNC( myLev, myStep, myThid ) |
|
./eesupp/src/ini_procs.F |
154 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
165 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
213 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
237 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
252 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
267 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
279 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
285 |
INI_PROCS |
& SQUEEZE_BOTH , myThid ) |
|
./eesupp/src/ini_procs.F |
289 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
294 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
299 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
303 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
307 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
311 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
315 |
INI_PROCS |
& SQUEEZE_RIGHT , myThid ) |
|
./eesupp/src/ini_procs.F |
347 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
355 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
371 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
379 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
396 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
404 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
418 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
426 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
445 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
453 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
468 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
476 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
492 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
500 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
513 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
521 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
542 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
545 |
INI_PROCS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_procs.F |
65 |
INI_PROCS |
INTEGER myThid |
|
./eesupp/src/ini_procs.F |
71 |
INI_PROCS |
myThid = 1 |
|
./pkg/autodiff/addamp_adj.F |
13 |
ADDAMP_ADJ |
I myThid ) |
|
./pkg/autodiff/addamp_adj.F |
29 |
ADDAMP_ADJ |
INTEGER NrIn, myThid |
|
./pkg/autodiff/addamp_adj.F |
39 |
ADDAMP_ADJ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/autodiff/addamp_adj.F |
40 |
ADDAMP_ADJ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/autodiff/addummy_in_dynamics.F |
101 |
ADDUMMY_IN_DYNAMICS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
112 |
ADDUMMY_IN_DYNAMICS |
& suff, adrhoinsitu, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
114 |
ADDUMMY_IN_DYNAMICS |
& adrhoinsitu, dumpAdRecDy, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
121 |
ADDUMMY_IN_DYNAMICS |
CALL COPY_ADVAR_OUTP( dumRS,adrhoinsitu,var3Du,Nr,12,myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
123 |
ADDUMMY_IN_DYNAMICS |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
125 |
ADDUMMY_IN_DYNAMICS |
& var3Du, dumpAdRecDy, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
129 |
ADDUMMY_IN_DYNAMICS |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
13 |
ADDUMMY_IN_DYNAMICS |
SUBROUTINE ADDUMMY_IN_DYNAMICS( myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
53 |
ADDUMMY_IN_DYNAMICS |
INTEGER myThid |
|
./pkg/autodiff/addummy_in_dynamics.F |
78 |
ADDUMMY_IN_DYNAMICS |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
91 |
ADDUMMY_IN_DYNAMICS |
CALL ADEXCH_3D_RL( adrhoinsitu, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_dynamics.F |
92 |
ADDUMMY_IN_DYNAMICS |
CALL ADEXCH_3D_RL( adtotphihyd, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
112 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RL( myThid,adetan) |
|
./pkg/autodiff/addummy_in_stepping.F |
113 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,adtheta) |
|
./pkg/autodiff/addummy_in_stepping.F |
114 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,adsalt) |
|
./pkg/autodiff/addummy_in_stepping.F |
115 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,adwvel ) |
|
./pkg/autodiff/addummy_in_stepping.F |
116 |
ADDUMMY_IN_STEPPING |
call ADEXCH_UV_XYZ_RL( .true. ,myThid,aduvel,advvel ) |
|
./pkg/autodiff/addummy_in_stepping.F |
118 |
ADDUMMY_IN_STEPPING |
call ADEXCH_UV_XY_RS( .true., myThid, adfu, adfv ) |
|
./pkg/autodiff/addummy_in_stepping.F |
119 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RS( myThid,adqnet ) |
|
./pkg/autodiff/addummy_in_stepping.F |
120 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RS( myThid,adempmr ) |
|
./pkg/autodiff/addummy_in_stepping.F |
122 |
ADDUMMY_IN_STEPPING |
call ADEXCH_UV_XYZ_RS( .true. ,myThid,adeddypsix,adeddypsiy ) |
|
./pkg/autodiff/addummy_in_stepping.F |
125 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,addiffkr ) |
|
./pkg/autodiff/addummy_in_stepping.F |
128 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,adkapgm ) |
|
./pkg/autodiff/addummy_in_stepping.F |
131 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XYZ_RL( myThid,adkapredi ) |
|
./pkg/autodiff/addummy_in_stepping.F |
134 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RL( myThid,adsst ) |
|
./pkg/autodiff/addummy_in_stepping.F |
137 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RL( myThid,adsss ) |
|
./pkg/autodiff/addummy_in_stepping.F |
140 |
ADDUMMY_IN_STEPPING |
call ADEXCH_XY_RL( myThid,adbottomdragfld) |
|
./pkg/autodiff/addummy_in_stepping.F |
145 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adEtaN, 1 , myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
147 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adTheta,Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
148 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adSalt, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
149 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adwVel, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
150 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_UV_3D_RL( aduVel,advVel, .TRUE., Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
152 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_UV_XY_RS( adFu, adFv, .TRUE., myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
153 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_XY_RS( adQnet, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
154 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_XY_RS( adEmPmR, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
156 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_UV_XYZ_RS( adEddyPsiX, adEddyPsiY, .TRUE., myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
159 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adDiffKr, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
162 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adKapGM, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
165 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adKapRedi, Nr, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
168 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_XY_RS( adSST, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
16 |
ADDUMMY_IN_STEPPING |
SUBROUTINE ADDUMMY_IN_STEPPING( myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
171 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_XY_RS( adSSS, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
174 |
ADDUMMY_IN_STEPPING |
CALL ADEXCH_3D_RL( adBottomDragFld, 1 , myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
185 |
ADDUMMY_IN_STEPPING |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
199 |
ADDUMMY_IN_STEPPING |
& adTheta, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
201 |
ADDUMMY_IN_STEPPING |
& adSalt, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
203 |
ADDUMMY_IN_STEPPING |
& aduVel, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
205 |
ADDUMMY_IN_STEPPING |
& advVel, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
207 |
ADDUMMY_IN_STEPPING |
& adwVel, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
209 |
ADDUMMY_IN_STEPPING |
& adEtaN, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
212 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtaux.',suff, adFu, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
213 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtauy.',suff, adFv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
214 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJqnet.',suff, adQnet,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
215 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJempr.',suff,adEmPmR,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
217 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJqsw.', suff, adQsw,myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
225 |
ADDUMMY_IN_STEPPING |
& adGGL90TKE, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
229 |
ADDUMMY_IN_STEPPING |
& adDiffKr, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
233 |
ADDUMMY_IN_STEPPING |
& adKapGM, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
237 |
ADDUMMY_IN_STEPPING |
& adKapRedi, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
241 |
ADDUMMY_IN_STEPPING |
& adEddyPsiX, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
243 |
ADDUMMY_IN_STEPPING |
& adEddyPsiY, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
246 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsst.',suff, adSST, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
249 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsss.',suff, adSSS, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
253 |
ADDUMMY_IN_STEPPING |
& adBottomDragFld, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
259 |
ADDUMMY_IN_STEPPING |
& adTheta, dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
261 |
ADDUMMY_IN_STEPPING |
& adSalt, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
263 |
ADDUMMY_IN_STEPPING |
& aduVel, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
265 |
ADDUMMY_IN_STEPPING |
& advVel, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
267 |
ADDUMMY_IN_STEPPING |
& adwVel, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
269 |
ADDUMMY_IN_STEPPING |
& adEtaN, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
273 |
ADDUMMY_IN_STEPPING |
& adFu, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
275 |
ADDUMMY_IN_STEPPING |
& adFv, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
277 |
ADDUMMY_IN_STEPPING |
& adQnet,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
279 |
ADDUMMY_IN_STEPPING |
& adEmPmR,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
282 |
ADDUMMY_IN_STEPPING |
& adQsw,dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
290 |
ADDUMMY_IN_STEPPING |
& adGGL90TKE, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
294 |
ADDUMMY_IN_STEPPING |
& adDiffKr, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
298 |
ADDUMMY_IN_STEPPING |
& adKapGM, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
302 |
ADDUMMY_IN_STEPPING |
& adKapRedi, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
306 |
ADDUMMY_IN_STEPPING |
& adEddyPsiX, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
308 |
ADDUMMY_IN_STEPPING |
& adEddyPsiY, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
312 |
ADDUMMY_IN_STEPPING |
& adSST, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
316 |
ADDUMMY_IN_STEPPING |
& adSSS, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
320 |
ADDUMMY_IN_STEPPING |
& adBottomDragFld, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
325 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adTheta,var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
327 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
329 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
330 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adSalt, var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
332 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
334 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
336 |
ADDUMMY_IN_STEPPING |
& var3Du, var3Dv, Nr, 34, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
338 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
340 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
342 |
ADDUMMY_IN_STEPPING |
& suff, var3Dv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
344 |
ADDUMMY_IN_STEPPING |
& var3Dv, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
345 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adwVel, var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
347 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
349 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
350 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adEtaN, var2Du, 1 , 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
352 |
ADDUMMY_IN_STEPPING |
& suff, var2Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
354 |
ADDUMMY_IN_STEPPING |
& var2Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
358 |
ADDUMMY_IN_STEPPING |
& var2Du, var2Dv, 1, 33, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
360 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
362 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
364 |
ADDUMMY_IN_STEPPING |
& suff,var2Dv,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
366 |
ADDUMMY_IN_STEPPING |
& var2Dv,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
367 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adQnet, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
369 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
371 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
372 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adEmPmR,dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
374 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
376 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
378 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adQsw, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
380 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
382 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
386 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS,adGGL90TKE,var3Du,Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
388 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
390 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
393 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adDiffKr,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
395 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
397 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
400 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adKapGM, var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
402 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
404 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
407 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS,adKapRedi,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
409 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
411 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
415 |
ADDUMMY_IN_STEPPING |
& var3Du, var3Dv, Nr, 33, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
417 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
419 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
421 |
ADDUMMY_IN_STEPPING |
& suff, var3Dv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
423 |
ADDUMMY_IN_STEPPING |
& var3Dv, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
426 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adSST, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
428 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
430 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
433 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adSSS, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
435 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
437 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
441 |
ADDUMMY_IN_STEPPING |
& var2Du, 1, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
443 |
ADDUMMY_IN_STEPPING |
& suff, var2Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
445 |
ADDUMMY_IN_STEPPING |
& var2Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
457 |
ADDUMMY_IN_STEPPING |
& foo3D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
460 |
ADDUMMY_IN_STEPPING |
& foo3D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
463 |
ADDUMMY_IN_STEPPING |
& foo3D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
466 |
ADDUMMY_IN_STEPPING |
& foo3D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
469 |
ADDUMMY_IN_STEPPING |
& foo3D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
472 |
ADDUMMY_IN_STEPPING |
& foo2D, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
476 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtaux.',suff, foo2d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
478 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJtauy.',suff, foo2d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
480 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJqnet.',suff, foo2d,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
482 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS('ADJempr.',suff,foo2d,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
499 |
ADDUMMY_IN_STEPPING |
& foo3d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
504 |
ADDUMMY_IN_STEPPING |
& foo3d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
509 |
ADDUMMY_IN_STEPPING |
& foo3d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
514 |
ADDUMMY_IN_STEPPING |
& foo3d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
517 |
ADDUMMY_IN_STEPPING |
& foo3d, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
521 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsst.',suff, adSST, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
525 |
ADDUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RS( 'ADJsss.',suff, adSSS, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
530 |
ADDUMMY_IN_STEPPING |
& adBottomDragFld, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
537 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
540 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
543 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
546 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
549 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
552 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
557 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
560 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
563 |
ADDUMMY_IN_STEPPING |
& foo2d,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
566 |
ADDUMMY_IN_STEPPING |
& foo2d,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
584 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
589 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
594 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
599 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
602 |
ADDUMMY_IN_STEPPING |
& foo3d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
607 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
612 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
617 |
ADDUMMY_IN_STEPPING |
& foo2d, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
623 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, thetad,var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
625 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
627 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
628 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, saltd, var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
630 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
632 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
634 |
ADDUMMY_IN_STEPPING |
& var3Du, var3Dv, Nr, 34, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
636 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
638 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
640 |
ADDUMMY_IN_STEPPING |
& suff, var3Dv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
642 |
ADDUMMY_IN_STEPPING |
& var3Dv, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
643 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, wVeld, var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
645 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
647 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
648 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, EtaNd, var2Du, 1 , 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
650 |
ADDUMMY_IN_STEPPING |
& suff, var2Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
652 |
ADDUMMY_IN_STEPPING |
& var2Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
656 |
ADDUMMY_IN_STEPPING |
& var2Du, var2Dv, 1, 33, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
658 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
660 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
662 |
ADDUMMY_IN_STEPPING |
& suff,var2Dv,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
664 |
ADDUMMY_IN_STEPPING |
& var2Dv,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
665 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( Qnetd, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
667 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
669 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
670 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( EmPmRd,dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
672 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
674 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
68 |
ADDUMMY_IN_STEPPING |
INTEGER myThid |
|
./pkg/autodiff/addummy_in_stepping.F |
691 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, DiffKrd,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
693 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
695 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
698 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, KapGMd, var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
700 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
702 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
705 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS,KapRedid,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
707 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
709 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
713 |
ADDUMMY_IN_STEPPING |
& var3Du, var3Dv, Nr, 33, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
715 |
ADDUMMY_IN_STEPPING |
& suff, var3Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
717 |
ADDUMMY_IN_STEPPING |
& var3Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
719 |
ADDUMMY_IN_STEPPING |
& suff, var3Dv, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
721 |
ADDUMMY_IN_STEPPING |
& var3Dv, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
724 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( SSTd, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
726 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
728 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
731 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( SSSd, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
733 |
ADDUMMY_IN_STEPPING |
& suff,var2Du,myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
735 |
ADDUMMY_IN_STEPPING |
& var2Du,dumpAdRecMn, myIter,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
739 |
ADDUMMY_IN_STEPPING |
& var2Du, 1, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
741 |
ADDUMMY_IN_STEPPING |
& suff, var2Du, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
743 |
ADDUMMY_IN_STEPPING |
& var2Du, dumpAdRecMn, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
758 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_SET_UDIM('adstate', -1, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
759 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W_S('D','adstate',0,0,'T',myTime,myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
760 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_SET_UDIM('adstate', 0, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
761 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_I_W_S('I','adstate',0,0,'iter',myIter,myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
763 |
ADDUMMY_IN_STEPPING |
& myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
767 |
ADDUMMY_IN_STEPPING |
& var3Du, var3Dv, Nr, 34, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
768 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adU', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
769 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adV', var3Dv, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
770 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adTheta,var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
771 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adT', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
772 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adSalt,var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
773 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adS', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
774 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adEtaN, var2Du, 1 , 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
775 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adEta', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
776 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adwVel, var3Du, Nr, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
777 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adW', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
779 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adQnet, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
780 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adQnet', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
781 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adEmPmR,dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
782 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adEmpmr', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
784 |
ADDUMMY_IN_STEPPING |
& var2Du, var2Dv, 1, 33, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
785 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adFu', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
786 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adFv', var2Dv, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
789 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adSST, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
790 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adSST', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
793 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( adSSS, dumRL, var2Du, 1, 11, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
794 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adSSS', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
798 |
ADDUMMY_IN_STEPPING |
& var2Du, 1, 12, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
800 |
ADDUMMY_IN_STEPPING |
& 'adBottomDrag', var2Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
803 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adDiffKr,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
805 |
ADDUMMY_IN_STEPPING |
& 'adDiffkr', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
808 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS, adKapGM, var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
810 |
ADDUMMY_IN_STEPPING |
& 'adkapgm', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
813 |
ADDUMMY_IN_STEPPING |
CALL COPY_ADVAR_OUTP( dumRS,adKapRedi,var3Du, Nr, 12,myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
815 |
ADDUMMY_IN_STEPPING |
& 'adkapredi', var3Du, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
819 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adU', aduVel, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
820 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adV', advVel, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
821 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adT', adtheta, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
822 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adS', adsalt, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
823 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adEta', adetaN, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
824 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RL_W('D','adstate',0,0,'adW', adwVel, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
826 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adQnet', adQnet, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
827 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adEmpmr', adEmpmr, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
828 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adFu', adfu, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
829 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adFv', adfv, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
832 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adSST', adsst, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
835 |
ADDUMMY_IN_STEPPING |
CALL MNC_CW_RS_W('D','adstate',0,0,'adSSS', adsss, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
839 |
ADDUMMY_IN_STEPPING |
& 'adBottomDrag', adbottomdragfld, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
843 |
ADDUMMY_IN_STEPPING |
& 'adDiffkr', addiffkr, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
847 |
ADDUMMY_IN_STEPPING |
& 'adkapgm', adkapgm, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
851 |
ADDUMMY_IN_STEPPING |
& 'adkapredi', adkapredi, myThid) |
|
./pkg/autodiff/addummy_in_stepping.F |
865 |
ADDUMMY_IN_STEPPING |
& CALL SEAICE_AD_DUMP( myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
870 |
ADDUMMY_IN_STEPPING |
& CALL PTRACERS_AD_DUMP( myTime, myIter, myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
873 |
ADDUMMY_IN_STEPPING |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/addummy_in_stepping.F |
97 |
ADDUMMY_IN_STEPPING |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
113 |
ADREAD |
INTEGER myThid |
|
./pkg/autodiff/adread_adwrite.F |
142 |
ADREAD |
IF ( debugMode ) CALL DEBUG_ENTER('ADREAD',myThid) |
|
./pkg/autodiff/adread_adwrite.F |
179 |
ADREAD |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
197 |
ADREAD |
& 1,var(j2d),jrec,tapeSingleCpuIO,tapeBufferIO,myThid) |
|
./pkg/autodiff/adread_adwrite.F |
227 |
ADREAD |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
233 |
ADREAD |
& useSingleCpuIO, irec, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
239 |
ADREAD |
& useSingleCpuIO, irec, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
241 |
ADREAD |
_END_MASTER( myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
250 |
ADREAD |
IF ( debugMode ) CALL DEBUG_LEAVE('ADREAD',myThid) |
|
./pkg/autodiff/adread_adwrite.F |
261 |
ADWRITE |
I myThid, |
|
./pkg/autodiff/adread_adwrite.F |
311 |
ADWRITE |
INTEGER myThid |
|
./pkg/autodiff/adread_adwrite.F |
341 |
ADWRITE |
IF ( debugMode ) CALL DEBUG_ENTER('ADWRITE',myThid) |
|
./pkg/autodiff/adread_adwrite.F |
378 |
ADWRITE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
397 |
ADWRITE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
400 |
ADWRITE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
406 |
ADWRITE |
& 1,var(j2d),jrec,tapeSingleCpuIO,tapeBufferIO,myThid) |
|
./pkg/autodiff/adread_adwrite.F |
423 |
ADWRITE |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
429 |
ADWRITE |
& useSingleCpuIO, irec, 0, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
435 |
ADWRITE |
& useSingleCpuIO, irec, 0, myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
437 |
ADWRITE |
_END_MASTER( myThid ) |
|
./pkg/autodiff/adread_adwrite.F |
446 |
ADWRITE |
IF ( debugMode ) CALL DEBUG_LEAVE('ADWRITE',myThid) |
|
./pkg/autodiff/adread_adwrite.F |
64 |
ADREAD |
I myThid, |
|
./pkg/autodiff/adzero_adj.F |
107 |
ADZERO_ADJ |
INTEGER NrIn, myThid |
|
./pkg/autodiff/adzero_adj.F |
115 |
ADZERO_ADJ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/autodiff/adzero_adj.F |
116 |
ADZERO_ADJ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/autodiff/adzero_adj.F |
17 |
ADZERO_ADJ_1D |
I NrIn, adFieldFwd, myThid ) |
|
./pkg/autodiff/adzero_adj.F |
33 |
ADZERO_ADJ_1D |
INTEGER NrIn, myThid |
|
./pkg/autodiff/adzero_adj.F |
52 |
ADZERO_ADJ_LOC |
I NrIn, adFieldFwd, myThid ) |
|
./pkg/autodiff/adzero_adj.F |
68 |
ADZERO_ADJ_LOC |
INTEGER NrIn, myThid |
|
./pkg/autodiff/adzero_adj.F |
91 |
ADZERO_ADJ |
I NrIn, adFieldFwd, myThid ) |
|
./pkg/autodiff/autodiff_check.F |
103 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
109 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
12 |
AUTODIFF_CHECK |
SUBROUTINE AUTODIFF_CHECK( myThid ) |
|
./pkg/autodiff/autodiff_check.F |
131 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
28 |
AUTODIFF_CHECK |
INTEGER myThid |
|
./pkg/autodiff/autodiff_check.F |
40 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
44 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
48 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
55 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
59 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
63 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
72 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
76 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
80 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
88 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
91 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_check.F |
94 |
AUTODIFF_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/autodiff/autodiff_findunit.F |
22 |
AUTODIFF_FINDUNIT |
INTEGER myThid |
|
./pkg/autodiff/autodiff_findunit.F |
45 |
AUTODIFF_FINDUNIT |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_findunit.F |
48 |
AUTODIFF_FINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/autodiff_findunit.F |
62 |
AUTODIFF_FINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/autodiff_findunit.F |
6 |
AUTODIFF_FINDUNIT |
SUBROUTINE AUTODIFF_FINDUNIT( ioUnit, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set.F |
19 |
AUTODIFF_INADMODE_SET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_set.F |
6 |
AUTODIFF_INADMODE_SET |
SUBROUTINE AUTODIFF_INADMODE_SET( myThid ) |
|
./eesupp/src/ini_threading_environment.F |
100 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./eesupp/src/ini_threading_environment.F |
120 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./eesupp/src/ini_threading_environment.F |
130 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./eesupp/src/ini_threading_environment.F |
140 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./eesupp/src/ini_threading_environment.F |
292 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_threading_environment.F |
300 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_threading_environment.F |
318 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/ini_threading_environment.F |
58 |
INI_THREADING_ENVIRONMENT |
INTEGER myThid |
|
./eesupp/src/ini_threading_environment.F |
76 |
INI_THREADING_ENVIRONMENT |
myThid = 1 |
|
./eesupp/src/ini_threading_environment.F |
96 |
INI_THREADING_ENVIRONMENT |
CALL PRINT_ERROR(msgBuf, myThid) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
101 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
107 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
113 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
30 |
ADAUTODIFF_INADMODE_SET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
60 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
64 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
68 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
72 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
77 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
82 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
89 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
97 |
ADAUTODIFF_INADMODE_SET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_ad.F |
9 |
ADAUTODIFF_INADMODE_SET |
SUBROUTINE ADAUTODIFF_INADMODE_SET( myThid ) |
|
./pkg/autodiff/autodiff_inadmode_set_g.F |
20 |
G_AUTODIFF_INADMODE_SET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_set_g.F |
6 |
G_AUTODIFF_INADMODE_SET |
SUBROUTINE G_AUTODIFF_INADMODE_SET( myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset.F |
19 |
AUTODIFF_INADMODE_UNSET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_unset.F |
6 |
AUTODIFF_INADMODE_UNSET |
SUBROUTINE AUTODIFF_INADMODE_UNSET( myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
100 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
106 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
112 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
30 |
ADAUTODIFF_INADMODE_UNSET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
59 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
63 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
67 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
71 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
76 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
81 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
88 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
96 |
ADAUTODIFF_INADMODE_UNSET |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_ad.F |
9 |
ADAUTODIFF_INADMODE_UNSET |
SUBROUTINE ADAUTODIFF_INADMODE_UNSET( myThid ) |
|
./pkg/autodiff/autodiff_inadmode_unset_g.F |
20 |
G_AUTODIFF_INADMODE_UNSET |
INTEGER myThid |
|
./pkg/autodiff/autodiff_inadmode_unset_g.F |
6 |
G_AUTODIFF_INADMODE_UNSET |
SUBROUTINE G_AUTODIFF_INADMODE_UNSET( myThid ) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
120 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adU', 'U_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
121 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adU','units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
123 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal velocity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
125 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XU YU RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
127 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adV', 'V_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
128 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adV','units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
130 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint merid. velocity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
132 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XV YV RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
134 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adT', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
135 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adT','units','[cost]/[degC]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
137 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint potential_temperature', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
139 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
141 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adS', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
142 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adS','units','[cost]/[psu]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
144 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint salinity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
146 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
148 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adEta', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
149 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adEta','units','[cost]/[m]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
151 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint free-surface_r-anomaly', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
153 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
155 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adW', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
156 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VATTR_TEXT('adW','units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
158 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint vertical velocity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
160 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
162 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adQnet', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
164 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[W/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
166 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint net upward heat flux', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
168 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
170 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adEmpmr', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
172 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
174 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint net upward freshwater flux', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
176 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
178 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME( 'adFu', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
180 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[N/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
182 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal wind stress', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
184 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
186 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME( 'adFv', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
188 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[N/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
190 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal meridional stress', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
192 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
195 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME( 'adSST', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
197 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[degC]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
199 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint sea_surface_temperature', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
201 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
205 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME( 'adSSS', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
207 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[psu]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
209 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint sea_surface_salinity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
211 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
216 |
AUTODIFF_INI_MODEL_IO |
& 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
218 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[N/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
21 |
AUTODIFF_INI_MODEL_IO |
SUBROUTINE AUTODIFF_INI_MODEL_IO( myThid ) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
220 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint bottom drag', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
222 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
226 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adDiffkr', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
228 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m^2/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
230 |
AUTODIFF_INI_MODEL_IO |
& 'long_name','adjoint vertical diffusion', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
232 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
236 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adkapgm', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
238 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m^2/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
240 |
AUTODIFF_INI_MODEL_IO |
& 'long_name','adjoint isopycnal diffusion', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
242 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
246 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adkapredi', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
248 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m^2/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
250 |
AUTODIFF_INI_MODEL_IO |
& 'long_name','adjoint isopycnal diffusion', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
252 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
257 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adustress', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
259 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[N/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
261 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal wind stress', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
263 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
265 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('advstress', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
267 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[N/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
269 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint meridional wind stress', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
271 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
273 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adhflux', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
275 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[W/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
277 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint net upward heat flux', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
279 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
281 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adsflux', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
283 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
285 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint net upward freshwater flux', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
287 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
290 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adatemp', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
292 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[degK]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
294 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint surface air temperature', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
296 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
298 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adaqh', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
300 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[kg/kg]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
302 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint specific humidity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
304 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
306 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adprecip', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
308 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
310 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint precipitation', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
312 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
315 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adrunoff', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
317 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
319 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint runoff', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
321 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
325 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('aduwind', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
327 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
329 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal wind speed', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
331 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
333 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('advwind', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
335 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
337 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint meridional wind speed', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
339 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
343 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adswdown', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
345 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[W/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
347 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint downward shortwave radiation', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
349 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
350 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adlwdown', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
352 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[W/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
354 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint downward wave radiation', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
356 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
359 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adclimsst', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
361 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[degC]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
363 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint sea surface temperature', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
365 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
368 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adclimsss', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
370 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[ppt]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
372 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint sea surface salinity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
374 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
381 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adarea', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
383 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m^2/m^2]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
385 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint fractional ice-covered area', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
387 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
389 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adheff', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
391 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
393 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint effective ice thickness', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
395 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
397 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('adhsnow', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
399 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
401 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint snow thickness', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
403 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
406 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('aduice', 'U_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
408 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
410 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint zonal ice velocity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
412 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XG YG RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
414 |
AUTODIFF_INI_MODEL_IO |
CALL MNC_CW_ADD_VNAME('advice', 'V_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
416 |
AUTODIFF_INI_MODEL_IO |
& 'units','[cost]/[m/s]', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
418 |
AUTODIFF_INI_MODEL_IO |
& 'adjoint meridional ice velocity', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
420 |
AUTODIFF_INI_MODEL_IO |
& 'coordinates','XG YG RC iter', myThid) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
46 |
AUTODIFF_INI_MODEL_IO |
INTEGER myThid |
|
./pkg/autodiff/autodiff_ini_model_io.F |
63 |
AUTODIFF_INI_MODEL_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
85 |
AUTODIFF_INI_MODEL_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_ini_model_io.F |
89 |
AUTODIFF_INI_MODEL_IO |
_END_MASTER( myThid ) |
|
./pkg/autodiff/autodiff_init_varia.F |
12 |
AUTODIFF_INIT_VARIA |
SUBROUTINE AUTODIFF_INIT_VARIA( myThid ) |
|
./pkg/autodiff/autodiff_init_varia.F |
33 |
AUTODIFF_INIT_VARIA |
INTEGER myThid |
|
./pkg/autodiff/autodiff_init_varia.F |
49 |
AUTODIFF_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_init_varia.F |
50 |
AUTODIFF_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_readparms.F |
11 |
AUTODIFF_READPARMS |
SUBROUTINE AUTODIFF_READPARMS( myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
137 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
140 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
143 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
176 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
183 |
AUTODIFF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
189 |
AUTODIFF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
200 |
AUTODIFF_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
205 |
AUTODIFF_READPARMS |
_END_MASTER(myThid) |
|
./pkg/autodiff/autodiff_readparms.F |
24 |
AUTODIFF_READPARMS |
INTEGER myThid |
|
./pkg/autodiff/autodiff_readparms.F |
47 |
AUTODIFF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/autodiff/autodiff_readparms.F |
51 |
AUTODIFF_READPARMS |
_END_MASTER(myThid) |
|
./pkg/autodiff/autodiff_readparms.F |
55 |
AUTODIFF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/autodiff/autodiff_readparms.F |
82 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
86 |
AUTODIFF_READPARMS |
I myThid ) |
|
./pkg/autodiff/autodiff_readparms.F |
93 |
AUTODIFF_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_restore.F |
169 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
170 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
18 |
AUTODIFF_RESTORE |
SUBROUTINE AUTODIFF_RESTORE( myThid ) |
|
./pkg/autodiff/autodiff_restore.F |
215 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
216 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
260 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
261 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
314 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
315 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
349 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
350 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
384 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
385 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
419 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
420 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
455 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
456 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
500 |
AUTODIFF_RESTORE |
IF ( debugMode ) CALL DEBUG_LEAVE('AUTODIFF_RESTORE',myThid) |
|
./pkg/autodiff/autodiff_restore.F |
76 |
AUTODIFF_RESTORE |
INTEGER myThid |
|
./pkg/autodiff/autodiff_restore.F |
87 |
AUTODIFF_RESTORE |
IF ( debugMode ) CALL DEBUG_ENTER('AUTODIFF_RESTORE',myThid) |
|
./pkg/autodiff/autodiff_restore.F |
91 |
AUTODIFF_RESTORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_restore.F |
92 |
AUTODIFF_RESTORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
179 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
180 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
18 |
AUTODIFF_STORE |
SUBROUTINE AUTODIFF_STORE( myThid ) |
|
./pkg/autodiff/autodiff_store.F |
244 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
245 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
300 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
301 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
384 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
385 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
428 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
429 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
472 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
473 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
516 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
517 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
561 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
562 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
619 |
AUTODIFF_STORE |
IF ( debugMode ) CALL DEBUG_LEAVE('AUTODIFF_STORE',myThid) |
|
./pkg/autodiff/autodiff_store.F |
76 |
AUTODIFF_STORE |
INTEGER myThid |
|
./pkg/autodiff/autodiff_store.F |
87 |
AUTODIFF_STORE |
IF ( debugMode ) CALL DEBUG_ENTER('AUTODIFF_STORE',myThid) |
|
./pkg/autodiff/autodiff_store.F |
91 |
AUTODIFF_STORE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/autodiff_store.F |
92 |
AUTODIFF_STORE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/lef_zero.F |
21 |
LEF_ZERO |
INTEGER myThid |
|
./eesupp/src/lef_zero.F |
27 |
LEF_ZERO |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/lef_zero.F |
28 |
LEF_ZERO |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/lef_zero.F |
9 |
LEF_ZERO |
SUBROUTINE LEF_ZERO( arr ,myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
108 |
AUTODIFF_WHTAPEIO_SYNC |
CALL MDSFINDUNIT( tapeFileUnit, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
10 |
AUTODIFF_WHTAPEIO_SYNC |
subroutine AUTODIFF_WHTAPEIO_SYNC( myLev, myStep, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
110 |
AUTODIFF_WHTAPEIO_SYNC |
CALL AUTODIFF_FINDUNIT( tapeFileUnit, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
122 |
AUTODIFF_WHTAPEIO_SYNC |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
151 |
AUTODIFF_WHTAPEIO_SYNC |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
31 |
AUTODIFF_WHTAPEIO_SYNC |
integer myThid |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
80 |
AUTODIFF_WHTAPEIO_SYNC |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
82 |
AUTODIFF_WHTAPEIO_SYNC |
_END_MASTER( myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
90 |
AUTODIFF_WHTAPEIO_SYNC |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*procNyWh,myThid ) |
|
./pkg/autodiff/autodiff_whtapeio_sync.F |
94 |
AUTODIFF_WHTAPEIO_SYNC |
length_of_rec = MDS_RECLEN( filePrec,sNxWh*gloNyWh,myThid) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
119 |
COPY_AD_UV_OUTP |
CALL ADEXCH_UV_3D_RL( wSign,nNz,myThid, uFldOut,vFldOut ) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
121 |
COPY_AD_UV_OUTP |
CALL ADEXCH_UV_3D_RL( uFldOut,vFldOut, wSign,nNz,myThid ) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
13 |
COPY_AD_UV_OUTP |
I nNz, vType, myThid ) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
51 |
COPY_AD_UV_OUTP |
INTEGER myThid |
|
./pkg/autodiff/copy_ad_uv_outp.F |
72 |
COPY_AD_UV_OUTP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
73 |
COPY_AD_UV_OUTP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
85 |
COPY_AD_UV_OUTP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/copy_ad_uv_outp.F |
86 |
COPY_AD_UV_OUTP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/copy_advar_outp.F |
104 |
COPY_ADVAR_OUTP |
CALL ADEXCH_3D_RL( nNz, myThid, outFld ) |
|
./pkg/autodiff/copy_advar_outp.F |
106 |
COPY_ADVAR_OUTP |
CALL ADEXCH_3D_RL( outFld, nNz, myThid ) |
|
./pkg/autodiff/copy_advar_outp.F |
13 |
COPY_ADVAR_OUTP |
I nNz, vType, myThid ) |
|
./pkg/autodiff/copy_advar_outp.F |
44 |
COPY_ADVAR_OUTP |
INTEGER myThid |
|
./pkg/autodiff/copy_advar_outp.F |
65 |
COPY_ADVAR_OUTP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/copy_advar_outp.F |
66 |
COPY_ADVAR_OUTP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/copy_advar_outp.F |
77 |
COPY_ADVAR_OUTP |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/copy_advar_outp.F |
78 |
COPY_ADVAR_OUTP |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/damp_adj.F |
11 |
DAMP_ADJ |
I fieldRef, fieldDamp, myThid ) |
|
./pkg/autodiff/damp_adj.F |
27 |
DAMP_ADJ |
INTEGER NrIn, myThid |
|
./pkg/autodiff/dummy_in_dynamics.F |
31 |
DUMMY_IN_DYNAMICS |
INTEGER myThid |
|
./pkg/autodiff/dummy_in_dynamics.F |
9 |
DUMMY_IN_DYNAMICS |
SUBROUTINE DUMMY_IN_DYNAMICS( myTime, myIter, myThid ) |
|
./eesupp/src/main.F |
118 |
NO PROCEDURE |
INTEGER myThid |
|
./eesupp/src/main.F |
178 |
NO PROCEDURE |
myThid = I |
|
./eesupp/src/main.F |
182 |
NO PROCEDURE |
CALL CHECK_THREADS( myThid ) |
|
./eesupp/src/main.F |
188 |
NO PROCEDURE |
CALL ADMTLM_DSVD(myThid) |
|
./eesupp/src/main.F |
190 |
NO PROCEDURE |
CALL HESSIAN_MAIN(myThid) |
|
./eesupp/src/main.F |
192 |
NO PROCEDURE |
CALL THE_MODEL_MAIN(myThid) |
|
./eesupp/src/main.F |
197 |
NO PROCEDURE |
threadIsComplete(myThid) = .TRUE. |
|
./eesupp/src/main.F |
235 |
PTREENTRY |
I myThid ) |
|
./eesupp/src/main.F |
254 |
PTREENTRY |
INTEGER myThid |
|
./eesupp/src/main.F |
257 |
PTREENTRY |
WRITE(*,*) 'myThid = ', myThid |
|
./eesupp/src/main.F |
258 |
PTREENTRY |
CALL CHECK_THREADS( myThid ) |
|
./eesupp/src/main.F |
262 |
PTREENTRY |
threadIsComplete(myThid) = .TRUE. |
|
./pkg/autodiff/dummy_in_stepping.F |
31 |
DUMMY_IN_STEPPING |
INTEGER myThid |
|
./pkg/autodiff/dummy_in_stepping.F |
9 |
DUMMY_IN_STEPPING |
SUBROUTINE DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
13 |
G_DUMMY_IN_DYNAMICS |
subroutine G_DUMMY_IN_DYNAMICS( myTime, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
47 |
G_DUMMY_IN_DYNAMICS |
INTEGER myThid |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
68 |
G_DUMMY_IN_DYNAMICS |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
75 |
G_DUMMY_IN_DYNAMICS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
85 |
G_DUMMY_IN_DYNAMICS |
& 'G_Jrhoinsitu.',suff, g_rhoinsitu, myIter, myThid) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
87 |
G_DUMMY_IN_DYNAMICS |
& 'G_Jtotphihyd.',suff, g_totphihyd, myIter, myThid) |
|
./pkg/autodiff/g_dummy_in_dynamics.F |
90 |
G_DUMMY_IN_DYNAMICS |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
100 |
G_DUMMY_IN_STEPPING |
& 'G_Juvel.',suff, g_uvel, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
102 |
G_DUMMY_IN_STEPPING |
& 'G_Jvvel.',suff, g_vvel, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
104 |
G_DUMMY_IN_STEPPING |
& 'G_Jwvel.',suff, g_wvel, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
106 |
G_DUMMY_IN_STEPPING |
& 'G_Jetan.',suff, g_etan, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
110 |
G_DUMMY_IN_STEPPING |
& myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
114 |
G_DUMMY_IN_STEPPING |
& myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
118 |
G_DUMMY_IN_STEPPING |
& myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
126 |
G_DUMMY_IN_STEPPING |
& 'G_Jphihyd.',suff, g_totphihyd, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
130 |
G_DUMMY_IN_STEPPING |
endIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
135 |
G_DUMMY_IN_STEPPING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
137 |
G_DUMMY_IN_STEPPING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
139 |
G_DUMMY_IN_STEPPING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
13 |
G_DUMMY_IN_STEPPING |
subroutine G_DUMMY_IN_STEPPING( myTime, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
144 |
G_DUMMY_IN_STEPPING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
147 |
G_DUMMY_IN_STEPPING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
150 |
G_DUMMY_IN_STEPPING |
CALL TIMER_STOP( 'I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
45 |
G_DUMMY_IN_STEPPING |
INTEGER myThid |
|
./pkg/autodiff/g_dummy_in_stepping.F |
72 |
G_DUMMY_IN_STEPPING |
CALL TIMER_START('I/O (WRITE) [ADJOINT LOOP]', myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
79 |
G_DUMMY_IN_STEPPING |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
88 |
G_DUMMY_IN_STEPPING |
beginIOErrCount = IO_ERRCOUNT(myThid) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
90 |
G_DUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RL ( 'G_Jtaux.',suff, g_fu, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
91 |
G_DUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RL ( 'G_Jtauy.',suff, g_fv, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
92 |
G_DUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RL ( 'G_Jqnet.',suff, g_qnet, myIter,myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
93 |
G_DUMMY_IN_STEPPING |
CALL WRITE_FLD_XY_RL ( 'G_Jempr.',suff, g_empmr,myIter,myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
96 |
G_DUMMY_IN_STEPPING |
& 'G_Jtheta.',suff, g_theta, myIter, myThid ) |
|
./pkg/autodiff/g_dummy_in_stepping.F |
98 |
G_DUMMY_IN_STEPPING |
& 'G_Jsalt.',suff, g_salt, myIter, myThid ) |
|
./pkg/autodiff/global_max_ad.F |
101 |
GLOBAL_ADMAX_R4 |
CALL BAR2( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
116 |
GLOBAL_ADMAX_R8 |
I myThid, |
|
./pkg/autodiff/global_max_ad.F |
122 |
GLOBAL_ADMAX_R8 |
I myThid |
|
./pkg/autodiff/global_max_ad.F |
156 |
GLOBAL_ADMAX_R8 |
INTEGER myThid |
|
./pkg/autodiff/global_max_ad.F |
170 |
GLOBAL_ADMAX_R8 |
phiGMR8(1,myThid) = maxPhi |
|
./pkg/autodiff/global_max_ad.F |
173 |
GLOBAL_ADMAX_R8 |
CALL BAR2( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
176 |
GLOBAL_ADMAX_R8 |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
190 |
GLOBAL_ADMAX_R8 |
_END_MASTER( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
193 |
GLOBAL_ADMAX_R8 |
CALL BAR2( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
25 |
GLOBAL_ADMAX_R4 |
I myThid, |
|
./pkg/autodiff/global_max_ad.F |
31 |
GLOBAL_ADMAX_R4 |
I myThid |
|
./pkg/autodiff/global_max_ad.F |
65 |
GLOBAL_ADMAX_R4 |
INTEGER myThid |
|
./pkg/autodiff/global_max_ad.F |
79 |
GLOBAL_ADMAX_R4 |
phiGMR4(1,myThid) = maxPhi |
|
./pkg/autodiff/global_max_ad.F |
82 |
GLOBAL_ADMAX_R4 |
CALL BAR2( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
85 |
GLOBAL_ADMAX_R4 |
_BEGIN_MASTER( myThid ) |
|
./pkg/autodiff/global_max_ad.F |
98 |
GLOBAL_ADMAX_R4 |
_END_MASTER( myThid ) |
|
./pkg/autodiff/global_sum_ad.F |
100 |
GLOBAL_ADSUM_R8 |
CALL GLOBAL_SUM_R8( adsumPhi, myThid ) |
|
./pkg/autodiff/global_sum_ad.F |
19 |
GLOBAL_ADSUM_R4 |
I myThid, |
|
./pkg/autodiff/global_sum_ad.F |
25 |
GLOBAL_ADSUM_R4 |
I myThid |
|
./pkg/autodiff/global_sum_ad.F |
48 |
GLOBAL_ADSUM_R4 |
INTEGER myThid |
|
./pkg/autodiff/global_sum_ad.F |
53 |
GLOBAL_ADSUM_R4 |
CALL GLOBAL_SUM_R4( adsumPhi, myThid ) |
|
./pkg/autodiff/global_sum_ad.F |
65 |
GLOBAL_ADSUM_R8 |
I myThid, |
|
./pkg/autodiff/global_sum_ad.F |
71 |
GLOBAL_ADSUM_R8 |
I myThid |
|
./pkg/autodiff/global_sum_ad.F |
94 |
GLOBAL_ADSUM_R8 |
INTEGER myThid |
|
./pkg/autodiff/global_sum_tile_ad.F |
20 |
GLOBAL_ADSUM_TILE_RL |
I myThid ) |
|
./pkg/autodiff/global_sum_tile_ad.F |
48 |
GLOBAL_ADSUM_TILE_RL |
INTEGER myThid |
|
./pkg/autodiff/global_sum_tile_ad.F |
62 |
GLOBAL_ADSUM_TILE_RL |
CALL GLOBAL_SUM_R8( tmp, myThid ) |
|
./pkg/autodiff/global_sum_tile_ad.F |
65 |
GLOBAL_ADSUM_TILE_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/autodiff/global_sum_tile_ad.F |
66 |
GLOBAL_ADSUM_TILE_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/autodiff/myactivefunction.F |
28 |
NO PROCEDURE |
INTEGER myThid |
|
./pkg/autodiff/myactivefunction_ad.F |
31 |
ADMYACTIVEFUNCTION |
INTEGER myThid |
|
./eesupp/src/master_cpu_io.F |
10 |
NO PROCEDURE |
LOGICAL FUNCTION MASTER_CPU_IO( myThid ) |
|
./eesupp/src/master_cpu_io.F |
27 |
NO PROCEDURE |
INTEGER myThid |
|
./eesupp/src/master_cpu_io.F |
37 |
NO PROCEDURE |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/master_cpu_io.F |
39 |
NO PROCEDURE |
_END_MASTER( myThid ) |
|
./pkg/autodiff/zero_adj.F |
17 |
ZERO_ADJ_1D |
I NrIn, fieldFwd, myThid ) |
|
./pkg/autodiff/zero_adj.F |
34 |
ZERO_ADJ_1D |
INTEGER NrIn, myThid |
|
./pkg/autodiff/zero_adj.F |
46 |
ZERO_ADJ_LOC |
I NrIn, fieldFwd, myThid ) |
|
./pkg/autodiff/zero_adj.F |
63 |
ZERO_ADJ_LOC |
INTEGER NrIn, myThid |
|
./pkg/autodiff/zero_adj.F |
75 |
ZERO_ADJ |
I NrIn, fieldFwd, myThid ) |
|
./pkg/autodiff/zero_adj.F |
92 |
ZERO_ADJ |
INTEGER NrIn, myThid |
|
./pkg/bbl/bbl_calc_rho.F |
102 |
BBL_CALC_RHO |
I Nr, bi, bj, myThid ) |
|
./pkg/bbl/bbl_calc_rho.F |
12 |
BBL_CALC_RHO |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_calc_rho.F |
58 |
BBL_CALC_RHO |
INTEGER myIter, myThid |
|
./pkg/bbl/bbl_calc_rho.F |
76 |
BBL_CALC_RHO |
I k, bi, bj, myThid ) |
|
./pkg/bbl/bbl_calc_rho.F |
85 |
BBL_CALC_RHO |
I kl, bi, bj, myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
11 |
BBL_CALC_RHS |
I myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
30 |
BBL_CALC_RHS |
INTEGER myIter, myThid |
|
./pkg/bbl/bbl_calc_rhs.F |
541 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_eta , myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
542 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_theta , myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
543 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_salt , myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
544 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_TendTheta, myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
545 |
BBL_CALC_RHS |
CALL EXCH_XY_RL( bbl_TendSalt , myThid ) |
|
./pkg/bbl/bbl_calc_rhs.F |
79 |
BBL_CALC_RHS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bbl/bbl_calc_rhs.F |
80 |
BBL_CALC_RHS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bbl/bbl_check.F |
11 |
BBL_CHECK |
SUBROUTINE BBL_CHECK( myThid ) |
|
./pkg/bbl/bbl_check.F |
25 |
BBL_CHECK |
INTEGER myThid |
|
./pkg/bbl/bbl_check.F |
33 |
BBL_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/bbl/bbl_check.F |
49 |
BBL_CHECK |
_END_MASTER(myThid) |
|
./pkg/bbl/bbl_diagnostics_init.F |
11 |
BBL_DIAGNOSTICS_INIT |
SUBROUTINE BBL_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/bbl/bbl_diagnostics_init.F |
24 |
BBL_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/bbl/bbl_diagnostics_init.F |
51 |
BBL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bbl/bbl_diagnostics_init.F |
58 |
BBL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bbl/bbl_diagnostics_init.F |
65 |
BBL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bbl/bbl_diagnostics_init.F |
72 |
BBL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bbl/bbl_diagnostics_init.F |
79 |
BBL_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
12 |
BBL_DIAGNOSTICS_STATE |
I myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
29 |
BBL_DIAGNOSTICS_STATE |
INTEGER myIter, myThid |
|
./pkg/bbl/bbl_diagnostics_state.F |
39 |
BBL_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
41 |
BBL_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
43 |
BBL_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
45 |
BBL_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/bbl/bbl_diagnostics_state.F |
47 |
BBL_DIAGNOSTICS_STATE |
& 0, 1, 0, 1, 1, myThid ) |
|
./pkg/bbl/bbl_init_fixed.F |
11 |
BBL_INIT_FIXED |
SUBROUTINE BBL_INIT_FIXED( myThid ) |
|
./pkg/bbl/bbl_init_fixed.F |
24 |
BBL_INIT_FIXED |
INTEGER myThid |
|
./pkg/bbl/bbl_init_fixed.F |
32 |
BBL_INIT_FIXED |
CALL BBL_DIAGNOSTICS_INIT( myThid ) |
|
./eesupp/src/master_cpu_thread.F |
10 |
NO PROCEDURE |
LOGICAL FUNCTION MASTER_CPU_THREAD( myThid ) |
|
./eesupp/src/master_cpu_thread.F |
28 |
NO PROCEDURE |
INTEGER myThid |
|
./eesupp/src/master_cpu_thread.F |
39 |
NO PROCEDURE |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/master_cpu_thread.F |
41 |
NO PROCEDURE |
_END_MASTER( myThid ) |
|
./eesupp/src/master_cpu_thread.F |
44 |
NO PROCEDURE |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/master_cpu_thread.F |
46 |
NO PROCEDURE |
_END_MASTER( myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
10 |
BBL_INIT_VARIA |
SUBROUTINE BBL_INIT_VARIA( myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
26 |
BBL_INIT_VARIA |
INTEGER myThid |
|
./pkg/bbl/bbl_init_varia.F |
37 |
BBL_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bbl/bbl_init_varia.F |
38 |
BBL_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bbl/bbl_init_varia.F |
58 |
BBL_INIT_VARIA |
& bbl_theta, 0, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
59 |
BBL_INIT_VARIA |
CALL EXCH_XY_RL( bbl_theta, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
63 |
BBL_INIT_VARIA |
& bbl_salt, 0, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
64 |
BBL_INIT_VARIA |
CALL EXCH_XY_RL( bbl_salt, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
68 |
BBL_INIT_VARIA |
& bbl_eta, 0, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
69 |
BBL_INIT_VARIA |
CALL EXCH_XY_RL( bbl_eta, myThid ) |
|
./pkg/bbl/bbl_init_varia.F |
75 |
BBL_INIT_VARIA |
CALL BBL_READ_PICKUP( nIter0, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
101 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
106 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
110 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
11 |
BBL_READ_PICKUP |
SUBROUTINE BBL_READ_PICKUP( myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
126 |
BBL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
128 |
BBL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
130 |
BBL_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
140 |
BBL_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
144 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
152 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
158 |
BBL_READ_PICKUP |
CALL EXCH_XY_RL( bbl_theta, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
159 |
BBL_READ_PICKUP |
CALL EXCH_XY_RL( bbl_salt, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
160 |
BBL_READ_PICKUP |
CALL EXCH_XY_RL( bbl_eta, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
27 |
BBL_READ_PICKUP |
INTEGER myThid |
|
./pkg/bbl/bbl_read_pickup.F |
60 |
BBL_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
71 |
BBL_READ_PICKUP |
I Nr, myIter, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
72 |
BBL_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
77 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
80 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
83 |
BBL_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
92 |
BBL_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_read_pickup.F |
96 |
BBL_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bbl/bbl_readparms.F |
11 |
BBL_READPARMS |
SUBROUTINE BBL_READPARMS( myThid ) |
|
./pkg/bbl/bbl_readparms.F |
24 |
BBL_READPARMS |
INTEGER myThid |
|
./pkg/bbl/bbl_readparms.F |
43 |
BBL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/bbl/bbl_readparms.F |
47 |
BBL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/bbl/bbl_readparms.F |
51 |
BBL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/bbl/bbl_readparms.F |
69 |
BBL_READPARMS |
I myThid ) |
|
./pkg/bbl/bbl_readparms.F |
84 |
BBL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/bbl/bbl_tendency_apply.F |
18 |
BBL_TENDENCY_APPLY_T |
I myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_tendency_apply.F |
46 |
BBL_TENDENCY_APPLY_T |
INTEGER myThid |
|
./pkg/bbl/bbl_tendency_apply.F |
71 |
BBL_TENDENCY_APPLY_S |
I myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_tendency_apply.F |
99 |
BBL_TENDENCY_APPLY_S |
INTEGER myThid |
|
./pkg/bbl/bbl_write_pickup.F |
109 |
BBL_WRITE_PICKUP |
& j, myIter, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
11 |
BBL_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
33 |
BBL_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/bbl/bbl_write_pickup.F |
77 |
BBL_WRITE_PICKUP |
& bbl_theta, -j, myIter, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
82 |
BBL_WRITE_PICKUP |
& bbl_salt, -j, myIter, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
87 |
BBL_WRITE_PICKUP |
& bbl_eta, -j, myIter, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
95 |
BBL_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bbl/bbl_write_pickup.F |
98 |
BBL_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bling/bling_airseaflux.F |
12 |
BLING_AIRSEAFLUX |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_airseaflux.F |
133 |
BLING_AIRSEAFLUX |
I bi,bj,iMin,iMax,jMin,jMax,myThid) |
|
./pkg/bling/bling_airseaflux.F |
175 |
BLING_AIRSEAFLUX |
I i,j,klev,bi,bj,myIter,myThid ) |
|
./pkg/bling/bling_airseaflux.F |
321 |
BLING_AIRSEAFLUX |
& myThid) |
|
./pkg/bling/bling_airseaflux.F |
49 |
BLING_AIRSEAFLUX |
INTEGER myThid |
|
./pkg/bling/bling_carbon_chem.F |
24 |
CALC_PCO2 |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/bling/bling_carbon_chem.F |
335 |
CALC_PCO2_APPROX |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/bling/bling_carbon_chem.F |
378 |
CALC_PCO2_APPROX |
INTEGER myThid |
|
./pkg/bling/bling_carbon_chem.F |
479 |
CARBON_COEFFS |
I bi,bj,iMin,iMax,jMin,jMax,myThid) |
|
./pkg/bling/bling_carbon_chem.F |
535 |
CARBON_COEFFS |
INTEGER myThid |
|
./pkg/bling/bling_carbon_chem.F |
63 |
CALC_PCO2 |
INTEGER myThid |
|
./pkg/bling/bling_carbon_chem.F |
733 |
CARBON_COEFFS_PRESSURE_DEP |
I Klevel,myThid) |
|
./pkg/bling/bling_carbon_chem.F |
795 |
CARBON_COEFFS_PRESSURE_DEP |
INTEGER myThid |
|
./pkg/bling/bling_carbonate_init.F |
113 |
BLING_CARBONATE_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
114 |
BLING_CARBONATE_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
124 |
BLING_CARBONATE_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
125 |
BLING_CARBONATE_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
155 |
BLING_CARBONATE_INIT |
I nIter0, myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
158 |
BLING_CARBONATE_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
159 |
BLING_CARBONATE_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
188 |
BLING_CARBONATE_INIT |
I bi,bj,iMin,iMax,jMin,jMax,k,myThid) |
|
./pkg/bling/bling_carbonate_init.F |
210 |
BLING_CARBONATE_INIT |
I i,j,k,bi,bj, it , myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
33 |
BLING_CARBONATE_INIT |
INTEGER myThid |
|
./pkg/bling/bling_carbonate_init.F |
57 |
BLING_CARBONATE_INIT |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
58 |
BLING_CARBONATE_INIT |
CALL LEF_ZERO( silica1,myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
64 |
BLING_CARBONATE_INIT |
I deltaTclock, startTime, myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
67 |
BLING_CARBONATE_INIT |
_BEGIN_MASTER(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
71 |
BLING_CARBONATE_INIT |
_END_MASTER(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
75 |
BLING_CARBONATE_INIT |
& nIter0,myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
77 |
BLING_CARBONATE_INIT |
& nIter0,myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
82 |
BLING_CARBONATE_INIT |
CALL OFFLINE_FIELDS_LOAD( startTime, nIter0, myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
86 |
BLING_CARBONATE_INIT |
_EXCH_XY_RS(silica0, myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
87 |
BLING_CARBONATE_INIT |
_EXCH_XY_RS(silica1, myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
8 |
BLING_CARBONATE_INIT |
subroutine BLING_CARBONATE_INIT( myThid ) |
|
./pkg/bling/bling_carbonate_init.F |
90 |
BLING_CARBONATE_INIT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_carbonate_init.F |
91 |
BLING_CARBONATE_INIT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_carbonate_sys.F |
101 |
BLING_CARBONATE_SYS |
I k, myThid) |
|
./pkg/bling/bling_carbonate_sys.F |
10 |
BLING_CARBONATE_SYS |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_carbonate_sys.F |
141 |
BLING_CARBONATE_SYS |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/bling/bling_carbonate_sys.F |
35 |
BLING_CARBONATE_SYS |
INTEGER myThid |
|
./pkg/bling/bling_diagnostics_init.F |
105 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
112 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
119 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
126 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
133 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
140 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
147 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
154 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
161 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
170 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
177 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
184 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
191 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
199 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
209 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
216 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
21 |
BLING_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/bling/bling_diagnostics_init.F |
225 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
232 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
239 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
246 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
253 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
260 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
267 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
274 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
281 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
288 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
297 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
304 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
311 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
318 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
325 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
332 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
339 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
346 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
353 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
360 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
367 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
376 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
383 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
390 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
397 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
404 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
411 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
418 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
427 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
42 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
434 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
441 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
448 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
457 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
464 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
471 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
478 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
485 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
492 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
499 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
49 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
506 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
513 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
520 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
527 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
56 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
63 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
70 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
77 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
7 |
BLING_DIAGNOSTICS_INIT |
subroutine BLING_DIAGNOSTICS_INIT(myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
84 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
91 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_diagnostics_init.F |
98 |
BLING_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/bling/bling_dvm.F |
12 |
BLING_DVM |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_dvm.F |
45 |
BLING_DVM |
INTEGER myThid |
|
./pkg/bling/bling_fields_load.F |
106 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
108 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
112 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
114 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
118 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
11 |
BLING_FIELDS_LOAD |
I myIter,myTime,myThid) |
|
./pkg/bling/bling_fields_load.F |
120 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
124 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
126 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
130 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
132 |
BLING_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bling/bling_fields_load.F |
136 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(dicwind0, myThid ) |
|
./pkg/bling/bling_fields_load.F |
137 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(dicwind1, myThid ) |
|
./pkg/bling/bling_fields_load.F |
138 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(atmosp0, myThid ) |
|
./pkg/bling/bling_fields_load.F |
139 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(atmosp1, myThid ) |
|
./pkg/bling/bling_fields_load.F |
140 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(silica0, myThid ) |
|
./pkg/bling/bling_fields_load.F |
141 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(silica1, myThid ) |
|
./pkg/bling/bling_fields_load.F |
142 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(ice0, myThid ) |
|
./pkg/bling/bling_fields_load.F |
143 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(ice1, myThid ) |
|
./pkg/bling/bling_fields_load.F |
144 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(feinput0, myThid ) |
|
./pkg/bling/bling_fields_load.F |
145 |
BLING_FIELDS_LOAD |
_EXCH_XY_RS(feinput1, myThid ) |
|
./pkg/bling/bling_fields_load.F |
148 |
BLING_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
149 |
BLING_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
157 |
BLING_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
158 |
BLING_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
208 |
BLING_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
209 |
BLING_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_fields_load.F |
245 |
BLING_FIELDS_LOAD |
I myTime, myIter, myThid ) |
|
./pkg/bling/bling_fields_load.F |
46 |
BLING_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/bling/bling_fields_load.F |
62 |
BLING_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./pkg/bling/bling_fields_load.F |
64 |
BLING_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/bling/bling_fields_load.F |
65 |
BLING_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/bling/bling_fields_load.F |
68 |
BLING_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/bling/bling_fields_load.F |
74 |
BLING_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/bling/bling_fields_load.F |
94 |
BLING_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/bling/bling_fields_load.F |
99 |
BLING_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/bling/bling_ini_forcing.F |
102 |
BLING_INI_FORCING |
I myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
10 |
BLING_INI_FORCING |
subroutine BLING_INI_FORCING( myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
32 |
BLING_INI_FORCING |
INTEGER myThid |
|
./pkg/bling/bling_ini_forcing.F |
44 |
BLING_INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_ini_forcing.F |
45 |
BLING_INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_ini_forcing.F |
49 |
BLING_INI_FORCING |
CALL LEF_ZERO( dicwind0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
50 |
BLING_INI_FORCING |
CALL LEF_ZERO( dicwind1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
51 |
BLING_INI_FORCING |
CALL LEF_ZERO( atmosp0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
52 |
BLING_INI_FORCING |
CALL LEF_ZERO( atmosp1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
53 |
BLING_INI_FORCING |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
54 |
BLING_INI_FORCING |
CALL LEF_ZERO( silica1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
55 |
BLING_INI_FORCING |
CALL LEF_ZERO( ice0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
56 |
BLING_INI_FORCING |
CALL LEF_ZERO( ice1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
58 |
BLING_INI_FORCING |
CALL LEF_ZERO( par0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
59 |
BLING_INI_FORCING |
CALL LEF_ZERO( par1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
61 |
BLING_INI_FORCING |
CALL LEF_ZERO( feinput0,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
62 |
BLING_INI_FORCING |
CALL LEF_ZERO( feinput1,myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
69 |
BLING_INI_FORCING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bling/bling_ini_forcing.F |
75 |
BLING_INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_ini_forcing.F |
76 |
BLING_INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_init_fixed.F |
25 |
BLING_INIT_FIXED |
INTEGER myThid |
|
./pkg/bling/bling_init_fixed.F |
35 |
BLING_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/bling/bling_init_fixed.F |
73 |
BLING_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/bling/bling_init_fixed.F |
77 |
BLING_INIT_FIXED |
CALL BLING_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/bling/bling_init_fixed.F |
7 |
BLING_INIT_FIXED |
subroutine BLING_INIT_FIXED( myThid ) |
|
./pkg/bling/bling_init_varia.F |
100 |
BLING_INIT_VARIA |
_EXCH_XY_RL(wsink0_2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
104 |
BLING_INIT_VARIA |
& phi_DOM2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
105 |
BLING_INIT_VARIA |
_EXCH_XY_RL(phi_DOM2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
109 |
BLING_INIT_VARIA |
& phi_sm2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
110 |
BLING_INIT_VARIA |
_EXCH_XY_RL(phi_sm2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
114 |
BLING_INIT_VARIA |
& phi_lg2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
115 |
BLING_INIT_VARIA |
_EXCH_XY_RL(phi_lg2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
122 |
BLING_INIT_VARIA |
& phyto_sm(1-OLx,1-OLy,1,1,1),0,myThid) |
|
./pkg/bling/bling_init_varia.F |
123 |
BLING_INIT_VARIA |
_EXCH_XYZ_RL(phyto_sm(1-OLx,1-OLy,1,1,1),myThid) |
|
./pkg/bling/bling_init_varia.F |
127 |
BLING_INIT_VARIA |
& phyto_lg(1-OLx,1-OLy,1,1,1),0,myThid) |
|
./pkg/bling/bling_init_varia.F |
128 |
BLING_INIT_VARIA |
_EXCH_XYZ_RL(phyto_lg(1-OLx,1-OLy,1,1,1),myThid) |
|
./pkg/bling/bling_init_varia.F |
132 |
BLING_INIT_VARIA |
& phyto_diaz(1-OLx,1-OLy,1,1,1),0,myThid) |
|
./pkg/bling/bling_init_varia.F |
133 |
BLING_INIT_VARIA |
_EXCH_XYZ_RL(phyto_diaz(1-OLx,1-OLy,1,1,1),myThid) |
|
./pkg/bling/bling_init_varia.F |
137 |
BLING_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_init_varia.F |
138 |
BLING_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_init_varia.F |
27 |
BLING_INIT_VARIA |
INTEGER myThid |
|
./pkg/bling/bling_init_varia.F |
38 |
BLING_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bling/bling_init_varia.F |
39 |
BLING_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bling/bling_init_varia.F |
69 |
BLING_INIT_VARIA |
CALL READ_FLD_XY_RL( bling_Pc_2dFile, ' ', Pc_2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
70 |
BLING_INIT_VARIA |
_EXCH_XY_RL(Pc_2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
74 |
BLING_INIT_VARIA |
& Pc_2d_diaz, 0, myThid) |
|
./pkg/bling/bling_init_varia.F |
75 |
BLING_INIT_VARIA |
_EXCH_XY_RL(Pc_2d_diaz,myThid) |
|
./pkg/bling/bling_init_varia.F |
79 |
BLING_INIT_VARIA |
& alpha_photo2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
7 |
BLING_INIT_VARIA |
subroutine BLING_INIT_VARIA( myThid ) |
|
./pkg/bling/bling_init_varia.F |
80 |
BLING_INIT_VARIA |
_EXCH_XY_RL(alpha_photo2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
84 |
BLING_INIT_VARIA |
& k_Fe2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
85 |
BLING_INIT_VARIA |
_EXCH_XY_RL(k_Fe2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
89 |
BLING_INIT_VARIA |
& k_Fe_diaz2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
90 |
BLING_INIT_VARIA |
_EXCH_XY_RL(k_Fe_diaz2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
94 |
BLING_INIT_VARIA |
& gamma_POM2d, 0, myThid ) |
|
./pkg/bling/bling_init_varia.F |
95 |
BLING_INIT_VARIA |
_EXCH_XY_RL(gamma_POM2d,myThid) |
|
./pkg/bling/bling_init_varia.F |
99 |
BLING_INIT_VARIA |
& wsink0_2d, 0, myThid ) |
|
./pkg/bling/bling_light.F |
11 |
BLING_LIGHT |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_light.F |
226 |
BLING_LIGHT |
CALL DIAGNOSTICS_FILL(Qsw,'BLGQSW ',0,1,1,bi,bj,myThid) |
|
./pkg/bling/bling_light.F |
227 |
BLING_LIGHT |
CALL DIAGNOSTICS_FILL(irr_inst,'BLGIRRIS',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_light.F |
56 |
BLING_LIGHT |
INTEGER myThid |
|
./pkg/bling/bling_main.F |
13 |
BLING_MAIN |
& myIter, myTime, myThid) |
|
./pkg/bling/bling_main.F |
148 |
BLING_MAIN |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_main.F |
158 |
BLING_MAIN |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_main.F |
172 |
BLING_MAIN |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_main.F |
266 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_DIC ,'BLGBIOC ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
267 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_ALK ,'BLGBIOAL',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
268 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_O2 ,'BLGBIOO2',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
269 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_NO3 ,'BLGBION ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
270 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_PO4 ,'BLGBIOP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
271 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(bio_Fe ,'BLGBIOFE',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
272 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(surf_Fe ,'BLGSURFE',0,1,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
273 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(pH ,'BLGPH3D ',0,Nr,1,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
274 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(OmegaAr ,'BLGOMAR ',0,Nr,1,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
275 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(pCO2 ,'BLGPCO2 ',0,1 ,1,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
276 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(fluxCO2 ,'BLGCFLX ',0,1 ,1,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
277 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(fluxO2 ,'BLGOFLX ',0,1 ,2,bi,bj,myThid) |
|
./pkg/bling/bling_main.F |
279 |
BLING_MAIN |
CALL DIAGNOSTICS_FILL(apco2 ,'BLGapco2',0,1,0,1,1,myThid) |
|
./pkg/bling/bling_main.F |
53 |
BLING_MAIN |
INTEGER myThid |
|
./pkg/bling/bling_mixedlayer.F |
10 |
BLING_MIXEDLAYER |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_mixedlayer.F |
42 |
BLING_MIXEDLAYER |
INTEGER myThid |
|
./pkg/bling/bling_mixedlayer.F |
70 |
BLING_MIXEDLAYER |
I 1, bi, bj, myThid ) |
|
./pkg/bling/bling_mixedlayer.F |
91 |
BLING_MIXEDLAYER |
I k, bi, bj, myThid ) |
|
./pkg/bling/bling_production.F |
17 |
BLING_PROD |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_production.F |
304 |
BLING_PROD |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_production.F |
367 |
BLING_PROD |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_production.F |
59 |
BLING_PROD |
INTEGER myThid |
|
./pkg/bling/bling_production.F |
687 |
BLING_PROD |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_production.F |
698 |
BLING_PROD |
I myIter, myTime, myThid) |
|
./pkg/bling/bling_production.F |
852 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
854 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
856 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
857 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(chl, 'BLGCHL ',0,Nr,1,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
858 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(irr_mem,'BLGIMEM ',0,Nr,1,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
860 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(irrk, 'BLGIRRK ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
861 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(irr_eff, 'BLGIEFF ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
862 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(poc, 'BLGPOC ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
863 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(theta_Fe,'BLGCHL2C',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
864 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(thFe_inv,'BLGC2CHL',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
865 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_lim, 'BLGFELIM',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
866 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(NO3_lim, 'BLGNLIM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
867 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(PO4_lim, 'BLGPLIM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
868 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(light_lim,'BLGLLIM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
869 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(POC_flux,'BLGPOCF ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
870 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(NPP, 'BLGNPP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
871 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(NCP, 'BLGNCP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
872 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_dvm, 'BLGFEDVM',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
873 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_spm, 'BLGFESPM',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
875 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
877 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
878 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(Fe_uptake,'BLGFEUP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
880 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
882 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
883 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_dvm, 'BLGNDVM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
884 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_fix, 'BLGNFIX ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
885 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(DON_prod, 'BLGDONP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
886 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(DON_remin,'BLGDONR ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
887 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_spm, 'BLGNSPM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
888 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_recycle,'BLGNREC ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
889 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_remindvm,'BLGNRD ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
890 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_reminp, 'BLGNREM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
891 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(N_uptake, 'BLGNUP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
892 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_dvm, 'BLGPDVM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
893 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(DOP_prod, 'BLGDOPP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
894 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_spm, 'BLGPSPM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
895 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_recycle,'BLGPREC ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
896 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_remindvm,'BLGPRD ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
897 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_reminp, 'BLGPREM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
898 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(P_uptake, 'BLGPUP ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
899 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(mu, 'BLGMU ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
900 |
BLING_PROD |
CALL DIAGNOSTICS_FILL(mu_diaz, 'BLGMUDIA',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_production.F |
902 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_production.F |
904 |
BLING_PROD |
& myThid) |
|
./pkg/bling/bling_read_pickup.F |
28 |
BLING_READ_PICKUP |
INTEGER myThid |
|
./pkg/bling/bling_read_pickup.F |
50 |
BLING_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
64 |
BLING_READ_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
71 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, pH, 1, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
74 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, irr_mem, 2, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
75 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, chl, 3, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
76 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, phyto_sm, 4, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
77 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, phyto_lg, 5, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
78 |
BLING_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, Nr, phyto_diaz, 6, myIter, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
80 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( pH, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
81 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( irr_mem, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
82 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( chl, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
83 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( phyto_sm, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
84 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( phyto_lg, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
85 |
BLING_READ_PICKUP |
_EXCH_XYZ_RL( phyto_diaz, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
93 |
BLING_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
98 |
BLING_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_read_pickup.F |
9 |
BLING_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/bling/bling_readparms.F |
10 |
BLING_READPARMS |
SUBROUTINE BLING_READPARMS( myThid ) |
|
./pkg/bling/bling_readparms.F |
217 |
BLING_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/bling/bling_readparms.F |
348 |
BLING_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_readparms.F |
351 |
BLING_READPARMS |
O iUnit, myThid ) |
|
./pkg/bling/bling_readparms.F |
367 |
BLING_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_readparms.F |
38 |
BLING_READPARMS |
INTEGER myThid |
|
./pkg/bling/bling_readparms.F |
391 |
BLING_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bling/bling_readparms.F |
396 |
BLING_READPARMS |
_END_MASTER(myThid) |
|
./pkg/bling/bling_remineralization.F |
13 |
BLING_REMIN |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_remineralization.F |
383 |
BLING_REMIN |
& myThid) |
|
./pkg/bling/bling_remineralization.F |
385 |
BLING_REMIN |
& myThid) |
|
./pkg/bling/bling_remineralization.F |
386 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(Fe_sed, 'BLGFESED',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
387 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(Fe_reminp,'BLGFEREM',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
388 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(N_reminp, 'BLGNREM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
389 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(P_reminp, 'BLGPREM ',0,Nr,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
391 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(Fe_burial,'BLGFEBUR',0,1,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
392 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(NO3_sed, 'BLGNSED ',0,1,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
393 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(PO4_sed, 'BLGPSED ',0,1,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
394 |
BLING_REMIN |
CALL DIAGNOSTICS_FILL(O2_sed, 'BLGO2SED',0,1,2,bi,bj,myThid) |
|
./pkg/bling/bling_remineralization.F |
51 |
BLING_REMIN |
INTEGER myThid |
|
./pkg/bling/bling_sgs.F |
42 |
BLING_SGS |
INTEGER myThid |
|
./pkg/bling/bling_sgs.F |
9 |
BLING_SGS |
I myIter, myTime, myThid ) |
|
./pkg/bling/bling_tr_register.F |
11 |
BLING_TR_REGISTER |
I myThid ) |
|
./pkg/bling/bling_tr_register.F |
33 |
BLING_TR_REGISTER |
INTEGER myThid |
|
./pkg/bling/bling_tr_register.F |
50 |
BLING_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_tr_register.F |
54 |
BLING_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_tr_register.F |
62 |
BLING_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
112 |
BLING_WRITE_PICKUP |
& j, myIter, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
33 |
BLING_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/bling/bling_write_pickup.F |
63 |
BLING_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, pH, -j, myIter, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
68 |
BLING_WRITE_PICKUP |
& -j, myIter, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
72 |
BLING_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, chl, -j, myIter, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
77 |
BLING_WRITE_PICKUP |
& myThid ) |
|
./pkg/bling/bling_write_pickup.F |
82 |
BLING_WRITE_PICKUP |
& myThid ) |
|
./pkg/bling/bling_write_pickup.F |
87 |
BLING_WRITE_PICKUP |
& myThid ) |
|
./pkg/bling/bling_write_pickup.F |
8 |
BLING_WRITE_PICKUP |
I suff, myTime, myIter, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
95 |
BLING_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bling/bling_write_pickup.F |
98 |
BLING_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/bulk_force/bulkf_ave.F |
32 |
BULKF_AVE |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_ave.F |
9 |
BULKF_AVE |
SUBROUTINE BULKF_AVE(bi,bj,myThid) |
|
./eesupp/src/mds_flush.F |
10 |
MDS_FLUSH |
SUBROUTINE MDS_FLUSH( ioUnit, myThid ) |
|
./eesupp/src/mds_flush.F |
23 |
MDS_FLUSH |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_fields_load.F |
130 |
BULKF_FIELDS_LOAD |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
131 |
BULKF_FIELDS_LOAD |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
175 |
BULKF_FIELDS_LOAD |
I deltaTclock, myTime, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
177 |
BULKF_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
178 |
BULKF_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
181 |
BULKF_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
186 |
BULKF_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
199 |
BULKF_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
204 |
BULKF_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
209 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
211 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
215 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
217 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
221 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
223 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
227 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
229 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
233 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
235 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
240 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
242 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
246 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
248 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
252 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
254 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
259 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
261 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
265 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
267 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
271 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
273 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
279 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
281 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
287 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
289 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
293 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
295 |
BULKF_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
299 |
BULKF_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
300 |
BULKF_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
315 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(tair0 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
316 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(tair1 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
317 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(qair0 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
318 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(qair1 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
319 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(solar0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
320 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(solar1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
321 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(flwdwn0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
322 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(flwdwn1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
323 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(cloud0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
324 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(cloud1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
325 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(wspeed0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
326 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(wspeed1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
331 |
BULKF_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RS( uwind0, vwind0, .TRUE., 1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
332 |
BULKF_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RS( uwind1, vwind1, .TRUE., 1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
333 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(rain0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
334 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(rain1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
335 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(runoff0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
336 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(runoff1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
337 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(snow0 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
338 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(snow1 , myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
341 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS( thAir0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
342 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS( thAir1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
345 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(qnetch0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
346 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(qnetch1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
347 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(empch0, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
348 |
BULKF_FIELDS_LOAD |
_EXCH_XY_RS(empch1, myThid ) |
|
./pkg/bulk_force/bulkf_fields_load.F |
351 |
BULKF_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
352 |
BULKF_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
361 |
BULKF_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
362 |
BULKF_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_fields_load.F |
51 |
BULKF_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_fields_load.F |
8 |
BULKF_FIELDS_LOAD |
SUBROUTINE BULKF_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_flux_adjust.F |
12 |
BULKF_FLUX_ADJUST |
I myTime, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_flux_adjust.F |
49 |
BULKF_FLUX_ADJUST |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_forcing.F |
10 |
BULKF_FORCING |
I myTime, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
116 |
BULKF_FORCING |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
132 |
BULKF_FORCING |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
265 |
BULKF_FORCING |
& CALL BULKF_AVE( bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_forcing.F |
57 |
BULKF_FORCING |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_forcing.F |
78 |
BULKF_FORCING |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/bulk_force/bulkf_forcing.F |
79 |
BULKF_FORCING |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_forcing.F |
93 |
BULKF_FORCING |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
14 |
BULKF_FORMULA_AIM |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
183 |
BULKF_FORMULA_AIM |
& QDUMMY, dEvp, QSAT0(1,1), myThid ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
185 |
BULKF_FORMULA_AIM |
& QDUMMY, RDUMMY,QSAT0(1,2), myThid ) |
|
./pkg/bulk_force/bulkf_formula_aim.F |
79 |
BULKF_FORMULA_AIM |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
13 |
BULKF_FORMULA_LANL |
I iceornot, myThid ) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
52 |
BULKF_FORMULA_LANL |
INTEGER myThid ! my Thread Id number |
|
./pkg/bulk_force/bulkf_formula_lay.F |
13 |
BULKF_FORMULA_LAY |
I iceornot, i,j,bi,bj,myThid ) |
|
./pkg/bulk_force/bulkf_formula_lay.F |
58 |
BULKF_FORMULA_LAY |
INTEGER myThid ! my Thread Id number |
|
./pkg/bulk_force/bulkf_init_varia.F |
31 |
BULKF_INIT_VARIA |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_init_varia.F |
42 |
BULKF_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_init_varia.F |
43 |
BULKF_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_init_varia.F |
9 |
BULKF_INIT_VARIA |
SUBROUTINE BULKF_INIT_VARIA( myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
101 |
BULKF_OUTPUT |
& BULK_evap_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
103 |
BULKF_OUTPUT |
& BULK_flwup_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
105 |
BULKF_OUTPUT |
& BULK_flwupnet_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
107 |
BULKF_OUTPUT |
& BULK_solar_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
109 |
BULKF_OUTPUT |
& BULK_ssq_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
112 |
BULKF_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_output.F |
113 |
BULKF_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_output.F |
114 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_Qnet_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
115 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_EmPmR_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
116 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_fu_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
117 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_fv_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
118 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_latent_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
119 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_sensible_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
120 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_evap_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
121 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_flwup_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
122 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_flwupnet_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
123 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_solar_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
124 |
BULKF_OUTPUT |
CALL TIMEAVE_RESET( BULK_ssq_Ave, 1, bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
36 |
BULKF_OUTPUT |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_output.F |
55 |
BULKF_OUTPUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/bulk_force/bulkf_output.F |
56 |
BULKF_OUTPUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/bulk_force/bulkf_output.F |
58 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
60 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
62 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
64 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
66 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
68 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
70 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
72 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
74 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
76 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
78 |
BULKF_OUTPUT |
& BULK_timeAve, 1 , bi, bj, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
86 |
BULKF_OUTPUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
89 |
BULKF_OUTPUT |
& BULK_Qnet_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
91 |
BULKF_OUTPUT |
& BULK_EmPmR_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
93 |
BULKF_OUTPUT |
& BULK_fu_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
95 |
BULKF_OUTPUT |
& BULK_fv_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
97 |
BULKF_OUTPUT |
& BULK_latent_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
99 |
BULKF_OUTPUT |
& BULK_sensible_Ave, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_output.F |
9 |
BULKF_OUTPUT |
SUBROUTINE BULKF_OUTPUT( myTime, myIter, myThid ) |
|
./pkg/bulk_force/bulkf_readparms.F |
153 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
157 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
161 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
165 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
173 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
177 |
BULKF_READPARMS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
193 |
BULKF_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
196 |
BULKF_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
261 |
BULKF_READPARMS |
_END_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
26 |
BULKF_READPARMS |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_readparms.F |
69 |
BULKF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
6 |
BULKF_READPARMS |
SUBROUTINE BULKF_READPARMS( myThid ) |
|
./pkg/bulk_force/bulkf_readparms.F |
74 |
BULKF_READPARMS |
_END_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
78 |
BULKF_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/bulk_force/bulkf_readparms.F |
83 |
BULKF_READPARMS |
I myThid ) |
|
./pkg/bulk_force/bulkf_sh2rh_aim.F |
30 |
BULKF_SH2RH_AIM |
INTEGER myThid |
|
./pkg/bulk_force/bulkf_sh2rh_aim.F |
6 |
BULKF_SH2RH_AIM |
SUBROUTINE BULKF_SH2RH_AIM(IMODE,NGP,TA,PS,SIG,QA,RH,QSAT,myThid) |
|
./eesupp/src/mds_reclen.F |
25 |
NO PROCEDURE |
INTEGER myThid |
|
./eesupp/src/mds_reclen.F |
38 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/mds_reclen.F |
41 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/mds_reclen.F |
6 |
NO PROCEDURE |
INTEGER FUNCTION MDS_RECLEN( filePrec, nnn, myThid ) |
|
./pkg/cal/cal_addtime.F |
10 |
CAL_ADDTIME |
I myThid ) |
|
./pkg/cal/cal_addtime.F |
145 |
CAL_ADDTIME |
call CAL_CONVDATE( date,yi,mi,di,si,li,wi,myThid ) |
|
./pkg/cal/cal_addtime.F |
180 |
CAL_ADDTIME |
if ((mi.gt.2.and.cal_IsLeap(yi+1,myThid).eq.2).or. |
|
./pkg/cal/cal_addtime.F |
181 |
CAL_ADDTIME |
& (mi.le.2.and.cal_IsLeap(yi,myThid).eq.2) ) |
|
./pkg/cal/cal_addtime.F |
187 |
CAL_ADDTIME |
if ((mi.gt.2.and.cal_IsLeap(yi+1,myThid).eq.2).or. |
|
./pkg/cal/cal_addtime.F |
188 |
CAL_ADDTIME |
& (mi.le.2.and.cal_IsLeap(yi,myThid).eq.2) ) |
|
./pkg/cal/cal_addtime.F |
191 |
CAL_ADDTIME |
li = cal_IsLeap( yi, myThid ) |
|
./pkg/cal/cal_addtime.F |
203 |
CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, myThid ) |
|
./pkg/cal/cal_addtime.F |
221 |
CAL_ADDTIME |
if (switch .eq. 1) li = cal_IsLeap( yi, myThid ) |
|
./pkg/cal/cal_addtime.F |
45 |
CAL_ADDTIME |
INTEGER myThid |
|
./pkg/cal/cal_addtime.F |
71 |
CAL_ADDTIME |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_addtime.F |
74 |
CAL_ADDTIME |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_addtime.F |
77 |
CAL_ADDTIME |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_addtime.F |
83 |
CAL_ADDTIME |
call CAL_PRINTERROR( ierr, myThid) |
|
./pkg/cal/cal_checkdate.F |
10 |
CAL_CHECKDATE |
I myThid ) |
|
./pkg/cal/cal_checkdate.F |
111 |
CAL_CHECKDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_checkdate.F |
129 |
CAL_CHECKDATE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_checkdate.F |
135 |
CAL_CHECKDATE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_checkdate.F |
141 |
CAL_CHECKDATE |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_checkdate.F |
42 |
CAL_CHECKDATE |
INTEGER myThid |
|
./pkg/cal/cal_checkdate.F |
70 |
CAL_CHECKDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_checkdate.F |
73 |
CAL_CHECKDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_checkdate.F |
90 |
CAL_CHECKDATE |
CALL CAL_CONVDATE( date, yy, mm, dd, nsecs, lp, wd, myThid ) |
|
./pkg/cal/cal_checkdate.F |
94 |
CAL_CHECKDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_convdate.F |
10 |
CAL_CONVDATE |
I myThid ) |
|
./pkg/cal/cal_convdate.F |
42 |
CAL_CONVDATE |
INTEGER myThid |
|
./pkg/cal/cal_convdate.F |
56 |
CAL_CONVDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_convdate.F |
59 |
CAL_CONVDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_convdate.F |
70 |
CAL_CONVDATE |
call CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_fulldate.F |
103 |
CAL_FULLDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_fulldate.F |
10 |
CAL_FULLDATE |
I myThid ) |
|
./pkg/cal/cal_fulldate.F |
42 |
CAL_FULLDATE |
INTEGER myThid |
|
./pkg/cal/cal_fulldate.F |
64 |
CAL_FULLDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_fulldate.F |
67 |
CAL_FULLDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_fulldate.F |
72 |
CAL_FULLDATE |
CALL CAL_CHECKDATE( date, valid, calerr, myThid ) |
|
./pkg/cal/cal_fulldate.F |
76 |
CAL_FULLDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_fulldate.F |
77 |
CAL_FULLDATE |
CALL CAL_PRINTERROR( calerr, myThid ) |
|
./pkg/cal/cal_fulldate.F |
83 |
CAL_FULLDATE |
date(3) = cal_IsLeap( theyear, myThid ) |
|
./pkg/cal/cal_fulldate.F |
86 |
CAL_FULLDATE |
CALL CAL_TIMEPASSED( refDate, date, numberOfDays, myThid ) |
|
./eesupp/src/mdsfindunit.F |
22 |
MDSFINDUNIT |
INTEGER myThid |
|
./eesupp/src/mdsfindunit.F |
49 |
MDSFINDUNIT |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/mdsfindunit.F |
52 |
MDSFINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/mdsfindunit.F |
66 |
MDSFINDUNIT |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/mdsfindunit.F |
6 |
MDSFINDUNIT |
SUBROUTINE MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/cal/cal_getdate.F |
10 |
CAL_GETDATE |
I myThid ) |
|
./pkg/cal/cal_getdate.F |
42 |
CAL_GETDATE |
INTEGER myThid |
|
./pkg/cal/cal_getdate.F |
62 |
CAL_GETDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_getdate.F |
65 |
CAL_GETDATE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_getdate.F |
90 |
CAL_GETDATE |
CALL CAL_TIMEINTERVAL( secs, 'secs', workdate, myThid ) |
|
./pkg/cal/cal_getdate.F |
91 |
CAL_GETDATE |
CALL CAL_ADDTIME( modelStartDate, workdate, mydate, myThid ) |
|
./pkg/cal/cal_init_fixed.F |
11 |
CAL_INIT_FIXED |
SUBROUTINE CAL_INIT_FIXED( myThid ) |
|
./pkg/cal/cal_init_fixed.F |
24 |
CAL_INIT_FIXED |
INTEGER myThid |
|
./pkg/cal/cal_init_fixed.F |
31 |
CAL_INIT_FIXED |
IF (debugMode) CALL DEBUG_ENTER('CAL_INIT_FIXED',myThid) |
|
./pkg/cal/cal_init_fixed.F |
40 |
CAL_INIT_FIXED |
I myThid ) |
|
./pkg/cal/cal_init_fixed.F |
42 |
CAL_INIT_FIXED |
CALL CAL_SUMMARY( myThid ) |
|
./pkg/cal/cal_init_fixed.F |
45 |
CAL_INIT_FIXED |
IF (debugMode) CALL DEBUG_LEAVE('CAL_INIT_FIXED',myThid) |
|
./pkg/cal/cal_isleap.F |
37 |
NO PROCEDURE |
INTEGER myThid |
|
./pkg/cal/cal_isleap.F |
46 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_isleap.F |
49 |
NO PROCEDURE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_isleap.F |
8 |
NO PROCEDURE |
I myThid ) |
|
./pkg/cal/cal_printdate.F |
62 |
CAL_PRINTDATE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_printdate.F |
68 |
CAL_PRINTDATE |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_readparms.F |
111 |
CAL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/cal/cal_readparms.F |
117 |
CAL_READPARMS |
IF (debugMode) CALL DEBUG_LEAVE('CAL_READPARMS',myThid) |
|
./pkg/cal/cal_readparms.F |
53 |
CAL_READPARMS |
INTEGER myThid |
|
./pkg/cal/cal_readparms.F |
68 |
CAL_READPARMS |
IF (debugMode) CALL DEBUG_ENTER('CAL_READPARMS',myThid) |
|
./pkg/cal/cal_readparms.F |
6 |
CAL_READPARMS |
SUBROUTINE CAL_READPARMS( myThid ) |
|
./pkg/cal/cal_readparms.F |
73 |
CAL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/cal/cal_readparms.F |
78 |
CAL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/cal/cal_readparms.F |
82 |
CAL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/cal/cal_readparms.F |
99 |
CAL_READPARMS |
I myThid ) |
|
./pkg/cal/cal_set.F |
116 |
CAL_SET |
CALL CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_set.F |
206 |
CAL_SET |
CALL CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_set.F |
211 |
CAL_SET |
CALL CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_set.F |
216 |
CAL_SET |
CALL CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_set.F |
227 |
CAL_SET |
& modelBaseDate, myThid ) |
|
./pkg/cal/cal_set.F |
239 |
CAL_SET |
CALL CAL_TIMEINTERVAL( iterinisecs, 'secs', iterinitime, myThid ) |
|
./pkg/cal/cal_set.F |
241 |
CAL_SET |
& myThid ) |
|
./pkg/cal/cal_set.F |
243 |
CAL_SET |
CALL CAL_TIMEINTERVAL( runtimesecs, 'secs', timediff, myThid ) |
|
./pkg/cal/cal_set.F |
245 |
CAL_SET |
& myThid ) |
|
./pkg/cal/cal_set.F |
250 |
CAL_SET |
_END_MASTER(myThid) |
|
./pkg/cal/cal_set.F |
71 |
CAL_SET |
INTEGER myThid |
|
./pkg/cal/cal_set.F |
85 |
CAL_SET |
_BEGIN_MASTER(myThid) |
|
./pkg/cal/cal_set.F |
9 |
CAL_SET |
I myThid ) |
|
./pkg/cal/cal_subdates.F |
10 |
CAL_SUBDATES |
I myThid ) |
|
./pkg/cal/cal_subdates.F |
41 |
CAL_SUBDATES |
INTEGER myThid |
|
./pkg/cal/cal_subdates.F |
53 |
CAL_SUBDATES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_subdates.F |
56 |
CAL_SUBDATES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_subdates.F |
59 |
CAL_SUBDATES |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_subdates.F |
72 |
CAL_SUBDATES |
call CAL_ADDTIME( finaldate, workdate, diffdate, myThid ) |
|
./pkg/cal/cal_subdates.F |
76 |
CAL_SUBDATES |
& initialdate, finaldate, diffdate, myThid ) |
|
./pkg/cal/cal_subdates.F |
81 |
CAL_SUBDATES |
call CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_summary.F |
134 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
138 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
142 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
146 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
149 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
151 |
CAL_SUMMARY |
_END_MASTER(myThid) |
|
./pkg/cal/cal_summary.F |
34 |
CAL_SUMMARY |
INTEGER myThid |
|
./pkg/cal/cal_summary.F |
52 |
CAL_SUMMARY |
_BEGIN_MASTER(myThid) |
|
./pkg/cal/cal_summary.F |
54 |
CAL_SUMMARY |
numcalyears = cal_IntYears ( myThid ) |
|
./pkg/cal/cal_summary.F |
55 |
CAL_SUMMARY |
numcalmonths = cal_IntMonths( myThid ) |
|
./pkg/cal/cal_summary.F |
56 |
CAL_SUMMARY |
numcaldays = cal_IntDays ( myThid ) |
|
./pkg/cal/cal_summary.F |
60 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
64 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
68 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
72 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
75 |
CAL_SUMMARY |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cal/cal_summary.F |
7 |
CAL_SUMMARY |
I myThid ) |
|
./pkg/cal/cal_time2dump.F |
27 |
CAL_TIME2DUMP |
INTEGER myThid |
|
./pkg/cal/cal_time2dump.F |
44 |
CAL_TIME2DUMP |
CALL CAL_GETDATE( myIter, shTime, thisDate, myThid ) |
|
./pkg/cal/cal_time2dump.F |
45 |
CAL_TIME2DUMP |
CALL CAL_GETDATE( myIter, prTime, prevDate, myThid ) |
|
./pkg/cal/cal_time2dump.F |
9 |
CAL_TIME2DUMP |
I myTime, myIter, myThid ) |
|
./pkg/cal/cal_timeinterval.F |
10 |
CAL_TIMEINTERVAL |
I myThid ) |
|
./pkg/cal/cal_timeinterval.F |
44 |
CAL_TIMEINTERVAL |
INTEGER myThid |
|
./pkg/cal/cal_timeinterval.F |
65 |
CAL_TIMEINTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timeinterval.F |
68 |
CAL_TIMEINTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timeinterval.F |
81 |
CAL_TIMEINTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timeinterval.F |
84 |
CAL_TIMEINTERVAL |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timeinterval.F |
94 |
CAL_TIMEINTERVAL |
call CAL_PRINTERROR( ierr, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
116 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
121 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
12 |
NML_CHANGE_SYNTAX |
I data_file, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
146 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
151 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
202 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
207 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
223 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
228 |
NML_CHANGE_SYNTAX |
CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/nml_change_syntax.F |
44 |
NML_CHANGE_SYNTAX |
INTEGER myThid |
|
./pkg/cal/cal_timepassed.F |
10 |
CAL_TIMEPASSED |
I myThid ) |
|
./pkg/cal/cal_timepassed.F |
114 |
CAL_TIMEPASSED |
call CAL_CONVDATE( finaldate,yi,mi,di,si,li,wi,myThid ) |
|
./pkg/cal/cal_timepassed.F |
115 |
CAL_TIMEPASSED |
call CAL_CONVDATE( initialdate,yf,mf,df,sf,lf,wf,myThid ) |
|
./pkg/cal/cal_timepassed.F |
117 |
CAL_TIMEPASSED |
call CAL_CONVDATE( initialdate,yi,mi,di,si,li,wi,myThid ) |
|
./pkg/cal/cal_timepassed.F |
118 |
CAL_TIMEPASSED |
call CAL_CONVDATE( finaldate,yf,mf,df,sf,lf,wf,myThid ) |
|
./pkg/cal/cal_timepassed.F |
155 |
CAL_TIMEPASSED |
ndays = (ndaysnoleap - 1) + cal_IsLeap( yi, myThid ) - |
|
./pkg/cal/cal_timepassed.F |
159 |
CAL_TIMEPASSED |
& cal_IsLeap( iyr, myThid ) |
|
./pkg/cal/cal_timepassed.F |
186 |
CAL_TIMEPASSED |
call CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_timepassed.F |
41 |
CAL_TIMEPASSED |
INTEGER myThid |
|
./pkg/cal/cal_timepassed.F |
72 |
CAL_TIMEPASSED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timepassed.F |
75 |
CAL_TIMEPASSED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_timepassed.F |
78 |
CAL_TIMEPASSED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_toseconds.F |
48 |
CAL_TOSECONDS |
INTEGER myThid |
|
./pkg/cal/cal_toseconds.F |
62 |
CAL_TOSECONDS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_toseconds.F |
65 |
CAL_TOSECONDS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cal/cal_toseconds.F |
96 |
CAL_TOSECONDS |
call CAL_PRINTERROR( ierr, myThid ) |
|
./pkg/cal/cal_toseconds.F |
9 |
CAL_TOSECONDS |
I myThid ) |
|
./pkg/cd_code/cd_code_ini_vars.F |
17 |
CD_CODE_INI_VARS |
INTEGER myThid |
|
./pkg/cd_code/cd_code_ini_vars.F |
30 |
CD_CODE_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cd_code/cd_code_ini_vars.F |
31 |
CD_CODE_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cd_code/cd_code_ini_vars.F |
56 |
CD_CODE_INI_VARS |
CALL CD_CODE_READ_PICKUP( nIter0, myThid ) |
|
./pkg/cd_code/cd_code_ini_vars.F |
6 |
CD_CODE_INI_VARS |
SUBROUTINE CD_CODE_INI_VARS( myThid ) |
|
./pkg/cd_code/cd_code_init_fixed.F |
16 |
CD_CODE_INIT_FIXED |
INTEGER myThid |
|
./pkg/cd_code/cd_code_init_fixed.F |
28 |
CD_CODE_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
30 |
CD_CODE_INIT_FIXED |
& myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
32 |
CD_CODE_INIT_FIXED |
& 'CD_CODE_u_velocity', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
34 |
CD_CODE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
37 |
CD_CODE_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
39 |
CD_CODE_INIT_FIXED |
& myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
41 |
CD_CODE_INIT_FIXED |
& 'CD_CODE_v_velocity', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
43 |
CD_CODE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
46 |
CD_CODE_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
48 |
CD_CODE_INIT_FIXED |
& myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
50 |
CD_CODE_INIT_FIXED |
& 'CD_CODE_u_velocity_at_n-1', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
52 |
CD_CODE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
55 |
CD_CODE_INIT_FIXED |
& 4,5, myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
57 |
CD_CODE_INIT_FIXED |
& myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
59 |
CD_CODE_INIT_FIXED |
& 'CD_CODE_u_velocity_at_n-1', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
61 |
CD_CODE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
64 |
CD_CODE_INIT_FIXED |
& 3,4, myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
66 |
CD_CODE_INIT_FIXED |
& myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
68 |
CD_CODE_INIT_FIXED |
& 'CD_CODE_ssh_at_n-1', myThid) |
|
./pkg/cd_code/cd_code_init_fixed.F |
6 |
CD_CODE_INIT_FIXED |
SUBROUTINE CD_CODE_INIT_FIXED( myThid ) |
|
./pkg/cd_code/cd_code_init_fixed.F |
70 |
CD_CODE_INIT_FIXED |
& 'coordinates','XC YC RC iter', myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
11 |
CD_CODE_READ_PICKUP |
SUBROUTINE CD_CODE_READ_PICKUP( myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
28 |
CD_CODE_READ_PICKUP |
INTEGER myThid |
|
./pkg/cd_code/cd_code_read_pickup.F |
43 |
CD_CODE_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
56 |
CD_CODE_READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
57 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
58 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
59 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
60 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'uVelD',uVelD, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
61 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'vVelD',vVelD, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
62 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Unm1',Unm1, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
63 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'Vnm1',Vnm1, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
64 |
CD_CODE_READ_PICKUP |
CALL MNC_CW_RL_R('D',fn,0,0,'etaNm1', etaNm1, myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
71 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, uVelD, 1, myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
72 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, vVelD, 2, myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
73 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, uNM1, 3, myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
74 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL( fn, prec, Nr, vNM1, 4, myIter, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
76 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec, 1, etaNm1,6*Nr+1,myIter,myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
78 |
CD_CODE_READ_PICKUP |
CALL READ_REC_3D_RL(fn,prec, 1, etaNm1,4*Nr+1,myIter,myThid) |
|
./pkg/cd_code/cd_code_read_pickup.F |
83 |
CD_CODE_READ_PICKUP |
CALL EXCH_UV_DGRID_3D_RL( uVelD,vVelD, .TRUE., Nr, myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
84 |
CD_CODE_READ_PICKUP |
CALL EXCH_UV_XYZ_RL( uNM1,vNM1, .TRUE., myThid ) |
|
./pkg/cd_code/cd_code_read_pickup.F |
85 |
CD_CODE_READ_PICKUP |
CALL EXCH_XY_RL( etaNm1, myThid ) |
|
./pkg/cd_code/cd_code_scheme.F |
13 |
CD_CODE_SCHEME |
I myTime, myIter, myThid) |
|
./pkg/cd_code/cd_code_scheme.F |
50 |
CD_CODE_SCHEME |
INTEGER myThid |
|
./pkg/cd_code/cd_code_write_pickup.F |
13 |
CD_CODE_WRITE_PICKUP |
I myTime, myIter, myThid ) |
|
./pkg/cd_code/cd_code_write_pickup.F |
38 |
CD_CODE_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/cd_code/cd_code_write_pickup.F |
57 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
59 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, -1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
61 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
63 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
64 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'uVelD',uVelD, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
65 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'vVelD',vVelD, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
66 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Unm1',Unm1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
67 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'Vnm1',Vnm1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
68 |
CD_CODE_WRITE_PICKUP |
CALL MNC_CW_RL_W('D',fn,0,0,'etaNm1', etaNm1, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
69 |
CD_CODE_WRITE_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(fn, myThid) |
|
./pkg/cd_code/cd_code_write_pickup.F |
78 |
CD_CODE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, uVelD, 1, myIter, myThid ) |
|
./pkg/cd_code/cd_code_write_pickup.F |
79 |
CD_CODE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, vVelD, 2, myIter, myThid ) |
|
./pkg/cd_code/cd_code_write_pickup.F |
80 |
CD_CODE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, uNM1, 3, myIter, myThid ) |
|
./pkg/cd_code/cd_code_write_pickup.F |
81 |
CD_CODE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, Nr, vNM1, 4, myIter, myThid ) |
|
./pkg/cd_code/cd_code_write_pickup.F |
82 |
CD_CODE_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, 1,etaNm1,4*Nr+1,myIter,myThid) |
|
./pkg/cfc/cfc11_forcing.F |
104 |
CFC11_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc11_forcing.F |
109 |
CFC11_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc11_forcing.F |
114 |
CFC11_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc11_forcing.F |
158 |
CFC11_FORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc11_forcing.F |
22 |
CFC11_FORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc11_forcing.F |
55 |
CFC11_FORCING |
INTEGER myThid |
|
./pkg/cfc/cfc11_forcing.F |
89 |
CFC11_FORCING |
I deltaTclock, cfcTime, myThid ) |
|
./pkg/cfc/cfc11_surfforcing.F |
13 |
CFC11_SURFFORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc11_surfforcing.F |
48 |
CFC11_SURFFORCING |
INTEGER myIter, myThid |
|
./eesupp/src/open_copy_data_file.F |
112 |
OPEN_COPY_DATA_FILE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
114 |
OPEN_COPY_DATA_FILE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
123 |
OPEN_COPY_DATA_FILE |
CALL NML_CHANGE_SYNTAX( RECORD, data_file, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
12 |
OPEN_COPY_DATA_FILE |
I myThid ) |
|
./eesupp/src/open_copy_data_file.F |
135 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
138 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
142 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
150 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
156 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
179 |
OPEN_COPY_DATA_FILE |
_END_MASTER(myThid) |
|
./eesupp/src/open_copy_data_file.F |
39 |
OPEN_COPY_DATA_FILE |
INTEGER myThid |
|
./eesupp/src/open_copy_data_file.F |
62 |
OPEN_COPY_DATA_FILE |
_BEGIN_MASTER(myThid) |
|
./eesupp/src/open_copy_data_file.F |
70 |
OPEN_COPY_DATA_FILE |
& SQUEEZE_RIGHT, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
74 |
OPEN_COPY_DATA_FILE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/open_copy_data_file.F |
76 |
OPEN_COPY_DATA_FILE |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
105 |
CFC12_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
110 |
CFC12_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
115 |
CFC12_FORCING |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
159 |
CFC12_FORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
22 |
CFC12_FORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc12_forcing.F |
56 |
CFC12_FORCING |
INTEGER myThid |
|
./pkg/cfc/cfc12_forcing.F |
90 |
CFC12_FORCING |
I deltaTclock, cfcTime, myThid ) |
|
./pkg/cfc/cfc12_surfforcing.F |
13 |
CFC12_SURFFORCING |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc12_surfforcing.F |
48 |
CFC12_SURFFORCING |
INTEGER myIter, myThid |
|
./pkg/cfc/cfc_atmos.F |
106 |
CFC_ATMOS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
110 |
CFC_ATMOS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
116 |
CFC_ATMOS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
122 |
CFC_ATMOS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
124 |
CFC_ATMOS |
_END_MASTER(myThid) |
|
./pkg/cfc/cfc_atmos.F |
30 |
CFC_ATMOS |
INTEGER myThid |
|
./pkg/cfc/cfc_atmos.F |
45 |
CFC_ATMOS |
_BEGIN_MASTER( myThid ) |
|
./pkg/cfc/cfc_atmos.F |
52 |
CFC_ATMOS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
60 |
CFC_ATMOS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
64 |
CFC_ATMOS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
69 |
CFC_ATMOS |
CALL MDSFINDUNIT( iUnit, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
92 |
CFC_ATMOS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
95 |
CFC_ATMOS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_atmos.F |
9 |
CFC_ATMOS |
SUBROUTINE CFC_ATMOS( myThid ) |
|
./pkg/cfc/cfc_check.F |
105 |
CFC_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_check.F |
113 |
CFC_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_check.F |
123 |
CFC_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_check.F |
126 |
CFC_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_check.F |
133 |
CFC_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cfc/cfc_check.F |
139 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
141 |
CFC_CHECK |
_END_MASTER(myThid) |
|
./pkg/cfc/cfc_check.F |
30 |
CFC_CHECK |
INTEGER myThid |
|
./pkg/cfc/cfc_check.F |
43 |
CFC_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/cfc/cfc_check.F |
47 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
53 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
55 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
58 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
92 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
94 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
97 |
CFC_CHECK |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_check.F |
9 |
CFC_CHECK |
SUBROUTINE CFC_CHECK( myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
111 |
CFC_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
116 |
CFC_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
123 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
125 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
129 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
131 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
136 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
138 |
CFC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
142 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(wind0, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
143 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(wind1, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
145 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(atmosp0, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
146 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(atmosp1, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
148 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(ice0, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
149 |
CFC_FIELDS_LOAD |
_EXCH_XY_RS(ice1, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
153 |
CFC_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
154 |
CFC_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
165 |
CFC_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
166 |
CFC_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
16 |
CFC_FIELDS_LOAD |
I myTime, myIter, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
49 |
CFC_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/cfc/cfc_fields_load.F |
63 |
CFC_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
64 |
CFC_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
68 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( wind0,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
69 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( wind1,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
70 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( atmosp0,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
71 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( atmosp1,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
72 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( ice0,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
73 |
CFC_FIELDS_LOAD |
CALL LEF_ZERO( ice1,myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
80 |
CFC_FIELDS_LOAD |
I deltaTclock, myTime, myThid ) |
|
./pkg/cfc/cfc_fields_load.F |
82 |
CFC_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
83 |
CFC_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
86 |
CFC_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/cfc/cfc_fields_load.F |
91 |
CFC_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/cfc/cfc_param.F |
23 |
CFC_PARAM |
INTEGER myThid |
|
./pkg/cfc/cfc_param.F |
30 |
CFC_PARAM |
_BEGIN_MASTER( myThid ) |
|
./pkg/cfc/cfc_param.F |
61 |
CFC_PARAM |
_END_MASTER( myThid ) |
|
./pkg/cfc/cfc_param.F |
7 |
CFC_PARAM |
SUBROUTINE CFC_PARAM( myThid ) |
|
./eesupp/src/print.F |
108 |
PRINT_MESSAGE |
_BEGIN_CRIT(myThid) |
|
./eesupp/src/print.F |
111 |
PRINT_MESSAGE |
WRITE(idString,'(I4.4,A,I4.4)') myProcId,'.',myThid |
|
./eesupp/src/print.F |
120 |
PRINT_MESSAGE |
CALL MDS_FLUSH( unit, myThid ) |
|
./eesupp/src/print.F |
124 |
PRINT_MESSAGE |
ioErrorCount(myThid) = ioErrorCount(myThid)+1 |
|
./eesupp/src/print.F |
130 |
PRINT_MESSAGE |
_END_CRIT(myThid) |
|
./eesupp/src/print.F |
137 |
PRINT_MESSAGE |
IF ( numberOfProcs .EQ. 1 .AND. myThid .EQ. 1 |
|
./eesupp/src/print.F |
143 |
PRINT_MESSAGE |
WRITE(0,'(A,I4.4,A,A)') '(TID ', myThid, ') ', |
|
./eesupp/src/print.F |
156 |
PRINT_ERROR |
SUBROUTINE PRINT_ERROR( message , myThid ) |
|
./eesupp/src/print.F |
189 |
PRINT_ERROR |
INTEGER myThid |
|
./eesupp/src/print.F |
227 |
PRINT_ERROR |
_BEGIN_CRIT(myThid) |
|
./eesupp/src/print.F |
232 |
PRINT_ERROR |
WRITE(idString,'(I4.4,A,I4.4)') myProcId,'.',myThid |
|
./eesupp/src/print.F |
246 |
PRINT_ERROR |
CALL MDS_FLUSH( errorMessageUnit, myThid ) |
|
./eesupp/src/print.F |
250 |
PRINT_ERROR |
ioErrorCount(myThid) = ioErrorCount(myThid)+1 |
|
./eesupp/src/print.F |
259 |
PRINT_ERROR |
WRITE(0,'(A,I4.4,A,A)') '(TID ', myThid, ') ', |
|
./eesupp/src/print.F |
269 |
PRINT_ERROR |
_END_CRIT(myThid) |
|
./eesupp/src/print.F |
26 |
PRINT_MESSAGE |
SUBROUTINE PRINT_MESSAGE( message, unit, sq , myThid ) |
|
./eesupp/src/print.F |
61 |
PRINT_MESSAGE |
INTEGER myThid |
|
./pkg/cfc/cfc_readparms.F |
106 |
CFC_READPARMS |
_END_MASTER(myThid) |
|
./pkg/cfc/cfc_readparms.F |
34 |
CFC_READPARMS |
INTEGER myThid |
|
./pkg/cfc/cfc_readparms.F |
55 |
CFC_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/cfc/cfc_readparms.F |
71 |
CFC_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_readparms.F |
74 |
CFC_READPARMS |
O iUnit, myThid ) |
|
./pkg/cfc/cfc_readparms.F |
84 |
CFC_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_readparms.F |
9 |
CFC_READPARMS |
SUBROUTINE CFC_READPARMS( myThid ) |
|
./pkg/cfc/cfc_tr_register.F |
11 |
CFC_TR_REGISTER |
I myThid ) |
|
./pkg/cfc/cfc_tr_register.F |
34 |
CFC_TR_REGISTER |
INTEGER myThid |
|
./pkg/cfc/cfc_tr_register.F |
47 |
CFC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_tr_register.F |
51 |
CFC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cfc/cfc_tr_register.F |
56 |
CFC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
109 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( Tair, 'CH_TAIR ', 0,1,0,1,1, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
111 |
CHEAPAML |
& CALL DIAGNOSTICS_FILL( Qair, 'CH_QAIR ', 0,1,0,1,1, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
116 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
117 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
138 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
139 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
158 |
CHEAPAML |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
164 |
CHEAPAML |
I startAB, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
169 |
CHEAPAML |
I nt, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
174 |
CHEAPAML |
_EXCH_XY_RL(Tair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
178 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
179 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
196 |
CHEAPAML |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
202 |
CHEAPAML |
I startAB, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
207 |
CHEAPAML |
I nt, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
212 |
CHEAPAML |
_EXCH_XY_RL(qair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
217 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
218 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
235 |
CHEAPAML |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
241 |
CHEAPAML |
I startAB, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
246 |
CHEAPAML |
I nt, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
251 |
CHEAPAML |
_EXCH_XY_RL(Cheaptracer,myThid) |
|
./pkg/cheapaml/cheapaml.F |
256 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
257 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
262 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
268 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
275 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
285 |
CHEAPAML |
CALL WRITE_FLD_XY_RL('tAir_afAdv.', sufx, Tair, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
287 |
CHEAPAML |
& CALL WRITE_FLD_XY_RL('qAir_afAdv.', sufx, qair, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
298 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
299 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
356 |
CHEAPAML |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
366 |
CHEAPAML |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
404 |
CHEAPAML |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
50 |
CHEAPAML |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml.F |
520 |
CHEAPAML |
I 0, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
535 |
CHEAPAML |
I 0, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
560 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( fsha,'CH_SH ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
561 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( flha,'CH_LH ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
562 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( q100,'CH_q100 ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
563 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( ssqt,'CH_ssqt ',0,1,2,bi,bj,myThid ) |
|
./pkg/cheapaml/cheapaml.F |
572 |
CHEAPAML |
_EXCH_XY_RL(Tair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
573 |
CHEAPAML |
_EXCH_XY_RS(Qnet,myThid) |
|
./pkg/cheapaml/cheapaml.F |
575 |
CHEAPAML |
_EXCH_XY_RL(qair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
576 |
CHEAPAML |
_EXCH_XY_RS(EmPmR,myThid) |
|
./pkg/cheapaml/cheapaml.F |
579 |
CHEAPAML |
_EXCH_XY_RL(Cheaptracer,myThid) |
|
./pkg/cheapaml/cheapaml.F |
583 |
CHEAPAML |
_EXCH_XY_RL( surfDrag, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
585 |
CHEAPAML |
CALL EXCH_UV_AGRID_3D_RL( ustress, vstress, .TRUE., 1, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
594 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
595 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
601 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
608 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
616 |
CHEAPAML |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
626 |
CHEAPAML |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
627 |
CHEAPAML |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml.F |
724 |
CHEAPAML |
CALL DIAGNOSTICS_FILL(uWind, 'CH_Uwind',0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
725 |
CHEAPAML |
CALL DIAGNOSTICS_FILL(vWind, 'CH_Vwind',0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
726 |
CHEAPAML |
CALL DIAGNOSTICS_FILL_RS(Qnet,'CH_QNET ',0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
728 |
CHEAPAML |
CALL DIAGNOSTICS_FILL_RS( EmPmR, 'CH_EmP ', 0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
729 |
CHEAPAML |
CALL DIAGNOSTICS_FILL(cheapPrecip,'CH_Prec ',0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
732 |
CHEAPAML |
CALL DIAGNOSTICS_FILL(Cheaptracer,'CH_Trace',0,1,0,1,1,myThid) |
|
./pkg/cheapaml/cheapaml.F |
7 |
CHEAPAML |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
192 |
CHEAPAML_COARE3_FLUX |
& ' , in: i,j,bi,bj,thid=', i, j, bi, bj, myThid |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
203 |
CHEAPAML_COARE3_FLUX |
CALL MDS_FLUSH( errorMessageUnit, myThid ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
204 |
CHEAPAML_COARE3_FLUX |
CALL MDS_FLUSH( standardMessageUnit, myThid ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
22 |
CHEAPAML_COARE3_FLUX |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
46 |
CHEAPAML_COARE3_FLUX |
INTEGER myIter, myThid |
|
./pkg/cheapaml/cheapaml_copy_edges.F |
13 |
CHEAPAML_COPY_EDGES |
I bi, bj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_copy_edges.F |
41 |
CHEAPAML_COPY_EDGES |
INTEGER bi, bj, myIter, myThid |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
100 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagmate, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
107 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
114 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
121 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
128 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
135 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
29 |
CHEAPAML_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
56 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
63 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
70 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
77 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
84 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
8 |
CHEAPAML_DIAGNOSTICS_INIT |
SUBROUTINE CHEAPAML_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/cheapaml/cheapaml_diagnostics_init.F |
92 |
CHEAPAML_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagmate, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
128 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
129 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
172 |
CHEAPAML_FIELDS_LOAD |
I deltaTclock, myTime, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
181 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
183 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
185 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
186 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
194 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( solar, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
199 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
201 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
203 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
204 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
212 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( TR, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
217 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
219 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
221 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
222 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
230 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( qr, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
235 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
237 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
239 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
240 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
249 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( uWind, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
256 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
258 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
260 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
261 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
270 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( vWind, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
276 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
278 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
282 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
284 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
288 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
290 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
294 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
296 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
300 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
302 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
306 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
308 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
30 |
CHEAPAML_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_fields_load.F |
312 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
314 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
318 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
320 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
324 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
326 |
CHEAPAML_FIELDS_LOAD |
& myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
328 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
329 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
337 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( CheaptracerR, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
340 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( trair0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
341 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( trair1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
342 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( qrair0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
343 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( qrair1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
344 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( solar0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
345 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( solar1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
346 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_XY_RL( uWind0, vWind0, .TRUE., myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
347 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_XY_RL( uWind1, vWind1, .TRUE., myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
349 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheaph0, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
350 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheaph1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
353 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheapcl0, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
354 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheapcl1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
357 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheaplw0, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
358 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheaplw1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
361 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheappr0, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
362 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( cheappr1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
365 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RL(ustress0,vstress0, .TRUE.,1,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
366 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RL(ustress1,vstress1, .TRUE.,1,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
369 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesp0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
370 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesp1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
371 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesh0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
372 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesh1 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
375 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( CheaptracerR0 , myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
376 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( CheaptracerR1, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
383 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
384 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
449 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( SolarFile,' ',solar,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
451 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
452 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
463 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( solar, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
466 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( TrFile,' ',tr,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
468 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
469 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
480 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( TR, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
484 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( QrFile,' ',qr,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
487 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
488 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
499 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( qr, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
502 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( UWindFile,' ',uWind,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
504 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
505 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
522 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( VWindFile,' ',vWind,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
524 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
525 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
534 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_XY_RL( uWind, vWind, .TRUE., myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
538 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( UStressFile,' ',ustress,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
544 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( VStressFile,' ',vstress,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
549 |
CHEAPAML_FIELDS_LOAD |
CALL EXCH_UV_AGRID_3D_RL( ustress,vstress, .TRUE.,1,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
553 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( TracerRFile,' ',CheaptracerR,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
555 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
556 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
565 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( CheaptracerR, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
569 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( WaveHFile,' ',wavesh,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
572 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( WavePFile,' ',wavesp,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
574 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
575 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
587 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesp, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
588 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( wavesh, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
595 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL( cheap_clFile,' ',Cheapclouds,0,myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
597 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
598 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
607 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( Cheapclouds, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
612 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL(cheap_dlwFile,' ',Cheapdlongwave,0,myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
618 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( Cheapdlongwave, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
623 |
CHEAPAML_FIELDS_LOAD |
CALL READ_FLD_XY_RL(cheap_prFile,' ',CheapPrecip,0,myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
625 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
626 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
636 |
CHEAPAML_FIELDS_LOAD |
_EXCH_XY_RL( CheapPrecip, myThid ) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
647 |
CHEAPAML_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
648 |
CHEAPAML_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_fields_load.F |
8 |
CHEAPAML_FIELDS_LOAD |
SUBROUTINE CHEAPAML_FIELDS_LOAD( myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_gad_c2_adv_r.F |
15 |
CHEAPAML_GAD_C2_ADV_R |
I myThid ) |
|
./pkg/cheapaml/cheapaml_gad_c2_adv_r.F |
40 |
CHEAPAML_GAD_C2_ADV_R |
INTEGER myThid |
|
./eesupp/src/reset_halo.F |
109 |
RESET_HALO_RS |
INTEGER myThid |
|
./eesupp/src/reset_halo.F |
117 |
RESET_HALO_RS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/reset_halo.F |
118 |
RESET_HALO_RS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/reset_halo.F |
18 |
RESET_HALO_RL |
I fixVal, kSize, myThid ) |
|
./eesupp/src/reset_halo.F |
42 |
RESET_HALO_RL |
INTEGER myThid |
|
./eesupp/src/reset_halo.F |
50 |
RESET_HALO_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./eesupp/src/reset_halo.F |
51 |
RESET_HALO_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./eesupp/src/reset_halo.F |
85 |
RESET_HALO_RS |
I fixVal, kSize, myThid ) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
15 |
CHEAPAML_GAD_DST3FL_ADV_R |
I myThid ) |
|
./pkg/cheapaml/cheapaml_gad_dst3fl_adv_r.F |
42 |
CHEAPAML_GAD_DST3FL_ADV_R |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
10 |
CHEAPAML_INIT_FIXED |
SUBROUTINE CHEAPAML_INIT_FIXED( myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
127 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
128 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
141 |
CHEAPAML_INIT_FIXED |
_EXCH_XY_RL( relaxMask, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
144 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
145 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
170 |
CHEAPAML_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
171 |
CHEAPAML_INIT_FIXED |
CALL READ_FLD_XY_RL( cheapMaskFile,' ',relaxMask,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
175 |
CHEAPAML_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
176 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
177 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
219 |
CHEAPAML_INIT_FIXED |
_EXCH_XY_RL( relaxMask, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
222 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
223 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
259 |
CHEAPAML_INIT_FIXED |
CALL WRITE_FLD_XY_RL('CheapMask', ' ', relaxMask, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
262 |
CHEAPAML_INIT_FIXED |
CALL WRITE_FLD_XY_RL('Cheap_xgs', ' ', xgs, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
263 |
CHEAPAML_INIT_FIXED |
CALL WRITE_FLD_XY_RL('Cheap_xrelf', ' ', xrelf, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
266 |
CHEAPAML_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
273 |
CHEAPAML_INIT_FIXED |
_END_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
287 |
CHEAPAML_INIT_FIXED |
CALL CHEAPAML_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
30 |
CHEAPAML_INIT_FIXED |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
61 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
62 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
83 |
CHEAPAML_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
84 |
CHEAPAML_INIT_FIXED |
CALL READ_FLD_XY_RL( cheapMaskFile,' ',relaxMask,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
88 |
CHEAPAML_INIT_FIXED |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
92 |
CHEAPAML_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_fixed.F |
93 |
CHEAPAML_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
100 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
101 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
115 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( Tair, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
122 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
123 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( AirQFile,' ',qair,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
128 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
129 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
130 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
141 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( qair, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
148 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
149 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( TracerFile,' ',Cheaptracer,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
154 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
155 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
156 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
165 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( Cheaptracer, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
169 |
CHEAPAML_INIT_VARIA |
CALL CHEAPAML_READ_PICKUP( nIter0, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
178 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
179 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( cheap_hFile,' ',cheapHgrid,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
181 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
182 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
191 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( CheapHgrid, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
210 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
211 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
243 |
CHEAPAML_INIT_VARIA |
CALL WRITE_FLD_XY_RL('CheapHgrid', ' ', CheapHgrid, 0, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
29 |
CHEAPAML_INIT_VARIA |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_init_varia.F |
56 |
CHEAPAML_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
57 |
CHEAPAML_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
94 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
95 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( AirTempFile,' ',Tair,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
99 |
CHEAPAML_INIT_VARIA |
CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
9 |
CHEAPAML_INIT_VARIA |
SUBROUTINE CHEAPAML_INIT_VARIA( myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
104 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
109 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
11 |
CHEAPAML_READ_PICKUP |
SUBROUTINE CHEAPAML_READ_PICKUP( myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
120 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
136 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
138 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
142 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
144 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 , myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
148 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 ,myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
150 |
CHEAPAML_READ_PICKUP |
& nj, fp, 1 ,myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
161 |
CHEAPAML_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
165 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
169 |
CHEAPAML_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
184 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
193 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
198 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
200 |
CHEAPAML_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
204 |
CHEAPAML_READ_PICKUP |
CALL EXCH_XY_RL( Tair, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
205 |
CHEAPAML_READ_PICKUP |
CALL EXCH_XY_RL( qair, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
206 |
CHEAPAML_READ_PICKUP |
CALL EXCH_XY_RL( Cheaptracer, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
27 |
CHEAPAML_READ_PICKUP |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
63 |
CHEAPAML_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
74 |
CHEAPAML_READ_PICKUP |
I Nr, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
75 |
CHEAPAML_READ_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
80 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
83 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
86 |
CHEAPAML_READ_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
95 |
CHEAPAML_READ_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
99 |
CHEAPAML_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
20 |
CHEAPAML_READPARMS |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_readparms.F |
210 |
CHEAPAML_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
216 |
CHEAPAML_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
222 |
CHEAPAML_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
263 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
266 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
272 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
275 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
281 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
284 |
CHEAPAML_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
290 |
CHEAPAML_READPARMS |
_END_MASTER(myThid) |
|
./pkg/cheapaml/cheapaml_readparms.F |
6 |
CHEAPAML_READPARMS |
SUBROUTINE CHEAPAML_READPARMS( myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
80 |
CHEAPAML_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/cheapaml/cheapaml_readparms.F |
84 |
CHEAPAML_READPARMS |
_END_MASTER(myThid) |
|
./pkg/cheapaml/cheapaml_readparms.F |
88 |
CHEAPAML_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/cheapaml/cheapaml_readparms.F |
92 |
CHEAPAML_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/cheapaml/cheapaml_readparms.F |
97 |
CHEAPAML_READPARMS |
I myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
134 |
CHEAPAML_SEAICE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
170 |
CHEAPAML_SEAICE |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
19 |
CHEAPAML_SEAICE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
202 |
CHEAPAML_SEAICE |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
213 |
CHEAPAML_SEAICE |
I myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
227 |
CHEAPAML_SEAICE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_seaice.F |
65 |
CHEAPAML_SEAICE |
INTEGER bi, bj, myIter, myThid |
|
./pkg/cheapaml/cheapaml_timestep.F |
14 |
CHEAPAML_TIMESTEP |
I nSubIter, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_timestep.F |
35 |
CHEAPAML_TIMESTEP |
INTEGER nSubIter, myIter, myThid |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
101 |
CHEAPAML_WRITE_PICKUP |
& gqairm, nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
109 |
CHEAPAML_WRITE_PICKUP |
& Cheaptracer, nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
114 |
CHEAPAML_WRITE_PICKUP |
& gCheaptracerm, nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
11 |
CHEAPAML_WRITE_PICKUP |
& suff, myTime, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
123 |
CHEAPAML_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
126 |
CHEAPAML_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
143 |
CHEAPAML_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
34 |
CHEAPAML_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
84 |
CHEAPAML_WRITE_PICKUP |
& Tair, nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
89 |
CHEAPAML_WRITE_PICKUP |
& gTairm, nj, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
96 |
CHEAPAML_WRITE_PICKUP |
& qair, nj, myIter, myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
177 |
GAD_2D_CALC_RHS |
I myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
179 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_X(bi,bj,uVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
190 |
GAD_2D_CALC_RHS |
CALL GAD_DIFF_2D_X(bi,bj,diffKh,localT,df,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
19 |
GAD_2D_CALC_RHS |
I myTime, myIter, myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
274 |
GAD_2D_CALC_RHS |
I myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
276 |
GAD_2D_CALC_RHS |
CALL GAD_C2_2D_ADV_Y(bi,bj,vVel,localT,af,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
287 |
GAD_2D_CALC_RHS |
CALL GAD_DIFF_2D_Y(bi,bj,diffKh,localT,df,myThid) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
319 |
GAD_2D_CALC_RHS |
I myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
326 |
GAD_2D_CALC_RHS |
I myThid ) |
|
./pkg/cheapaml/gad_2d_calc_rhs.F |
78 |
GAD_2D_CALC_RHS |
INTEGER myIter, myThid |
|
./eesupp/src/scatter_xz.F |
30 |
SCATTER_XZ |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/scatter_xz.F |
6 |
SCATTER_XZ |
SUBROUTINE SCATTER_XZ( global, local, myThid ) |
|
./eesupp/src/scatter_xz.F |
86 |
SCATTER_XZ |
_END_MASTER( myThid ) |
|
./pkg/cheapaml/gad_c2_2d_adv_x.F |
15 |
GAD_C2_2D_ADV_X |
I myThid ) |
|
./pkg/cheapaml/gad_c2_2d_adv_x.F |
37 |
GAD_C2_2D_ADV_X |
INTEGER myThid |
|
./pkg/cheapaml/gad_c2_2d_adv_y.F |
15 |
GAD_C2_2D_ADV_Y |
I myThid ) |
|
./pkg/cheapaml/gad_c2_2d_adv_y.F |
37 |
GAD_C2_2D_ADV_Y |
INTEGER myThid |
|
./pkg/cheapaml/gad_diff_2d_x.F |
15 |
GAD_DIFF_2D_X |
I myThid ) |
|
./pkg/cheapaml/gad_diff_2d_x.F |
37 |
GAD_DIFF_2D_X |
INTEGER myThid |
|
./pkg/cheapaml/gad_diff_2d_y.F |
15 |
GAD_DIFF_2D_Y |
I myThid ) |
|
./pkg/cheapaml/gad_diff_2d_y.F |
38 |
GAD_DIFF_2D_Y |
INTEGER myThid |
|
./eesupp/src/scatter_yz.F |
30 |
SCATTER_YZ |
_BEGIN_MASTER( myThid ) |
|
./eesupp/src/scatter_yz.F |
6 |
SCATTER_YZ |
SUBROUTINE SCATTER_YZ( global, local, myThid ) |
|
./eesupp/src/scatter_yz.F |
86 |
SCATTER_YZ |
_END_MASTER( myThid ) |
|
./eesupp/src/stop_if_error.F |
10 |
STOP_IF_ERROR |
SUBROUTINE STOP_IF_ERROR( errFlag, errMsg, myThid ) |
|
./eesupp/src/stop_if_error.F |
38 |
STOP_IF_ERROR |
INTEGER myThid |
|
./eesupp/src/stop_if_error.F |
56 |
STOP_IF_ERROR |
CALL GLOBAL_SUM_INT( errCount, myThid ) |
|
./eesupp/src/stop_if_error.F |
60 |
STOP_IF_ERROR |
IF ( errFlag ) CALL PRINT_ERROR( errMsg, myThid ) |
|
./eesupp/src/stop_if_error.F |
63 |
STOP_IF_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./eesupp/src/stop_if_error.F |
65 |
STOP_IF_ERROR |
CALL ALL_PROC_DIE( myThid ) |
|
./eesupp/src/timers.F |
387 |
TIMER_CONTROL |
_END_MASTER(myThid) |
|
./eesupp/src/timers.F |
443 |
TIMER_CONTROL |
_END_MASTER(myThid) |
|
./eesupp/src/utils.F |
162 |
DATE |
INTEGER FUNCTION IO_ERRCOUNT(myThid) |
|
./eesupp/src/utils.F |
179 |
DATE |
INTEGER myThid |
|
./eesupp/src/utils.F |
183 |
DATE |
IO_ERRCOUNT = ioErrorCount(myThid) |
|
./pkg/cost/cost_accumulate_mean.F |
27 |
COST_ACCUMULATE_MEAN |
integer myThid |
|
./pkg/cost/cost_accumulate_mean.F |
6 |
COST_ACCUMULATE_MEAN |
subroutine COST_ACCUMULATE_MEAN( myThid ) |
|
./pkg/cost/cost_atlantic_heat.F |
25 |
COST_ATLANTIC_HEAT |
integer myThid |
|
./pkg/cost/cost_atlantic_heat.F |
60 |
COST_ATLANTIC_HEAT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cost/cost_atlantic_heat.F |
61 |
COST_ATLANTIC_HEAT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cost/cost_atlantic_heat.F |
6 |
COST_ATLANTIC_HEAT |
subroutine COST_ATLANTIC_HEAT( myThid ) |
|
./pkg/cost/cost_check.F |
21 |
COST_CHECK |
INTEGER myThid |
|
./pkg/cost/cost_check.F |
6 |
COST_CHECK |
SUBROUTINE COST_CHECK( myThid ) |
|
./pkg/cost/cost_depth.F |
30 |
COST_DEPTH |
integer myThid |
|
./pkg/cost/cost_depth.F |
40 |
COST_DEPTH |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/cost/cost_depth.F |
41 |
COST_DEPTH |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cost/cost_depth.F |
6 |
COST_DEPTH |
subroutine COST_DEPTH( myThid ) |
|
./pkg/cost/cost_final.F |
103 |
COST_FINAL |
CALL COST_TEMP (myThid) |
|
./pkg/cost/cost_final.F |
113 |
COST_FINAL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/cost/cost_final.F |
114 |
COST_FINAL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/cost/cost_final.F |
187 |
COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( tile_fc, glob_fc, myThid ) |
|
./pkg/cost/cost_final.F |
188 |
COST_FINAL |
_BEGIN_MASTER( myThid ) |
|
./pkg/cost/cost_final.F |
190 |
COST_FINAL |
_END_MASTER( myThid ) |
|
./pkg/cost/cost_final.F |
193 |
COST_FINAL |
_BEGIN_MASTER( myThid ) |
|
./pkg/cost/cost_final.F |
195 |
COST_FINAL |
_END_MASTER( myThid ) |
|
./pkg/cost/cost_final.F |
208 |
COST_FINAL |
CALL TURNOFF_MODEL_IO( 0, myThid ) |
|
./pkg/cost/cost_final.F |
45 |
COST_FINAL |
INTEGER myThid |
|
./pkg/cost/cost_final.F |
59 |
COST_FINAL |
if (useSEAICE) CALL SEAICE_COST_FINAL (myThid) |
|
./pkg/cost/cost_final.F |
63 |
COST_FINAL |
CALL SHELFICE_COST_FINAL (myThid) |
|
./pkg/cost/cost_final.F |
68 |
COST_FINAL |
IF (useThSIce) CALL THSICE_COST_FINAL (myThid) |
|
./pkg/cost/cost_final.F |
73 |
COST_FINAL |
IF (useECCO) CALL ECCO_COST_FINAL (myThid) |
|
./pkg/cost/cost_final.F |
77 |
COST_FINAL |
CALL COST_STATE_FINAL (myThid) |
|
./pkg/cost/cost_final.F |
86 |
COST_FINAL |
CALL COST_VECTOR (myThid) |
|
./pkg/cost/cost_final.F |
90 |
COST_FINAL |
CALL COST_TEST (myThid) |
|
./pkg/cost/cost_final.F |
94 |
COST_FINAL |
CALL COST_ATLANTIC_HEAT (myThid) |
|
./pkg/cost/cost_final.F |
99 |
COST_FINAL |
CALL COST_HFLUX (myThid) |
|
./pkg/cost/cost_final.F |
9 |
COST_FINAL |
SUBROUTINE COST_FINAL( myThid ) |
|
./pkg/cost/cost_readparms.F |
108 |
COST_READPARMS |
CALL COST_WEIGHTS( myThid ) |
|
./pkg/cost/cost_readparms.F |
55 |
COST_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/cost/cost_readparms.F |
88 |
COST_READPARMS |
I myThid ) |
|
./pkg/cost/cost_state_final.F |
24 |
COST_STATE_FINAL |
integer myThid |
|
./pkg/cost/cost_state_final.F |
31 |
COST_STATE_FINAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cost/cost_state_final.F |
32 |
COST_STATE_FINAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cost/cost_state_final.F |
6 |
COST_STATE_FINAL |
subroutine COST_STATE_FINAL( myThid ) |
|
./pkg/cost/cost_test.F |
27 |
COST_TEST |
integer myThid |
|
./pkg/cost/cost_test.F |
6 |
COST_TEST |
subroutine COST_TEST( myThid ) |
|
./pkg/cost/cost_tile.F |
126 |
COST_TILE |
CALL COST_ACCUMULATE_MEAN (myThid) |
|
./pkg/cost/cost_tile.F |
130 |
COST_TILE |
CALL SHELFICE_COST_ACCUMULATE (myThid) |
|
./pkg/cost/cost_tile.F |
135 |
COST_TILE |
& CALL THSICE_COST_DRIVER (myTime, myIter, myThid) |
|
./pkg/cost/cost_tile.F |
140 |
COST_TILE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cost/cost_tile.F |
141 |
COST_TILE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cost/cost_tile.F |
144 |
COST_TILE |
CALL COST_TRACER( bi, bj, myThid ) |
|
./pkg/cost/cost_tile.F |
148 |
COST_TILE |
CALL COST_TRANSPORT( bi, bj, myTime, myIter, myThid ) |
|
./pkg/cost/cost_tile.F |
62 |
COST_TILE |
subroutine COST_TILE( mytime, myiter, myThid ) |
|
./pkg/cost/cost_tile.F |
95 |
COST_TILE |
integer myThid |
|
./pkg/cost/cost_tracer.F |
36 |
COST_TRACER |
integer myThid |
|
./pkg/cost/cost_tracer.F |
6 |
COST_TRACER |
subroutine COST_TRACER( bi, bj, myThid ) |
|
./pkg/cost/cost_vector.F |
26 |
COST_VECTOR |
integer myThid |
|
./pkg/cost/cost_vector.F |
56 |
COST_VECTOR |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/cost/cost_vector.F |
57 |
COST_VECTOR |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/cost/cost_vector.F |
6 |
COST_VECTOR |
subroutine COST_VECTOR( myThid ) |
|
./pkg/ctrl/adctrl_bound.F |
107 |
ADCTRL_BOUND_2D |
I maskFld3d, boundsVec, myThid ) |
|
./pkg/ctrl/adctrl_bound.F |
128 |
ADCTRL_BOUND_2D |
INTEGER myThid |
|
./pkg/ctrl/adctrl_bound.F |
153 |
ADCTRL_BOUND_2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/adctrl_bound.F |
154 |
ADCTRL_BOUND_2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/adctrl_bound.F |
17 |
ADCTRL_BOUND_3D |
I maskFld3d, boundsVec, myThid ) |
|
./pkg/ctrl/adctrl_bound.F |
38 |
ADCTRL_BOUND_3D |
INTEGER myThid |
|
./pkg/ctrl/adctrl_bound.F |
63 |
ADCTRL_BOUND_3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/adctrl_bound.F |
64 |
ADCTRL_BOUND_3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_bound.F |
106 |
CTRL_BOUND_2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_bound.F |
107 |
CTRL_BOUND_2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_bound.F |
19 |
CTRL_BOUND_3D |
I maskFld3d, boundsVec, myThid ) |
|
./pkg/ctrl/ctrl_bound.F |
38 |
CTRL_BOUND_3D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_bound.F |
46 |
CTRL_BOUND_3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_bound.F |
47 |
CTRL_BOUND_3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_bound.F |
79 |
CTRL_BOUND_2D |
I maskFld3d, boundsVec, myThid ) |
|
./pkg/ctrl/ctrl_bound.F |
98 |
CTRL_BOUND_2D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_check.F |
10 |
CTRL_CHECK |
SUBROUTINE CTRL_CHECK( myThid ) |
|
./pkg/ctrl/ctrl_check.F |
112 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
125 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
133 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
140 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
148 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
157 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
170 |
CTRL_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
183 |
CTRL_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
194 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
196 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
198 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
200 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
216 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
218 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
220 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
222 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
224 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
226 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
239 |
CTRL_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
253 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
31 |
CTRL_CHECK |
INTEGER myThid |
|
./pkg/ctrl/ctrl_check.F |
46 |
CTRL_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
54 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
57 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
66 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
82 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_check.F |
97 |
CTRL_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ctrl/ctrl_cost_driver.F |
115 |
CTRL_COST_DRIVER |
& maskC, myThid ) |
|
./pkg/ctrl/ctrl_cost_driver.F |
138 |
CTRL_COST_DRIVER |
& maskC, myThid ) |
|
./pkg/ctrl/ctrl_cost_driver.F |
34 |
CTRL_COST_DRIVER |
integer myThid |
|
./pkg/ctrl/ctrl_cost_driver.F |
6 |
CTRL_COST_DRIVER |
subroutine CTRL_COST_DRIVER( myThid ) |
|
./pkg/ctrl/ctrl_cost_driver.F |
88 |
CTRL_COST_DRIVER |
& maskC, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
121 |
CTRL_COST_GEN2D |
jtlo = mybylo(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
122 |
CTRL_COST_GEN2D |
jthi = mybyhi(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
123 |
CTRL_COST_GEN2D |
itlo = mybxlo(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
124 |
CTRL_COST_GEN2D |
ithi = mybxhi(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
171 |
CTRL_COST_GEN2D |
& ladinit, optimcycle, myThid, xx_gen_dummy ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
173 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
217 |
CTRL_COST_GEN2D |
& ladinit, optimcycle, myThid, xx_gen_dummy ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
219 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
275 |
CTRL_COST_GEN2D |
& ladinit, optimcycle, myThid, xx_gen_dummy ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
277 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
339 |
CTRL_COST_GEN2D |
& ladinit, optimcycle, myThid, xx_gen_dummy ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
341 |
CTRL_COST_GEN2D |
CALL READ_REC_XY_RL( fnamefld, tmpfld2d, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
344 |
CTRL_COST_GEN2D |
_EXCH_XY_RL(tmpfld2d, myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
39 |
CTRL_COST_GEN2D |
I myThid |
|
./pkg/ctrl/ctrl_cost_gen.F |
418 |
CTRL_COST_GEN3D |
I myThid |
|
./pkg/ctrl/ctrl_cost_gen.F |
451 |
CTRL_COST_GEN3D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_cost_gen.F |
480 |
CTRL_COST_GEN3D |
jtlo = mybylo(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
481 |
CTRL_COST_GEN3D |
jthi = mybyhi(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
482 |
CTRL_COST_GEN3D |
itlo = mybxlo(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
483 |
CTRL_COST_GEN3D |
ithi = mybxhi(myThid) |
|
./pkg/ctrl/ctrl_cost_gen.F |
511 |
CTRL_COST_GEN3D |
& ladinit, optimcycle, myThid |
|
./pkg/ctrl/ctrl_cost_gen.F |
514 |
CTRL_COST_GEN3D |
CALL READ_REC_XYZ_RL( fnamefld, tmpfld3d, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_cost_gen.F |
84 |
CTRL_COST_GEN2D |
integer myThid |
|
./pkg/ctrl/ctrl_depth_ini.F |
132 |
CTRL_DEPTH_INI |
_EXCH_XY_RL( xx_r_low, myThid ) |
|
./pkg/ctrl/ctrl_get_gen.F |
149 |
CTRL_GET_GEN |
CALL READ_REC_XY_RL( fnamegen, xx_gen1, gencount0, 1, myThid ) |
|
./pkg/ctrl/ctrl_get_gen.F |
157 |
CTRL_GET_GEN |
& call CTRL_SMOOTH(xx_gen1,genmask,myThid) |
|
./pkg/ctrl/ctrl_get_gen.F |
186 |
CTRL_GET_GEN |
CALL READ_REC_XY_RL( fnamegen, xx_gen1, gencount1, 1, myThid ) |
|
./pkg/ctrl/ctrl_get_gen.F |
193 |
CTRL_GET_GEN |
& call CTRL_SMOOTH(xx_gen1,genmask,myThid) |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
206 |
CTRL_GET_GEN_REC |
I deltaTclock, myTime, myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
112 |
CTRL_HFACC_INI |
_BEGIN_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
113 |
CTRL_HFACC_INI |
CALL READ_FLD_XYZ_RL( 'hFacC', ' ', hFacC, 0, myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
114 |
CTRL_HFACC_INI |
_END_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
115 |
CTRL_HFACC_INI |
_EXCH_XYZ_RS( hFacC ,myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
158 |
CTRL_HFACC_INI |
CALL DUMMY_IN_HFAC( 'C', 0, myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
159 |
CTRL_HFACC_INI |
_EXCH_XYZ_RS( hFacC, myThid ) |
|
./pkg/ctrl/ctrl_hfacc_ini.F |
160 |
CTRL_HFACC_INI |
CALL DUMMY_IN_HFAC( 'C', 1, myThid ) |
|
./pkg/ctrl/ctrl_init.F |
11 |
CTRL_INIT |
subroutine CTRL_INIT( myThid ) |
|
./pkg/ctrl/ctrl_init.F |
126 |
CTRL_INIT |
CALL WRITE_REC_XYZ_RL( 'wunit', loctmp3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_init.F |
173 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
182 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
196 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
199 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
206 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
209 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
215 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
226 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
229 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
236 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
239 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
245 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
259 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
263 |
CTRL_INIT |
& snx, sny, 1, 'w', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
265 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
272 |
CTRL_INIT |
& snx, sny, 1, 'w', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
287 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
290 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
306 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
310 |
CTRL_INIT |
& snx, sny, 1, 's', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
312 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
319 |
CTRL_INIT |
& snx, sny, 1, 's', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
334 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
337 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
356 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
359 |
CTRL_INIT |
& snx, 1, nr, 'm', 'xz', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
369 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
372 |
CTRL_INIT |
& snx, 1, nr, 'm', 'xz', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
382 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
385 |
CTRL_INIT |
& 1, sny, nr, 'm', 'yz', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
395 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
398 |
CTRL_INIT |
& 1, sny, nr, 'm', 'yz', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
407 |
CTRL_INIT |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/ctrl/ctrl_init.F |
408 |
CTRL_INIT |
length_of_rec = MDS_RECLEN( 64, NR*NR, myThid ) |
|
./pkg/ctrl/ctrl_init.F |
438 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
446 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
454 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
463 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
466 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
471 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
481 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
484 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
489 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
498 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
506 |
CTRL_INIT |
& snx, sny, nr, 's', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
50 |
CTRL_INIT |
integer myThid |
|
./pkg/ctrl/ctrl_init.F |
514 |
CTRL_INIT |
& snx, sny, nr, 'v', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
522 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
530 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
538 |
CTRL_INIT |
& snx, sny, nr, 'w', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
542 |
CTRL_INIT |
& snx, sny, nr, 's', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
550 |
CTRL_INIT |
& snx, sny, nr, 'w', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
558 |
CTRL_INIT |
& snx, sny, nr, 's', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
566 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
574 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
582 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
592 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
595 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
606 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
609 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
620 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
623 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
634 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
637 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
648 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
651 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
662 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
665 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
677 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
680 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
692 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
695 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
706 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
709 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
725 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
741 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
757 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
766 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
778 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
781 |
CTRL_INIT |
& snx, sny, 1, 'i', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
790 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
795 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
800 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
805 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
810 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
815 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
833 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
850 |
CTRL_INIT |
& snx, sny, nr, 'c', '3d', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
873 |
CTRL_INIT |
I myThid ) |
|
./pkg/ctrl/ctrl_init.F |
88 |
CTRL_INIT |
jtlo = mybylo(myThid) |
|
./pkg/ctrl/ctrl_init.F |
89 |
CTRL_INIT |
jthi = mybyhi(myThid) |
|
./pkg/ctrl/ctrl_init.F |
906 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
90 |
CTRL_INIT |
itlo = mybxlo(myThid) |
|
./pkg/ctrl/ctrl_init.F |
915 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
91 |
CTRL_INIT |
ithi = mybxhi(myThid) |
|
./pkg/ctrl/ctrl_init.F |
921 |
CTRL_INIT |
& snx, sny, 1, 'c', 'xy', myThid ) |
|
./pkg/ctrl/ctrl_init.F |
933 |
CTRL_INIT |
call CTRL_INIT_WET( myThid ) |
|
./pkg/ctrl/ctrl_init.F |
981 |
CTRL_INIT |
_BEGIN_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_init.F |
982 |
CTRL_INIT |
call CTRL_SUMMARY( myThid ) |
|
./pkg/ctrl/ctrl_init.F |
983 |
CTRL_INIT |
_END_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_init_ctrlvar.F |
118 |
CTRL_INIT_CTRLVAR |
CALL TURNOFF_MODEL_IO( 1, myThid ) |
|
./pkg/ctrl/ctrl_init_rec.F |
121 |
CTRL_INIT_REC |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ctrl/ctrl_init_rec.F |
125 |
CTRL_INIT_REC |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ctrl/ctrl_init_rec.F |
78 |
CTRL_INIT_REC |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
375 |
CTRL_INIT_VARIABLES |
IF (useOBCS) CALL CTRL_INIT_OBCS_VARIABLES( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
37 |
CTRL_INIT_VARIABLES |
integer myThid |
|
./pkg/ctrl/ctrl_init_variables.F |
383 |
CTRL_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI_ECCO',myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
385 |
CTRL_INIT_VARIABLES |
CALL CTRL_MAP_INI_ECCO( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
388 |
CTRL_INIT_VARIABLES |
IF (debugMode) CALL DEBUG_CALL('CTRL_MAP_INI',myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
390 |
CTRL_INIT_VARIABLES |
CALL CTRL_MAP_INI( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
396 |
CTRL_INIT_VARIABLES |
CALL CTRL_MAP_INI_GENARR( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
399 |
CTRL_INIT_VARIABLES |
CALL CTRL_MAP_INI_GENTIM2D( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
440 |
CTRL_INIT_VARIABLES |
CALL SEAICE_CTRL_MAP_INI( myThid ) |
|
./pkg/ctrl/ctrl_init_variables.F |
54 |
CTRL_INIT_VARIABLES |
jtlo = myByLo(myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
55 |
CTRL_INIT_VARIABLES |
jthi = myByHi(myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
56 |
CTRL_INIT_VARIABLES |
itlo = myBxLo(myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
57 |
CTRL_INIT_VARIABLES |
ithi = myBxHi(myThid) |
|
./pkg/ctrl/ctrl_init_variables.F |
6 |
CTRL_INIT_VARIABLES |
subroutine CTRL_INIT_VARIABLES( myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
350 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( nvarlength, myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
373 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmp2(1), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
382 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmp2(2), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
391 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmp2(3), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
400 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmp2(4), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
425 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmpob(iobcs), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
441 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmpob(iobcs), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
457 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmpob(iobcs), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
473 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmpob(iobcs), myThid ) |
|
./pkg/ctrl/ctrl_init_wet.F |
556 |
CTRL_INIT_WET |
CALL GLOBAL_SUM_INT( ntmpshi, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
275 |
CTRL_MAP_FORCING |
CALL EXCH_UV_XY_RS(fu,fv,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
278 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(EmPmR, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
281 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(Qnet, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
284 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(SST, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
287 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(SSS, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
290 |
CTRL_MAP_FORCING |
_EXCH_XY_RS(Qnetm, myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
314 |
CTRL_MAP_FORCING |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
315 |
CTRL_MAP_FORCING |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
329 |
CTRL_MAP_FORCING |
_EXCH_XY_RL(tmpUE,myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
330 |
CTRL_MAP_FORCING |
_EXCH_XY_RL(tmpVN,myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
334 |
CTRL_MAP_FORCING |
DO bj = myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
335 |
CTRL_MAP_FORCING |
DO bi = myBxLo(myThid),mybxhi(myThid) |
|
./pkg/ctrl/ctrl_map_forcing.F |
365 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( Qnet , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
366 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( EmPmR , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
367 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( Qsw , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
368 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( SST , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
369 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( SSS , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
370 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( pLoad , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
371 |
CTRL_MAP_FORCING |
CALL EXCH_XY_RS( saltFlux , myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
372 |
CTRL_MAP_FORCING |
CALL EXCH_UV_XY_RS( fu, fv, .TRUE., myThid ) |
|
./pkg/ctrl/ctrl_map_forcing.F |
46 |
CTRL_MAP_FORCING |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_forcing.F |
9 |
CTRL_MAP_FORCING |
SUBROUTINE CTRL_MAP_FORCING( myTime, myIter, myThid ) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
100 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
101 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
10 |
CTRL_MAP_GENTIM2D |
I myTime, myIter, myThid ) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
118 |
CTRL_MAP_GENTIM2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
119 |
CTRL_MAP_GENTIM2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
131 |
CTRL_MAP_GENTIM2D |
CALL GLOBAL_SUM_TILE_RL( LOCsumTile, LOCsumGlob, myThid ) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
133 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
134 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
151 |
CTRL_MAP_GENTIM2D |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
42 |
CTRL_MAP_GENTIM2D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
76 |
CTRL_MAP_GENTIM2D |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_gentim2d.F |
77 |
CTRL_MAP_GENTIM2D |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini.F |
572 |
CTRL_MAP_INI |
_EXCH_XYZ_RL(pTracer(1-Olx,1-Oly,1,1,1,1),myThid) |
|
./pkg/ctrl/ctrl_map_ini.F |
599 |
CTRL_MAP_INI |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
177 |
CTRL_MAP_INI_ECCO |
CALL EXCH_UV_XYZ_RS(uvel,vvel,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
251 |
CTRL_MAP_INI_ECCO |
CALL EXCH_UV_XYZ_RS(eddyPsiX,eddyPsiY,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
294 |
CTRL_MAP_INI_ECCO |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_ecco.F |
295 |
CTRL_MAP_INI_ECCO |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
102 |
CTRL_MAP_INI_GEN3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
103 |
CTRL_MAP_INI_GEN3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
126 |
CTRL_MAP_INI_GEN3D |
CALL READ_REC_XYZ_RL( fnamegeneric, xxFld3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
210 |
CTRL_MAP_INI_GEN3D |
CALL CTRL_BOUND_3D(paramFld3d,maskFld3d,boundsVec,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
297 |
CTRL_MAP_INI_GEN2D |
act3 = myThid - 1 |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
316 |
CTRL_MAP_INI_GEN2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
317 |
CTRL_MAP_INI_GEN2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
338 |
CTRL_MAP_INI_GEN2D |
CALL READ_REC_XY_RL( fnamegeneric, xxFld2d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
415 |
CTRL_MAP_INI_GEN2D |
CALL CTRL_BOUND_2D(paramFld2d,maskFld3d,boundsVec,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gen.F |
83 |
CTRL_MAP_INI_GEN3D |
act3 = myThid - 1 |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
128 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR3D(theta,igen_theta0,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
12 |
CTRL_MAP_INI_GENARR |
SUBROUTINE CTRL_MAP_INI_GENARR( myThid ) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
130 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR3D(salt,igen_salt0,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
133 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR3D(kapgm,igen_kapgm,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
137 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR3D(kapredi,igen_kapredi,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
141 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR3D(diffkr,igen_diffkr,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
145 |
CTRL_MAP_INI_GENARR |
call CTRL_MAP_GENARR3D(uvel,igen_uvel0,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
146 |
CTRL_MAP_INI_GENARR |
call CTRL_MAP_GENARR3D(vvel,igen_vvel0,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
147 |
CTRL_MAP_INI_GENARR |
CALL EXCH_UV_XYZ_RL(uvel,vvel,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
160 |
CTRL_MAP_GENARR2D |
SUBROUTINE CTRL_MAP_GENARR2D( fld, iarr, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
190 |
CTRL_MAP_GENARR2D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
220 |
CTRL_MAP_GENARR2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
221 |
CTRL_MAP_GENARR2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
266 |
CTRL_MAP_GENARR2D |
CALL READ_REC_XY_RL( fnamegenIn, xx_gen, 1, 1, myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
276 |
CTRL_MAP_GENARR2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
277 |
CTRL_MAP_GENARR2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
298 |
CTRL_MAP_GENARR2D |
CALL CTRL_BOUND_2D(fld,maskC,xx_genarr2d_bounds(1,iarr),myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
315 |
CTRL_MAP_GENARR3D |
SUBROUTINE CTRL_MAP_GENARR3D( fld, iarr, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
345 |
CTRL_MAP_GENARR3D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
376 |
CTRL_MAP_GENARR3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
377 |
CTRL_MAP_GENARR3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
424 |
CTRL_MAP_GENARR3D |
CALL READ_REC_XYZ_RL( fnamegenIn, xx_gen, 1, 1, myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
436 |
CTRL_MAP_GENARR3D |
call ECCO_ZERO(localmask,Nr,zeroRL,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
438 |
CTRL_MAP_GENARR3D |
call ECCO_CPRSRL(maskW,nr,localmask,nr,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
440 |
CTRL_MAP_GENARR3D |
call ECCO_CPRSRL(maskS,nr,localmask,nr,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
442 |
CTRL_MAP_GENARR3D |
call ECCO_CPRSRL(maskC,nr,localmask,nr,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
446 |
CTRL_MAP_GENARR3D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
447 |
CTRL_MAP_GENARR3D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
46 |
CTRL_MAP_INI_GENARR |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
476 |
CTRL_MAP_GENARR3D |
& xx_genarr3d_bounds(1,iarr),myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
478 |
CTRL_MAP_GENARR3D |
CALL CTRL_BOUND_3D(fld,maskC,xx_genarr3d_bounds(1,iarr),myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
84 |
CTRL_MAP_INI_GENARR |
call CTRL_MAP_GENARR2D(etaN,igen_etan,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
88 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR2D(bottomDragFld,igen_bdrag,myThid) |
|
./pkg/ctrl/ctrl_map_ini_genarr.F |
92 |
CTRL_MAP_INI_GENARR |
& call CTRL_MAP_GENARR2D(geothermalFlux,igen_geoth,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
115 |
CTRL_MAP_INI_GENTIM2D |
I myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
12 |
CTRL_MAP_INI_GENTIM2D |
SUBROUTINE CTRL_MAP_INI_GENTIM2D( myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
178 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenIn, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
184 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
221 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_ZERO(xx_gen,1,zeroRL,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
234 |
CTRL_MAP_INI_GENTIM2D |
& 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
236 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_ADD(xx_gen_tmp,1,xx_gen,1,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
239 |
CTRL_MAP_INI_GENTIM2D |
call ECCO_DIV(xx_gen,1,nyearsRL,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
249 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenTmp, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
267 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenOut, xx_gen, kRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
274 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenTmp, xx_gen_tmp, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
276 |
CTRL_MAP_INI_GENTIM2D |
CALL ECCO_SUBTRACT(xx_gen_tmp,1,xx_gen,1,myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
281 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, kRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
302 |
CTRL_MAP_INI_GENTIM2D |
CALL READ_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
312 |
CTRL_MAP_INI_GENTIM2D |
& dummyRS,jrec,myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
322 |
CTRL_MAP_INI_GENTIM2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
323 |
CTRL_MAP_INI_GENTIM2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
341 |
CTRL_MAP_INI_GENTIM2D |
& xx_gentim2d_bounds(1,iarr),myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
343 |
CTRL_MAP_INI_GENTIM2D |
CALL EXCH_XY_RL ( xx_gen , myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
349 |
CTRL_MAP_INI_GENTIM2D |
CALL WRITE_REC_XY_RL( fnamegenOut, xx_gen, iRec, 1, myThid ) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
46 |
CTRL_MAP_INI_GENTIM2D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
86 |
CTRL_MAP_INI_GENTIM2D |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_map_ini_gentim2d.F |
87 |
CTRL_MAP_INI_GENTIM2D |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
79 |
CTRL_MASK_SET_XZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
79 |
CTRL_MASK_SET_YZ |
_BEGIN_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_readparms.F |
172 |
CTRL_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ctrl/ctrl_readparms.F |
176 |
CTRL_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ctrl/ctrl_readparms.F |
180 |
CTRL_READPARMS |
_BEGIN_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_readparms.F |
505 |
CTRL_READPARMS |
I myThid ) |
|
./pkg/ctrl/ctrl_readparms.F |
531 |
CTRL_READPARMS |
_END_MASTER( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
423 |
CTRL_SET_PACK_XY |
CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
431 |
CTRL_SET_PACK_XY |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
456 |
CTRL_SET_PACK_XY |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
457 |
CTRL_SET_PACK_XY |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
523 |
CTRL_SET_PACK_XY |
& 0, 0, 1, k, 1, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
524 |
CTRL_SET_PACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
526 |
CTRL_SET_PACK_XY |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
527 |
CTRL_SET_PACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
530 |
CTRL_SET_PACK_XY |
& 0, 0, 1, k, Nr, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
531 |
CTRL_SET_PACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
533 |
CTRL_SET_PACK_XY |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_pack_xy.F |
534 |
CTRL_SET_PACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
338 |
CTRL_SET_PACK_XYZ |
CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
346 |
CTRL_SET_PACK_XYZ |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
371 |
CTRL_SET_PACK_XYZ |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
372 |
CTRL_SET_PACK_XYZ |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
442 |
CTRL_SET_PACK_XYZ |
& 0, 0, 1, k, Nr, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
443 |
CTRL_SET_PACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
445 |
CTRL_SET_PACK_XYZ |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
446 |
CTRL_SET_PACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
449 |
CTRL_SET_PACK_XYZ |
& 0, 0, 1, k, Nr, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
450 |
CTRL_SET_PACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
452 |
CTRL_SET_PACK_XYZ |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_pack_xyz.F |
453 |
CTRL_SET_PACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
457 |
CTRL_SET_UNPACK_XY |
CALL READ_REC_XY_RL( weighttype, wei2d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
465 |
CTRL_SET_UNPACK_XY |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
507 |
CTRL_SET_UNPACK_XY |
& 0, 0, 1, k, Nr, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
508 |
CTRL_SET_UNPACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
510 |
CTRL_SET_UNPACK_XY |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
511 |
CTRL_SET_UNPACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
549 |
CTRL_SET_UNPACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
551 |
CTRL_SET_UNPACK_XY |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
552 |
CTRL_SET_UNPACK_XY |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
554 |
CTRL_SET_UNPACK_XY |
& 0, 0, 1, k, 1, 0, 0, .TRUE., myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
560 |
CTRL_SET_UNPACK_XY |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xy.F |
561 |
CTRL_SET_UNPACK_XY |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
367 |
CTRL_SET_UNPACK_XYZ |
CALL READ_REC_XYZ_RL( weighttype, wei3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
375 |
CTRL_SET_UNPACK_XYZ |
CALL READ_REC_XYZ_RL( masktype, msk3d, 1, 1, myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
417 |
CTRL_SET_UNPACK_XYZ |
& 0, 0, 1, k, Nr, 0, 0, .FALSE., myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
418 |
CTRL_SET_UNPACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
420 |
CTRL_SET_UNPACK_XYZ |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
421 |
CTRL_SET_UNPACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
459 |
CTRL_SET_UNPACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
461 |
CTRL_SET_UNPACK_XYZ |
& Nx,Ny,.FALSE.,.TRUE.,myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
462 |
CTRL_SET_UNPACK_XYZ |
CALL BAR2( myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
464 |
CTRL_SET_UNPACK_XYZ |
& 0, 0, 1, k, Nr, 0, 0, .TRUE., myThid ) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
469 |
CTRL_SET_UNPACK_XYZ |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_set_unpack_xyz.F |
470 |
CTRL_SET_UNPACK_XYZ |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_smooth.F |
21 |
CTRL_SMOOTH |
INTEGER myThid |
|
./pkg/ctrl/ctrl_smooth.F |
38 |
CTRL_SMOOTH |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/ctrl/ctrl_smooth.F |
39 |
CTRL_SMOOTH |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ctrl/ctrl_smooth.F |
8 |
CTRL_SMOOTH |
I mask, myThid ) |
|
./pkg/ctrl/ctrl_swapffields.F |
109 |
CTRL_SWAPFFIELDS_3D |
INTEGER myThid |
|
./pkg/ctrl/ctrl_swapffields.F |
117 |
CTRL_SWAPFFIELDS_3D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
118 |
CTRL_SWAPFFIELDS_3D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
138 |
CTRL_SWAPFFIELDS_XZ |
I nNz, myThid ) |
|
./pkg/ctrl/ctrl_swapffields.F |
163 |
CTRL_SWAPFFIELDS_XZ |
INTEGER myThid |
|
./pkg/ctrl/ctrl_swapffields.F |
171 |
CTRL_SWAPFFIELDS_XZ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
172 |
CTRL_SWAPFFIELDS_XZ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
18 |
CTRL_SWAPFFIELDS |
I myThid ) |
|
./pkg/ctrl/ctrl_swapffields.F |
190 |
CTRL_SWAPFFIELDS_YZ |
I nNz, myThid ) |
|
./pkg/ctrl/ctrl_swapffields.F |
215 |
CTRL_SWAPFFIELDS_YZ |
INTEGER myThid |
|
./pkg/ctrl/ctrl_swapffields.F |
223 |
CTRL_SWAPFFIELDS_YZ |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
224 |
CTRL_SWAPFFIELDS_YZ |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
50 |
CTRL_SWAPFFIELDS |
INTEGER myThid |
|
./pkg/ctrl/ctrl_swapffields.F |
58 |
CTRL_SWAPFFIELDS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
59 |
CTRL_SWAPFFIELDS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
68 |
CTRL_SWAPFFIELDS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
69 |
CTRL_SWAPFFIELDS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ctrl/ctrl_swapffields.F |
86 |
CTRL_SWAPFFIELDS_3D |
I nNz, myThid ) |
|
./pkg/ctrl/optim_readparms.F |
65 |
OPTIM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ctrl/optim_readparms.F |
69 |
OPTIM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ctrl/optim_readparms.F |
95 |
OPTIM_READPARMS |
I myThid ) |
|
./pkg/debug/chksum_tiled.F |
13 |
CHKSUM_TILED |
INTEGER NN,bi,bj,myThid |
|
./pkg/debug/chksum_tiled.F |
6 |
CHKSUM_TILED |
SUBROUTINE CHKSUM_TILED( str,fld,NN,bi,bj,myThid ) |
|
./pkg/debug/debug_call.F |
22 |
DEBUG_CALL |
INTEGER myThid |
|
./pkg/debug/debug_call.F |
28 |
DEBUG_CALL |
CALL DEBUG_MSG( msgBuf, myThid ) |
|
./pkg/debug/debug_call.F |
8 |
DEBUG_CALL |
I myThid ) |
|
./pkg/debug/debug_cs_corner_uv.F |
50 |
DEBUG_CS_CORNER_UV |
INTEGER myThid |
|
./pkg/debug/debug_cs_corner_uv.F |
9 |
DEBUG_CS_CORNER_UV |
I k, ioUnit, bi,bj, myThid ) |
|
./pkg/debug/debug_enter.F |
22 |
DEBUG_ENTER |
INTEGER myThid |
|
./pkg/debug/debug_enter.F |
28 |
DEBUG_ENTER |
CALL DEBUG_MSG( msgBuf, myThid ) |
|
./pkg/debug/debug_enter.F |
8 |
DEBUG_ENTER |
I myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
104 |
DEBUG_FLD_STATS_RL |
_GLOBAL_MAX_RL( theMin, myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
107 |
DEBUG_FLD_STATS_RL |
_GLOBAL_MAX_RL( theMax, myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
109 |
DEBUG_FLD_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/debug/debug_fld_stats_rl.F |
110 |
DEBUG_FLD_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/debug/debug_fld_stats_rl.F |
126 |
DEBUG_FLD_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
14 |
DEBUG_FLD_STATS_RL |
I myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
44 |
DEBUG_FLD_STATS_RL |
INTEGER myThid |
|
./pkg/debug/debug_fld_stats_rl.F |
66 |
DEBUG_FLD_STATS_RL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/debug/debug_fld_stats_rl.F |
67 |
DEBUG_FLD_STATS_RL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/debug/debug_fld_stats_rl.F |
93 |
DEBUG_FLD_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileNbPt, nbPnts, myThid ) |
|
./pkg/debug/debug_fld_stats_rl.F |
94 |
DEBUG_FLD_STATS_RL |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
104 |
DEBUG_FLD_STATS_RS |
_GLOBAL_MAX_RL( theMin, myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
107 |
DEBUG_FLD_STATS_RS |
_GLOBAL_MAX_RL( theMax, myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
109 |
DEBUG_FLD_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/debug/debug_fld_stats_rs.F |
110 |
DEBUG_FLD_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/debug/debug_fld_stats_rs.F |
126 |
DEBUG_FLD_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileSD, theSD, myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
14 |
DEBUG_FLD_STATS_RS |
I myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
44 |
DEBUG_FLD_STATS_RS |
INTEGER myThid |
|
./pkg/debug/debug_fld_stats_rs.F |
66 |
DEBUG_FLD_STATS_RS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/debug/debug_fld_stats_rs.F |
67 |
DEBUG_FLD_STATS_RS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/debug/debug_fld_stats_rs.F |
93 |
DEBUG_FLD_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileNbPt, nbPnts, myThid ) |
|
./pkg/debug/debug_fld_stats_rs.F |
94 |
DEBUG_FLD_STATS_RS |
CALL GLOBAL_SUM_TILE_RL( tileMean, theMean, myThid ) |
|
./pkg/debug/debug_leave.F |
22 |
DEBUG_LEAVE |
INTEGER myThid |
|
./pkg/debug/debug_leave.F |
28 |
DEBUG_LEAVE |
CALL DEBUG_MSG( msgBuf, myThid ) |
|
./pkg/debug/debug_leave.F |
8 |
DEBUG_LEAVE |
I myThid ) |
|
./pkg/debug/debug_msg.F |
11 |
DEBUG_MSG |
I myThid ) |
|
./pkg/debug/debug_msg.F |
31 |
DEBUG_MSG |
INTEGER myThid |
|
./pkg/debug/debug_msg.F |
38 |
DEBUG_MSG |
_BEGIN_MASTER( myThid ) |
|
./pkg/debug/debug_msg.F |
41 |
DEBUG_MSG |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/debug/debug_msg.F |
44 |
DEBUG_MSG |
_END_MASTER( myThid ) |
|
./pkg/debug/debug_stats_rl.F |
26 |
DEBUG_STATS_RL |
INTEGER myThid |
|
./pkg/debug/debug_stats_rl.F |
37 |
DEBUG_STATS_RL |
I myThid ) |
|
./pkg/debug/debug_stats_rl.F |
39 |
DEBUG_STATS_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/debug/debug_stats_rl.F |
48 |
DEBUG_STATS_RL |
_END_MASTER( myThid ) |
|
./pkg/debug/debug_stats_rl.F |
8 |
DEBUG_STATS_RL |
I myThid ) |
|
./pkg/debug/debug_stats_rs.F |
26 |
DEBUG_STATS_RS |
INTEGER myThid |
|
./pkg/debug/debug_stats_rs.F |
37 |
DEBUG_STATS_RS |
I myThid ) |
|
./pkg/debug/debug_stats_rs.F |
39 |
DEBUG_STATS_RS |
_BEGIN_MASTER( myThid ) |
|
./pkg/debug/debug_stats_rs.F |
48 |
DEBUG_STATS_RS |
_END_MASTER( myThid ) |
|
./pkg/debug/debug_stats_rs.F |
8 |
DEBUG_STATS_RS |
I myThid ) |
|
./pkg/debug/fill_in_corners_rl.F |
31 |
FILL_IN_CORNERS_RL |
INTEGER myThid |
|
./pkg/debug/fill_in_corners_rl.F |
41 |
FILL_IN_CORNERS_RL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/debug/fill_in_corners_rl.F |
42 |
FILL_IN_CORNERS_RL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/debug/fill_in_corners_rl.F |
9 |
FILL_IN_CORNERS_RL |
I myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
11 |
WRITE_FULLARRAY_RL |
I iRec, myIter, myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
128 |
WRITE_FULLARRAY_RL |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
141 |
WRITE_FULLARRAY_RL |
_END_MASTER( myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
40 |
WRITE_FULLARRAY_RL |
INTEGER myThid |
|
./pkg/debug/write_fullarray_rl.F |
58 |
WRITE_FULLARRAY_RL |
_BEGIN_MASTER( myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
63 |
WRITE_FULLARRAY_RL |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/debug/write_fullarray_rl.F |
94 |
WRITE_FULLARRAY_RL |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
11 |
WRITE_FULLARRAY_RS |
I iRec, myIter, myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
128 |
WRITE_FULLARRAY_RS |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
141 |
WRITE_FULLARRAY_RS |
_END_MASTER( myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
40 |
WRITE_FULLARRAY_RS |
INTEGER myThid |
|
./pkg/debug/write_fullarray_rs.F |
58 |
WRITE_FULLARRAY_RS |
_BEGIN_MASTER( myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
63 |
WRITE_FULLARRAY_RS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/debug/write_fullarray_rs.F |
94 |
WRITE_FULLARRAY_RS |
& filePrec, (sNx+2*Olx)*(sNy+2*Oly), myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
12 |
DIAG_CALC_PSIVEL |
I prtMsg, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
175 |
DIAG_CALC_PSIVEL |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
179 |
DIAG_CALC_PSIVEL |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
207 |
DIAG_CALC_PSIVEL |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
215 |
DIAG_CALC_PSIVEL |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
242 |
DIAG_CALC_PSIVEL |
I dPsiX, dPsiY, myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
246 |
DIAG_CALC_PSIVEL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
247 |
DIAG_CALC_PSIVEL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
260 |
DIAG_CALC_PSIVEL |
_GLOBAL_SUM_RL( offSet, myThid ) |
|
./pkg/diagnostics/diag_calc_psivel.F |
263 |
DIAG_CALC_PSIVEL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
264 |
DIAG_CALC_PSIVEL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
275 |
DIAG_CALC_PSIVEL |
IF (debugMode) CALL DEBUG_LEAVE('DIAG_CALC_PSIVEL',myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
55 |
DIAG_CALC_PSIVEL |
INTEGER myThid |
|
./pkg/diagnostics/diag_calc_psivel.F |
80 |
DIAG_CALC_PSIVEL |
IF (debugMode) CALL DEBUG_ENTER('DIAG_CALC_PSIVEL',myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
89 |
DIAG_CALC_PSIVEL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_calc_psivel.F |
90 |
DIAG_CALC_PSIVEL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
107 |
DIAG_CG2D |
IF (debugMode) CALL DEBUG_ENTER('DIAG_CG2D',myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
111 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
112 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
128 |
DIAG_CG2D |
CALL EXCH_XY_RS(aC2d, myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
131 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
132 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
165 |
DIAG_CG2D |
CALL EXCH_XY_RL( x2d, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
168 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
169 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
16 |
DIAG_CG2D |
I printResidFrq, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
196 |
DIAG_CG2D |
CALL EXCH_XY_RL ( r2d, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
198 |
DIAG_CG2D |
CALL EXCH_S3D_RL( r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
200 |
DIAG_CG2D |
CALL GLOBAL_SUM_TILE_RL( errTile, err, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
202 |
DIAG_CG2D |
& CALL GLOBAL_SUM_TILE_RL( sumRHStile, sumRHS, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
211 |
DIAG_CG2D |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
217 |
DIAG_CG2D |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
219 |
DIAG_CG2D |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
224 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
235 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
236 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
253 |
DIAG_CG2D |
CALL GLOBAL_SUM_TILE_RL( eta_qrNtile,eta_qrN,myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
257 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
258 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
269 |
DIAG_CG2D |
CALL EXCH_S3D_RL( s2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
273 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
274 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
290 |
DIAG_CG2D |
CALL GLOBAL_SUM_TILE_RL( alphaTile, alpha, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
295 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
296 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
309 |
DIAG_CG2D |
CALL GLOBAL_SUM_TILE_RL( errTile, err, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
316 |
DIAG_CG2D |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
324 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
325 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
336 |
DIAG_CG2D |
CALL EXCH_XY_RL( r2d, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
339 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
340 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'x2d.',sufx, x2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
343 |
DIAG_CG2D |
CALL EXCH_S3D_RL( r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
356 |
DIAG_CG2D |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
357 |
DIAG_CG2D |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
369 |
DIAG_CG2D |
IF (debugMode) CALL DEBUG_LEAVE('DIAG_CG2D',myThid) |
|
./pkg/diagnostics/diag_cg2d.F |
65 |
DIAG_CG2D |
INTEGER myThid |
|
./pkg/diagnostics/diag_vegtile_fill.F |
11 |
DIAG_VEGTILE_FILL |
& check, chardiag, kLev, nLevs, bi, bj, myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
134 |
DIAG_VEGTILE_FILL |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
137 |
DIAG_VEGTILE_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
140 |
DIAG_VEGTILE_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
143 |
DIAG_VEGTILE_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
146 |
DIAG_VEGTILE_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
148 |
DIAG_VEGTILE_FILL |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
266 |
DIAG_VEGTILE_FILL |
I 3, bi, bj, myThid ) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
49 |
DIAG_VEGTILE_FILL |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_addtolist.F |
116 |
DIAGNOSTICS_ADDTOLIST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
119 |
DIAGNOSTICS_ADDTOLIST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
125 |
DIAGNOSTICS_ADDTOLIST |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
14 |
DIAGNOSTICS_ADDTOLIST |
I myThid ) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
44 |
DIAGNOSTICS_ADDTOLIST |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_addtolist.F |
59 |
DIAGNOSTICS_ADDTOLIST |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
65 |
DIAGNOSTICS_ADDTOLIST |
& ' ', diagName, ready2setDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
77 |
DIAGNOSTICS_ADDTOLIST |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
81 |
DIAGNOSTICS_ADDTOLIST |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
88 |
DIAGNOSTICS_ADDTOLIST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
91 |
DIAGNOSTICS_ADDTOLIST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_addtolist.F |
94 |
DIAGNOSTICS_ADDTOLIST |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
100 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
138 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
139 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
15 |
DIAGNOSTICS_CALC_PHIVEL |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
170 |
DIAGNOSTICS_CALC_PHIVEL |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
179 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
180 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
193 |
DIAGNOSTICS_CALC_PHIVEL |
_GLOBAL_MAX_RL( a2dMax, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
198 |
DIAGNOSTICS_CALC_PHIVEL |
_GLOBAL_MAX_RL( rhsMax, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
209 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
210 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
224 |
DIAGNOSTICS_CALC_PHIVEL |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
228 |
DIAGNOSTICS_CALC_PHIVEL |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
238 |
DIAGNOSTICS_CALC_PHIVEL |
I diagCG_prtResFrq, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
241 |
DIAGNOSTICS_CALC_PHIVEL |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
245 |
DIAGNOSTICS_CALC_PHIVEL |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
248 |
DIAGNOSTICS_CALC_PHIVEL |
_EXCH_XY_RL( x2d, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
252 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
253 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
264 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
265 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
285 |
DIAGNOSTICS_CALC_PHIVEL |
I prtFirstCall, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
287 |
DIAGNOSTICS_CALC_PHIVEL |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
293 |
DIAGNOSTICS_CALC_PHIVEL |
CALL MDSFINDUNIT( diagLoc_ioUnit, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
301 |
DIAGNOSTICS_CALC_PHIVEL |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
315 |
DIAGNOSTICS_CALC_PHIVEL |
_END_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
318 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
319 |
DIAGNOSTICS_CALC_PHIVEL |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
332 |
DIAGNOSTICS_CALC_PHIVEL |
IF (debugMode) CALL DEBUG_LEAVE('DIAGNOSTICS_CALC_PHIVEL',myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
48 |
DIAGNOSTICS_CALC_PHIVEL |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
90 |
DIAGNOSTICS_CALC_PHIVEL |
IF (debugMode) CALL DEBUG_ENTER('DIAGNOSTICS_CALC_PHIVEL',myThid) |
|
./pkg/diagnostics/diagnostics_calc_phivel.F |
99 |
DIAGNOSTICS_CALC_PHIVEL |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
107 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
110 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
113 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
11 |
DIAGNOSTICS_CHECK |
SUBROUTINE DIAGNOSTICS_CHECK(myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
124 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
127 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
130 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
158 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
162 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
170 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
173 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
181 |
DIAGNOSTICS_CHECK |
& jpoint1, ipoint1, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
185 |
DIAGNOSTICS_CHECK |
& jpoint2, ipoint2, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
188 |
DIAGNOSTICS_CHECK |
& jpoint2, ipoint2, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
193 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
197 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
202 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
207 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
212 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
221 |
DIAGNOSTICS_CHECK |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
26 |
DIAGNOSTICS_CHECK |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_check.F |
36 |
DIAGNOSTICS_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
45 |
DIAGNOSTICS_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
51 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
59 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
62 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_check.F |
72 |
DIAGNOSTICS_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
76 |
DIAGNOSTICS_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
80 |
DIAGNOSTICS_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
88 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_check.F |
94 |
DIAGNOSTICS_CHECK |
CALL PRINT_ERROR( msgBuf , myThid) |
|
./pkg/diagnostics/diagnostics_clear.F |
28 |
DIAGNOSTICS_CLEAR |
INTEGER listId, myThid |
|
./pkg/diagnostics/diagnostics_clear.F |
42 |
DIAGNOSTICS_CLEAR |
CALL DIAGNOSTICS_CLRDIAG( ipt, nLev, myThid ) |
|
./pkg/diagnostics/diagnostics_clear.F |
54 |
DIAGNOSTICS_CLRDIAG |
SUBROUTINE DIAGNOSTICS_CLRDIAG ( ipt, nLev, myThid ) |
|
./pkg/diagnostics/diagnostics_clear.F |
75 |
DIAGNOSTICS_CLRDIAG |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_clear.F |
87 |
DIAGNOSTICS_CLRDIAG |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_clear.F |
88 |
DIAGNOSTICS_CLRDIAG |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_clear.F |
9 |
DIAGNOSTICS_CLEAR |
SUBROUTINE DIAGNOSTICS_CLEAR (listId, myThid) |
|
./pkg/diagnostics/diagnostics_fill.F |
106 |
DIAGNOSTICS_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill.F |
11 |
DIAGNOSTICS_FILL |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill.F |
147 |
DIAGNOSTICS_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill.F |
60 |
DIAGNOSTICS_FILL |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill.F |
78 |
DIAGNOSTICS_FILL |
& ' ', chardiag, ready2fillDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_fill.F |
84 |
DIAGNOSTICS_FILL |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_fill.F |
85 |
DIAGNOSTICS_FILL |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
111 |
DIAGNOSTICS_FILL_FIELD |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
112 |
DIAGNOSTICS_FILL_FIELD |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
206 |
DIAGNOSTICS_FILL_FIELD |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
209 |
DIAGNOSTICS_FILL_FIELD |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
20 |
DIAGNOSTICS_FILL_FIELD |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
212 |
DIAGNOSTICS_FILL_FIELD |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
215 |
DIAGNOSTICS_FILL_FIELD |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
218 |
DIAGNOSTICS_FILL_FIELD |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
220 |
DIAGNOSTICS_FILL_FIELD |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
225 |
DIAGNOSTICS_FILL_FIELD |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
226 |
DIAGNOSTICS_FILL_FIELD |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
236 |
DIAGNOSTICS_FILL_FIELD |
I myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
245 |
DIAGNOSTICS_FILL_FIELD |
I bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
262 |
DIAGNOSTICS_FILL_FIELD |
I myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
271 |
DIAGNOSTICS_FILL_FIELD |
I biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
298 |
DIAGNOSTICS_HF_CUMUL |
I bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
341 |
DIAGNOSTICS_HF_CUMUL |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill_field.F |
422 |
DIAGNOSTICS_CUMULATE |
I myThid ) |
|
./pkg/diagnostics/diagnostics_fill_field.F |
467 |
DIAGNOSTICS_CUMULATE |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill_field.F |
88 |
DIAGNOSTICS_FILL_FIELD |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
106 |
DIAGNOSTICS_FILL_RS |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
11 |
DIAGNOSTICS_FILL_RS |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
149 |
DIAGNOSTICS_FILL_RS |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
60 |
DIAGNOSTICS_FILL_RS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
78 |
DIAGNOSTICS_FILL_RS |
& ' ', chardiag, ready2fillDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
84 |
DIAGNOSTICS_FILL_RS |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_fill_rs.F |
85 |
DIAGNOSTICS_FILL_RS |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
100 |
DIAGNOSTICS_FILL_STATE |
& 'UVELSQ ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
102 |
DIAGNOSTICS_FILL_STATE |
& 'VVELSQ ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
104 |
DIAGNOSTICS_FILL_STATE |
& 'WVELSQ ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
108 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UE_VEL_C',myThid) .OR. |
|
./pkg/diagnostics/diagnostics_fill_state.F |
109 |
DIAGNOSTICS_FILL_STATE |
& DIAGNOSTICS_IS_ON('VN_VEL_C',myThid) .OR. |
|
./pkg/diagnostics/diagnostics_fill_state.F |
110 |
DIAGNOSTICS_FILL_STATE |
& DIAGNOSTICS_IS_ON('UV_VEL_C',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
111 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
112 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
127 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpU,'UE_VEL_C',k,1,2,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
128 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpV,'VN_VEL_C',k,1,2,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
132 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UV_VEL_C',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
135 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UV_VEL_Z',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
136 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
137 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
149 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UV_VEL_Z',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
152 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WU_VEL ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
153 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
154 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
169 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WU_VEL ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
172 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WV_VEL ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
173 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
174 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
189 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WV_VEL ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
194 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UVELTH ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
195 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
196 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
207 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UVELTH ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
210 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VVELTH ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
211 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
212 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
223 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VVELTH ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
226 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WVELTH ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
227 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
228 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
240 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WVELTH ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
243 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UVELSLT ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
244 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
245 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
256 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UVELSLT ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
259 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VVELSLT ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
260 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
261 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
272 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VVELSLT ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
275 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WVELSLT ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
276 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
277 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
289 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WVELSLT ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
292 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UVELPHI ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
293 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
294 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
305 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UVELPHI ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
308 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VVELPHI ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
309 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
310 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
321 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VVELPHI ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
324 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('RCENTER ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
325 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
326 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
346 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'RCENTER ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
355 |
DIAGNOSTICS_FILL_STATE |
& 'TOTUTEND',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
357 |
DIAGNOSTICS_FILL_STATE |
& 'TOTVTEND',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
359 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('TOTTTEND',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
360 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
361 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
372 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'TOTTTEND',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
375 |
DIAGNOSTICS_FILL_STATE |
CALL LAYERS_FILL(tmpMk,1,'TOT',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
380 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('TOTSTEND',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
381 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
382 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
393 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'TOTSTEND',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
396 |
DIAGNOSTICS_FILL_STATE |
CALL LAYERS_FILL(tmpMk,2,'TOT',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
409 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(theta,'THETA ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
410 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(salt, 'SALT ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
413 |
DIAGNOSTICS_FILL_STATE |
IF ( useFIZHI .AND. DIAGNOSTICS_IS_ON('RELHUM ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
415 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
416 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
430 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk, 'RELHUM ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
435 |
DIAGNOSTICS_FILL_STATE |
& 'THETASQ ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
437 |
DIAGNOSTICS_FILL_STATE |
& 'SALTSQ ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
43 |
DIAGNOSTICS_FILL_STATE |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fill_state.F |
450 |
DIAGNOSTICS_FILL_STATE |
& 'gTinAB ',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
453 |
DIAGNOSTICS_FILL_STATE |
& 'gSinAB ',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
456 |
DIAGNOSTICS_FILL_STATE |
& CALL DIAGNOSTICS_FILL( gtNm1,'gTinAB ',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
458 |
DIAGNOSTICS_FILL_STATE |
& CALL DIAGNOSTICS_FILL( gsNm1,'gSinAB ',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
489 |
DIAGNOSTICS_FILL_STATE |
& ( DIAGNOSTICS_IS_ON('SALTanom',myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
490 |
DIAGNOSTICS_FILL_STATE |
& .OR.DIAGNOSTICS_IS_ON('SALTSQan',myThid) ) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
491 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
492 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
502 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL( tmpMk,'SALTanom',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
504 |
DIAGNOSTICS_FILL_STATE |
& 'SALTSQan',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
509 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UVELMASS',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
510 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
511 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
522 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UVELMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
525 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VVELMASS',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
526 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
527 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
538 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VVELMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
541 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(wVel, 'WVELMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
543 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('UTHMASS ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
544 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
545 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
557 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'UTHMASS ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
560 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VTHMASS ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
561 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
562 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
574 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VTHMASS ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
577 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WTHMASS ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
578 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
579 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
591 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WTHMASS ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
594 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('USLTMASS',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
595 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
596 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
608 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'USLTMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
611 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('VSLTMASS',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
612 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
613 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
625 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'VSLTMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
628 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('WSLTMASS',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
629 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
630 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
642 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'WSLTMASS',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
654 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
655 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
657 |
DIAGNOSTICS_FILL_STATE |
& 'TOTUTEND',0,Nr,-1,bi,bj,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
659 |
DIAGNOSTICS_FILL_STATE |
& 'TOTVTEND',0,Nr,-1,bi,bj,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
663 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('TOTTTEND',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
664 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
665 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
674 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'TOTTTEND',0,Nr,-1,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
677 |
DIAGNOSTICS_FILL_STATE |
CALL LAYERS_FILL(tmpMk,1,'TOT',0,Nr,-1,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
67 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(etaN, 'ETAN ',0, 1,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
684 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('TOTSTEND',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
685 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
686 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
695 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmpMk,'TOTSTEND',0,Nr,-1,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
698 |
DIAGNOSTICS_FILL_STATE |
CALL LAYERS_FILL(tmpMk,2,'TOT',0,Nr,-1,bi,bj,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
69 |
DIAGNOSTICS_FILL_STATE |
IF ( DIAGNOSTICS_IS_ON('RSURF ',myThid) ) THEN |
|
./pkg/diagnostics/diagnostics_fill_state.F |
70 |
DIAGNOSTICS_FILL_STATE |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
71 |
DIAGNOSTICS_FILL_STATE |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
79 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(tmp1k,'RSURF ',0,1,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
83 |
DIAGNOSTICS_FILL_STATE |
& 'ETANSQ ',0, 1,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
87 |
DIAGNOSTICS_FILL_STATE |
& 'DETADT2 ',0, 1,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
91 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL( phi_nh,'PHI_NH ',0,Nr,0,1,1,myThid ) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
95 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(uVel, 'UVEL ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
96 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(vVel, 'VVEL ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
97 |
DIAGNOSTICS_FILL_STATE |
CALL DIAGNOSTICS_FILL(wVel, 'WVEL ',0,Nr,0,1,1,myThid) |
|
./pkg/diagnostics/diagnostics_fill_state.F |
9 |
DIAGNOSTICS_FILL_STATE |
SUBROUTINE DIAGNOSTICS_FILL_STATE( selectVars, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
11 |
DIAGNOSTICS_FRACT_FILL |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
121 |
DIAGNOSTICS_FRACT_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
124 |
DIAGNOSTICS_FRACT_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
134 |
DIAGNOSTICS_FRACT_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
160 |
DIAGNOSTICS_FRACT_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
163 |
DIAGNOSTICS_FRACT_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
191 |
DIAGNOSTICS_FRACT_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
73 |
DIAGNOSTICS_FRACT_FILL |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
93 |
DIAGNOSTICS_FRACT_FILL |
& ' ', chardiag, ready2fillDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
98 |
DIAGNOSTICS_FRACT_FILL |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_fract_fill.F |
99 |
DIAGNOSTICS_FRACT_FILL |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
31 |
DIAGNOSTICS_INI_IO |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_ini_io.F |
42 |
DIAGNOSTICS_INI_IO |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
57 |
DIAGNOSTICS_INI_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
61 |
DIAGNOSTICS_INI_IO |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
64 |
DIAGNOSTICS_INI_IO |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
70 |
DIAGNOSTICS_INI_IO |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_ini_io.F |
9 |
DIAGNOSTICS_INI_IO |
SUBROUTINE DIAGNOSTICS_INI_IO( myThid ) |
|
./pkg/diagnostics/diagnostics_init_early.F |
11 |
DIAGNOSTICS_INIT_EARLY |
SUBROUTINE DIAGNOSTICS_INIT_EARLY( myThid ) |
|
./pkg/diagnostics/diagnostics_init_early.F |
214 |
DIAGNOSTICS_INIT_EARLY |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_init_early.F |
65 |
DIAGNOSTICS_INIT_EARLY |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_init_early.F |
74 |
DIAGNOSTICS_INIT_EARLY |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
11 |
DIAGNOSTICS_INIT_FIXED |
SUBROUTINE DIAGNOSTICS_INIT_FIXED(myThid) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
28 |
DIAGNOSTICS_INIT_FIXED |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
35 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGNOSTICS_SET_LEVELS( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
38 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGNOSTICS_SET_POINTERS( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
41 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGNOSTICS_SET_CALC( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
44 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGSTATS_SET_REGIONS( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
47 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGSTATS_SET_POINTERS( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
49 |
DIAGNOSTICS_INIT_FIXED |
CALL DIAGSTATS_INI_IO( myThid ) |
|
./pkg/diagnostics/diagnostics_init_fixed.F |
53 |
DIAGNOSTICS_INIT_FIXED |
call FIZHI_DIAGALARMS(myThid) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
12 |
DIAGNOSTICS_INIT_VARIA |
I myThid ) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
26 |
DIAGNOSTICS_INIT_VARIA |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_init_varia.F |
34 |
DIAGNOSTICS_INIT_VARIA |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
37 |
DIAGNOSTICS_INIT_VARIA |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
41 |
DIAGNOSTICS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
42 |
DIAGNOSTICS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
60 |
DIAGNOSTICS_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
61 |
DIAGNOSTICS_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
72 |
DIAGNOSTICS_INIT_VARIA |
CALL DIAGNOSTICS_READ_PICKUP( myThid ) |
|
./pkg/diagnostics/diagnostics_init_varia.F |
74 |
DIAGNOSTICS_INIT_VARIA |
CALL DIAGNOSTICS_SUMMARY( startTime, nIter0, myThid ) |
|
./pkg/diagnostics/diagnostics_interp_p2p.F |
13 |
DIAGNOSTICS_INTERP_P2P |
I undef, pInc,ijm,lm, myThid ) |
|
./pkg/diagnostics/diagnostics_interp_p2p.F |
47 |
DIAGNOSTICS_INTERP_P2P |
INTEGER ijm,lm,myThid |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
101 |
DIAGNOSTICS_INTERP_VERT |
& jpoint2, ipoint2, myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
106 |
DIAGNOSTICS_INTERP_VERT |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
113 |
DIAGNOSTICS_INTERP_VERT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
114 |
DIAGNOSTICS_INTERP_VERT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
117 |
DIAGNOSTICS_INTERP_VERT |
I jpoint1,0,ipoint1,0, bi,bj,myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
121 |
DIAGNOSTICS_INTERP_VERT |
I jpoint2,0,ipoint2,0, bi,bj,myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
128 |
DIAGNOSTICS_INTERP_VERT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
129 |
DIAGNOSTICS_INTERP_VERT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
149 |
DIAGNOSTICS_INTERP_VERT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
150 |
DIAGNOSTICS_INTERP_VERT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
16 |
DIAGNOSTICS_INTERP_VERT |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
192 |
DIAGNOSTICS_INTERP_VERT |
I undefRL,pInc,sNx*sNy,kdiag(ndId),myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
55 |
DIAGNOSTICS_INTERP_VERT |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
93 |
DIAGNOSTICS_INTERP_VERT |
& jpoint1, ipoint1, myThid ) |
|
./pkg/diagnostics/diagnostics_interp_vert.F |
98 |
DIAGNOSTICS_INTERP_VERT |
& jpoint2, ipoint2, myThid ) |
|
./pkg/diagnostics/diagnostics_is_on.F |
12 |
NO PROCEDURE |
LOGICAL FUNCTION DIAGNOSTICS_IS_ON( diagName, myThid ) |
|
./pkg/diagnostics/diagnostics_is_on.F |
31 |
NO PROCEDURE |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_is_on.F |
40 |
NO PROCEDURE |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_is_on.F |
41 |
NO PROCEDURE |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_list_check.F |
100 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
103 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
109 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
112 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
120 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
123 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
131 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
134 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
140 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
143 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
149 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
14 |
DIAGNOSTICS_LIST_CHECK |
I nbLists, nbFlds, fldsList, myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
152 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
158 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
161 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
167 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
170 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
176 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
179 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
185 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
188 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
194 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
197 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
209 |
DIAGNOSTICS_LIST_CHECK |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_list_check.F |
40 |
DIAGNOSTICS_LIST_CHECK |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_list_check.F |
53 |
DIAGNOSTICS_LIST_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_list_check.F |
73 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
76 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
82 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
85 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
91 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_list_check.F |
94 |
DIAGNOSTICS_LIST_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
11 |
DIAGNOSTICS_MAIN_INIT |
SUBROUTINE DIAGNOSTICS_MAIN_INIT( myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
136 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( eTitle//rTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
139 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
142 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
146 |
DIAGNOSTICS_MAIN_INIT |
I //' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
147 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
150 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
154 |
DIAGNOSTICS_MAIN_INIT |
I //' Anomaly Tendency', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
155 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2/s^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
158 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
162 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
165 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
175 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
176 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
179 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
186 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
198 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
201 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
210 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
218 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
222 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
225 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
229 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
232 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
235 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( 'Square of '//sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
236 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( '('//sUnit5c//')^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
239 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
244 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( '('//sUnit5c//')^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
247 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
256 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
264 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
268 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'^2/s^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
271 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
279 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
287 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
295 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
303 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
307 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( 'm.'//rUnit2c//'/s^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
310 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
314 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( 'm.'//rUnit2c//'/s^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
317 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
325 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
333 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
337 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
340 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
348 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
352 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'.m^2/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
357 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
361 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
365 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
369 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
373 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
377 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(tUnit4c//'.'//rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
380 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
384 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
385 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(sUnit5c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
389 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
393 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
394 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(sUnit5c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
398 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
402 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
403 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(sUnit5c//'.'//rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
406 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
410 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
414 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
418 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
422 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
426 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(tUnit4c//'.'//rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
429 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
433 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
434 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
438 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
442 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
443 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'.m/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
447 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
451 |
DIAGNOSTICS_MAIN_INIT |
I //sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
452 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS(sUnit5c//'.'//rUnit2c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
455 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
459 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
464 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
468 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
473 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
482 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
489 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
497 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
505 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
512 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
519 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
526 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
530 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
534 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
538 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
542 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
547 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
551 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
556 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
560 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
563 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE('Surface Dynamical '//pTitle,myThid) |
|
./pkg/diagnostics/diagnostics_main_init.F |
567 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
572 |
DIAGNOSTICS_MAIN_INIT |
I //pTitle//' Anomaly @ const r', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
576 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
581 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( 'Non-Hydrostatic '//pTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
585 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
593 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
601 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
608 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
617 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
625 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
632 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
639 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
63 |
DIAGNOSTICS_MAIN_INIT |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_main_init.F |
647 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
655 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
663 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
671 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
678 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
685 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
692 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
700 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
708 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
716 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
724 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
730 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( 'Cell-Center '//rTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
731 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
734 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
738 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE( eTitle//rTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
739 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
742 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
750 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
758 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
762 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'/day', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
765 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
768 |
DIAGNOSTICS_MAIN_INIT |
diagTitle = DIAGS_MK_TITLE('Tendency of '//sTitle, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
769 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'/day', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
772 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
779 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
787 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
793 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
796 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
800 |
DIAGNOSTICS_MAIN_INIT |
& sTitle//'forcing tendency', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
801 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
804 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
808 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
811 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
815 |
DIAGNOSTICS_MAIN_INIT |
& sTitle//'tendency from Adams-Bashforth', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
816 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
819 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
823 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( tUnit4c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
826 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
830 |
DIAGNOSTICS_MAIN_INIT |
& sTitle//'tendency going in Adams-Bashforth', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
831 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( sUnit5c//'/s', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
834 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
843 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
851 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
856 |
DIAGNOSTICS_MAIN_INIT |
diagUnits = DIAGS_MK_UNITS( rUnit2c//'/s^2', myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
859 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
869 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
877 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
886 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_main_init.F |
894 |
DIAGNOSTICS_MAIN_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
103 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_SET_UDIM(diag_mnc_bn, -1, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
104 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_RL_W_S('D',diag_mnc_bn,0,0,'T',tmpLev,myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
105 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_SET_UDIM(diag_mnc_bn, 0, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
106 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_I_W_S('I',diag_mnc_bn,0,0,'iter',klev,myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
119 |
DIAGNOSTICS_MNC_SET |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
121 |
DIAGNOSTICS_MNC_SET |
& 0,0, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
124 |
DIAGNOSTICS_MNC_SET |
& myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
127 |
DIAGNOSTICS_MNC_SET |
I misval_r8, misval_r4, misval_int, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
130 |
DIAGNOSTICS_MNC_SET |
& 'diag_levels', levs(1,listId), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
132 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_VNAME('diag_levels', myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
133 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_GNAME('diag_levels', myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
153 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_GNAME(dn(1), 1, dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
154 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_ADD_VNAME(dn(1), dn(1), 0,0, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
170 |
DIAGNOSTICS_MNC_SET |
& myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
177 |
DIAGNOSTICS_MNC_SET |
& myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
184 |
DIAGNOSTICS_MNC_SET |
& myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
189 |
DIAGNOSTICS_MNC_SET |
I misval_r8, misval_r4, misval_int, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
190 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_RS_W('D',diag_mnc_bn,0,0, dn(1), ztmp, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
191 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_VNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
192 |
DIAGNOSTICS_MNC_SET |
CALL MNC_CW_DEL_GNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
20 |
DIAGNOSTICS_MNC_SET |
I misValLoc, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
210 |
DIAGNOSTICS_MNC_OUT |
I misValLoc, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
243 |
DIAGNOSTICS_MNC_OUT |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
275 |
DIAGNOSTICS_MNC_OUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
349 |
DIAGNOSTICS_MNC_OUT |
& dim, dn, ib, ie, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
351 |
DIAGNOSTICS_MNC_OUT |
& 4, 5, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
353 |
DIAGNOSTICS_MNC_OUT |
& tdiag(ndId), myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
355 |
DIAGNOSTICS_MNC_OUT |
& udiag(ndId), myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
363 |
DIAGNOSTICS_MNC_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
364 |
DIAGNOSTICS_MNC_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
381 |
DIAGNOSTICS_MNC_OUT |
I misval_r8, misval_r4, misval_int, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
390 |
DIAGNOSTICS_MNC_OUT |
I misval_r8, misval_r4, misval_int, myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
397 |
DIAGNOSTICS_MNC_OUT |
& cdiag(ndId), qtmp, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
401 |
DIAGNOSTICS_MNC_OUT |
& cdiag(ndId), qtmp, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
404 |
DIAGNOSTICS_MNC_OUT |
CALL MNC_CW_DEL_VNAME(cdiag(ndId), myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
405 |
DIAGNOSTICS_MNC_OUT |
CALL MNC_CW_DEL_GNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
407 |
DIAGNOSTICS_MNC_OUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_mnc_out.F |
49 |
DIAGNOSTICS_MNC_SET |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_out.F |
12 |
DIAGNOSTICS_OUT |
I listId, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
162 |
DIAGNOSTICS_OUT |
I undefRL, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
206 |
DIAGNOSTICS_OUT |
IF ( debugLevel.GE.debLevB .AND. myThid.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
216 |
DIAGNOSTICS_OUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
220 |
DIAGNOSTICS_OUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
225 |
DIAGNOSTICS_OUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
236 |
DIAGNOSTICS_OUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
240 |
DIAGNOSTICS_OUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
241 |
DIAGNOSTICS_OUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
242 |
DIAGNOSTICS_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
243 |
DIAGNOSTICS_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
258 |
DIAGNOSTICS_OUT |
IF ( debugLevel.GE.debLevB .AND. myThid.EQ.1 ) THEN |
|
./pkg/diagnostics/diagnostics_out.F |
298 |
DIAGNOSTICS_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
299 |
DIAGNOSTICS_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
305 |
DIAGNOSTICS_OUT |
I ndId, mate, ip, im, bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
310 |
DIAGNOSTICS_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
311 |
DIAGNOSTICS_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
317 |
DIAGNOSTICS_OUT |
I mDbl, 0, im, 0, bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
324 |
DIAGNOSTICS_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
325 |
DIAGNOSTICS_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
329 |
DIAGNOSTICS_OUT |
I ndId, mate, ip, im, bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
333 |
DIAGNOSTICS_OUT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
334 |
DIAGNOSTICS_OUT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
338 |
DIAGNOSTICS_OUT |
I mDbl, 0, im, 0, bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
354 |
DIAGNOSTICS_OUT |
I undefRL, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
358 |
DIAGNOSTICS_OUT |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
35 |
DIAGNOSTICS_OUT |
INTEGER listId, myIter, myThid |
|
./pkg/diagnostics/diagnostics_out.F |
367 |
DIAGNOSTICS_OUT |
I undefRL, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
378 |
DIAGNOSTICS_OUT |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
383 |
DIAGNOSTICS_OUT |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
407 |
DIAGNOSTICS_OUT |
I qtmp1, -nRec, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
412 |
DIAGNOSTICS_OUT |
I qtmp2, -nRec, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
422 |
DIAGNOSTICS_OUT |
I undefRL, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
427 |
DIAGNOSTICS_OUT |
I undefRL, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_out.F |
450 |
DIAGNOSTICS_OUT |
& nRec, myIter, myThid) |
|
./pkg/diagnostics/diagnostics_out.F |
98 |
DIAGNOSTICS_OUT |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
101 |
DIAGNOSTICS_READ_PICKUP |
& d_cw_name, qdiag, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
102 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_CW_DEL_VNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
103 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_CW_DEL_GNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
11 |
DIAGNOSTICS_READ_PICKUP |
I myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
120 |
DIAGNOSTICS_READ_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
122 |
DIAGNOSTICS_READ_PICKUP |
& 4,5, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
124 |
DIAGNOSTICS_READ_PICKUP |
& 'diagnostics state',myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
129 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_CW_DEL_VNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
130 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_CW_DEL_GNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
141 |
DIAGNOSTICS_READ_PICKUP |
& numDiags, qdiag, nIter0, myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
145 |
DIAGNOSTICS_READ_PICKUP |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
149 |
DIAGNOSTICS_READ_PICKUP |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
166 |
DIAGNOSTICS_READ_PICKUP |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
28 |
DIAGNOSTICS_READ_PICKUP |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
71 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_FILE_CLOSE_ALL_MATCHING(diag_mnc_bn, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
72 |
DIAGNOSTICS_READ_PICKUP |
CALL MNC_CW_SET_UDIM(diag_mnc_bn, 1, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
97 |
DIAGNOSTICS_READ_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_read_pickup.F |
99 |
DIAGNOSTICS_READ_PICKUP |
& 4,5, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
113 |
DIAGNOSTICS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
118 |
DIAGNOSTICS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
11 |
DIAGNOSTICS_READPARMS |
SUBROUTINE DIAGNOSTICS_READPARMS( myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
124 |
DIAGNOSTICS_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
198 |
DIAGNOSTICS_READPARMS |
& 'DIAGNOSTICS_READPARMS', ku, myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
27 |
DIAGNOSTICS_READPARMS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_readparms.F |
303 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
306 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
333 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
336 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
339 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
349 |
DIAGNOSTICS_READPARMS |
diagName = DIAGS_RENAMED( fields(m,l), myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
357 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
360 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
363 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
372 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
375 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
378 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
429 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
432 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
460 |
DIAGNOSTICS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
465 |
DIAGNOSTICS_READPARMS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
471 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
475 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
485 |
DIAGNOSTICS_READPARMS |
diagName = DIAGS_RENAMED( stat_fields(m,l), myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
493 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
496 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
499 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
508 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
511 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
514 |
DIAGNOSTICS_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_readparms.F |
524 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
546 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
549 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
552 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
555 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
558 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
562 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
578 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
581 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
584 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
589 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
597 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
603 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
608 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
611 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
615 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
618 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
627 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
632 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
637 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
639 |
DIAGNOSTICS_READPARMS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_readparms.F |
641 |
DIAGNOSTICS_READPARMS |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
108 |
DIAGNOSTICS_SCALE_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
11 |
DIAGNOSTICS_SCALE_FILL |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
149 |
DIAGNOSTICS_SCALE_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
64 |
DIAGNOSTICS_SCALE_FILL |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
81 |
DIAGNOSTICS_SCALE_FILL |
& ' ', chardiag, ready2fillDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
86 |
DIAGNOSTICS_SCALE_FILL |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_scale_fill.F |
87 |
DIAGNOSTICS_SCALE_FILL |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
108 |
DIAGNOSTICS_SCALE_FILL_RS |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
11 |
DIAGNOSTICS_SCALE_FILL_RS |
I kLev, nLevs, bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
151 |
DIAGNOSTICS_SCALE_FILL_RS |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
64 |
DIAGNOSTICS_SCALE_FILL_RS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
81 |
DIAGNOSTICS_SCALE_FILL_RS |
& ' ', chardiag, ready2fillDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
86 |
DIAGNOSTICS_SCALE_FILL_RS |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_scale_fill_rs.F |
87 |
DIAGNOSTICS_SCALE_FILL_RS |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
100 |
DIAGNOSTICS_SET_CALC |
_GLOBAL_MAX_RL( d2Min, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
105 |
DIAGNOSTICS_SET_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
106 |
DIAGNOSTICS_SET_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
12 |
DIAGNOSTICS_SET_CALC |
SUBROUTINE DIAGNOSTICS_SET_CALC( myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
138 |
DIAGNOSTICS_SET_CALC |
_GLOBAL_MAX_RL( xyMin, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
142 |
DIAGNOSTICS_SET_CALC |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
146 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
150 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
155 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
176 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
184 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
195 |
DIAGNOSTICS_SET_CALC |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
196 |
DIAGNOSTICS_SET_CALC |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
34 |
DIAGNOSTICS_SET_CALC |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_set_calc.F |
51 |
DIAGNOSTICS_SET_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
52 |
DIAGNOSTICS_SET_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
60 |
DIAGNOSTICS_SET_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
61 |
DIAGNOSTICS_SET_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
82 |
DIAGNOSTICS_SET_CALC |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_calc.F |
83 |
DIAGNOSTICS_SET_CALC |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
10 |
DIAGNOSTICS_SET_LEVELS |
SUBROUTINE DIAGNOSTICS_SET_LEVELS( myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
110 |
DIAGNOSTICS_SET_LEVELS |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
117 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
124 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
136 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
143 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
153 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
162 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
169 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
177 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
179 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
182 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
191 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
200 |
DIAGNOSTICS_SET_LEVELS |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
249 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
252 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
255 |
DIAGNOSTICS_SET_LEVELS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
268 |
DIAGNOSTICS_SET_LEVELS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_set_levels.F |
59 |
DIAGNOSTICS_SET_LEVELS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_set_levels.F |
76 |
DIAGNOSTICS_SET_LEVELS |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
106 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
111 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
140 |
DIAGNOSTICS_SET_POINTERS |
CALL DIAGNOSTICS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
147 |
DIAGNOSTICS_SET_POINTERS |
I ld, md, nlists, nfields, flds, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
151 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
166 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
172 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
176 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
182 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
186 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
219 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
241 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
247 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
250 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
260 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
267 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
285 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
289 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
292 |
DIAGNOSTICS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
301 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
305 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
307 |
DIAGNOSTICS_SET_POINTERS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
30 |
DIAGNOSTICS_SET_POINTERS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
43 |
DIAGNOSTICS_SET_POINTERS |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
76 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
84 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
94 |
DIAGNOSTICS_SET_POINTERS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_set_pointers.F |
9 |
DIAGNOSTICS_SET_POINTERS |
SUBROUTINE DIAGNOSTICS_SET_POINTERS( myThid ) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
114 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
12 |
DIAGNOSTICS_SETDIAG |
I mId, listId, ndId, myThid ) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
137 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
142 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
148 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
203 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
208 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
213 |
DIAGNOSTICS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_setdiag.F |
43 |
DIAGNOSTICS_SETDIAG |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_status_error.F |
101 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
118 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
125 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
129 |
DIAGNOSTICS_STATUS_ERROR |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
13 |
DIAGNOSTICS_STATUS_ERROR |
I expectStatus, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
40 |
DIAGNOSTICS_STATUS_ERROR |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_status_error.F |
49 |
DIAGNOSTICS_STATUS_ERROR |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_status_error.F |
55 |
DIAGNOSTICS_STATUS_ERROR |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
60 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
65 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
71 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
78 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_status_error.F |
95 |
DIAGNOSTICS_STATUS_ERROR |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
15 |
DIAGNOSTICS_SUM_LEVELS |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
50 |
DIAGNOSTICS_SUM_LEVELS |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
74 |
DIAGNOSTICS_SUM_LEVELS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_sum_levels.F |
75 |
DIAGNOSTICS_SUM_LEVELS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_summary.F |
10 |
DIAGNOSTICS_SUMMARY |
SUBROUTINE DIAGNOSTICS_SUMMARY( myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_summary.F |
229 |
DIAGNOSTICS_SUMMARY |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_summary.F |
29 |
DIAGNOSTICS_SUMMARY |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_summary.F |
45 |
DIAGNOSTICS_SUMMARY |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_summary.F |
56 |
DIAGNOSTICS_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_summary.F |
62 |
DIAGNOSTICS_SUMMARY |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/diagnostics/diagnostics_summary.F |
66 |
DIAGNOSTICS_SUMMARY |
CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
100 |
DIAGNOSTICS_SWITCH_ONOFF |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
104 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
105 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
11 |
DIAGNOSTICS_SWITCH_ONOFF |
SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF( myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
149 |
DIAGNOSTICS_SWITCH_ONOFF |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
152 |
DIAGNOSTICS_SWITCH_ONOFF |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
156 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
157 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
190 |
DIAGNOSTICS_SWITCH_ONOFF |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
194 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
195 |
DIAGNOSTICS_SWITCH_ONOFF |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
196 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = dBugFlag.AND.(bi.EQ.1.AND.bj.EQ.1.AND.myThid.EQ.1) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
38 |
DIAGNOSTICS_SWITCH_ONOFF |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
65 |
DIAGNOSTICS_SWITCH_ONOFF |
dBugFlag = debugLevel.GE.debLevE .AND. myThid.EQ.1 |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
72 |
DIAGNOSTICS_SWITCH_ONOFF |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_switch_onoff.F |
74 |
DIAGNOSTICS_SWITCH_ONOFF |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
104 |
DIAGNOSTICS_GET_DIAG |
I ndId, mate, ip, im, bi, bj, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
129 |
DIAGNOSTICS_GET_DIAG |
INTEGER bi, bj, myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
210 |
DIAGNOSTICS_GET_POINTERS |
I myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
23 |
DIAGNOSTICS_COUNT |
I biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
245 |
DIAGNOSTICS_GET_POINTERS |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
311 |
DIAGNOSTICS_SETKLEV |
I diagName, nLevDiag, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
335 |
DIAGNOSTICS_SETKLEV |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
344 |
DIAGNOSTICS_SETKLEV |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
350 |
DIAGNOSTICS_SETKLEV |
& ' ', diagName, ready2setDiags, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
363 |
DIAGNOSTICS_SETKLEV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
377 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
381 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
386 |
DIAGNOSTICS_SETKLEV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
389 |
DIAGNOSTICS_SETKLEV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
395 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
399 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
403 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
406 |
DIAGNOSTICS_SETKLEV |
_END_MASTER( myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
418 |
DIAGNOSTICS_SETKLEV |
I parName, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
438 |
DIAGNOSTICS_SETKLEV |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
456 |
DIAGNOSTICS_SETKLEV |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
470 |
DIAGNOSTICS_SETKLEV |
I diagUnitsInPieces, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
488 |
DIAGNOSTICS_SETKLEV |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
49 |
DIAGNOSTICS_COUNT |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
533 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
537 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
550 |
DIAGNOSTICS_SETKLEV |
I diagTitleInPieces, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
568 |
DIAGNOSTICS_SETKLEV |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
602 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
606 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
60 |
DIAGNOSTICS_COUNT |
bi = myBxLo(myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
619 |
DIAGNOSTICS_SETKLEV |
I diagName, myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
61 |
DIAGNOSTICS_COUNT |
bj = myByLo(myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
640 |
DIAGNOSTICS_SETKLEV |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_utils.F |
667 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
669 |
DIAGNOSTICS_SETKLEV |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/diagnostics/diagnostics_utils.F |
78 |
DIAGNOSTICS_COUNT |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagnostics_utils.F |
79 |
DIAGNOSTICS_COUNT |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagnostics_write.F |
130 |
DIAGNOSTICS_WRITE |
I wrTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
137 |
DIAGNOSTICS_WRITE |
CALL DIAGSTATS_OUTPUT(n,wrTime,wrIter,myThid) |
|
./pkg/diagnostics/diagnostics_write.F |
145 |
DIAGNOSTICS_WRITE |
CALL DIAGNOSTICS_SUMMARY( myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
154 |
DIAGNOSTICS_WRITE |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_write.F |
156 |
DIAGNOSTICS_WRITE |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagnostics_write.F |
159 |
DIAGNOSTICS_WRITE |
CALL DIAGSTATS_CLOSE_IO( myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
182 |
DIAGNOSTICS_WRITE |
I wrTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
187 |
DIAGNOSTICS_WRITE |
IF ( dump2fileNow ) CALL DIAGNOSTICS_CLEAR(n,myThid) |
|
./pkg/diagnostics/diagnostics_write.F |
207 |
DIAGNOSTICS_WRITE |
I wrTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
212 |
DIAGNOSTICS_WRITE |
IF ( dump2fileNow ) CALL DIAGSTATS_CLEAR( n, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
31 |
DIAGNOSTICS_WRITE |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagnostics_write.F |
88 |
DIAGNOSTICS_WRITE |
I wrTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
8 |
DIAGNOSTICS_WRITE |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write.F |
95 |
DIAGNOSTICS_WRITE |
CALL DIAGNOSTICS_OUT(n,wrTime,wrIter,myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
101 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_RL_W_S('D',diag_mnc_bn,0,0,'T',myTime,myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
102 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_I_W_S('I',diag_mnc_bn,0,0,'iter',myIter,myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
128 |
DIAGNOSTICS_WRITE_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
130 |
DIAGNOSTICS_WRITE_PICKUP |
& 4,5, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
132 |
DIAGNOSTICS_WRITE_PICKUP |
& 'diagnostics state',myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
135 |
DIAGNOSTICS_WRITE_PICKUP |
& d_cw_name, qdiag, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
137 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_DEL_VNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
138 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_DEL_GNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
156 |
DIAGNOSTICS_WRITE_PICKUP |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
158 |
DIAGNOSTICS_WRITE_PICKUP |
& 4,5, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
15 |
DIAGNOSTICS_WRITE_PICKUP |
I myThid ) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
160 |
DIAGNOSTICS_WRITE_PICKUP |
& 'diagnostics state',myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
163 |
DIAGNOSTICS_WRITE_PICKUP |
& d_cw_name, ndiag, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
165 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_DEL_VNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
166 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_DEL_GNAME(d_cw_name, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
179 |
DIAGNOSTICS_WRITE_PICKUP |
& 1, myIter, myThid ) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
183 |
DIAGNOSTICS_WRITE_PICKUP |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
185 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MDSFINDUNIT( dUnit, myThid ) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
194 |
DIAGNOSTICS_WRITE_PICKUP |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
40 |
DIAGNOSTICS_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
91 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 0, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
93 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 3, 3, myIter, 0, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
95 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_SET_CITER(fn, 2, -1, -1, -1, myThid) |
|
./pkg/diagnostics/diagnostics_write_pickup.F |
98 |
DIAGNOSTICS_WRITE_PICKUP |
CALL MNC_CW_SET_UDIM(fn, 1, myThid) |
|
./pkg/diagnostics/diagstats_ascii_out.F |
13 |
DIAGSTATS_ASCII_OUT |
I mId, listId, myIter, myThid ) |
|
./pkg/diagnostics/diagstats_ascii_out.F |
36 |
DIAGSTATS_ASCII_OUT |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagstats_ascii_out.F |
46 |
DIAGSTATS_ASCII_OUT |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagstats_ascii_out.F |
86 |
DIAGSTATS_ASCII_OUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_calc.F |
16 |
DIAGSTATS_CALC |
I myThid ) |
|
./pkg/diagnostics/diagstats_calc.F |
72 |
DIAGSTATS_CALC |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_clear.F |
11 |
DIAGSTATS_CLEAR |
SUBROUTINE DIAGSTATS_CLEAR( listId, myThid) |
|
./pkg/diagnostics/diagstats_clear.F |
26 |
DIAGSTATS_CLEAR |
INTEGER listId, myThid |
|
./pkg/diagnostics/diagstats_clear.F |
36 |
DIAGSTATS_CLEAR |
CALL DIAGSTATS_CLRDIAG( ndId, iSp, myThid ) |
|
./pkg/diagnostics/diagstats_clear.F |
49 |
DIAGSTATS_CLRDIAG |
SUBROUTINE DIAGSTATS_CLRDIAG( ndId, iSp, myThid ) |
|
./pkg/diagnostics/diagstats_clear.F |
65 |
DIAGSTATS_CLRDIAG |
INTEGER ndId, iSp, myThid |
|
./pkg/diagnostics/diagstats_clear.F |
76 |
DIAGSTATS_CLRDIAG |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_clear.F |
77 |
DIAGSTATS_CLRDIAG |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_close_io.F |
30 |
DIAGSTATS_CLOSE_IO |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_close_io.F |
43 |
DIAGSTATS_CLOSE_IO |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagstats_close_io.F |
58 |
DIAGSTATS_CLOSE_IO |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/diagnostics/diagstats_close_io.F |
66 |
DIAGSTATS_CLOSE_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagstats_close_io.F |
77 |
DIAGSTATS_CLOSE_IO |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_close_io.F |
9 |
DIAGSTATS_CLOSE_IO |
SUBROUTINE DIAGSTATS_CLOSE_IO( myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
199 |
DIAGSTATS_FILL |
_BEGIN_MASTER(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
202 |
DIAGSTATS_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
205 |
DIAGSTATS_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
208 |
DIAGSTATS_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
211 |
DIAGSTATS_FILL |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
213 |
DIAGSTATS_FILL |
_END_MASTER(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
220 |
DIAGSTATS_FILL |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
221 |
DIAGSTATS_FILL |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
232 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
23 |
DIAGSTATS_FILL |
I bibjFlg, biArg, bjArg, myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
249 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
256 |
DIAGSTATS_FILL |
DO bj=myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
257 |
DIAGSTATS_FILL |
DO bi=myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_fill.F |
266 |
DIAGSTATS_FILL |
I iRun,jRun,k,bi,bj, myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
274 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
289 |
DIAGSTATS_FILL |
I iRun,jRun,k,bi,bj, myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
297 |
DIAGSTATS_FILL |
I ndId, gdiag(ndId), myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
323 |
DIAGSTATS_TO_RL |
I myThid ) |
|
./pkg/diagnostics/diagstats_fill.F |
365 |
DIAGSTATS_TO_RL |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_fill.F |
96 |
DIAGSTATS_FILL |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_global.F |
114 |
DIAGSTATS_GLOBAL |
_GLOBAL_SUM_RL(qtmp1(i,k),myThid) |
|
./pkg/diagnostics/diagstats_global.F |
124 |
DIAGSTATS_GLOBAL |
_GLOBAL_MAX_RL(tmpMin,myThid) |
|
./pkg/diagnostics/diagstats_global.F |
125 |
DIAGSTATS_GLOBAL |
_GLOBAL_MAX_RL(tmpMax,myThid) |
|
./pkg/diagnostics/diagstats_global.F |
132 |
DIAGSTATS_GLOBAL |
_GLOBAL_SUM_RL(qtmp2(i,k),myThid) |
|
./pkg/diagnostics/diagstats_global.F |
14 |
DIAGSTATS_GLOBAL |
I ndId, mate, iSp, iSm, myThid ) |
|
./pkg/diagnostics/diagstats_global.F |
37 |
DIAGSTATS_GLOBAL |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_global.F |
70 |
DIAGSTATS_GLOBAL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/diagnostics/diagstats_global.F |
71 |
DIAGSTATS_GLOBAL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_ini_io.F |
102 |
DIAGSTATS_INI_IO |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_ini_io.F |
30 |
DIAGSTATS_INI_IO |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_ini_io.F |
43 |
DIAGSTATS_INI_IO |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagstats_ini_io.F |
50 |
DIAGSTATS_INI_IO |
CALL MDSFINDUNIT( nUnit, myThid ) |
|
./pkg/diagnostics/diagstats_ini_io.F |
57 |
DIAGSTATS_INI_IO |
CALL RW_GET_SUFFIX( suff, startTime, nIter0, myThid ) |
|
./pkg/diagnostics/diagstats_ini_io.F |
69 |
DIAGSTATS_INI_IO |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/diagnostics/diagstats_ini_io.F |
9 |
DIAGSTATS_INI_IO |
SUBROUTINE DIAGSTATS_INI_IO( myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
137 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
149 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
160 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
16 |
DIAGSTATS_LOCAL |
I ndId, parsFld, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
175 |
DIAGSTATS_LOCAL |
I k,bi,bj, parsFld, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
188 |
DIAGSTATS_LOCAL |
I k,bi,bj, parsFld, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
204 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
215 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
226 |
DIAGSTATS_LOCAL |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_local.F |
75 |
DIAGSTATS_LOCAL |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_mnc_out.F |
106 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_SET_UDIM(diag_mnc_bn, -1, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
107 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_RL_W_S('D',diag_mnc_bn,1,1,'T',myTime,myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
108 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_SET_UDIM(diag_mnc_bn, 0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
109 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_I_W_S('I',diag_mnc_bn,1,1,'iter',myIter,myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
128 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
130 |
DIAGSTATS_MNC_OUT |
& 0,0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
133 |
DIAGSTATS_MNC_OUT |
& myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
136 |
DIAGSTATS_MNC_OUT |
& 'diag_levels', levs(1,listId), myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
138 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_VNAME('diag_levels', myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
139 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_GNAME('diag_levels', myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
13 |
DIAGSTATS_MNC_OUT |
I mId, listId, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
146 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_GNAME(dn(1), 1, dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
147 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_ADD_VNAME(dn(1), dn(1), 0,0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
163 |
DIAGSTATS_MNC_OUT |
& myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
170 |
DIAGSTATS_MNC_OUT |
& myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
177 |
DIAGSTATS_MNC_OUT |
& myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
179 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_RS_W('D',diag_mnc_bn,1,1, dn(1), ztmp, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
180 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_VNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
181 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_GNAME(dn(1), myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
230 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
236 |
DIAGSTATS_MNC_OUT |
& dim, dn, ib, ie, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
251 |
DIAGSTATS_MNC_OUT |
& 0,0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
253 |
DIAGSTATS_MNC_OUT |
& tdiag(ndId),myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
255 |
DIAGSTATS_MNC_OUT |
& udiag(ndId),myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
273 |
DIAGSTATS_MNC_OUT |
& tnam, stmp, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
282 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_VNAME(tnam, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
293 |
DIAGSTATS_MNC_OUT |
& 0,0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
295 |
DIAGSTATS_MNC_OUT |
& tdiag(ndId),myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
297 |
DIAGSTATS_MNC_OUT |
& udiag(ndId),myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
308 |
DIAGSTATS_MNC_OUT |
& tnam, stmp, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
310 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_VNAME(tnam, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
316 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_GNAME(d_cw_gname, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
317 |
DIAGSTATS_MNC_OUT |
CALL MNC_CW_DEL_GNAME(d_cw_gname0, myThid) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
321 |
DIAGSTATS_MNC_OUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_mnc_out.F |
48 |
DIAGSTATS_MNC_OUT |
INTEGER myIter, myThid |
|
./pkg/diagnostics/diagstats_mnc_out.F |
81 |
DIAGSTATS_MNC_OUT |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagstats_others_calc.F |
109 |
DIAGSTATS_LM_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
123 |
DIAGSTATS_LM_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
144 |
DIAGSTATS_G_CALC |
I k,bi,bj, parsFld, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
202 |
DIAGSTATS_G_CALC |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_others_calc.F |
21 |
DIAGSTATS_LM_CALC |
I k,bi,bj, parsFld, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
228 |
DIAGSTATS_G_CALC |
I drLoc, specialVal, exclSpVal, useWeight, myThid ) |
|
./pkg/diagnostics/diagstats_others_calc.F |
77 |
DIAGSTATS_LM_CALC |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_output.F |
101 |
DIAGSTATS_OUTPUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_output.F |
110 |
DIAGSTATS_OUTPUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_output.F |
114 |
DIAGSTATS_OUTPUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_output.F |
115 |
DIAGSTATS_OUTPUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
119 |
DIAGSTATS_OUTPUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
128 |
DIAGSTATS_OUTPUT |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
136 |
DIAGSTATS_OUTPUT |
& m, listId, myIter, myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
13 |
DIAGSTATS_OUTPUT |
I myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
143 |
DIAGSTATS_OUTPUT |
& m, listId, myTime, myIter, myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
36 |
DIAGSTATS_OUTPUT |
INTEGER listId, myIter, myThid |
|
./pkg/diagnostics/diagstats_output.F |
87 |
DIAGSTATS_OUTPUT |
I ndId, mate, iSp, iSm, myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
91 |
DIAGSTATS_OUTPUT |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_output.F |
96 |
DIAGSTATS_OUTPUT |
& SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
122 |
DIAGSTATS_SET_POINTERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
128 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
132 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
138 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
142 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
159 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
168 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
176 |
DIAGSTATS_SET_POINTERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
180 |
DIAGSTATS_SET_POINTERS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
182 |
DIAGSTATS_SET_POINTERS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
31 |
DIAGSTATS_SET_POINTERS |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_set_pointers.F |
44 |
DIAGSTATS_SET_POINTERS |
_BEGIN_MASTER( myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
67 |
DIAGSTATS_SET_POINTERS |
CALL DIAGSTATS_SETDIAG(mate,ndiagcount,md,ld,nd,myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
76 |
DIAGSTATS_SET_POINTERS |
I diagSt_nbFlds,diagSt_Flds,myThid) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
80 |
DIAGSTATS_SET_POINTERS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_pointers.F |
9 |
DIAGSTATS_SET_POINTERS |
SUBROUTINE DIAGSTATS_SET_POINTERS( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
103 |
DIAGSTATS_SET_REGIONS |
_EXCH_XY_RS( tmpVar, myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
104 |
DIAGSTATS_SET_REGIONS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
105 |
DIAGSTATS_SET_REGIONS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
121 |
DIAGSTATS_SET_REGIONS |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
123 |
DIAGSTATS_SET_REGIONS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
128 |
DIAGSTATS_SET_REGIONS |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
137 |
DIAGSTATS_SET_REGIONS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
144 |
DIAGSTATS_SET_REGIONS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
181 |
DIAGSTATS_SET_REGIONS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
185 |
DIAGSTATS_SET_REGIONS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
187 |
DIAGSTATS_SET_REGIONS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
192 |
DIAGSTATS_SET_REGIONS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
193 |
DIAGSTATS_SET_REGIONS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
204 |
DIAGSTATS_SET_REGIONS |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
215 |
DIAGSTATS_SET_REGIONS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
221 |
DIAGSTATS_SET_REGIONS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
225 |
DIAGSTATS_SET_REGIONS |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
227 |
DIAGSTATS_SET_REGIONS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
31 |
DIAGSTATS_SET_REGIONS |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_set_regions.F |
55 |
DIAGSTATS_SET_REGIONS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
56 |
DIAGSTATS_SET_REGIONS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/diagnostics/diagstats_set_regions.F |
68 |
DIAGSTATS_SET_REGIONS |
_BEGIN_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
75 |
DIAGSTATS_SET_REGIONS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
82 |
DIAGSTATS_SET_REGIONS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
85 |
DIAGSTATS_SET_REGIONS |
_END_MASTER( myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
99 |
DIAGSTATS_SET_REGIONS |
& nIter0, myThid ) |
|
./pkg/diagnostics/diagstats_set_regions.F |
9 |
DIAGSTATS_SET_REGIONS |
SUBROUTINE DIAGSTATS_SET_REGIONS( myThid ) |
|
./pkg/diagnostics/diagstats_setdiag.F |
100 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_setdiag.F |
12 |
DIAGSTATS_SETDIAG |
I mId, listId, ndId, myThid ) |
|
./pkg/diagnostics/diagstats_setdiag.F |
131 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_setdiag.F |
135 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_setdiag.F |
143 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_setdiag.F |
43 |
DIAGSTATS_SETDIAG |
INTEGER myThid |
|
./pkg/diagnostics/diagstats_setdiag.F |
88 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/diagnostics/diagstats_setdiag.F |
92 |
DIAGSTATS_SETDIAG |
CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid) |
|
./pkg/dic/alk_surfforcing.F |
12 |
ALK_SURFFORCING |
I myIter,myTime,myThid) |
|
./pkg/dic/alk_surfforcing.F |
34 |
ALK_SURFFORCING |
INTEGER myIter, myThid |
|
./pkg/dic/bio_export.F |
16 |
BIO_EXPORT |
I myIter,myTime,myThid) |
|
./pkg/dic/bio_export.F |
41 |
BIO_EXPORT |
INTEGER myThid |
|
./pkg/dic/bio_export.F |
73 |
BIO_EXPORT |
CALL INSOL(myTime,sfac,bi,bj,myThid) |
|
./pkg/dic/calcite_saturation.F |
119 |
CALCITE_SATURATION |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/dic/calcite_saturation.F |
12 |
CALCITE_SATURATION |
I myIter,myTime,myThid) |
|
./pkg/dic/calcite_saturation.F |
37 |
CALCITE_SATURATION |
INTEGER myThid |
|
./pkg/dic/calcite_saturation.F |
78 |
CALCITE_SATURATION |
I k,myThid) |
|
./pkg/dic/car_flux.F |
12 |
CAR_FLUX |
I myIter,myTime,myThid) |
|
./pkg/dic/car_flux.F |
33 |
CAR_FLUX |
INTEGER myThid |
|
./pkg/dic/car_flux_omega_top.F |
12 |
CAR_FLUX_OMEGA_TOP |
I myIter,myTime,myThid) |
|
./pkg/dic/car_flux_omega_top.F |
35 |
CAR_FLUX_OMEGA_TOP |
INTEGER myThid |
|
./pkg/dic/carbon_chem.F |
29 |
CALC_PCO2 |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/dic/carbon_chem.F |
348 |
CALC_PCO2_APPROX |
I i,j,k,bi,bj,myIter,myThid ) |
|
./pkg/dic/carbon_chem.F |
392 |
CALC_PCO2_APPROX |
INTEGER myThid |
|
./pkg/dic/carbon_chem.F |
497 |
CARBON_COEFFS |
I bi,bj,iMin,iMax,jMin,jMax,myThid) |
|
./pkg/dic/carbon_chem.F |
547 |
CARBON_COEFFS |
INTEGER myThid |
|
./pkg/dic/carbon_chem.F |
68 |
CALC_PCO2 |
INTEGER myThid |
|
./pkg/dic/carbon_chem.F |
740 |
CARBON_COEFFS_PRESSURE_DEP |
I Klevel,myThid) |
|
./pkg/dic/carbon_chem.F |
797 |
CARBON_COEFFS_PRESSURE_DEP |
INTEGER myThid |
|
./pkg/dic/dic_atmos.F |
100 |
DIC_ATMOS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_atmos.F |
101 |
DIC_ATMOS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_atmos.F |
11 |
DIC_ATMOS |
SUBROUTINE DIC_ATMOS( myTime, myIter, myThid ) |
|
./pkg/dic/dic_atmos.F |
127 |
DIC_ATMOS |
CALL GLOBAL_SUM_TILE_RL( tile_flux, total_flux, myThid ) |
|
./pkg/dic/dic_atmos.F |
128 |
DIC_ATMOS |
CALL GLOBAL_SUM_TILE_RL( tile_carbon, total_carbon, myThid ) |
|
./pkg/dic/dic_atmos.F |
137 |
DIC_ATMOS |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_atmos.F |
183 |
DIC_ATMOS |
_END_MASTER(myThid) |
|
./pkg/dic/dic_atmos.F |
196 |
DIC_ATMOS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_atmos.F |
197 |
DIC_ATMOS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_atmos.F |
38 |
DIC_ATMOS |
INTEGER myIter, myThid |
|
./pkg/dic/dic_biotic_diags.F |
100 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
102 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
112 |
DIC_BIOTIC_DIAGS |
CALL MNC_CW_SET_UDIM('dic_tave', -1, myThid) |
|
./pkg/dic/dic_biotic_diags.F |
113 |
DIC_BIOTIC_DIAGS |
CALL MNC_CW_RL_W_S('D','dic_tave',0,0,'T',myTime,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
114 |
DIC_BIOTIC_DIAGS |
CALL MNC_CW_SET_UDIM('dic_tave', 0, myThid) |
|
./pkg/dic/dic_biotic_diags.F |
115 |
DIC_BIOTIC_DIAGS |
CALL MNC_CW_I_W_S('I','dic_tave',0,0,'iter',myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
117 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_BIO_ave',BIOave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
119 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_CAR_ave',CARave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
121 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_SUR_ave',SURave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
123 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_SURO_ave',SUROave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
125 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_pH_ave',pHave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
127 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_pCO2_ave',pCO2ave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
129 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_fluxCO2_ave',fluxCO2ave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
131 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_OmegaC_ave',OmegaCave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
133 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_pflux_ave',pfluxave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
135 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_epflux_ave',epfluxave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
137 |
DIC_BIOTIC_DIAGS |
& pf,'dic_tave',0,0,'dic_cflux_ave',cfluxave,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
142 |
DIC_BIOTIC_DIAGS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_biotic_diags.F |
143 |
DIC_BIOTIC_DIAGS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_biotic_diags.F |
144 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(BIOave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
145 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(CARave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
146 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(SURave,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
147 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(SUROave,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
148 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(pCO2ave,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
149 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(pHave,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
150 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(fluxCO2ave,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
151 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(OmegaCave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
152 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(pfluxave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
153 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(epfluxave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
154 |
DIC_BIOTIC_DIAGS |
CALL TIMEAVE_RESET(cfluxave,Nr,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
29 |
DIC_BIOTIC_DIAGS |
INTEGER myThid |
|
./pkg/dic/dic_biotic_diags.F |
48 |
DIC_BIOTIC_DIAGS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_biotic_diags.F |
49 |
DIC_BIOTIC_DIAGS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_biotic_diags.F |
51 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
53 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
55 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
57 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
59 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
61 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
63 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
65 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
67 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
69 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
71 |
DIC_BIOTIC_DIAGS |
& bi,bj,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
79 |
DIC_BIOTIC_DIAGS |
CALL RW_GET_SUFFIX( suff, myTime, myIter, myThid ) |
|
./pkg/dic/dic_biotic_diags.F |
7 |
DIC_BIOTIC_DIAGS |
SUBROUTINE DIC_BIOTIC_DIAGS( myTime, myIter, myThid ) |
|
./pkg/dic/dic_biotic_diags.F |
82 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
84 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
86 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
88 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
90 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
92 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
94 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
96 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_diags.F |
98 |
DIC_BIOTIC_DIAGS |
& myIter,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
115 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_ENTER('DIC_BIOTIC_FORCING',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
120 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('DIC_FIELDS_UPDATE',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
123 |
DIC_BIOTIC_FORCING |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
161 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('DIC_SURFFORCING',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
167 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
171 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('ALK_SURFFORCING',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
177 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
182 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('O2_SURFFORCING',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
188 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
194 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('FE_CHEM',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
199 |
DIC_BIOTIC_FORCING |
I myIter, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
19 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
204 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('BIO_EXPORT',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
213 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
217 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('PHOS_FLUX',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
223 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
243 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('CALCITE_SATURATION',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
248 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
252 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('CAR_FLUX_OMEGA_TOP',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
258 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
262 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('CAR_FLUX',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
268 |
DIC_BIOTIC_FORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
375 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_CALL('FE_CHEM',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
380 |
DIC_BIOTIC_FORCING |
I myIter, myThid ) |
|
./pkg/dic/dic_biotic_forcing.F |
429 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(BIOac ,'DICBIOA ',0,Nr,2,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
430 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(CAR ,'DICCARB ',0,Nr,2,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
431 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(pCO2 ,'DICPCO2 ',0,1 ,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
432 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(fluxCO2,'DICCFLX ',0,1 ,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
433 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(pH ,'DICPHAV ',0,1 ,1,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
434 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(SURC ,'DICTFLX ',0,1 ,2,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
436 |
DIC_BIOTIC_FORCING |
CALL DIAGNOSTICS_FILL(SURO ,'DICOFLX ',0,1 ,2,bi,bj,myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
442 |
DIC_BIOTIC_FORCING |
IF (debugMode) CALL DEBUG_LEAVE('DIC_BIOTIC_FORCING',myThid) |
|
./pkg/dic/dic_biotic_forcing.F |
60 |
DIC_BIOTIC_FORCING |
INTEGER myThid |
|
./pkg/dic/dic_biotic_init.F |
10 |
DIC_BIOTIC_INIT |
SUBROUTINE DIC_BIOTIC_INIT( myThid ) |
|
./pkg/dic/dic_biotic_init.F |
24 |
DIC_BIOTIC_INIT |
INTEGER myThid |
|
./pkg/dic/dic_biotic_init.F |
35 |
DIC_BIOTIC_INIT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_biotic_init.F |
36 |
DIC_BIOTIC_INIT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_biotic_init.F |
37 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(BIOave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
38 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(CARave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
39 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(SURave, 1, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
40 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(SUROave, 1, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
41 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(pCO2ave, 1, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
42 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(pHave, 1, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
43 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(fluxCO2ave, 1, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
44 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(OmegaCave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
45 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(pfluxave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
46 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(epfluxave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_biotic_init.F |
47 |
DIC_BIOTIC_INIT |
CALL TIMEAVE_RESET(cfluxave, Nr, bi, bj, myThid) |
|
./pkg/dic/dic_cost.F |
13 |
DIC_COST |
I myTime, myIter, myThid ) |
|
./pkg/dic/dic_cost.F |
36 |
DIC_COST |
INTEGER myThid |
|
./pkg/dic/dic_cost.F |
45 |
DIC_COST |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_cost.F |
46 |
DIC_COST |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_cost.F |
57 |
DIC_COST |
CALL GLOBAL_SUM_TILE_RL( loc_cost, glb_cost, myThid ) |
|
./pkg/dic/dic_cost.F |
59 |
DIC_COST |
_BEGIN_MASTER( myThid ) |
|
./pkg/dic/dic_cost.F |
64 |
DIC_COST |
_END_MASTER( myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
20 |
DIC_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/dic/dic_diagnostics_init.F |
40 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
47 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
54 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
61 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
68 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
75 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
7 |
DIC_DIAGNOSTICS_INIT |
SUBROUTINE DIC_DIAGNOSTICS_INIT(myThid ) |
|
./pkg/dic/dic_diagnostics_init.F |
82 |
DIC_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
101 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
105 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
107 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
111 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
113 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
118 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
11 |
DIC_FIELDS_LOAD |
I myIter, myTime, myThid ) |
|
./pkg/dic/dic_fields_load.F |
120 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
127 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
133 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
135 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
140 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(dicwind0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
141 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(dicwind1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
142 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(atmosp0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
143 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(atmosp1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
144 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(silica0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
145 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(silica1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
146 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(ice0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
147 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(ice1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
149 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(par0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
150 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(par1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
153 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(chlinput, myThid ) |
|
./pkg/dic/dic_fields_load.F |
156 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(feinput0, myThid ) |
|
./pkg/dic/dic_fields_load.F |
157 |
DIC_FIELDS_LOAD |
_EXCH_XY_RS(feinput1, myThid ) |
|
./pkg/dic/dic_fields_load.F |
161 |
DIC_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_fields_load.F |
162 |
DIC_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_fields_load.F |
170 |
DIC_FIELDS_LOAD |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_fields_load.F |
171 |
DIC_FIELDS_LOAD |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_fields_load.F |
223 |
DIC_FIELDS_LOAD |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_fields_load.F |
31 |
DIC_FIELDS_LOAD |
INTEGER myThid |
|
./pkg/dic/dic_fields_load.F |
50 |
DIC_FIELDS_LOAD |
I deltaTClock, myTime, myThid ) |
|
./pkg/dic/dic_fields_load.F |
52 |
DIC_FIELDS_LOAD |
bi = myBxLo(myThid) |
|
./pkg/dic/dic_fields_load.F |
53 |
DIC_FIELDS_LOAD |
bj = myByLo(myThid) |
|
./pkg/dic/dic_fields_load.F |
56 |
DIC_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_fields_load.F |
61 |
DIC_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/dic/dic_fields_load.F |
81 |
DIC_FIELDS_LOAD |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_fields_load.F |
86 |
DIC_FIELDS_LOAD |
_END_MASTER(myThid) |
|
./pkg/dic/dic_fields_load.F |
93 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
95 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_load.F |
99 |
DIC_FIELDS_LOAD |
& myIter,myThid ) |
|
./pkg/dic/dic_fields_update.F |
11 |
DIC_FIELDS_UPDATE |
I bi, bj, myTime, myIter, myThid ) |
|
./pkg/dic/dic_fields_update.F |
44 |
DIC_FIELDS_UPDATE |
INTEGER myThid |
|
./pkg/dic/dic_ini_atmos.F |
105 |
DIC_INI_ATMOS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
106 |
DIC_INI_ATMOS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
11 |
DIC_INI_ATMOS |
SUBROUTINE DIC_INI_ATMOS( myTime, myIter, myThid ) |
|
./pkg/dic/dic_ini_atmos.F |
124 |
DIC_INI_ATMOS |
CALL GLOBAL_SUM_TILE_RL( tile_carbon, total_carbon, myThid ) |
|
./pkg/dic/dic_ini_atmos.F |
127 |
DIC_INI_ATMOS |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
130 |
DIC_INI_ATMOS |
_END_MASTER(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
135 |
DIC_INI_ATMOS |
CALL DIC_READ_CO2_PICKUP( nIter0, myThid ) |
|
./pkg/dic/dic_ini_atmos.F |
138 |
DIC_INI_ATMOS |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
165 |
DIC_INI_ATMOS |
_END_MASTER(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
175 |
DIC_INI_ATMOS |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
176 |
DIC_INI_ATMOS |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_ini_atmos.F |
38 |
DIC_INI_ATMOS |
INTEGER myIter, myThid |
|
./pkg/dic/dic_ini_forcing.F |
10 |
DIC_INI_FORCING |
SUBROUTINE DIC_INI_FORCING( myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
27 |
DIC_INI_FORCING |
INTEGER myThid |
|
./pkg/dic/dic_ini_forcing.F |
39 |
DIC_INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_ini_forcing.F |
40 |
DIC_INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_ini_forcing.F |
44 |
DIC_INI_FORCING |
CALL LEF_ZERO( dicwind0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
45 |
DIC_INI_FORCING |
CALL LEF_ZERO( dicwind1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
46 |
DIC_INI_FORCING |
CALL LEF_ZERO( atmosp0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
47 |
DIC_INI_FORCING |
CALL LEF_ZERO( atmosp1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
48 |
DIC_INI_FORCING |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
49 |
DIC_INI_FORCING |
CALL LEF_ZERO( silica1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
50 |
DIC_INI_FORCING |
CALL LEF_ZERO( ice0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
51 |
DIC_INI_FORCING |
CALL LEF_ZERO( ice1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
53 |
DIC_INI_FORCING |
CALL LEF_ZERO( par0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
54 |
DIC_INI_FORCING |
CALL LEF_ZERO( par1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
57 |
DIC_INI_FORCING |
CALL LEF_ZERO( feinput0,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
58 |
DIC_INI_FORCING |
CALL LEF_ZERO( feinput1,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
61 |
DIC_INI_FORCING |
CALL LEF_ZERO( chlinput,myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
69 |
DIC_INI_FORCING |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_ini_forcing.F |
75 |
DIC_INI_FORCING |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_ini_forcing.F |
76 |
DIC_INI_FORCING |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_init_fixed.F |
101 |
DIC_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/dic/dic_init_fixed.F |
105 |
DIC_INIT_FIXED |
CALL DIC_MNC_INIT( myThid ) |
|
./pkg/dic/dic_init_fixed.F |
111 |
DIC_INIT_FIXED |
CALL DIC_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/dic/dic_init_fixed.F |
11 |
DIC_INIT_FIXED |
SUBROUTINE DIC_INIT_FIXED( myThid ) |
|
./pkg/dic/dic_init_fixed.F |
27 |
DIC_INIT_FIXED |
INTEGER myThid |
|
./pkg/dic/dic_init_fixed.F |
37 |
DIC_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_init_fixed.F |
91 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_init_fixed.F |
93 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_init_fixed.F |
95 |
DIC_INIT_FIXED |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_init_varia.F |
11 |
DIC_INIT_VARIA |
SUBROUTINE DIC_INIT_VARIA( myThid ) |
|
./pkg/dic/dic_init_varia.F |
29 |
DIC_INIT_VARIA |
INTEGER myThid |
|
./pkg/dic/dic_init_varia.F |
40 |
DIC_INIT_VARIA |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_init_varia.F |
51 |
DIC_INIT_VARIA |
_END_MASTER(myThid) |
|
./pkg/dic/dic_init_varia.F |
56 |
DIC_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_init_varia.F |
57 |
DIC_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_mnc_init.F |
100 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
103 |
DIC_MNC_INIT |
& 'dic_cflux_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
105 |
DIC_MNC_INIT |
& 'dic_cflux_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
107 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
11 |
DIC_MNC_INIT |
SUBROUTINE DIC_MNC_INIT( myThid ) |
|
./pkg/dic/dic_mnc_init.F |
24 |
DIC_MNC_INIT |
INTEGER myThid |
|
./pkg/dic/dic_mnc_init.F |
33 |
DIC_MNC_INIT |
& 'dic_BIO_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
35 |
DIC_MNC_INIT |
& 'dic_BIO_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
37 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
40 |
DIC_MNC_INIT |
& 'dic_CAR_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
42 |
DIC_MNC_INIT |
& 'dic_CAR_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
44 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
47 |
DIC_MNC_INIT |
& 'dic_SUR_ave', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/dic/dic_mnc_init.F |
49 |
DIC_MNC_INIT |
& 'dic_SUR_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
51 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
54 |
DIC_MNC_INIT |
& 'dic_SURO_ave', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/dic/dic_mnc_init.F |
56 |
DIC_MNC_INIT |
& 'dic_SURO_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
58 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
61 |
DIC_MNC_INIT |
& 'dic_pH_ave', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/dic/dic_mnc_init.F |
63 |
DIC_MNC_INIT |
& 'dic_pH_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
65 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
68 |
DIC_MNC_INIT |
& 'dic_pCO2_ave', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/dic/dic_mnc_init.F |
70 |
DIC_MNC_INIT |
& 'dic_pCO2_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
72 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
75 |
DIC_MNC_INIT |
& 'dic_fluxCO2_ave', 'Cen_xy_Hn__-__t', 3,4, myThid) |
|
./pkg/dic/dic_mnc_init.F |
77 |
DIC_MNC_INIT |
& 'dic_fluxCO2_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
79 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
82 |
DIC_MNC_INIT |
& 'dic_OmegaC_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
84 |
DIC_MNC_INIT |
& 'dic_OmegaC_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
86 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
89 |
DIC_MNC_INIT |
& 'dic_pflux_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
91 |
DIC_MNC_INIT |
& 'dic_pflux_ave','units','--', myThid) |
|
./pkg/dic/dic_mnc_init.F |
93 |
DIC_MNC_INIT |
& '', myThid) |
|
./pkg/dic/dic_mnc_init.F |
96 |
DIC_MNC_INIT |
& 'dic_epflux_ave', 'Cen_xy_Hn__C__t', 4,5, myThid) |
|
./pkg/dic/dic_mnc_init.F |
98 |
DIC_MNC_INIT |
& 'dic_epflux_ave','units','--', myThid) |
|
./pkg/dic/dic_read_co2_pickup.F |
20 |
DIC_READ_CO2_PICKUP |
INTEGER myThid |
|
./pkg/dic/dic_read_co2_pickup.F |
45 |
DIC_READ_CO2_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
59 |
DIC_READ_CO2_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
66 |
DIC_READ_CO2_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
69 |
DIC_READ_CO2_PICKUP |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_read_co2_pickup.F |
70 |
DIC_READ_CO2_PICKUP |
CALL MDSFINDUNIT( ioUnit, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
71 |
DIC_READ_CO2_PICKUP |
length_of_rec = MDS_RECLEN( fp, 2, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
7 |
DIC_READ_CO2_PICKUP |
I myIter, myThid ) |
|
./pkg/dic/dic_read_co2_pickup.F |
81 |
DIC_READ_CO2_PICKUP |
_END_MASTER(myThid) |
|
./pkg/dic/dic_read_pickup.F |
21 |
DIC_READ_PICKUP |
INTEGER myThid |
|
./pkg/dic/dic_read_pickup.F |
44 |
DIC_READ_PICKUP |
CALL RW_GET_SUFFIX( suff, startTime, myIter, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
58 |
DIC_READ_PICKUP |
I useCurrentDir, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
65 |
DIC_READ_PICKUP |
CALL READ_REC_3D_RL( fn, fp, 1, pH, 1, myIter, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
68 |
DIC_READ_PICKUP |
_EXCH_XY_RL( pH, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
75 |
DIC_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
80 |
DIC_READ_PICKUP |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_read_pickup.F |
8 |
DIC_READ_PICKUP |
I myIter, myThid ) |
|
./pkg/dic/dic_readparms.F |
105 |
DIC_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_readparms.F |
154 |
DIC_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_readparms.F |
157 |
DIC_READPARMS |
O iUnit, myThid ) |
|
./pkg/dic/dic_readparms.F |
175 |
DIC_READPARMS |
I SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_readparms.F |
204 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_readparms.F |
206 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_readparms.F |
208 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_readparms.F |
210 |
DIC_READPARMS |
CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid) |
|
./pkg/dic/dic_readparms.F |
312 |
DIC_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_readparms.F |
320 |
DIC_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_readparms.F |
324 |
DIC_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_readparms.F |
329 |
DIC_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_readparms.F |
32 |
DIC_READPARMS |
INTEGER myThid |
|
./pkg/dic/dic_readparms.F |
335 |
DIC_READPARMS |
_END_MASTER(myThid) |
|
./pkg/dic/dic_readparms.F |
9 |
DIC_READPARMS |
SUBROUTINE DIC_READPARMS( myThid ) |
|
./pkg/dic/dic_set_control.F |
101 |
DIC_SET_CONTROL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_set_control.F |
102 |
DIC_SET_CONTROL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_set_control.F |
113 |
DIC_SET_CONTROL |
_EXCH_XY_RL( alpha, myThid ) |
|
./pkg/dic/dic_set_control.F |
114 |
DIC_SET_CONTROL |
_EXCH_XY_RL( rain_ratio, myThid ) |
|
./pkg/dic/dic_set_control.F |
115 |
DIC_SET_CONTROL |
_EXCH_XY_RL( feload, myThid ) |
|
./pkg/dic/dic_set_control.F |
14 |
DIC_SET_CONTROL |
SUBROUTINE DIC_SET_CONTROL( myThid ) |
|
./pkg/dic/dic_set_control.F |
36 |
DIC_SET_CONTROL |
INTEGER myThid |
|
./pkg/dic/dic_set_control.F |
75 |
DIC_SET_CONTROL |
& myThid, xx_gen2d_dummy ) |
|
./pkg/dic/dic_set_control.F |
77 |
DIC_SET_CONTROL |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_set_control.F |
78 |
DIC_SET_CONTROL |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_store_fluxco2.F |
38 |
DIC_STORE_FLUXCO2 |
INTEGER myThid |
|
./pkg/dic/dic_store_fluxco2.F |
48 |
DIC_STORE_FLUXCO2 |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_store_fluxco2.F |
49 |
DIC_STORE_FLUXCO2 |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_store_fluxco2.F |
9 |
DIC_STORE_FLUXCO2 |
I myThid ) |
|
./pkg/dic/dic_surfforcing.F |
127 |
DIC_SURFFORCING |
I bi,bj,iMin,iMax,jMin,jMax,myThid) |
|
./pkg/dic/dic_surfforcing.F |
13 |
DIC_SURFFORCING |
I myIter,myTime,myThid) |
|
./pkg/dic/dic_surfforcing.F |
171 |
DIC_SURFFORCING |
I i,j,kLev,bi,bj,myIter,myThid ) |
|
./pkg/dic/dic_surfforcing.F |
34 |
DIC_SURFFORCING |
INTEGER myIter, myThid |
|
./pkg/dic/dic_surfforcing_init.F |
100 |
DIC_SURFFORCING_INIT |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
121 |
DIC_SURFFORCING_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
122 |
DIC_SURFFORCING_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
12 |
DIC_SURFFORCING_INIT |
I myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
131 |
DIC_SURFFORCING_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
132 |
DIC_SURFFORCING_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
162 |
DIC_SURFFORCING_INIT |
I nIter0, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
165 |
DIC_SURFFORCING_INIT |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
166 |
DIC_SURFFORCING_INIT |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
211 |
DIC_SURFFORCING_INIT |
I bi,bj,iMin,iMax,jMin,jMax,myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
241 |
DIC_SURFFORCING_INIT |
I i,j,kLev,bi,bj, it , myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
33 |
DIC_SURFFORCING_INIT |
INTEGER myThid |
|
./pkg/dic/dic_surfforcing_init.F |
59 |
DIC_SURFFORCING_INIT |
CALL DIC_INI_ATMOS( startTime, nIter0, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
65 |
DIC_SURFFORCING_INIT |
CALL LEF_ZERO( silica0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
66 |
DIC_SURFFORCING_INIT |
CALL LEF_ZERO( silica1,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
72 |
DIC_SURFFORCING_INIT |
I deltaTClock, startTime, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
75 |
DIC_SURFFORCING_INIT |
_BEGIN_MASTER(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
79 |
DIC_SURFFORCING_INIT |
_END_MASTER(myThid) |
|
./pkg/dic/dic_surfforcing_init.F |
83 |
DIC_SURFFORCING_INIT |
& nIter0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
85 |
DIC_SURFFORCING_INIT |
& nIter0,myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
95 |
DIC_SURFFORCING_INIT |
_EXCH_XY_RS(silica0, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
96 |
DIC_SURFFORCING_INIT |
_EXCH_XY_RS(silica1, myThid ) |
|
./pkg/dic/dic_surfforcing_init.F |
99 |
DIC_SURFFORCING_INIT |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/dic/dic_tr_register.F |
11 |
DIC_TR_REGISTER |
I myThid ) |
|
./pkg/dic/dic_tr_register.F |
34 |
DIC_TR_REGISTER |
INTEGER myThid |
|
./pkg/dic/dic_tr_register.F |
55 |
DIC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_tr_register.F |
59 |
DIC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_tr_register.F |
67 |
DIC_TR_REGISTER |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
101 |
DIC_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
11 |
DIC_WRITE_PICKUP |
I suff, myTime, myIter, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
120 |
DIC_WRITE_PICKUP |
& nj, myIter, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
35 |
DIC_WRITE_PICKUP |
INTEGER myThid |
|
./pkg/dic/dic_write_pickup.F |
74 |
DIC_WRITE_PICKUP |
I 0, 0, 1, myIter, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
90 |
DIC_WRITE_PICKUP |
CALL WRITE_REC_3D_RL( fn, prec, 1, pH, nj, myIter, myThid ) |
|
./pkg/dic/dic_write_pickup.F |
98 |
DIC_WRITE_PICKUP |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/dic/fe_chem.F |
13 |
FE_CHEM |
I myIter, myThid ) |
|
./pkg/dic/fe_chem.F |
41 |
FE_CHEM |
INTEGER myIter, myThid |
|
./pkg/dic/insol.F |
10 |
INSOL |
SUBROUTINE INSOL(Time,sfac,bi,bj,myThid) |
|
./pkg/dic/insol.F |
32 |
INSOL |
INTEGER myThid |
|
./pkg/dic/o2_surfforcing.F |
12 |
O2_SURFFORCING |
I myIter, myTime, myThid ) |
|
./pkg/dic/o2_surfforcing.F |
35 |
O2_SURFFORCING |
INTEGER myIter, myThid |
|
./pkg/dic/phos_flux.F |
12 |
PHOS_FLUX |
I myIter,myTime,myThid) |
|
./pkg/dic/phos_flux.F |
33 |
PHOS_FLUX |
INTEGER myThid |
|
./pkg/down_slope/dwnslp_apply.F |
110 |
DWNSLP_APPLY |
diagSufx = GAD_DIAG_SUFX( trIdentity, myThid ) |
|
./pkg/down_slope/dwnslp_apply.F |
118 |
DWNSLP_APPLY |
doDiagDwnSlpTend = DIAGNOSTICS_IS_ON(diagName,myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
125 |
DWNSLP_APPLY |
& 0, Nr, -2, bi, bj, myThid ) |
|
./pkg/down_slope/dwnslp_apply.F |
130 |
DWNSLP_APPLY |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
135 |
DWNSLP_APPLY |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
14 |
DWNSLP_APPLY |
I deltaTLev, myTime, myIter, myThid ) |
|
./pkg/down_slope/dwnslp_apply.F |
166 |
DWNSLP_APPLY |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
180 |
DWNSLP_APPLY |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
185 |
DWNSLP_APPLY |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
187 |
DWNSLP_APPLY |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_apply.F |
192 |
DWNSLP_APPLY |
& CALL DIAGNOSTICS_FILL( gTracer, diagName, 0,Nr,2,bi,bj,myThid ) |
|
./pkg/down_slope/dwnslp_apply.F |
61 |
DWNSLP_APPLY |
INTEGER myIter, myThid |
|
./pkg/down_slope/dwnslp_calc_flow.F |
11 |
DWNSLP_CALC_FLOW |
I myTime, myIter, myThid ) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
142 |
DWNSLP_CALC_FLOW |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
161 |
DWNSLP_CALC_FLOW |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
166 |
DWNSLP_CALC_FLOW |
CALL DIAGNOSTICS_FILL( uFlow, 'DSLPuFlw', 0,1,2,bi,bj,myThid ) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
167 |
DWNSLP_CALC_FLOW |
CALL DIAGNOSTICS_FILL( vFlow, 'DSLPvFlw', 0,1,2,bi,bj,myThid ) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
44 |
DWNSLP_CALC_FLOW |
INTEGER myIter, myThid |
|
./pkg/down_slope/dwnslp_calc_flow.F |
81 |
DWNSLP_CALC_FLOW |
doDiagDwnSlpFlow = DIAGNOSTICS_IS_ON( 'DSLPuFlw', myThid ) |
|
./pkg/down_slope/dwnslp_calc_flow.F |
82 |
DWNSLP_CALC_FLOW |
& .OR. DIAGNOSTICS_IS_ON( 'DSLPvFlw', myThid ) |
|
./pkg/down_slope/dwnslp_calc_rho.F |
12 |
DWNSLP_CALC_RHO |
I k, bi, bj, myTime, myIter, myThid ) |
|
./pkg/down_slope/dwnslp_calc_rho.F |
49 |
DWNSLP_CALC_RHO |
INTEGER myIter, myThid |
|
./pkg/down_slope/dwnslp_calc_rho.F |
81 |
DWNSLP_CALC_RHO |
I k, bi, bj, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
102 |
DWNSLP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
11 |
DWNSLP_DIAGNOSTICS_INIT |
SUBROUTINE DWNSLP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
27 |
DWNSLP_DIAGNOSTICS_INIT |
INTEGER myThid |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
58 |
DWNSLP_DIAGNOSTICS_INIT |
diagNum = DIAGS_GET_PARMS_I( 'LAST_DIAG_ID', myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
73 |
DWNSLP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
81 |
DWNSLP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, diagMate, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
85 |
DWNSLP_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_TEMPERATURE, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
92 |
DWNSLP_DIAGNOSTICS_INIT |
I diagName, diagCode, diagUnits, diagTitle, 0, myThid ) |
|
./pkg/down_slope/dwnslp_diagnostics_init.F |
95 |
DWNSLP_DIAGNOSTICS_INIT |
diagSufx = GAD_DIAG_SUFX( GAD_SALINITY, myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
201 |
DWNSLP_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
204 |
DWNSLP_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
283 |
DWNSLP_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
287 |
DWNSLP_INIT_FIXED |
CALL MDSFINDUNIT( DWNSLP_ioUnit, myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
300 |
DWNSLP_INIT_FIXED |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
336 |
DWNSLP_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
33 |
DWNSLP_INIT_FIXED |
INTEGER myThid |
|
./pkg/down_slope/dwnslp_init_fixed.F |
340 |
DWNSLP_INIT_FIXED |
CALL DWNSLP_DIAGNOSTICS_INIT( myThid ) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
53 |
DWNSLP_INIT_FIXED |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
54 |
DWNSLP_INIT_FIXED |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/down_slope/dwnslp_init_fixed.F |
9 |
DWNSLP_INIT_FIXED |
SUBROUTINE DWNSLP_INIT_FIXED( myThid ) |
|
./pkg/down_slope/dwnslp_init_varia.F |
33 |
DWNSLP_INIT_VARIA |
INTEGER myThid |
|
./pkg/down_slope/dwnslp_init_varia.F |
45 |
DWNSLP_INIT_VARIA |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/down_slope/dwnslp_init_varia.F |
46 |
DWNSLP_INIT_VARIA |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/down_slope/dwnslp_init_varia.F |
9 |
DWNSLP_INIT_VARIA |
SUBROUTINE DWNSLP_INIT_VARIA( myThid ) |
|
./pkg/down_slope/dwnslp_readparms.F |
103 |
DWNSLP_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/down_slope/dwnslp_readparms.F |
108 |
DWNSLP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
117 |
DWNSLP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
28 |
DWNSLP_READPARMS |
INTEGER myThid |
|
./pkg/down_slope/dwnslp_readparms.F |
47 |
DWNSLP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
52 |
DWNSLP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
56 |
DWNSLP_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
65 |
DWNSLP_READPARMS |
I myThid ) |
|
./pkg/down_slope/dwnslp_readparms.F |
88 |
DWNSLP_READPARMS |
_END_MASTER(myThid) |
|
./pkg/down_slope/dwnslp_readparms.F |
97 |
DWNSLP_READPARMS |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/down_slope/dwnslp_readparms.F |
9 |
DWNSLP_READPARMS |
SUBROUTINE DWNSLP_READPARMS( myThid ) |
|
./pkg/ebm/ebm_area_t.F |
107 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( TmlS_tile, TmlS, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
108 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( TmlN_tile, TmlN, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
109 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( TtS_tile, TtS, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
10 |
EBM_AREA_T |
SUBROUTINE EBM_AREA_T( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
110 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( TtN_tile, TtN, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
112 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( CountmlS_tile, CountmlS, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
113 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( CountmlN_tile, CountmlN, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
114 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( CounttS_tile, CounttS, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
115 |
EBM_AREA_T |
CALL GLOBAL_SUM_TILE_RL( CounttN_tile, CounttN, myThid ) |
|
./pkg/ebm/ebm_area_t.F |
123 |
EBM_AREA_T |
_BEGIN_MASTER(myThid) |
|
./pkg/ebm/ebm_area_t.F |
132 |
EBM_AREA_T |
_END_MASTER(myThid) |
|
./pkg/ebm/ebm_area_t.F |
38 |
EBM_AREA_T |
INTEGER myThid |
|
./pkg/ebm/ebm_area_t.F |
61 |
EBM_AREA_T |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ebm/ebm_area_t.F |
62 |
EBM_AREA_T |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
10 |
EBM_ATMOSPHERE |
SUBROUTINE EBM_ATMOSPHERE ( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_atmosphere.F |
369 |
EBM_ATMOSPHERE |
_EXCH_XY_RS(Qnet , myThid ) |
|
./pkg/ebm/ebm_atmosphere.F |
370 |
EBM_ATMOSPHERE |
_EXCH_XY_RS(EmPmR , myThid ) |
|
./pkg/ebm/ebm_atmosphere.F |
50 |
EBM_ATMOSPHERE |
INTEGER myThid |
|
./pkg/ebm/ebm_atmosphere.F |
85 |
EBM_ATMOSPHERE |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
86 |
EBM_ATMOSPHERE |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
89 |
EBM_ATMOSPHERE |
act1 = bi - myBxLo(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
90 |
EBM_ATMOSPHERE |
max1 = myBxHi(myThid) - myBxLo(myThid) + 1 |
|
./pkg/ebm/ebm_atmosphere.F |
91 |
EBM_ATMOSPHERE |
act2 = bj - myByLo(myThid) |
|
./pkg/ebm/ebm_atmosphere.F |
92 |
EBM_ATMOSPHERE |
max2 = myByHi(myThid) - myByLo(myThid) + 1 |
|
./pkg/ebm/ebm_atmosphere.F |
93 |
EBM_ATMOSPHERE |
act3 = myThid - 1 |
|
./pkg/ebm/ebm_driver.F |
39 |
EBM_DRIVER |
INTEGER myThid |
|
./pkg/ebm/ebm_driver.F |
49 |
EBM_DRIVER |
CALL EBM_ZONALMEAN ( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_driver.F |
52 |
EBM_DRIVER |
CALL EBM_AREA_T ( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_driver.F |
55 |
EBM_DRIVER |
CALL EBM_ATMOSPHERE ( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_driver.F |
58 |
EBM_DRIVER |
CALL EBM_WIND_PERTURB( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_driver.F |
6 |
EBM_DRIVER |
SUBROUTINE EBM_DRIVER( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_ini_vars.F |
10 |
EBM_INI_VARS |
SUBROUTINE EBM_INI_VARS( myThid ) |
|
./pkg/ebm/ebm_ini_vars.F |
33 |
EBM_INI_VARS |
INTEGER myThid |
|
./pkg/ebm/ebm_ini_vars.F |
43 |
EBM_INI_VARS |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ebm/ebm_ini_vars.F |
44 |
EBM_INI_VARS |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ebm/ebm_ini_vars.F |
54 |
EBM_INI_VARS |
CALL EBM_LOAD_CLIMATOLOGY( myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
13 |
EBM_LOAD_CLIMATOLOGY |
SUBROUTINE EBM_LOAD_CLIMATOLOGY( myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
39 |
EBM_LOAD_CLIMATOLOGY |
INTEGER myThid |
|
./pkg/ebm/ebm_load_climatology.F |
55 |
EBM_LOAD_CLIMATOLOGY |
CALL READ_FLD_XY_RS( RunoffFile, ' ', Run, 0, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
67 |
EBM_LOAD_CLIMATOLOGY |
DO bj = myByLo(myThid), myByHi(myThid) |
|
./pkg/ebm/ebm_load_climatology.F |
68 |
EBM_LOAD_CLIMATOLOGY |
DO bi = myBxLo(myThid), myBxHi(myThid) |
|
./pkg/ebm/ebm_load_climatology.F |
84 |
EBM_LOAD_CLIMATOLOGY |
_EXCH_XY_RS( Run, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
87 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS( SST, 'Theta Climatology' , 1, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
88 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS( SSS, 'Salt Climatology' , 1, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
89 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS( Run, 'Runoff Climatology', 1, myThid ) |
|
./pkg/ebm/ebm_load_climatology.F |
90 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS(fu,'Wind Stress Climatology FU',1,myThid) |
|
./pkg/ebm/ebm_load_climatology.F |
91 |
EBM_LOAD_CLIMATOLOGY |
CALL PLOT_FIELD_XYRS(fv,'Wind Stress Climatology FV',1,myThid) |
|
./pkg/ebm/ebm_readparms.F |
100 |
EBM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
107 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
110 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
116 |
EBM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
125 |
EBM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ebm/ebm_readparms.F |
30 |
EBM_READPARMS |
INTEGER myThid |
|
./pkg/ebm/ebm_readparms.F |
51 |
EBM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ebm/ebm_readparms.F |
55 |
EBM_READPARMS |
_END_MASTER(myThid) |
|
./pkg/ebm/ebm_readparms.F |
59 |
EBM_READPARMS |
_BEGIN_MASTER(myThid) |
|
./pkg/ebm/ebm_readparms.F |
63 |
EBM_READPARMS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
68 |
EBM_READPARMS |
I myThid ) |
|
./pkg/ebm/ebm_readparms.F |
82 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
84 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
86 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
88 |
EBM_READPARMS |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ebm/ebm_readparms.F |
9 |
EBM_READPARMS |
SUBROUTINE EBM_READPARMS( myThid ) |
|
./pkg/ebm/ebm_wind_perturb.F |
127 |
EBM_WIND_PERTURB |
_EXCH_XY_RS(winPert , myThid ) |
|
./pkg/ebm/ebm_wind_perturb.F |
129 |
EBM_WIND_PERTURB |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ebm/ebm_wind_perturb.F |
130 |
EBM_WIND_PERTURB |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_wind_perturb.F |
28 |
EBM_WIND_PERTURB |
INTEGER myThid |
|
./pkg/ebm/ebm_wind_perturb.F |
52 |
EBM_WIND_PERTURB |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ebm/ebm_wind_perturb.F |
53 |
EBM_WIND_PERTURB |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_wind_perturb.F |
7 |
EBM_WIND_PERTURB |
SUBROUTINE EBM_WIND_PERTURB( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_zonalmean.F |
100 |
EBM_ZONALMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_zonalmean.F |
10 |
EBM_ZONALMEAN |
SUBROUTINE EBM_ZONALMEAN( myTime, myIter, myThid ) |
|
./pkg/ebm/ebm_zonalmean.F |
39 |
EBM_ZONALMEAN |
INTEGER myThid |
|
./pkg/ebm/ebm_zonalmean.F |
57 |
EBM_ZONALMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ebm/ebm_zonalmean.F |
58 |
EBM_ZONALMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ebm/ebm_zonalmean.F |
72 |
EBM_ZONALMEAN |
CALL GLOBAL_SUM_TILE_RL( tileSumMask, locSumMask(jg), myThid ) |
|
./pkg/ebm/ebm_zonalmean.F |
73 |
EBM_ZONALMEAN |
CALL GLOBAL_SUM_TILE_RL( tileSumSST, locSumSST(jg), myThid ) |
|
./pkg/ebm/ebm_zonalmean.F |
79 |
EBM_ZONALMEAN |
_BEGIN_MASTER(myThid) |
|
./pkg/ebm/ebm_zonalmean.F |
94 |
EBM_ZONALMEAN |
_END_MASTER(myThid) |
|
./pkg/ebm/ebm_zonalmean.F |
99 |
EBM_ZONALMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/cost_averagesfields.F |
168 |
COST_AVERAGESFIELDS |
IF ( debugMode ) CALL DEBUG_CALL('cost_averagesflags',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
198 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric psbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
208 |
COST_AVERAGESFIELDS |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_averagesfields.F |
253 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric sigmaRbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
270 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric tbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
292 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric sstbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
309 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric sbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
506 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric hfluxmeanbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
520 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
530 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric sfluxmeanbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
554 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric smrareabar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
564 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric smrsstbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
575 |
COST_AVERAGESFIELDS |
& CALL DEBUG_CALL('cost_averagesgeneric smrsssbar',myThid) |
|
./pkg/ecco/cost_averagesfields.F |
769 |
COST_AVERAGESFIELDS |
IF ( debugMode ) CALL DEBUG_LEAVE('cost_averagesfields',myThid) |
|
./pkg/ecco/cost_averagesgeneric.F |
141 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XY_RL( fname, localbar, locrec, 1, myThid ) |
|
./pkg/ecco/cost_averagesgeneric.F |
143 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XYZ_RL( fname, localbar, locrec, 1, myThid ) |
|
./pkg/ecco/cost_averagesgeneric.F |
191 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XY_RL( fname, localbar, locrec, 1, myThid ) |
|
./pkg/ecco/cost_averagesgeneric.F |
193 |
COST_AVERAGESGENERIC |
CALL WRITE_REC_XYZ_RL( fname, localbar, locrec, 1, myThid ) |
|
./pkg/ecco/cost_bp_read.F |
10 |
COST_BP_READ |
I irec,myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
113 |
COST_GENCOST_BOXMEAN |
& iRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
116 |
COST_GENCOST_BOXMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
117 |
COST_GENCOST_BOXMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
132 |
COST_GENCOST_BOXMEAN |
& 1, tmpVar, dummyRS, 0, 0, iRec, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
140 |
COST_GENCOST_BOXMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
141 |
COST_GENCOST_BOXMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
157 |
COST_GENCOST_BOXMEAN |
CALL GLOBAL_SUM_TILE_RL( tmpSumTile, tmpSumGlo, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
162 |
COST_GENCOST_BOXMEAN |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
170 |
COST_GENCOST_BOXMEAN |
& mySumGlo, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
174 |
COST_GENCOST_BOXMEAN |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_boxmean.F |
89 |
COST_GENCOST_BOXMEAN |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/cost_gencost_boxmean.F |
90 |
COST_GENCOST_BOXMEAN |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/cost_gencost_bpv4.F |
100 |
COST_GENCOST_BPV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,kgen),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_bpv4.F |
163 |
COST_GENCOST_BPV4 |
& iRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_bpv4.F |
216 |
COST_GENCOST_BPV4 |
& iRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_customize.F |
113 |
COST_GENCOST_CUSTOMIZE |
& .TRUE.,.FALSE.,.TRUE.,1,myThid) |
|
./pkg/ecco/cost_gencost_glbmean.F |
260 |
COST_GENCOST_GLBMEAN |
IF ( MASTER_CPU_THREAD(myThid) .AND. |
|
./pkg/ecco/cost_gencost_seaicev4.F |
187 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(localobs,1,spzeroloc,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
188 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(localweight,1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
189 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(localmask,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
190 |
COST_GENCOST_SEAICEV4 |
call ECCO_CPRSRL(maskC,Nr,localmask,Nr,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
207 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(localweight,nnzsiv4,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
228 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(areabar,nnzbar,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
229 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(deconcbar,nnzbar,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
230 |
COST_GENCOST_SEAICEV4 |
call ECCO_ZERO(exconcbar,nnzbar,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
288 |
COST_GENCOST_SEAICEV4 |
I myThid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
307 |
COST_GENCOST_SEAICEV4 |
I myThid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
310 |
COST_GENCOST_SEAICEV4 |
O localtmp,nnzsiv4,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
329 |
COST_GENCOST_SEAICEV4 |
I myThid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
332 |
COST_GENCOST_SEAICEV4 |
O localtmp,nnzsiv4,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
359 |
GET_EXCONC_DECONC |
I myThid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
448 |
GET_EXCONC_DECONC |
call ECCO_ZERO(localfld,nnzobs,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
449 |
GET_EXCONC_DECONC |
call ECCO_ZERO(localfldmsk,nnzobs,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
450 |
GET_EXCONC_DECONC |
call ECCO_ZERO(localfldweight,nnzobs,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1203 |
COST_GENCOST_SSHV4 |
IF ( ( MASTER_CPU_THREAD(myThid).AND.(igen_gmsl.NE.0) ).AND. |
|
./pkg/ecco/cost_gencost_sshv4.F |
1226 |
COST_GENCOST_SSHV4 |
CALL READ_REC_XY_RL( fname, etaday, kRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
1231 |
COST_GENCOST_SSHV4 |
& 'etaday', 0. _d 0, myThid ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
208 |
COST_GENCOST_SSHV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,igen_mdt),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
209 |
COST_GENCOST_SSHV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,igen_lsc),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
210 |
COST_GENCOST_SSHV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,igen_tp),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
211 |
COST_GENCOST_SSHV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,igen_ers),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
212 |
COST_GENCOST_SSHV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,igen_gfo),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sshv4.F |
542 |
COST_GENCOST_SSHV4 |
CALL READ_REC_XY_RL( fname, etaday, iRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
548 |
COST_GENCOST_SSHV4 |
& 'etaday', 0. _d 0, myThid ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
943 |
COST_GENCOST_SSHV4 |
CALL READ_REC_XY_RL( fname, etaday, kRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_sshv4.F |
948 |
COST_GENCOST_SSHV4 |
& 'etaday', 0. _d 0, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
139 |
COST_GENCOST_SSTV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,kgen),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sstv4.F |
140 |
COST_GENCOST_SSTV4 |
call ECCO_ZERO(gencost_weight(:,:,1,1,kgen_lsc),1,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_sstv4.F |
198 |
COST_GENCOST_SSTV4 |
CALL READ_REC_XY_RL( fname, mybar, kRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
228 |
COST_GENCOST_SSTV4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
356 |
COST_GENCOST_SSTV4 |
CALL READ_REC_XY_RL( fname, mybar, iRec, 1, myThid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
386 |
COST_GENCOST_SSTV4 |
CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
109 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
121 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
176 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
188 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
192 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
208 |
COST_GENCOST_TRANSP |
call ECCO_ZERO(mybar,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_transp.F |
212 |
COST_GENCOST_TRANSP |
call ECCO_ZERO(localtmp,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_transp.F |
226 |
COST_GENCOST_TRANSP |
call ECCO_ZERO(myobs,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_gencost_transp.F |
253 |
COST_GENCOST_TRANSP |
I myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
274 |
COST_GENCOST_TRANSP |
CALL GLOBAL_SUM_TILE_RL( tmpMeanTile, tmpMeanGlo, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
275 |
COST_GENCOST_TRANSP |
CALL GLOBAL_SUM_TILE_RL( tmpNumTile, tmpNumGlo, myThid ) |
|
./pkg/ecco/cost_gencost_transp.F |
280 |
COST_GENCOST_TRANSP |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/cost_generic.F |
107 |
COST_GENERIC |
call ECCO_ZERO(localdifmean1,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
108 |
COST_GENERIC |
call ECCO_ZERO(localdifmean2,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
134 |
COST_GENERIC |
call ECCO_ZERO(localdifmean1,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
272 |
COST_GENLOOP |
call ECCO_ZERO(localbar,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
273 |
COST_GENLOOP |
call ECCO_ZERO(localweight,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
274 |
COST_GENLOOP |
call ECCO_ZERO(localtmp,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
275 |
COST_GENLOOP |
call ECCO_ZERO(localmask,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
277 |
COST_GENLOOP |
call ECCO_ZERO(localobs,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
278 |
COST_GENLOOP |
call ECCO_ZERO(localdif,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
279 |
COST_GENLOOP |
call ECCO_ZERO(difmask,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
281 |
COST_GENLOOP |
call ECCO_ZERO(localdifmsk,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
282 |
COST_GENLOOP |
call ECCO_ZERO(localdifsum,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
283 |
COST_GENLOOP |
call ECCO_ZERO(localdifnum,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
315 |
COST_GENLOOP |
call ECCO_CPRSRL(maskC,nr,localmask,nr,myThid) |
|
./pkg/ecco/cost_generic.F |
317 |
COST_GENLOOP |
call ECCO_CPRSRL(maskS,nr,localmask,nr,myThid) |
|
./pkg/ecco/cost_generic.F |
319 |
COST_GENLOOP |
call ECCO_CPRSRL(maskW,nr,localmask,nr,myThid) |
|
./pkg/ecco/cost_generic.F |
340 |
COST_GENLOOP |
call ECCO_ZERO(localweight,nnzobs,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
351 |
COST_GENLOOP |
call ECCO_ZERO(localbar,nnzbar,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
355 |
COST_GENLOOP |
call ECCO_MULT(localbar,nnzbar,fac,myThid) |
|
./pkg/ecco/cost_generic.F |
357 |
COST_GENLOOP |
call ECCO_ZERO(localobs,nnzobs,spzeroloc,myThid) |
|
./pkg/ecco/cost_generic.F |
365 |
COST_GENLOOP |
& localdif, difmask, myThid ) |
|
./pkg/ecco/cost_generic.F |
368 |
COST_GENLOOP |
& nnzobs, localdif, nnzobs, myThid ) |
|
./pkg/ecco/cost_generic.F |
372 |
COST_GENLOOP |
& localdifnum, nnzobs,myThid) |
|
./pkg/ecco/cost_generic.F |
387 |
COST_GENLOOP |
I myThid |
|
./pkg/ecco/cost_generic.F |
404 |
COST_GENLOOP |
call ECCO_ZERO(localdifmeanOut,Nr,zeroRL,myThid) |
|
./pkg/ecco/cost_generic.F |
405 |
COST_GENLOOP |
call ECCO_CP(localdifsum,nnzobs,localdifmeanOut,nnzobs,myThid) |
|
./pkg/ecco/cost_generic.F |
406 |
COST_GENLOOP |
call ECCO_DIVFIELD(localdifmeanOut,nnzobs,localdifnum,myThid) |
|
./pkg/ecco/cost_generic.F |
407 |
COST_GENLOOP |
call ECCO_CP(localdifnum,nnzobs,localdifmsk,nnzobs,myThid) |
|
./pkg/ecco/cost_generic.F |
408 |
COST_GENLOOP |
call ECCO_DIVFIELD(localdifmsk,nnzobs,localdifnum,myThid) |
|
./pkg/ecco/cost_generic.F |
414 |
COST_GENLOOP |
U objf_local, num_local, myThid) |
|
./pkg/ecco/cost_genread.F |
22 |
COST_GENREAD |
I myThid |
|
./pkg/ecco/cost_genread.F |
46 |
COST_GENREAD |
INTEGER myThid |
|
./pkg/ecco/cost_genread.F |
69 |
COST_GENREAD |
call ECCO_ZERO(active_tmp,nnzbar,zeroRL,myThid) |
|
./pkg/ecco/cost_genread.F |
75 |
COST_GENREAD |
call ECCO_ADD(active_var,nnzbar,active_tmp,nnzbar,myThid) |
|
./pkg/ecco/cost_genread.F |
78 |
COST_GENREAD |
call ECCO_DIV(active_tmp,nnzbar,nyearsRL,myThid) |
|
./pkg/ecco/cost_genread.F |
79 |
COST_GENREAD |
call ECCO_CP(active_tmp,nnzbar,active_var,nnzbar,myThid) |
|
./pkg/ecco/cost_hyd.F |
287 |
COST_HYD |
& num_temp0, objf_temp0, maskC, myThid ) |
|
./pkg/ecco/cost_hyd.F |
298 |
COST_HYD |
& num_salt0, objf_salt0, maskC, myThid ) |
|
./pkg/ecco/cost_hyd.F |
371 |
COST_HYD |
& maskC, myThid ) |
|
./pkg/ecco/cost_hyd.F |
380 |
COST_HYD |
& num_uvel0, objf_uvel0, maskW, myThid ) |
|
./pkg/ecco/cost_hyd.F |
388 |
COST_HYD |
& num_vvel0, objf_vvel0, maskS, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
100 |
COST_INTERNAL_PARAMS |
& num_diffkr, objf_diffkr, maskC, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
117 |
COST_INTERNAL_PARAMS |
& maskC, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
65 |
COST_INTERNAL_PARAMS |
& num_zero_mean, objf_eddytau, maskC, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
68 |
COST_INTERNAL_PARAMS |
& num_zero_mean, objf_eddytau, maskC, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
80 |
COST_INTERNAL_PARAMS |
& num_kapgm, objf_kapgm, maskC, myThid ) |
|
./pkg/ecco/cost_internal_params.F |
90 |
COST_INTERNAL_PARAMS |
& num_kapredi, objf_kapredi, maskC, myThid ) |
|
./pkg/ecco/cost_obcs_ageos.F |
218 |
COST_OBCS_AGEOS |
_EXCH_XYZ_RL(tbar,myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
219 |
COST_OBCS_AGEOS |
_EXCH_XYZ_RL(sbar,myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
255 |
COST_OBCS_AGEOS |
I k, bi, bj, myThid ) |
|
./pkg/ecco/cost_obcs_ageos.F |
256 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
324 |
COST_OBCS_AGEOS |
I k, bi, bj, myThid ) |
|
./pkg/ecco/cost_obcs_ageos.F |
326 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
392 |
COST_OBCS_AGEOS |
I k, bi, bj, myThid ) |
|
./pkg/ecco/cost_obcs_ageos.F |
393 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
459 |
COST_OBCS_AGEOS |
I k, bi, bj, myThid ) |
|
./pkg/ecco/cost_obcs_ageos.F |
460 |
COST_OBCS_AGEOS |
_EXCH_XY_RL(rholoc , myThid) |
|
./pkg/ecco/cost_obcs_ageos.F |
525 |
COST_OBCS_AGEOS |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/ecco/cost_obcse.F |
200 |
COST_OBCSE |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/ecco/cost_obcsn.F |
199 |
COST_OBCSN |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/ecco/cost_obcss.F |
201 |
COST_OBCSS |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/ecco/cost_obcsw.F |
198 |
COST_OBCSW |
_GLOBAL_SUM_RL( fcthread , myThid ) |
|
./pkg/ecco/ecco_check.F |
102 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
110 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
118 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
126 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
134 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
13 |
ECCO_CHECK |
SUBROUTINE ECCO_CHECK( myThid ) |
|
./pkg/ecco/ecco_check.F |
142 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
150 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
158 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
166 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
174 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
182 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
190 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
198 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
206 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
214 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
221 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_check.F |
236 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
244 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
252 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
260 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
270 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_check.F |
277 |
ECCO_CHECK |
_END_MASTER(myThid) |
|
./pkg/ecco/ecco_check.F |
283 |
ECCO_CHECK |
& bpdatfile, bpstartdate(1), myThid ) |
|
./pkg/ecco/ecco_check.F |
287 |
ECCO_CHECK |
& sstdatfile, sststartdate(1), myThid ) |
|
./pkg/ecco/ecco_check.F |
291 |
ECCO_CHECK |
& tmidatfile, tmistartdate(1), myThid ) |
|
./pkg/ecco/ecco_check.F |
296 |
ECCO_CHECK |
& scatxdatfile, scatxstartdate(1), myThid ) |
|
./pkg/ecco/ecco_check.F |
298 |
ECCO_CHECK |
& scatydatfile, scatystartdate(1), myThid ) |
|
./pkg/ecco/ecco_check.F |
311 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
312 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_check.F |
328 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
329 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_check.F |
338 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
339 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_check.F |
346 |
ECCO_CHECK |
& gencost_datafile(k), gencost_startdate1(k), myThid ) |
|
./pkg/ecco/ecco_check.F |
352 |
ECCO_CHECK |
& gencost_errfile(k), gencost_startdate1(k), myThid ) |
|
./pkg/ecco/ecco_check.F |
363 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
387 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
388 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_check.F |
396 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
397 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_check.F |
419 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
41 |
ECCO_CHECK |
INTEGER myThid |
|
./pkg/ecco/ecco_check.F |
428 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
439 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
445 |
ECCO_CHECK |
CALL PRINT_ERROR( msgBuf, myThid ) |
|
./pkg/ecco/ecco_check.F |
457 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
472 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
488 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
501 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
520 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
523 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
527 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
538 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
548 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
555 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
560 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
582 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
589 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
594 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
610 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
624 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
627 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
62 |
ECCO_CHECK |
DO bj=myByLo(myThid),myByHi(myThid) |
|
./pkg/ecco/ecco_check.F |
631 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
63 |
ECCO_CHECK |
DO bi=myBxLo(myThid),myBxHi(myThid) |
|
./pkg/ecco/ecco_check.F |
641 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
664 |
ECCO_CHECK |
& SQUEEZE_RIGHT, myThid ) |
|
./pkg/ecco/ecco_check.F |
683 |
ECCO_CHECK_FILES |
I myThid ) |
|
./pkg/ecco/ecco_check.F |
703 |
ECCO_CHECK_FILES |
INTEGER myThid |
|
./pkg/ecco/ecco_check.F |
727 |
ECCO_CHECK_FILES |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_check.F |
735 |
ECCO_CHECK_FILES |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
75 |
ECCO_CHECK |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_check.F |
766 |
ECCO_CHECK_FILES |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
782 |
ECCO_CHECK_FILES |
& SQUEEZE_RIGHT , myThid) |
|
./pkg/ecco/ecco_check.F |
788 |
ECCO_CHECK_FILES |
_END_MASTER(myThid) |
|
./pkg/ecco/ecco_check.F |
86 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_check.F |
94 |
ECCO_CHECK |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
106 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_bp [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
113 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('cost_hyd',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
115 |
ECCO_COST_DRIVER |
call TIMER_START('cost_hyd [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
116 |
ECCO_COST_DRIVER |
call COST_HYD( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
117 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_hyd [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
121 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('seaice_cost_driver',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
124 |
ECCO_COST_DRIVER |
call TIMER_START('seaice_cost_driver [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
125 |
ECCO_COST_DRIVER |
call SEAICE_COST_DRIVER( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
126 |
ECCO_COST_DRIVER |
call TIMER_STOP ('seaice_cost_driver [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
132 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('cost_obcs',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
134 |
ECCO_COST_DRIVER |
call TIMER_START('cost_obcs [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
135 |
ECCO_COST_DRIVER |
call COST_OBCS( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
136 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_obcs [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
203 |
ECCO_COST_DRIVER |
call TIMER_START('cost_internal_params [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
204 |
ECCO_COST_DRIVER |
call COST_INTERNAL_PARAMS( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
205 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_internal_params [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
211 |
ECCO_COST_DRIVER |
call TIMER_START('cost_gencost_all [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
212 |
ECCO_COST_DRIVER |
call COST_GENCOST_ALL( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
213 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_gencost_all [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
218 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('ctrl_cost_driver',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
220 |
ECCO_COST_DRIVER |
call TIMER_START('ctrl_cost_driver [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
221 |
ECCO_COST_DRIVER |
call CTRL_COST_DRIVER( myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
222 |
ECCO_COST_DRIVER |
call TIMER_STOP ('ctrl_cost_driver [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
38 |
ECCO_COST_DRIVER |
integer myThid |
|
./pkg/ecco/ecco_cost_driver.F |
47 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('cost_forcing',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
49 |
ECCO_COST_DRIVER |
call TIMER_START('cost_forcing [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
50 |
ECCO_COST_DRIVER |
call COST_FORCING( myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
51 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_forcing [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
6 |
ECCO_COST_DRIVER |
subroutine ECCO_COST_DRIVER( myTime, myIter, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
74 |
ECCO_COST_DRIVER |
IF (debugMode) CALL DEBUG_CALL('cost_ssh',myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
81 |
ECCO_COST_DRIVER |
call TIMER_START('cost_ssh [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
82 |
ECCO_COST_DRIVER |
call COST_SSH( myIter, myTime, myThid ) |
|
./pkg/ecco/ecco_cost_driver.F |
83 |
ECCO_COST_DRIVER |
call TIMER_STOP ('cost_ssh [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_driver.F |
96 |
ECCO_COST_DRIVER |
call TIMER_START('cost_bp [ECCO SPIN-DOWN]', myThid) |
|
./pkg/ecco/ecco_cost_final.F |
1000 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_obcsw , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1001 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_obcse , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1006 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_profiles(num_file,num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1010 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_profiles_mean(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1015 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_gencost(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1020 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_gentim2d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1025 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_genarr2d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1030 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(no_genarr3d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
1313 |
ECCO_COST_FINAL |
IF ( MASTER_CPU_THREAD(myThid) ) THEN |
|
./pkg/ecco/ecco_cost_final.F |
798 |
ECCO_COST_FINAL |
CALL GLOBAL_SUM_TILE_RL( tile_fc, locfc, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
803 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( fc , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
809 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_temp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
810 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_salt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
811 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_temp0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
812 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_salt0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
813 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_temp0smoo, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
814 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_salt0smoo, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
815 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_etan0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
816 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_uvel0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
817 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_vvel0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
818 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauu , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
819 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauum , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
820 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauusmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
821 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauv , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
822 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauvm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
823 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tauvsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
824 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_hflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
825 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_hfluxmm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
826 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_hfluxsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
827 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_sflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
828 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_sfluxsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
829 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_uwind , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
830 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_vwind , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
831 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_atemp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
832 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_aqh , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
833 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_precip , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
834 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
835 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swdown , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
836 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
837 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwdown , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
838 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_uwindm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
839 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_vwindm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
840 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_atempm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
841 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_aqhm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
842 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_precipm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
843 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swfluxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
844 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swdownm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
845 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwfluxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
846 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwdownm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
847 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_uwindsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
848 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_vwindsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
849 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_atempsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
850 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_aqhsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
851 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_precipsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
852 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swfluxsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
853 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_swdownsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
854 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwfluxsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
855 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_lwdownsmoo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
856 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ssh , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
857 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
858 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ers , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
859 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_gfo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
860 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_sst , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
861 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tmi , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
862 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_sss , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
863 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_bp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
864 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ies , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
865 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_atl , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
866 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ctdt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
867 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ctds , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
868 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ctdtclim , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
869 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ctdsclim , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
870 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_xbt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
871 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_argot , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
872 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_argos , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
873 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_drifter , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
874 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_sdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
875 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_tdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
876 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_wdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
877 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_scatx , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
878 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_scaty , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
879 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_scatxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
880 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_scatym , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
881 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_curmtr , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
882 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ageos , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
883 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_kapgm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
884 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_kapredi, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
885 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_diffkr , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
886 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_ini_fin , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
887 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_eddytau , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
888 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_bottomdrag , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
892 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_obcsn , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
893 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_obcss , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
894 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_obcsw , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
895 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( f_obcse , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
900 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_profiles(num_file,num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
904 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_profiles_mean(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
909 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_gencost(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
914 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_gentim2d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
919 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_genarr2d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
924 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL(f_genarr3d(num_var), myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
929 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_temp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
930 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_salt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
931 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_temp0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
932 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_salt0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
933 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_etan0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
934 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_uvel0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
935 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_vvel0, myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
936 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tauu , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
937 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tauum , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
938 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tauv , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
939 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tauvm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
940 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_hflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
941 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_hfluxmm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
942 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_sflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
943 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_sfluxmm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
944 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_uwind , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
945 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_vwind , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
946 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_atemp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
947 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_aqh , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
948 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_precip , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
949 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
950 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swdown , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
951 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_lwflux , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
952 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_lwdown , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
953 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_uwindm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
954 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_vwindm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
955 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_atempm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
956 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_aqhm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
957 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_precipm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
958 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swfluxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
959 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_swdownm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
960 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_lwfluxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
961 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_lwdownm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
962 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ssh , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
963 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
964 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ers , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
965 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_gfo , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
966 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_sst , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
967 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tmi , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
968 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_sss , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
969 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_bp , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
970 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ies , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
971 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_atl , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
972 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ctdt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
973 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ctds , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
974 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ctdtclim , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
975 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ctdsclim , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
976 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_xbt , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
977 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_argot , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
978 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_argos , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
979 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_drifter , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
980 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_sdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
981 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_tdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
982 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_wdrift , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
983 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_scatx , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
984 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_scaty , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
985 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_scatxm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
986 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_scatym , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
987 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_curmtr , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
988 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ageos , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
989 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_kapgm , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
990 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_kapredi , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
991 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_diffkr , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
992 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_ini_fin , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
993 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_eddytau , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
994 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_bottomdrag , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
998 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_obcsn , myThid ) |
|
./pkg/ecco/ecco_cost_final.F |
999 |
ECCO_COST_FINAL |
_GLOBAL_SUM_RL( no_obcss , myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
106 |
ECCO_COST_INIT_FIXED |
_BEGIN_MASTER( myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
238 |
ECCO_COST_INIT_FIXED |
CALL PRINT_ERROR( msgBuf, myThid) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
258 |
ECCO_COST_INIT_FIXED |
I myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
276 |
ECCO_COST_INIT_FIXED |
call ECCO_CHECK( myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
307 |
ECCO_COST_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
314 |
ECCO_COST_INIT_FIXED |
I myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
328 |
ECCO_COST_INIT_FIXED |
_END_MASTER(myThid) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
342 |
ECCO_COST_INIT_FIXED |
_BEGIN_MASTER(myThid) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
352 |
ECCO_COST_INIT_FIXED |
I myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
367 |
ECCO_COST_INIT_FIXED |
I myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
382 |
ECCO_COST_INIT_FIXED |
I myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
399 |
ECCO_COST_INIT_FIXED |
& SQUEEZE_RIGHT , myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
400 |
ECCO_COST_INIT_FIXED |
CALL PRINT_ERROR( msgBuf , myThid ) |
|
./pkg/ecco/ecco_cost_init_fixed.F |
405 |
ECCO_COST_INIT_FIXED |
_END_MASTER(myThid) |