Symbol Description Uses
smoothAbs_R8 7



File Line number Procedure Code
./model/src/update_masks_etc.F 389 UPDATE_MASKS_ETC
      _RL smoothAbs_R8
./model/src/update_masks_etc.F 393 UPDATE_MASKS_ETC
      smoothMin_R8 = .5*( a+b - smoothAbs_R8(a-b) )
./model/src/update_masks_etc.F 436 UPDATE_MASKS_ETC
      _RL function smoothAbs_R8( x )
./model/src/update_masks_etc.F 450 UPDATE_MASKS_ETC
         smoothAbs_R8 = 0.
./model/src/update_masks_etc.F 462 UPDATE_MASKS_ETC
            smoothAbs_R8 = x
./model/src/update_masks_etc.F 464 UPDATE_MASKS_ETC
            smoothAbs_R8 = -x
./model/src/update_masks_etc.F 466 UPDATE_MASKS_ETC
            smoothAbs_R8 = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf