File |
Line number |
Procedure |
Code |
./pkg/grdchk/grdchk_main.F |
270 |
GRDCHK_MAIN |
mytime = starttime |
./pkg/grdchk/grdchk_main.F |
284 |
GRDCHK_MAIN |
call G_THE_MAIN_LOOP( mytime, myiter, mythid ) |
./pkg/grdchk/grdchk_main.F |
325 |
GRDCHK_MAIN |
mytime = starttime |
./pkg/grdchk/grdchk_main.F |
327 |
GRDCHK_MAIN |
call THE_MAIN_LOOP( mytime, myiter, mythid ) |
./pkg/grdchk/grdchk_main.F |
366 |
GRDCHK_MAIN |
mytime = starttime |
./pkg/grdchk/grdchk_main.F |
368 |
GRDCHK_MAIN |
call THE_MAIN_LOOP( mytime, myiter, mythid ) |
./pkg/grdchk/grdchk_main.F |
97 |
GRDCHK_MAIN |
_RL mytime |
./pkg/icefront/icefront_sgrunoff_read.F |
43 |
SGRUNOFF_READ |
& mytime, myiter, mythid ) |
./pkg/kpp/kpp_calc.F |
519 |
KPP_CALC |
I , bi, bj, mytime, myIter, mythid ) |
./pkg/profiles/cost_profiles.F |
12 |
COST_PROFILES |
SUBROUTINE COST_PROFILES( myiter, mytime, myThid ) |
./pkg/profiles/cost_profiles.F |
36 |
COST_PROFILES |
_RL mytime |
./pkg/profiles/cost_profiles.F |
91 |
COST_PROFILES |
& num_var,num_file,mytime,bi,bj,myThid) |
./pkg/profiles/cost_profiles.F |
95 |
COST_PROFILES |
& num_var,num_file,mytime,bi,bj,myThid) |
./pkg/profiles/profiles_inloop.F |
13 |
PROFILES_INLOOP |
SUBROUTINE PROFILES_INLOOP(mytime,myThid ) |
./pkg/profiles/profiles_inloop.F |
36 |
PROFILES_INLOOP |
_RL mytime |
./pkg/profiles/profiles_inloop.F |
66 |
PROFILES_INLOOP |
if ((prof_time(num_file,prof_num,bi,bj).GE.mytime).AND. |
./pkg/profiles/profiles_inloop.F |
67 |
PROFILES_INLOOP |
& (prof_time(num_file,prof_num,bi,bj).LT.(mytime+deltaTclock))) |
./pkg/profiles/profiles_inloop.F |
88 |
PROFILES_INLOOP |
& num_var,num_file,mytime,bi,bj,myThid) |
./pkg/profiles/profiles_inloop.F |
92 |
PROFILES_INLOOP |
& num_var,num_file,mytime,bi,bj,myThid) |
./pkg/profiles/profiles_interp.F |
19 |
PROFILES_INTERP |
I mytime, |
./pkg/profiles/profiles_interp.F |
47 |
PROFILES_INTERP |
_RL mytime |
./pkg/profiles/profiles_interp_gg.F |
20 |
PROFILES_INTERP_GG |
I mytime, |
./pkg/profiles/profiles_interp_gg.F |
48 |
PROFILES_INTERP_GG |
_RL mytime |
./pkg/profiles/profiles_interp_mean.F |
19 |
PROFILES_INTERP_MEAN |
I mytime, |
./pkg/profiles/profiles_interp_mean.F |
47 |
PROFILES_INTERP_MEAN |
_RL mytime |
./pkg/profiles/profiles_interp_mean_gg.F |
20 |
PROFILES_INTERP_MEAN_GG |
I mytime, |
./pkg/profiles/profiles_interp_mean_gg.F |
48 |
PROFILES_INTERP_MEAN_GG |
_RL mytime |
./pkg/seaice/cost_ice_test.F |
64 |
COST_ICE_TEST |
_RL mytime |
./pkg/seaice/cost_ice_test.F |
6 |
COST_ICE_TEST |
subroutine COST_ICE_TEST( mytime, myiter, mythid ) |
./pkg/seaice/seaice_ad_dump.F |
11 |
SEAICE_AD_DUMP |
subroutine SEAICE_AD_DUMP( mytime, myiter, myThid ) |
./pkg/seaice/seaice_ad_dump.F |
55 |
SEAICE_AD_DUMP |
_RL mytime |
./pkg/seaice/seaice_ad_dump.F |
77 |
SEAICE_AD_DUMP |
& DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock) |
./pkg/seaice/seaice_cost_areasst.F |
17 |
SEAICE_COST_AREASST |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_areasst.F |
71 |
SEAICE_COST_AREASST |
_RL mytime |
./pkg/seaice/seaice_cost_concentration.F |
13 |
SEAICE_COST_CONCENTRATION |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_concentration.F |
58 |
SEAICE_COST_CONCENTRATION |
_RL mytime |
./pkg/seaice/seaice_cost_driver.F |
104 |
SEAICE_COST_DRIVER |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_driver.F |
42 |
SEAICE_COST_DRIVER |
_RL mytime |
./pkg/seaice/seaice_cost_driver.F |
6 |
SEAICE_COST_DRIVER |
subroutine SEAICE_COST_DRIVER( myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_driver.F |
82 |
SEAICE_COST_DRIVER |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_driver.F |
93 |
SEAICE_COST_DRIVER |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_sss.F |
16 |
SEAICE_COST_SSS |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_sss.F |
58 |
SEAICE_COST_SSS |
_RL mytime |
./pkg/seaice/seaice_cost_sst.F |
14 |
SEAICE_COST_SST |
& myiter, mytime, mythid ) |
./pkg/seaice/seaice_cost_sst.F |
56 |
SEAICE_COST_SST |
_RL mytime |
./model/src/forward_step.F |
243 |
FORWARD_STEP |
CALL PROFILES_INLOOP( mytime, mythid ) |
./verification/OpenAD/code_oad_all/grdchk_main.F |
269 |
GRDCHK_MAIN |
mytime = starttime |
./verification/OpenAD/code_oad_all/grdchk_main.F |
283 |
GRDCHK_MAIN |
call G_THE_MAIN_LOOP( mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/grdchk_main.F |
324 |
GRDCHK_MAIN |
mytime = starttime |
./verification/OpenAD/code_oad_all/grdchk_main.F |
326 |
GRDCHK_MAIN |
call OPENAD_THE_MAIN_LOOP( mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/grdchk_main.F |
365 |
GRDCHK_MAIN |
mytime = starttime |
./verification/OpenAD/code_oad_all/grdchk_main.F |
367 |
GRDCHK_MAIN |
call OPENAD_THE_MAIN_LOOP( mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/grdchk_main.F |
97 |
GRDCHK_MAIN |
_RL mytime |
./verification/OpenAD/code_oad_all/the_first_level_loop.F |
103 |
THE_FIRST_LEVEL_LOOP |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
114 |
THE_FOURTH_LEVEL_LOOP |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
218 |
THE_FOURTH_LEVEL_PLAIN |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_fourth_level_loop.F |
228 |
THE_FOURTH_LEVEL_PLAIN |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
119 |
THE_SECOND_LEVEL_LOOP |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_second_level_loop.F |
222 |
THE_SECOND_LEVEL_PLAIN |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
114 |
THE_THIRD_LEVEL_LOOP |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
218 |
THE_THIRD_LEVEL_PLAIN |
+mytime, myiter, mythid ) |
./verification/OpenAD/code_oad_all/the_third_level_loop.F |
228 |
THE_THIRD_LEVEL_PLAIN |
+mytime, myiter, mythid ) |
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
46 |
ADDUMMY_IN_STEPPING |
_RL mytime |
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
68 |
ADDUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(ADJdumpFreq,mytime,deltaTClock) |
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F |
9 |
ADDUMMY_IN_STEPPING |
subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid ) |
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
82 |
ADDUMMY_IN_HFAC |
_RL mytime |
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
90 |
ADDUMMY_IN_HFAC |
mytime = 0. |
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
95 |
ADDUMMY_IN_HFAC |
& DIFFERENT_MULTIPLE(dumpFreq,mytime, |
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F |
96 |
ADDUMMY_IN_HFAC |
& mytime-deltaTClock) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
119 |
COST_HYD |
& myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
140 |
COST_HYD |
& myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
148 |
COST_HYD |
call COST_CTDS ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
155 |
COST_HYD |
call COST_ARGO_SALT ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
162 |
COST_HYD |
call COST_THETA0 ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
169 |
COST_HYD |
call COST_SALT0 ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
176 |
COST_HYD |
call COST_THETA ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
183 |
COST_HYD |
call COST_SALT ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
42 |
COST_HYD |
_RL mytime |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
6 |
COST_HYD |
subroutine COST_HYD( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
77 |
COST_HYD |
& myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
85 |
COST_HYD |
call COST_ARGO_THETA ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
92 |
COST_HYD |
call COST_CTDT ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/cost_hyd.F |
99 |
COST_HYD |
call COST_XBT ( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
146 |
THE_MAIN_LOOP |
_RL mytime |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
198 |
THE_MAIN_LOOP |
call CAL_TIMESTAMP( myiter, mytime, mydate, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
351 |
THE_MAIN_LOOP |
mytime = startTime + float(iloop-1)*deltaTclock |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
361 |
THE_MAIN_LOOP |
call COST_AVERAGESFIELDS( mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
366 |
THE_MAIN_LOOP |
call COST_ATLANTIC( mytime, myiter,mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
382 |
THE_MAIN_LOOP |
CALL EXF_GETFORCING( mytime, myiter, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
503 |
THE_MAIN_LOOP |
call COST_AVERAGESFIELDS( mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
518 |
THE_MAIN_LOOP |
call COST_ATLANTIC( mytime, myiter,mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
529 |
THE_MAIN_LOOP |
call COST_FORCING( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
538 |
THE_MAIN_LOOP |
call COST_HYD( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
547 |
THE_MAIN_LOOP |
call SEAICE_COST_DRIVER( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
557 |
THE_MAIN_LOOP |
call COST_OBCS( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
567 |
THE_MAIN_LOOP |
call COST_CURMTR( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
578 |
THE_MAIN_LOOP |
call COST_SSH( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
589 |
THE_MAIN_LOOP |
call COST_DRIFTER( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
600 |
THE_MAIN_LOOP |
call COST_SCAT( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
607 |
THE_MAIN_LOOP |
call COST_MEAN_HEATFLUX( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
614 |
THE_MAIN_LOOP |
call COST_MEAN_SALTFLUX( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
626 |
THE_MAIN_LOOP |
call COST_DRIFT( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
635 |
THE_MAIN_LOOP |
call COST_DRIFTW( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
643 |
THE_MAIN_LOOP |
call COST_THETA_INI_FIN( myiter, mytime, mythid ) |
./verification/lab_sea/code_ad_seaice_only/the_main_loop.F |
644 |
THE_MAIN_LOOP |
call COST_SALT_INI_FIN( myiter, mytime, mythid ) |
./model/src/the_main_loop.F |
463 |
THE_MAIN_LOOP |
CALL COST_AVERAGESFIELDS( mytime, mythid ) |
./model/src/the_main_loop.F |
474 |
THE_MAIN_LOOP |
CALL FORWARD_STEP_ATM2D( iloop, mytime, myiter, mythid ) |
./model/src/the_main_loop.F |
484 |
THE_MAIN_LOOP |
CALL FORWARD_STEP( iloop, mytime, myiter, mythid ) |
./model/src/the_main_loop.F |
525 |
THE_MAIN_LOOP |
CALL COST_AVERAGESFIELDS( mytime, mythid ) |
./model/src/the_main_loop.F |
532 |
THE_MAIN_LOOP |
CALL PROFILES_INLOOP( mytime, mythid ) |
./pkg/autodiff/addummy_in_stepping.F |
10 |
ADDUMMY_IN_STEPPING |
subroutine ADDUMMY_IN_STEPPING( mytime, myiter, myThid ) |
./pkg/autodiff/addummy_in_stepping.F |
218 |
ADDUMMY_IN_STEPPING |
IF ( useSEAICE ) CALL SEAICE_AD_DUMP( mytime, myiter, myThid ) |
./pkg/autodiff/addummy_in_stepping.F |
53 |
ADDUMMY_IN_STEPPING |
_RL mytime |
./pkg/autodiff/addummy_in_stepping.F |
75 |
ADDUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock) |
./pkg/autodiff/dummy_in_stepping.F |
21 |
DUMMY_IN_STEPPING |
_RL mytime |
./pkg/autodiff/dummy_in_stepping.F |
6 |
DUMMY_IN_STEPPING |
subroutine DUMMY_IN_STEPPING( mytime, myiter, myThid ) |
./pkg/autodiff/g_dummy_in_stepping.F |
48 |
G_DUMMY_IN_STEPPING |
_RL mytime |
./pkg/autodiff/g_dummy_in_stepping.F |
70 |
G_DUMMY_IN_STEPPING |
& DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock) |
./pkg/autodiff/g_dummy_in_stepping.F |
9 |
G_DUMMY_IN_STEPPING |
subroutine G_DUMMY_IN_STEPPING( mytime, myiter, myThid ) |
./pkg/cal/cal_dayspermonth.F |
46 |
CAL_DAYSPERMONTH |
_RL mytime |
./pkg/cal/cal_dayspermonth.F |
64 |
CAL_DAYSPERMONTH |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/cal/cal_dayspermonth.F |
8 |
CAL_DAYSPERMONTH |
I mytime, |
./pkg/cal/cal_getdate.F |
45 |
CAL_GETDATE |
_RL mytime |
./pkg/cal/cal_getdate.F |
56 |
CAL_GETDATE |
if (mytime .lt. 0) then |
./pkg/cal/cal_getdate.F |
63 |
CAL_GETDATE |
secs = mytime - modelstart |
./pkg/cal/cal_getdate.F |
8 |
CAL_GETDATE |
I mytime, |
./pkg/cal/cal_getmonthsrec.F |
126 |
CAL_GETMONTHSREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/cal/cal_getmonthsrec.F |
45 |
CAL_GETMONTHSREC |
_RL mytime |
./pkg/cal/cal_getmonthsrec.F |
86 |
CAL_GETMONTHSREC |
call CAL_GETDATE( myiter, mytime, currentdate, mythid ) |
./pkg/cal/cal_getmonthsrec.F |
9 |
CAL_GETMONTHSREC |
I mytime, myiter, mythid |
./pkg/cal/cal_monthsperyear.F |
47 |
CAL_MONTHSPERYEAR |
_RL mytime |
./pkg/cal/cal_monthsperyear.F |
59 |
CAL_MONTHSPERYEAR |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/cal/cal_monthsperyear.F |
8 |
CAL_MONTHSPERYEAR |
I mytime, |
./pkg/cal/cal_stepsperday.F |
46 |
CAL_STEPSPERDAY |
_RL mytime |
./pkg/cal/cal_stepsperday.F |
61 |
CAL_STEPSPERDAY |
call CAL_GETDATE( myiter, mytime, currentdate, mythid ) |
./pkg/cal/cal_stepsperday.F |
8 |
CAL_STEPSPERDAY |
I mytime, |
./pkg/cal/cal_timestamp.F |
37 |
CAL_TIMESTAMP |
_RL mytime |
./pkg/cal/cal_timestamp.F |
49 |
CAL_TIMESTAMP |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/cal/cal_timestamp.F |
60 |
CAL_TIMESTAMP |
& ' cal_TimeStamp: iter = ',myiter,' time = ',mytime |
./pkg/cal/cal_timestamp.F |
8 |
CAL_TIMESTAMP |
I mytime, |
./pkg/cost/cost_tile.F |
59 |
COST_TILE |
subroutine COST_TILE( mytime, myiter, myThid ) |
./pkg/ctrl/ctrl_get_gen.F |
118 |
CTRL_GET_GEN |
I mytime, myiter, mythid |
./pkg/ctrl/ctrl_get_gen.F |
11 |
CTRL_GET_GEN |
I mytime, myiter, mythid |
./pkg/ctrl/ctrl_get_gen.F |
126 |
CTRL_GET_GEN |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_get_gen.F |
134 |
CTRL_GET_GEN |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_get_gen.F |
213 |
CTRL_GET_GEN |
& xx_gen_remo_slope*(mytime-starttime) ) ) |
./pkg/ctrl/ctrl_get_gen.F |
55 |
CTRL_GET_GEN |
_RL mytime |
./pkg/ctrl/ctrl_get_gen_rec.F |
107 |
CTRL_GET_GEN_REC |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/ctrl/ctrl_get_gen_rec.F |
124 |
CTRL_GET_GEN_REC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/ctrl/ctrl_get_gen_rec.F |
129 |
CTRL_GET_GEN_REC |
call CAL_GETDATE( myiter-1, mytime-modelstep, |
./pkg/ctrl/ctrl_get_gen_rec.F |
16 |
CTRL_GET_GEN_REC |
I mytime, |
./pkg/ctrl/ctrl_get_gen_rec.F |
55 |
CTRL_GET_GEN_REC |
_RL mytime |
./pkg/ctrl/ctrl_getobcse.F |
11 |
CTRL_GETOBCSE |
I mytime, |
./pkg/ctrl/ctrl_getobcse.F |
120 |
CTRL_GETOBCSE |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_getobcse.F |
381 |
CTRL_GETOBCSE |
_RL mytime |
./pkg/ctrl/ctrl_getobcse.F |
47 |
CTRL_GETOBCSE |
_RL mytime |
./pkg/ctrl/ctrl_getobcsn.F |
11 |
CTRL_GETOBCSN |
I mytime, |
./pkg/ctrl/ctrl_getobcsn.F |
125 |
CTRL_GETOBCSN |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_getobcsn.F |
413 |
CTRL_GETOBCSN |
_RL mytime |
./pkg/ctrl/ctrl_getobcsn.F |
48 |
CTRL_GETOBCSN |
_RL mytime |
./pkg/ctrl/ctrl_getobcss.F |
11 |
CTRL_GETOBCSS |
I mytime, |
./pkg/ctrl/ctrl_getobcss.F |
122 |
CTRL_GETOBCSS |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_getobcss.F |
384 |
CTRL_GETOBCSS |
_RL mytime |
./pkg/ctrl/ctrl_getobcss.F |
49 |
CTRL_GETOBCSS |
_RL mytime |
./pkg/ctrl/ctrl_getobcsw.F |
11 |
CTRL_GETOBCSW |
I mytime, |
./pkg/ctrl/ctrl_getobcsw.F |
121 |
CTRL_GETOBCSW |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_getobcsw.F |
384 |
CTRL_GETOBCSW |
_RL mytime |
./pkg/ctrl/ctrl_getobcsw.F |
48 |
CTRL_GETOBCSW |
_RL mytime |
./pkg/ctrl/ctrl_getrec.F |
15 |
CTRL_GETREC |
I mytime, |
./pkg/ctrl/ctrl_getrec.F |
312 |
CTRL_GETREC |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/ctrl/ctrl_getrec.F |
323 |
CTRL_GETREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/ctrl/ctrl_getrec.F |
328 |
CTRL_GETREC |
call CAL_GETDATE( myiter-1, mytime-modelstep, |
./pkg/ctrl/ctrl_getrec.F |
62 |
CTRL_GETREC |
_RL mytime |
./pkg/ctrl/ctrl_obcsbal.F |
10 |
CTRL_OBCSBAL |
I mytime, |
./pkg/ctrl/ctrl_obcsbal.F |
147 |
CTRL_OBCSBAL |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_obcsbal.F |
50 |
CTRL_OBCSBAL |
_RL mytime |
./pkg/ctrl/ctrl_obcsvol.F |
10 |
CTRL_OBCSVOL |
I mytime, |
./pkg/ctrl/ctrl_obcsvol.F |
141 |
CTRL_OBCSVOL |
I mytime, myiter, mythid ) |
./pkg/ctrl/ctrl_obcsvol.F |
47 |
CTRL_OBCSVOL |
_RL mytime |
./pkg/ecco/cost_argo_salt.F |
44 |
COST_ARGO_SALT |
_RL mytime |
./pkg/ecco/cost_argo_salt.F |
9 |
COST_ARGO_SALT |
I mytime, |
./pkg/ecco/cost_argo_theta.F |
44 |
COST_ARGO_THETA |
_RL mytime |
./pkg/ecco/cost_argo_theta.F |
9 |
COST_ARGO_THETA |
I mytime, |
./pkg/ecco/cost_atlantic.F |
111 |
COST_ATLANTIC |
I myiter, mytime, mythid, |
./pkg/ecco/cost_atlantic.F |
49 |
COST_ATLANTIC |
_RL mytime |
./pkg/ecco/cost_atlantic.F |
8 |
COST_ATLANTIC |
I mytime, |
./pkg/ecco/cost_averagesfields.F |
122 |
COST_AVERAGESFIELDS |
myiter = niter0 + INT((mytime-starttime)/deltaTClock+0.5) |
./pkg/ecco/cost_averagesfields.F |
12 |
COST_AVERAGESFIELDS |
subroutine COST_AVERAGESFIELDS( mytime, mythid ) |
./pkg/ecco/cost_averagesfields.F |
131 |
COST_AVERAGESFIELDS |
I myiter, mytime, mythid, |
./pkg/ecco/cost_averagesfields.F |
59 |
COST_AVERAGESFIELDS |
_RL mytime |
./pkg/ecco/cost_averagesflags.F |
112 |
COST_AVERAGESFLAGS |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/ecco/cost_averagesflags.F |
113 |
COST_AVERAGESFLAGS |
call CAL_GETDATE( myiter+1, mytime+modelstep, nextdate, mythid ) |
./pkg/ecco/cost_averagesflags.F |
59 |
COST_AVERAGESFLAGS |
_RL mytime |
./pkg/ecco/cost_averagesflags.F |
9 |
COST_AVERAGESFLAGS |
I mytime, |
./pkg/ecco/cost_bottomdrag.F |
34 |
COST_BOTTOMDRAG |
_RL mytime |
./pkg/ecco/cost_bottomdrag.F |
9 |
COST_BOTTOMDRAG |
I mytime, |
./pkg/ecco/cost_bp.F |
47 |
COST_BP |
_RL mytime |
./pkg/ecco/cost_bp.F |
9 |
COST_BP |
I mytime, |
./pkg/ecco/cost_ctds.F |
43 |
COST_CTDS |
_RL mytime |
./pkg/ecco/cost_ctds.F |
9 |
COST_CTDS |
I mytime, |
./pkg/ecco/cost_ctdsclim.F |
52 |
COST_CTDSCLIM |
_RL mytime |
./pkg/ecco/cost_ctdsclim.F |
9 |
COST_CTDSCLIM |
I mytime, |
./pkg/ecco/cost_ctdt.F |
44 |
COST_CTDT |
_RL mytime |
./pkg/ecco/cost_ctdt.F |
9 |
COST_CTDT |
I mytime, |
./pkg/ecco/cost_ctdtclim.F |
52 |
COST_CTDTCLIM |
_RL mytime |
./pkg/ecco/cost_ctdtclim.F |
9 |
COST_CTDTCLIM |
I mytime, |
./pkg/ecco/cost_curmtr.F |
44 |
COST_CURMTR |
_RL mytime |
./pkg/ecco/cost_curmtr.F |
8 |
COST_CURMTR |
I mytime, |
./pkg/ecco/cost_diffkr.F |
34 |
COST_DIFFKR |
_RL mytime |
./pkg/ecco/cost_diffkr.F |
9 |
COST_DIFFKR |
I mytime, |
./pkg/ecco/cost_drift.F |
43 |
COST_DRIFT |
_RL mytime |
./pkg/ecco/cost_drift.F |
7 |
COST_DRIFT |
subroutine COST_DRIFT( myiter, mytime, mythid ) |
./pkg/ecco/cost_drifter.F |
56 |
COST_DRIFTER |
_RL mytime |
./pkg/ecco/cost_drifter.F |
9 |
COST_DRIFTER |
I mytime, |
./pkg/ecco/cost_driftw.F |
46 |
COST_DRIFTW |
_RL mytime |
./pkg/ecco/cost_driftw.F |
9 |
COST_DRIFTW |
I mytime, |
./pkg/ecco/cost_forcing.F |
104 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
119 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
132 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
147 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
160 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
175 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
190 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
205 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
220 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
235 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
250 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
265 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
280 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
295 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
46 |
COST_FORCING |
_RL mytime |
./pkg/ecco/cost_forcing.F |
63 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
76 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing.F |
7 |
COST_FORCING |
subroutine COST_FORCING( myiter, mytime, mythid ) |
./pkg/ecco/cost_forcing.F |
91 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
./pkg/ecco/cost_forcing_gen.F |
55 |
COST_FORCING_GEN |
_RL mytime |
./pkg/ecco/cost_forcing_gen.F |
9 |
COST_FORCING_GEN |
I mytime, |
./pkg/ecco/cost_gen_transport.F |
43 |
COST_GEN_TRANSPORT |
_RL mytime |
./pkg/ecco/cost_gen_transport.F |
9 |
COST_GEN_TRANSPORT |
I mytime, |
./pkg/ecco/cost_gencost_all.F |
37 |
COST_GENCOST_ALL |
_RL mytime |
./pkg/ecco/cost_gencost_all.F |
78 |
COST_GENCOST_ALL |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_gencost_all.F |
7 |
COST_GENCOST_ALL |
subroutine COST_GENCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/cost_gencost_all.F |
85 |
COST_GENCOST_ALL |
call COST_GENCOST_SSHV4( myiter, mytime, mythid ) |
./pkg/ecco/cost_gencost_all.F |
89 |
COST_GENCOST_ALL |
call COST_GENCOST_SSTV4( myiter, mytime, mythid ) |
./pkg/ecco/cost_gencost_sshv4.F |
58 |
COST_GENCOST_SSHV4 |
_RL mytime |
./pkg/ecco/cost_gencost_sshv4.F |
9 |
COST_GENCOST_SSHV4 |
I mytime, |
./pkg/ecco/cost_gencost_sstv4.F |
45 |
COST_GENCOST_SSTV4 |
_RL mytime |
./pkg/ecco/cost_gencost_sstv4.F |
9 |
COST_GENCOST_SSTV4 |
I mytime, |
./pkg/ecco/cost_generic.F |
14 |
COST_GENERIC |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_generic.F |
59 |
COST_GENERIC |
_RL mytime |
./pkg/ecco/cost_hyd.F |
101 |
COST_HYD |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
109 |
COST_HYD |
call COST_ARGO_THETA ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
116 |
COST_HYD |
call COST_CTDT ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
123 |
COST_HYD |
call COST_XBT ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
143 |
COST_HYD |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
164 |
COST_HYD |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
172 |
COST_HYD |
call COST_CTDS ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
179 |
COST_HYD |
call COST_ARGO_SALT ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
186 |
COST_HYD |
call COST_THETA0 ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
193 |
COST_HYD |
call COST_SALT0 ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
200 |
COST_HYD |
call COST_THETA ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
207 |
COST_HYD |
call COST_SALT ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
214 |
COST_HYD |
call COST_GEN_TRANSPORT ( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
218 |
COST_HYD |
CALL COST_PROFILES( myiter, mytime, mythid) |
./pkg/ecco/cost_hyd.F |
244 |
COST_HYD |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
46 |
COST_HYD |
_RL mytime |
./pkg/ecco/cost_hyd.F |
7 |
COST_HYD |
subroutine COST_HYD( myiter, mytime, mythid ) |
./pkg/ecco/cost_hyd.F |
80 |
COST_HYD |
& myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
37 |
COST_INTERNAL_PARAMS |
_RL mytime |
./pkg/ecco/cost_internal_params.F |
46 |
COST_INTERNAL_PARAMS |
call COST_TAU_EDDY( myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
54 |
COST_INTERNAL_PARAMS |
call COST_KAPGM( myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
62 |
COST_INTERNAL_PARAMS |
call COST_KAPREDI( myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
70 |
COST_INTERNAL_PARAMS |
call COST_DIFFKR( myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
78 |
COST_INTERNAL_PARAMS |
call COST_BOTTOMDRAG( myiter, mytime, mythid ) |
./pkg/ecco/cost_internal_params.F |
7 |
COST_INTERNAL_PARAMS |
subroutine COST_INTERNAL_PARAMS( myiter, mytime, mythid ) |
./pkg/ecco/cost_kapgm.F |
37 |
COST_KAPGM |
_RL mytime |
./pkg/ecco/cost_kapgm.F |
9 |
COST_KAPGM |
I mytime, |
./pkg/ecco/cost_kapredi.F |
37 |
COST_KAPREDI |
_RL mytime |
./pkg/ecco/cost_kapredi.F |
9 |
COST_KAPREDI |
I mytime, |
./pkg/ecco/cost_mean_heatflux.F |
44 |
COST_MEAN_HEATFLUX |
_RL mytime |
./pkg/ecco/cost_mean_heatflux.F |
9 |
COST_MEAN_HEATFLUX |
I mytime, |
./pkg/ecco/cost_mean_saltflux.F |
44 |
COST_MEAN_SALTFLUX |
_RL mytime |
./pkg/ecco/cost_mean_saltflux.F |
9 |
COST_MEAN_SALTFLUX |
I mytime, |
./pkg/ecco/cost_obcs.F |
30 |
COST_OBCS |
_RL mytime |
./pkg/ecco/cost_obcs.F |
39 |
COST_OBCS |
call COST_OBCSN ( myiter, mytime, mythid ) |
./pkg/ecco/cost_obcs.F |
43 |
COST_OBCS |
call COST_OBCSS ( myiter, mytime, mythid ) |
./pkg/ecco/cost_obcs.F |
47 |
COST_OBCS |
call COST_OBCSW ( myiter, mytime, mythid ) |
./pkg/ecco/cost_obcs.F |
51 |
COST_OBCS |
call COST_OBCSE ( myiter, mytime, mythid ) |
./pkg/ecco/cost_obcs.F |
9 |
COST_OBCS |
I mytime, |
./pkg/ecco/cost_obcs_ageos.F |
48 |
COST_OBCS_AGEOS |
_RL mytime |
./pkg/ecco/cost_obcs_ageos.F |
9 |
COST_OBCS_AGEOS |
subroutine COST_OBCS_AGEOS( myiter, mytime, mythid ) |
./pkg/ecco/cost_obcse.F |
11 |
COST_OBCSE |
I mytime, |
./pkg/ecco/cost_obcse.F |
47 |
COST_OBCSE |
_RL mytime |
./pkg/ecco/cost_obcsn.F |
11 |
COST_OBCSN |
I mytime, |
./pkg/ecco/cost_obcsn.F |
47 |
COST_OBCSN |
_RL mytime |
./pkg/ecco/cost_obcss.F |
11 |
COST_OBCSS |
I mytime, |
./pkg/ecco/cost_obcss.F |
47 |
COST_OBCSS |
_RL mytime |
./pkg/ecco/cost_obcsvol.F |
11 |
COST_OBCSVOL |
I mytime, |
./pkg/ecco/cost_obcsvol.F |
49 |
COST_OBCSVOL |
_RL mytime |
./pkg/ecco/cost_obcsw.F |
11 |
COST_OBCSW |
I mytime, |
./pkg/ecco/cost_obcsw.F |
47 |
COST_OBCSW |
_RL mytime |
./pkg/ecco/cost_salt.F |
49 |
COST_SALT |
_RL mytime |
./pkg/ecco/cost_salt.F |
7 |
COST_SALT |
subroutine COST_SALT( myiter, mytime, mythid ) |
./pkg/ecco/cost_salt0.F |
46 |
COST_SALT0 |
_RL mytime |
./pkg/ecco/cost_salt0.F |
9 |
COST_SALT0 |
I mytime, |
./pkg/ecco/cost_salt_ini_fin.F |
38 |
COST_SALT_INI_FIN |
_RL mytime |
./pkg/ecco/cost_salt_ini_fin.F |
9 |
COST_SALT_INI_FIN |
I mytime, |
./pkg/ecco/cost_scat.F |
43 |
COST_SCAT |
_RL mytime |
./pkg/ecco/cost_scat.F |
9 |
COST_SCAT |
I mytime, |
./pkg/ecco/cost_ssh.F |
55 |
COST_SSH |
_RL mytime |
./pkg/ecco/cost_ssh.F |
9 |
COST_SSH |
I mytime, |
./pkg/ecco/cost_ssh_new.F |
55 |
COST_SSH_NEW |
_RL mytime |
./pkg/ecco/cost_ssh_new.F |
9 |
COST_SSH_NEW |
I mytime, |
./pkg/ecco/cost_sshv4.F |
58 |
COST_SSHV4 |
_RL mytime |
./pkg/ecco/cost_sshv4.F |
9 |
COST_SSHV4 |
I mytime, |
./pkg/ecco/cost_tau_eddy.F |
37 |
COST_TAU_EDDY |
_RL mytime |
./pkg/ecco/cost_tau_eddy.F |
9 |
COST_TAU_EDDY |
I mytime, |
./pkg/ecco/cost_theta.F |
49 |
COST_THETA |
_RL mytime |
./pkg/ecco/cost_theta.F |
7 |
COST_THETA |
subroutine COST_THETA( myiter, mytime, mythid ) |
./pkg/ecco/cost_theta0.F |
46 |
COST_THETA0 |
_RL mytime |
./pkg/ecco/cost_theta0.F |
9 |
COST_THETA0 |
I mytime, |
./pkg/ecco/cost_theta_ini_fin.F |
38 |
COST_THETA_INI_FIN |
_RL mytime |
./pkg/ecco/cost_theta_ini_fin.F |
9 |
COST_THETA_INI_FIN |
I mytime, |
./pkg/ecco/cost_usercost_all.F |
37 |
COST_USERCOST_ALL |
_RL mytime |
./pkg/ecco/cost_usercost_all.F |
7 |
COST_USERCOST_ALL |
subroutine COST_USERCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/cost_xbt.F |
44 |
COST_XBT |
_RL mytime |
./pkg/ecco/cost_xbt.F |
9 |
COST_XBT |
I mytime, |
./pkg/ecco/ecco_cost_driver.F |
108 |
ECCO_COST_DRIVER |
call COST_BP( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
117 |
ECCO_COST_DRIVER |
call COST_HYD( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
126 |
ECCO_COST_DRIVER |
call SEAICE_COST_DRIVER( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
136 |
ECCO_COST_DRIVER |
call COST_OBCS( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
145 |
ECCO_COST_DRIVER |
call COST_CURMTR( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
156 |
ECCO_COST_DRIVER |
call COST_DRIFTER( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
168 |
ECCO_COST_DRIVER |
call COST_SCAT( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
179 |
ECCO_COST_DRIVER |
call COST_DRIFT( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
187 |
ECCO_COST_DRIVER |
call COST_DRIFTW( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
195 |
ECCO_COST_DRIVER |
call COST_THETA_INI_FIN( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
196 |
ECCO_COST_DRIVER |
call COST_SALT_INI_FIN( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
203 |
ECCO_COST_DRIVER |
call COST_INTERNAL_PARAMS( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
209 |
ECCO_COST_DRIVER |
call COST_GENCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
214 |
ECCO_COST_DRIVER |
call COST_USERCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
29 |
ECCO_COST_DRIVER |
_RL mytime |
./pkg/ecco/ecco_cost_driver.F |
50 |
ECCO_COST_DRIVER |
call COST_ATLANTIC( mytime, myiter,mythid ) |
./pkg/ecco/ecco_cost_driver.F |
60 |
ECCO_COST_DRIVER |
call COST_FORCING( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
65 |
ECCO_COST_DRIVER |
call COST_MEAN_HEATFLUX( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
73 |
ECCO_COST_DRIVER |
call COST_MEAN_SALTFLUX( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
87 |
ECCO_COST_DRIVER |
call COST_SSHV4( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
91 |
ECCO_COST_DRIVER |
call COST_SSH_NEW( myiter, mytime, mythid ) |
./pkg/ecco/ecco_cost_driver.F |
95 |
ECCO_COST_DRIVER |
call COST_SSH( myiter, mytime, mythid ) |
./pkg/ecco/forward_step.F |
48 |
FORWARD_STEP |
_RL mytime |
./pkg/ecco/the_main_loop.F |
1098 |
THE_MAIN_LOOP |
call PROFILES_INLOOP( mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1113 |
THE_MAIN_LOOP |
call COST_AVERAGESFIELDS( mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1127 |
THE_MAIN_LOOP |
call COST_ATLANTIC( mytime, myiter,mythid ) |
./pkg/ecco/the_main_loop.F |
1137 |
THE_MAIN_LOOP |
call COST_FORCING( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1142 |
THE_MAIN_LOOP |
call COST_MEAN_HEATFLUX( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1150 |
THE_MAIN_LOOP |
call COST_MEAN_SALTFLUX( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1164 |
THE_MAIN_LOOP |
call COST_SSHV4( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1168 |
THE_MAIN_LOOP |
call COST_SSH_NEW( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1172 |
THE_MAIN_LOOP |
call COST_SSH( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1185 |
THE_MAIN_LOOP |
call COST_BP( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1194 |
THE_MAIN_LOOP |
call COST_HYD( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1203 |
THE_MAIN_LOOP |
call SEAICE_COST_DRIVER( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1213 |
THE_MAIN_LOOP |
call COST_OBCS( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1222 |
THE_MAIN_LOOP |
call COST_CURMTR( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1233 |
THE_MAIN_LOOP |
call COST_DRIFTER( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1245 |
THE_MAIN_LOOP |
call COST_SCAT( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1256 |
THE_MAIN_LOOP |
call COST_DRIFT( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1264 |
THE_MAIN_LOOP |
call COST_DRIFTW( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1272 |
THE_MAIN_LOOP |
call COST_THETA_INI_FIN( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1273 |
THE_MAIN_LOOP |
call COST_SALT_INI_FIN( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1280 |
THE_MAIN_LOOP |
call COST_INTERNAL_PARAMS( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1286 |
THE_MAIN_LOOP |
call COST_GENCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
1291 |
THE_MAIN_LOOP |
call COST_USERCOST_ALL( myiter, mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
197 |
THE_MAIN_LOOP |
_RL mytime |
./pkg/ecco/the_main_loop.F |
251 |
THE_MAIN_LOOP |
call CAL_TIMESTAMP( myiter, mytime, mydate, mythid ) |
./pkg/ecco/the_main_loop.F |
459 |
THE_MAIN_LOOP |
mytime = startTime + float(iloop-1)*deltaTclock |
./pkg/ecco/the_main_loop.F |
485 |
THE_MAIN_LOOP |
call PROFILES_INLOOP( mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
496 |
THE_MAIN_LOOP |
call COST_AVERAGESFIELDS( mytime, mythid ) |
./pkg/ecco/the_main_loop.F |
508 |
THE_MAIN_LOOP |
call COST_ATLANTIC( mytime, myiter,mythid ) |
./pkg/exf/exf_adjoint_snapshots.F |
22 |
EXF_ADJOINT_SNAPSHOTS |
_RL mytime |
./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 |
10 |
G_EXF_ADJOINT_SNAPSHOTS |
& iwhen, mytime, myiter, myThid ) |
./pkg/exf/exf_adjoint_snapshots__g.F |
50 |
G_EXF_ADJOINT_SNAPSHOTS |
_RL mytime |
./pkg/exf/exf_adjoint_snapshots__g.F |
74 |
G_EXF_ADJOINT_SNAPSHOTS |
& DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
10 |
ADEXF_ADJOINT_SNAPSHOTS |
& iwhen, mytime, myiter, myThid ) |
./pkg/exf/exf_adjoint_snapshots_ad.F |
54 |
ADEXF_ADJOINT_SNAPSHOTS |
_RL mytime |
./pkg/exf/exf_adjoint_snapshots_ad.F |
78 |
ADEXF_ADJOINT_SNAPSHOTS |
& DIFFERENT_MULTIPLE(adjDumpFreq,mytime,deltaTClock) |
./pkg/exf/exf_check_range.F |
28 |
EXF_CHECK_RANGE |
_RL mytime |
./pkg/exf/exf_check_range.F |
6 |
EXF_CHECK_RANGE |
SUBROUTINE EXF_CHECK_RANGE( mytime, myiter, mythid ) |
./pkg/exf/exf_getclim.F |
110 |
EXF_GETCLIM |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getclim.F |
120 |
EXF_GETCLIM |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getclim.F |
140 |
EXF_GETCLIM |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getclim.F |
59 |
EXF_GETCLIM |
_RL mytime |
./pkg/exf/exf_getclim.F |
81 |
EXF_GETCLIM |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getclim.F |
8 |
EXF_GETCLIM |
I mytime, |
./pkg/exf/exf_getffieldrec.F |
105 |
EXF_GETFFIELDREC |
fldsectot = mytime - fldstartdate |
./pkg/exf/exf_getffieldrec.F |
12 |
EXF_GETFFIELDREC |
I mytime, myiter, mythid ) |
./pkg/exf/exf_getffieldrec.F |
138 |
EXF_GETFFIELDREC |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |
./pkg/exf/exf_getffieldrec.F |
40 |
EXF_GETFFIELDREC |
_RL mytime |
./pkg/exf/exf_getffieldrec.F |
83 |
EXF_GETFFIELDREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/exf/exf_getffieldrec.F |
90 |
EXF_GETFFIELDREC |
first = ((mytime - modelstart) .lt. 0.5*modelstep) |
./pkg/exf/exf_getffields.F |
102 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
119 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
126 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
132 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
163 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
175 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
189 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
210 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
222 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
234 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
247 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
262 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
276 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
291 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
303 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
319 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
334 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
345 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
357 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
368 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
376 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
384 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
392 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
400 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
408 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
416 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
424 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
434 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
444 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
44 |
EXF_GETFFIELDS |
_RL mytime |
./pkg/exf/exf_getffields.F |
454 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
462 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
486 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
492 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
6 |
EXF_GETFFIELDS |
subroutine EXF_GETFFIELDS( mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
75 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
82 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getffields.F |
88 |
EXF_GETFFIELDS |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
104 |
EXF_GETFORCING |
subroutine EXF_GETFORCING( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
147 |
EXF_GETFORCING |
_RL mytime |
./pkg/exf/exf_getforcing.F |
160 |
EXF_GETFORCING |
call EXF_GETCLIM( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
163 |
EXF_GETFORCING |
call EXF_GETFFIELDS( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
178 |
EXF_GETFORCING |
call EXF_RADIATION( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
191 |
EXF_GETFORCING |
call EXF_WIND( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
193 |
EXF_GETFORCING |
call EXF_BULKFORMULAE( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
244 |
EXF_GETFORCING |
call EXF_GETSURFACEFLUXES( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
248 |
EXF_GETFORCING |
call EXF_CHECK_RANGE( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
275 |
EXF_GETFORCING |
call EXF_DIAGNOSTICS_FILL( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
278 |
EXF_GETFORCING |
call EXF_MONITOR( mytime, myiter, mythid ) |
./pkg/exf/exf_getforcing.F |
281 |
EXF_GETFORCING |
call EXF_MAPFIELDS( mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
123 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
129 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
51 |
EXF_GETSURFACEFLUXES |
_RL mytime |
./pkg/exf/exf_getsurfacefluxes.F |
73 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
7 |
EXF_GETSURFACEFLUXES |
I mytime, |
./pkg/exf/exf_getsurfacefluxes.F |
81 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
91 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getsurfacefluxes.F |
99 |
EXF_GETSURFACEFLUXES |
& mytime, myiter, mythid ) |
./pkg/exf/exf_getyearlyfieldname.F |
32 |
EXF_GETYEARLYFIELDNAME |
_RL mytime |
./pkg/exf/exf_getyearlyfieldname.F |
8 |
EXF_GETYEARLYFIELDNAME |
I mytime, myiter, mythid ) |
./pkg/exf/exf_mapfields.F |
108 |
EXF_MAPFIELDS |
& hflux_exfremo_slope*(mytime-starttime) ) |
./pkg/exf/exf_mapfields.F |
125 |
EXF_MAPFIELDS |
& sflux_exfremo_slope*(mytime-starttime) ) |
./pkg/exf/exf_mapfields.F |
66 |
EXF_MAPFIELDS |
_RL mytime |
./pkg/exf/exf_mapfields.F |
6 |
EXF_MAPFIELDS |
subroutine EXF_MAPFIELDS( mytime, myiter, mythid ) |
./pkg/exf/exf_set_gen.F |
107 |
EXF_SET_GEN |
I mytime, myiter, mythid |
./pkg/exf/exf_set_gen.F |
121 |
EXF_SET_GEN |
I , mytime, myiter, mythid |
./pkg/exf/exf_set_gen.F |
131 |
EXF_SET_GEN |
I mytime, myiter, mythid ) |
./pkg/exf/exf_set_gen.F |
14 |
EXF_SET_GEN |
& mytime, myiter, mythid ) |
./pkg/exf/exf_set_gen.F |
165 |
EXF_SET_GEN |
I mytime, myiter, mythid ) |
./pkg/exf/exf_set_gen.F |
204 |
EXF_SET_GEN |
& genremove_slope*(mytime-starttime) ) |
./pkg/exf/exf_set_gen.F |
59 |
EXF_SET_GEN |
_RL mytime |
./pkg/exf/exf_set_runoff.F |
106 |
EXF_SET_RUNOFF |
I mytime, myiter, mythid ) |
./pkg/exf/exf_set_runoff.F |
10 |
EXF_SET_RUNOFF |
& mytime, myiter, mythid ) |
./pkg/exf/exf_set_runoff.F |
127 |
EXF_SET_RUNOFF |
I mytime, myiter, mythid ) |
./pkg/exf/exf_set_runoff.F |
153 |
EXF_SET_RUNOFF |
& genremove_slope*(mytime-starttime) ) |
./pkg/exf/exf_set_runoff.F |
49 |
EXF_SET_RUNOFF |
_RL mytime |
./pkg/exf/exf_set_runoff.F |
82 |
EXF_SET_RUNOFF |
I mytime, myiter, mythid |
./pkg/exf/exf_set_runoff.F |
96 |
EXF_SET_RUNOFF |
I , mytime, myiter, mythid |
./pkg/exf/exf_zenithangle.F |
75 |
EXF_ZENITHANGLE |
call CAL_GETDATE( myiter, mytime, mydate, mythid ) |