Symbol Description Uses
Ssq 4



File Line number Procedure Code
./pkg/gmredi/gmredi_calc_tensor.F 236 GMREDI_CALC_TENSOR
        Ssq(i,j)=SlopeSqr(i,j)*taperFct(i,j)
./pkg/gmredi/gmredi_calc_tensor.F 252 GMREDI_CALC_TENSOR
        IF ( Ssq(i,j).NE.0. .AND. dSigmaDr(i,j).NE.0. ) THEN
./pkg/gmredi/gmredi_calc_tensor.F 254 GMREDI_CALC_TENSOR
         SN=sqrt(Ssq(i,j)*N2)
./pkg/gmredi/gmredi_calc_tensor.F 62 GMREDI_CALC_TENSOR
      _RL Ssq(1-Olx:sNx+Olx,1-Oly:sNy+Oly)