File |
Line number |
Procedure |
Code |
./model/src/update_masks_etc.F |
403 |
UPDATE_MASKS_ETC |
_RS sf, rsf |
./model/src/update_masks_etc.F |
411 |
UPDATE_MASKS_ETC |
rsf = 1./sf |
./model/src/update_masks_etc.F |
415 |
UPDATE_MASKS_ETC |
rsf = 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 |
448 |
UPDATE_MASKS_ETC |
rsf = 1.D0/sf |
./model/src/update_masks_etc.F |
452 |
UPDATE_MASKS_ETC |
rsf = 0.D0 |
./model/src/update_masks_etc.F |
460 |
UPDATE_MASKS_ETC |
SMOOTHABS_RL = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf |