| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_cost_concentration.F |
205 |
SEAICE_COST_CONCENTRATION |
localrec = int(diffsecs/localperiod) + 1 |
|
./pkg/seaice/seaice_cost_concentration.F |
211 |
SEAICE_COST_CONCENTRATION |
print *,'localrec ',localrec |
|
./pkg/seaice/seaice_cost_concentration.F |
224 |
SEAICE_COST_CONCENTRATION |
localrec = obsrec |
|
./pkg/seaice/seaice_cost_concentration.F |
226 |
SEAICE_COST_CONCENTRATION |
print *,'localrec ', localrec |
|
./pkg/seaice/seaice_cost_concentration.F |
231 |
SEAICE_COST_CONCENTRATION |
if ( localrec .GT. 0 ) then |
|
./pkg/seaice/seaice_cost_concentration.F |
234 |
SEAICE_COST_CONCENTRATION |
print *,'calling mdsreadfile',fname2,localrec |
|
./pkg/seaice/seaice_cost_concentration.F |
238 |
SEAICE_COST_CONCENTRATION |
& localobs, localrec, mythid ) |
|
./pkg/seaice/seaice_cost_concentration.F |
81 |
SEAICE_COST_CONCENTRATION |
integer localrec |
|
./pkg/seaice/seaice_cost_sss.F |
223 |
SEAICE_COST_SSS |
localrec = int(diffsecs/localperiod) + 1 |
|
./pkg/seaice/seaice_cost_sss.F |
229 |
SEAICE_COST_SSS |
print *,'localrec ',localrec |
|
./pkg/seaice/seaice_cost_sss.F |
242 |
SEAICE_COST_SSS |
localrec = obsrec |
|
./pkg/seaice/seaice_cost_sss.F |
244 |
SEAICE_COST_SSS |
print *,'localrec ', localrec |
|
./pkg/seaice/seaice_cost_sss.F |
249 |
SEAICE_COST_SSS |
if ( localrec .GT. 0 ) then |
|
./pkg/seaice/seaice_cost_sss.F |
252 |
SEAICE_COST_SSS |
print *,'calling mdsreadfile',fname2,localrec |
|
./pkg/seaice/seaice_cost_sss.F |
256 |
SEAICE_COST_SSS |
& localobs, localrec, mythid ) |
|
./pkg/seaice/seaice_cost_sss.F |
82 |
SEAICE_COST_SSS |
integer localrec |
|
./pkg/seaice/seaice_cost_sst.F |
223 |
SEAICE_COST_SST |
localrec = int(diffsecs/localperiod) + 1 |
|
./pkg/seaice/seaice_cost_sst.F |
229 |
SEAICE_COST_SST |
print *,'localrec ',localrec |
|
./pkg/seaice/seaice_cost_sst.F |
242 |
SEAICE_COST_SST |
localrec = obsrec |
|
./pkg/seaice/seaice_cost_sst.F |
244 |
SEAICE_COST_SST |
print *,'localrec ', localrec |
|
./pkg/seaice/seaice_cost_sst.F |
249 |
SEAICE_COST_SST |
if ( localrec .GT. 0 ) then |
|
./pkg/seaice/seaice_cost_sst.F |
252 |
SEAICE_COST_SST |
print *,'calling mdsreadfile',fname2,localrec |
|
./pkg/seaice/seaice_cost_sst.F |
256 |
SEAICE_COST_SST |
& localobs, localrec, mythid ) |
|
./pkg/seaice/seaice_cost_sst.F |
80 |
SEAICE_COST_SST |
integer localrec |
|
./pkg/ecco/cost_gencost_seaicev4.F |
284 |
COST_GENCOST_SEAICEV4 |
localrec = int(diffsecs/localperiod) + 1 |
|
./pkg/ecco/cost_gencost_seaicev4.F |
297 |
COST_GENCOST_SEAICEV4 |
localrec = 1 + MOD(modm-1+irec-1,12) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
307 |
COST_GENCOST_SEAICEV4 |
localrec = obsrec |
|
./pkg/ecco/cost_gencost_seaicev4.F |
310 |
COST_GENCOST_SEAICEV4 |
if ( localrec .GT. 0 ) then |
|
./pkg/ecco/cost_gencost_seaicev4.F |
312 |
COST_GENCOST_SEAICEV4 |
& localobs, localrec, mythid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
339 |
COST_GENCOST_SEAICEV4 |
localrec = obsrec |
|
./pkg/ecco/cost_gencost_seaicev4.F |
342 |
COST_GENCOST_SEAICEV4 |
if ( localrec .GT. 0 ) then |
|
./pkg/ecco/cost_gencost_seaicev4.F |
344 |
COST_GENCOST_SEAICEV4 |
& localobsweight, localrec, mythid ) |
|
./pkg/ecco/cost_gencost_seaicev4.F |
85 |
COST_GENCOST_SEAICEV4 |
integer localrec |
|
./pkg/ecco/cost_gencost_sstv4.F |
201 |
COST_GENCOST_SSTV4 |
localrec = int(diffsecs/86400.) + 1 |
|
./pkg/ecco/cost_gencost_sstv4.F |
210 |
COST_GENCOST_SSTV4 |
& yday,' ',ymod,' ',localrec,' ',diffsecs |
|
./pkg/ecco/cost_gencost_sstv4.F |
218 |
COST_GENCOST_SSTV4 |
if ( ( localrec .GT. 0 ).AND.(diffsecs .GT. 0.d0) ) then |
|
./pkg/ecco/cost_gencost_sstv4.F |
220 |
COST_GENCOST_SSTV4 |
& tmp_sst, localrec, mythid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
353 |
COST_GENCOST_SSTV4 |
localrec = int(diffsecs/86400.) + 1 |
|
./pkg/ecco/cost_gencost_sstv4.F |
362 |
COST_GENCOST_SSTV4 |
& yday,' ',ymod,' ',localrec,' ',diffsecs |
|
./pkg/ecco/cost_gencost_sstv4.F |
370 |
COST_GENCOST_SSTV4 |
if ( ( localrec .GT. 0 ).AND.(diffsecs .GT. 0.d0) ) then |
|
./pkg/ecco/cost_gencost_sstv4.F |
372 |
COST_GENCOST_SSTV4 |
& tmp_sst, localrec, mythid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
95 |
COST_GENCOST_SSTV4 |
integer il, localrec |
|
./pkg/ecco/cost_generic.F |
216 |
COST_GENERIC |
localrec = int(diffsecs/localperiod) + 1 |
|
./pkg/ecco/cost_generic.F |
229 |
COST_GENERIC |
localrec = 1 + MOD(modm-1+irec-1,12) |
|
./pkg/ecco/cost_generic.F |
241 |
COST_GENERIC |
localrec = obsrec |
|
./pkg/ecco/cost_generic.F |
246 |
COST_GENERIC |
if ( (localrec .GT. 0).AND.(obsrec .GT. 0).AND.(exst) ) then |
|
./pkg/ecco/cost_generic.F |
248 |
COST_GENERIC |
& localobs, localrec, mythid ) |
|
./pkg/ecco/cost_generic.F |
81 |
COST_GENERIC |
integer localrec |
|
./pkg/ecco/cost_readscatxfields.F |
120 |
COST_READSCATXFIELDS |
localrec = 1 + MOD(modm-1+irec-1,12) |
|
./pkg/ecco/cost_readscatxfields.F |
138 |
COST_READSCATXFIELDS |
localrec = int(diffsecs/86400. _d 0) + 1 |
|
./pkg/ecco/cost_readscatxfields.F |
155 |
COST_READSCATXFIELDS |
localrec = obsrec |
|
./pkg/ecco/cost_readscatxfields.F |
161 |
COST_READSCATXFIELDS |
localrec = int(diffsecs/86400. _d 0) + 1 |
|
./pkg/ecco/cost_readscatxfields.F |
165 |
COST_READSCATXFIELDS |
if ( (localrec .GT. 0).AND.(obsrec .GT. 0) ) then |
|
./pkg/ecco/cost_readscatxfields.F |
167 |
COST_READSCATXFIELDS |
& scatxdat, localrec, mythid ) |
|
./pkg/ecco/cost_readscatxfields.F |
65 |
COST_READSCATXFIELDS |
integer obsrec, localrec |
|
./pkg/ecco/cost_readscatyfields.F |
120 |
COST_READSCATYFIELDS |
localrec = 1 + MOD(modm-1+irec-1,12) |
|
./pkg/ecco/cost_readscatyfields.F |
138 |
COST_READSCATYFIELDS |
localrec = int(diffsecs/86400. _d 0) + 1 |
|
./pkg/ecco/cost_readscatyfields.F |
154 |
COST_READSCATYFIELDS |
localrec = obsrec |
|
./pkg/ecco/cost_readscatyfields.F |
160 |
COST_READSCATYFIELDS |
localrec = int(diffsecs/86400. _d 0) + 1 |
|
./pkg/ecco/cost_readscatyfields.F |
164 |
COST_READSCATYFIELDS |
if ( (localrec .GT. 0).AND.(obsrec .GT. 0) ) then |
|
./pkg/ecco/cost_readscatyfields.F |
166 |
COST_READSCATYFIELDS |
& scatydat, localrec, mythid ) |
|
./pkg/ecco/cost_readscatyfields.F |
65 |
COST_READSCATYFIELDS |
integer obsrec, localrec |