| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
345 |
OPPS_CALC |
wda(k2) = (wd(k2)*drF(k2)+wd(k2+1)*drF(k2+1))/ |
|
./pkg/opps/opps_calc.F |
820 |
NLOPPS |
dt = min(dt,dz(k2)/wd(k2)) |
|
./pkg/opps/opps_calc.F |
837 |
NLOPPS |
wda(k2) = (wd(k2)*dz(k2)+wd(k2+1)*dz(k2+1))/ |
|
./pkg/seaice/seaice_cost_concentration.F |
121 |
SEAICE_COST_CONCENTRATION |
integer md, dd, sd, ld, wd |
|
./pkg/seaice/seaice_cost_concentration.F |
186 |
SEAICE_COST_CONCENTRATION |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/seaice/seaice_cost_concentration.F |
198 |
SEAICE_COST_CONCENTRATION |
print *,'ld,wd ', ld,wd |
|
./pkg/seaice/seaice_cost_sss.F |
119 |
SEAICE_COST_SSS |
integer md, dd, sd, ld, wd |
|
./pkg/seaice/seaice_cost_sss.F |
201 |
SEAICE_COST_SSS |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/seaice/seaice_cost_sss.F |
213 |
SEAICE_COST_SSS |
print *,'ld,wd ', ld,wd |
|
./pkg/seaice/seaice_cost_sst.F |
117 |
SEAICE_COST_SST |
integer md, dd, sd, ld, wd |
|
./pkg/seaice/seaice_cost_sst.F |
201 |
SEAICE_COST_SST |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/seaice/seaice_cost_sst.F |
213 |
SEAICE_COST_SST |
print *,'ld,wd ', ld,wd |
|
./pkg/cal/cal_checkdate.F |
48 |
CAL_CHECKDATE |
INTEGER lp,wd |
|
./pkg/cal/cal_checkdate.F |
90 |
CAL_CHECKDATE |
CALL CAL_CONVDATE( date, yy, mm, dd, nsecs, lp, wd, myThid ) |
|
./pkg/cal/cal_checkdate.F |
97 |
CAL_CHECKDATE |
ELSEIF ( wd.LT.1 .OR. wd.GT.7 ) THEN |
|
./pkg/cal/cal_convdate.F |
105 |
CAL_CONVDATE |
wd = date(4) |
|
./pkg/cal/cal_convdate.F |
41 |
CAL_CONVDATE |
INTEGER ss, lp, wd |
|
./pkg/cal/cal_convdate.F |
9 |
CAL_CONVDATE |
O lp, wd, |
|
./pkg/ecco/cost_gencal.F |
66 |
COST_GENCAL |
integer md, dd, sd, ld, wd |
|
./pkg/ecco/cost_gencal.F |
95 |
COST_GENCAL |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
205 |
COST_GENCOST_SSTV4 |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
363 |
COST_GENCOST_SSTV4 |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/ecco/cost_gencost_sstv4.F |
98 |
COST_GENCOST_SSTV4 |
integer md, dd, sd, ld, wd |
|
./pkg/ecco/cost_sla_read.F |
100 |
COST_SLA_READ |
call CAL_CONVDATE( daydate,yday,md,dd,sd,ld,wd,mythid ) |
|
./pkg/ecco/cost_sla_read.F |
72 |
COST_SLA_READ |
integer md, dd, sd, ld, wd |
|
./pkg/ecco/cost_sla_read_yd.F |
72 |
COST_SLA_READ_YD |
integer md, dd, sd, ld, wd |