| 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 |
|