File |
Line number |
Procedure |
Code |
./pkg/cal/cal_addtime.F |
200 |
CAL_ADDTIME |
switch = (mi-1)/nmonthyear |
./pkg/cal/cal_addtime.F |
202 |
CAL_ADDTIME |
mi = mod(mi-1,nmonthyear)+1 |
./pkg/cal/cal_addtime.F |
218 |
CAL_ADDTIME |
mi = mod(mi+10,nmonthyear)+1 |
./pkg/cal/cal_addtime.F |
219 |
CAL_ADDTIME |
switch = mi/nmonthyear |
./pkg/cal/cal_daysformonth.F |
101 |
CAL_DAYSFORMONTH |
else if ( mod(firstmonth+1,nmonthyear) .eq. lastmonth ) then |
./pkg/cal/cal_daysformonth.F |
142 |
CAL_DAYSFORMONTH |
currentmonth = mod(currentmonth+1,nmonthyear) |
./pkg/cal/cal_daysformonth.F |
152 |
CAL_DAYSFORMONTH |
currentmonth = mod(currentmonth+1,nmonthyear) |
./pkg/cal/cal_daysformonth.F |
169 |
CAL_DAYSFORMONTH |
currentmonth = mod(currentmonth+1,nmonthyear) |
./pkg/cal/cal_daysformonth.F |
180 |
CAL_DAYSFORMONTH |
currentmonth = mod(currentmonth+1,nmonthyear) |
./pkg/cal/cal_getmonthsrec.F |
135 |
CAL_GETMONTHSREC |
count0 = mod(present+nmonthyear-2,nmonthyear)+1 |
./pkg/cal/cal_getmonthsrec.F |
165 |
CAL_GETMONTHSREC |
prevcount = mod(present+nmonthyear-2,nmonthyear)+1 |
./pkg/cal/cal_getmonthsrec.F |
175 |
CAL_GETMONTHSREC |
count1 = mod(present+1,nmonthyear) |
./pkg/cal/cal_getmonthsrec.F |
176 |
CAL_GETMONTHSREC |
if ( count1 .EQ. 0 ) count1 = nmonthyear |
./pkg/cal/cal_intmonths.F |
63 |
NO PROCEDURE |
cal_IntMonths = (nmonthyear - startmonth + 1) + |
./pkg/cal/cal_intmonths.F |
64 |
NO PROCEDURE |
& nmonthyear*(endyear - startyear - 1) + |
./pkg/cal/cal_monthsforyear.F |
121 |
CAL_MONTHSFORYEAR |
lastmonth = nmonthyear - firstmon + 1 |
./pkg/cal/cal_monthsforyear.F |
125 |
CAL_MONTHSFORYEAR |
firstmonth = (nmonthyear - firstmon + 1) + |
./pkg/cal/cal_monthsforyear.F |
126 |
CAL_MONTHSFORYEAR |
& (iyear - 2)*nmonthyear + 1 |
./pkg/cal/cal_monthsforyear.F |
127 |
CAL_MONTHSFORYEAR |
lastmonth = (nmonthyear - firstmon + 1) + |
./pkg/cal/cal_monthsforyear.F |
128 |
CAL_MONTHSFORYEAR |
& (iyear - 2)*nmonthyear + nmonthyear |
./pkg/cal/cal_monthsforyear.F |
134 |
CAL_MONTHSFORYEAR |
lastmonth = (nmonthyear - firstmon + 1) + |
./pkg/cal/cal_monthsforyear.F |
135 |
CAL_MONTHSFORYEAR |
& (numyears - 2)*nmonthyear + lastmon - 1 |
./pkg/cal/cal_monthsforyear.F |
138 |
CAL_MONTHSFORYEAR |
lastmonth = (nmonthyear - firstmon + 1) + |
./pkg/cal/cal_monthsforyear.F |
139 |
CAL_MONTHSFORYEAR |
& (numyears - 2)*nmonthyear + lastmon |
./pkg/cal/cal_monthsforyear.F |
141 |
CAL_MONTHSFORYEAR |
firstmonth = (nmonthyear - firstmon + 1) + |
./pkg/cal/cal_monthsforyear.F |
142 |
CAL_MONTHSFORYEAR |
& (numyears - 2)*nmonthyear + 1 |
./pkg/cal/cal_monthsforyear.F |
148 |
CAL_MONTHSFORYEAR |
firstmonth = (nmonthyear - firstmon) + |
./pkg/cal/cal_monthsforyear.F |
149 |
CAL_MONTHSFORYEAR |
& (numyears - 2)*nmonthyear + 1 |
./pkg/cal/cal_monthsforyear.F |
150 |
CAL_MONTHSFORYEAR |
lastmonth = (nmonthyear - firstmon) + |
./pkg/cal/cal_monthsforyear.F |
151 |
CAL_MONTHSFORYEAR |
& (numyears - 2)*nmonthyear + nmonthyear |
./pkg/cal/cal_monthsforyear.F |
96 |
CAL_MONTHSFORYEAR |
lastmonth = nmonthyear - firstmon + 1 |
./pkg/cal/cal_monthsperyear.F |
70 |
CAL_MONTHSPERYEAR |
final = nmonthyear |
./pkg/ecco/cost_averagesflags.F |
240 |
COST_AVERAGESFLAGS |
& + nmonthyear - mod(modelstartdate(1)/100,100) + 1 |
./pkg/ecco/cost_averagesflags.F |
242 |
COST_AVERAGESFLAGS |
& nmonthyear |
./pkg/ecco/cost_bp_read.F |
99 |
COST_BP_READ |
obsrec = ( beginmodel - beginlocal )*nmonthyear |