| File |
Line number |
Procedure |
Code |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
113 |
CTRL_GET_GEN_REC |
startrec = int((modelstart + startTime - fldsecs)/ |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
147 |
CTRL_GET_GEN_REC |
count0 = fldcount - startrec + 1 |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
148 |
CTRL_GET_GEN_REC |
count1 = fldcount - startrec + 2 |
|
./pkg/ctrl/ctrl_get_gen_rec.F |
76 |
CTRL_GET_GEN_REC |
integer startrec |
|
./pkg/ctrl/ctrl_init.F |
1003 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
1005 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
1007 |
CTRL_INIT |
& xx_runoff_file, 40, 140, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
100 |
CTRL_INIT |
integer startrec |
|
./pkg/ctrl/ctrl_init.F |
1014 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
1016 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
1018 |
CTRL_INIT |
& xx_siarea_file, 41, 141, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
1025 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
1027 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
1029 |
CTRL_INIT |
& xx_siheff_file, 42, 142, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
1036 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
1038 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
1040 |
CTRL_INIT |
& xx_sihsnow_file, 43, 143, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
203 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
206 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
212 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
215 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
217 |
CTRL_INIT |
& xx_hflux_file, 3, 103, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
230 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
233 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
239 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
242 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
244 |
CTRL_INIT |
& xx_atemp_file, 7, 107, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
267 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
270 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
276 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
279 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
281 |
CTRL_INIT |
& xx_sflux_file, 4, 104, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
294 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
297 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
303 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
306 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
308 |
CTRL_INIT |
& xx_aqh_file, 8, 108, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
331 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
334 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
340 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
343 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
345 |
CTRL_INIT |
& xx_tauu_file, 5, 105, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
362 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
365 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
371 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
374 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
376 |
CTRL_INIT |
& xx_uwind_file, 9, 109, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
399 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
402 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
408 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
411 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
413 |
CTRL_INIT |
& xx_tauv_file, 6, 106, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
430 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
433 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
439 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
442 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
444 |
CTRL_INIT |
& xx_vwind_file, 10, 110, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
470 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcsnperiod) + 1 |
|
./pkg/ctrl/ctrl_init.F |
471 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
473 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
475 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
480 |
CTRL_INIT |
& xx_obcsn_file, 11, 111, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
496 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcssperiod) + 1 |
|
./pkg/ctrl/ctrl_init.F |
497 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
499 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
501 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
506 |
CTRL_INIT |
& xx_obcss_file, 12, 112, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
522 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcswperiod) + 1 |
|
./pkg/ctrl/ctrl_init.F |
523 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
525 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
527 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
532 |
CTRL_INIT |
& xx_obcsw_file, 13, 113, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
548 |
CTRL_INIT |
startrec = int((modelstart - diffsecs)/xx_obcseperiod) + 1 |
|
./pkg/ctrl/ctrl_init.F |
549 |
CTRL_INIT |
startrec = (startrec - 1)*nobcs + 1 |
|
./pkg/ctrl/ctrl_init.F |
551 |
CTRL_INIT |
endrec = (endrec - startrec + 1)*nobcs |
|
./pkg/ctrl/ctrl_init.F |
553 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
558 |
CTRL_INIT |
& xx_obcse_file, 14, 114, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
598 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
601 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
607 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
610 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
612 |
CTRL_INIT |
& xx_sst_file, 18, 118, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
634 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
637 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
643 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
646 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
648 |
CTRL_INIT |
& xx_sss_file, 19, 119, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
763 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
766 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
772 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
775 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
777 |
CTRL_INIT |
& xx_precip_file, 32, 132, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
794 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
797 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
803 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
806 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
808 |
CTRL_INIT |
& xx_swflux_file, 33, 133, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
825 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
828 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
834 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
837 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
839 |
CTRL_INIT |
& xx_swdown_file, 34, 134, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
856 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
859 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
865 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
868 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
870 |
CTRL_INIT |
& xx_lwflux_file, 35, 135, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
887 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
890 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
896 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
899 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
901 |
CTRL_INIT |
& xx_lwdown_file, 36, 136, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
918 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
921 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
927 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
930 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
932 |
CTRL_INIT |
& xx_evap_file, 37, 137, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
949 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
952 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
958 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
961 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
963 |
CTRL_INIT |
& xx_snowprecip_file, 38, 138, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_init.F |
980 |
CTRL_INIT |
startrec=1 |
|
./pkg/ctrl/ctrl_init.F |
983 |
CTRL_INIT |
startrec = int((modelstart + startTime - diffsecs)/ |
|
./pkg/ctrl/ctrl_init.F |
989 |
CTRL_INIT |
startrec = 1 |
|
./pkg/ctrl/ctrl_init.F |
992 |
CTRL_INIT |
diffrec = endrec - startrec + 1 |
|
./pkg/ctrl/ctrl_init.F |
994 |
CTRL_INIT |
& xx_apressure_file, 39, 139, diffrec, startrec, endrec, |
|
./pkg/ctrl/ctrl_mask_set_xz.F |
56 |
CTRL_MASK_SET_XZ |
integer startrec |
|
./pkg/ctrl/ctrl_mask_set_yz.F |
56 |
CTRL_MASK_SET_YZ |
integer startrec |
|
./pkg/ctrl/ctrl_readparms.F |
52 |
CTRL_READPARMS |
integer startrec |
|
./pkg/ecco/cost_forcing.F |
101 |
COST_FORCING |
startrec = ncvarrecstart(8) |
|
./pkg/ecco/cost_forcing.F |
104 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
116 |
COST_FORCING |
startrec = ncvarrecstart(5) |
|
./pkg/ecco/cost_forcing.F |
119 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
129 |
COST_FORCING |
startrec = ncvarrecstart(9) |
|
./pkg/ecco/cost_forcing.F |
132 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
144 |
COST_FORCING |
startrec = ncvarrecstart(6) |
|
./pkg/ecco/cost_forcing.F |
147 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
157 |
COST_FORCING |
startrec = ncvarrecstart(10) |
|
./pkg/ecco/cost_forcing.F |
160 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
172 |
COST_FORCING |
startrec = ncvarrecstart(32) |
|
./pkg/ecco/cost_forcing.F |
175 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
187 |
COST_FORCING |
startrec = ncvarrecstart(33) |
|
./pkg/ecco/cost_forcing.F |
190 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
202 |
COST_FORCING |
startrec = ncvarrecstart(34) |
|
./pkg/ecco/cost_forcing.F |
205 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
217 |
COST_FORCING |
startrec = ncvarrecstart(35) |
|
./pkg/ecco/cost_forcing.F |
220 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
232 |
COST_FORCING |
startrec = ncvarrecstart(36) |
|
./pkg/ecco/cost_forcing.F |
235 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
247 |
COST_FORCING |
startrec = ncvarrecstart(36) |
|
./pkg/ecco/cost_forcing.F |
250 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
262 |
COST_FORCING |
startrec = ncvarrecstart(36) |
|
./pkg/ecco/cost_forcing.F |
265 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
277 |
COST_FORCING |
startrec = ncvarrecstart(36) |
|
./pkg/ecco/cost_forcing.F |
280 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
292 |
COST_FORCING |
startrec = ncvarrecstart(36) |
|
./pkg/ecco/cost_forcing.F |
295 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
50 |
COST_FORCING |
integer startrec |
|
./pkg/ecco/cost_forcing.F |
60 |
COST_FORCING |
startrec = ncvarrecstart(3) |
|
./pkg/ecco/cost_forcing.F |
63 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
73 |
COST_FORCING |
startrec = ncvarrecstart(7) |
|
./pkg/ecco/cost_forcing.F |
76 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing.F |
88 |
COST_FORCING |
startrec = ncvarrecstart(4) |
|
./pkg/ecco/cost_forcing.F |
91 |
COST_FORCING |
& myiter, mytime, startrec, endrec, |
|
./pkg/ecco/cost_forcing_gen.F |
10 |
COST_FORCING_GEN |
I startrec, |
|
./pkg/ecco/cost_forcing_gen.F |
125 |
COST_FORCING_GEN |
nrec = endrec-startrec+1 |
|
./pkg/ecco/cost_forcing_gen.F |
56 |
COST_FORCING_GEN |
integer startrec |
|
./pkg/ecco/cost_obcsvol.F |
113 |
COST_OBCSVOL |
nrec = endrec-startrec+1 |
|
./pkg/ecco/cost_obcsvol.F |
12 |
COST_OBCSVOL |
I startrec, |
|
./pkg/ecco/cost_obcsvol.F |
51 |
COST_OBCSVOL |
integer startrec |
|
./pkg/ecco/cost_usercost_all.F |
41 |
COST_USERCOST_ALL |
integer startrec |