Symbol Description Uses
smoothAbs_R4 7



File Line number Procedure Code
./model/src/update_masks_etc.F 373 UPDATE_MASKS_ETC
      _RS smoothAbs_R4
./model/src/update_masks_etc.F 377 UPDATE_MASKS_ETC
      smoothMin_R4 = .5*( a+b - smoothAbs_R4(a-b) )
./model/src/update_masks_etc.F 399 UPDATE_MASKS_ETC
      _RS function smoothAbs_R4( x )
./model/src/update_masks_etc.F 413 UPDATE_MASKS_ETC
         smoothAbs_R4 = 0.
./model/src/update_masks_etc.F 425 UPDATE_MASKS_ETC
            smoothAbs_R4 = x
./model/src/update_masks_etc.F 427 UPDATE_MASKS_ETC
            smoothAbs_R4 = -x
./model/src/update_masks_etc.F 429 UPDATE_MASKS_ETC
            smoothAbs_R4 = log(.5*(exp(x*sf)+exp(-x*sf)))*rsf