File |
Line number |
Procedure |
Code |
./model/src/update_masks_etc.F |
403 |
UPDATE_MASKS_ETC |
_RS sf, rsf |
./model/src/update_masks_etc.F |
410 |
UPDATE_MASKS_ETC |
sf = 10.0/smoothAbsFuncRange |
./model/src/update_masks_etc.F |
411 |
UPDATE_MASKS_ETC |
rsf = 1./sf |
./model/src/update_masks_etc.F |
414 |
UPDATE_MASKS_ETC |
sf = 0. |
./model/src/update_masks_etc.F |
423 |
UPDATE_MASKS_ETC |
SMOOTHABS_RS = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf |
./model/src/update_masks_etc.F |
440 |
UPDATE_MASKS_ETC |
_RL sf, rsf |
./model/src/update_masks_etc.F |
447 |
UPDATE_MASKS_ETC |
sf = 10.0D0/smoothAbsFuncRange |
./model/src/update_masks_etc.F |
448 |
UPDATE_MASKS_ETC |
rsf = 1.D0/sf |
./model/src/update_masks_etc.F |
451 |
UPDATE_MASKS_ETC |
sf = 0.D0 |
./model/src/update_masks_etc.F |
460 |
UPDATE_MASKS_ETC |
SMOOTHABS_RL = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf |
./pkg/cal/cal_timepassed.F |
115 |
CAL_TIMEPASSED |
call CAL_CONVDATE( initialdate,yf,mf,df,sf,lf,wf,myThid ) |
./pkg/cal/cal_timepassed.F |
118 |
CAL_TIMEPASSED |
call CAL_CONVDATE( finaldate,yf,mf,df,sf,lf,wf,myThid ) |
./pkg/cal/cal_timepassed.F |
124 |
CAL_TIMEPASSED |
nsecs = sf - si |
./pkg/cal/cal_timepassed.F |
133 |
CAL_TIMEPASSED |
sf = sf + (df-1)*secondsperday |
./pkg/cal/cal_timepassed.F |
143 |
CAL_TIMEPASSED |
csf = sf |
./pkg/cal/cal_timepassed.F |
51 |
CAL_TIMEPASSED |
INTEGER si,sf |