| File |
Line number |
Procedure |
Code |
|
./pkg/opps/opps_calc.F |
743 |
NLOPPS |
sd(k2+1)=sd(k2) - entrainrate*(smix - sd(k2)) |
|
./pkg/opps/opps_calc.F |
841 |
NLOPPS |
sda(k2) = sd(k2) |
|
./pkg/opps/opps_calc.F |
852 |
NLOPPS |
sda(maxdepth) = sd(maxdepth) |
|
./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 |
197 |
SEAICE_COST_CONCENTRATION |
print *,'md,dd,sd ', md,dd,sd |
|
./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 |
212 |
SEAICE_COST_SSS |
print *,'md,dd,sd ', md,dd,sd |
|
./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 |
212 |
SEAICE_COST_SST |
print *,'md,dd,sd ', md,dd,sd |
|
./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 |