| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_bp_read.F |
104 |
COST_BP_READ |
mody = modelstartdate(1)/10000 |
|
./pkg/ecco/cost_bp_read.F |
105 |
COST_BP_READ |
modm = modelstartdate(1)/100 - mody*100 |
|
./pkg/ecco/cost_bp_read.F |
106 |
COST_BP_READ |
iyear = mody + INT((modm-1+irec-1)/12) |
|
./pkg/ecco/cost_bp_read.F |
71 |
COST_BP_READ |
integer mody, modm |
|
./pkg/ecco/cost_gencal.F |
113 |
COST_GENCAL |
mody = modelstartdate(1)/10000 |
|
./pkg/ecco/cost_gencal.F |
114 |
COST_GENCAL |
modm = modelstartdate(1)/100 - mody*100 |
|
./pkg/ecco/cost_gencal.F |
115 |
COST_GENCAL |
yday = mody + INT((modm-1+irec-1)/12) |
|
./pkg/ecco/cost_gencal.F |
67 |
COST_GENCAL |
integer mody, modm |
|
./pkg/ecco/ecco_check.F |
712 |
ECCO_CHECK_FILES |
INTEGER irec, mody, modm, yday, locy, il |
|
./pkg/ecco/ecco_check.F |
749 |
ECCO_CHECK_FILES |
mody = modelstartdate(1)/10000 |
|
./pkg/ecco/ecco_check.F |
750 |
ECCO_CHECK_FILES |
modm = modelstartdate(1)/100 - mody*100 |
|
./pkg/ecco/ecco_check.F |
751 |
ECCO_CHECK_FILES |
yday = mody + INT((modm-1+irec-1)/12) |