Searched refs:s_tensor (Results 1 – 2 of 2) sorted by relevance
113 REAL(KIND=dp) :: r_tensor(3,3), s_tensor(3,3), StressTensor(3,3) local161 s_tensor = MATMUL( StressTensor, TRANSPOSE( GradPropagationShape ) ) &164 LocalGtheta = LocalGtheta + ( SUM( s_tensor * GradDisplacement) &
803 CRRCMath::Matrix33 s_tensor(sigu, 0., 0., in calculate_gust() local806 s_tensor = WindToLocal*(s_tensor*WindToLocal.trans()); in calculate_gust()807 s_tensor = LocalToBody*(s_tensor*LocalToBody.trans()); in calculate_gust()808 sigu = s_tensor.v[0][0]; in calculate_gust()809 sigv = s_tensor.v[1][1]; in calculate_gust()810 sigw = s_tensor.v[2][2]; in calculate_gust()