Lines Matching refs:stsVec
12 real*8, allocatable :: stsVec(:,:) variable
49 allocate ( stsVec(nshg,nResDims) )
102 res = stsVec(i,:)
119 res = stsVec(i,:)
145 res = stsVec(i,:)
242 res = stsVec(i,:)
330 call evalAtInterp( yAlpha, stsVec, x,
335 u1 = stsVec(i,1)
336 u2 = stsVec(i,2)
337 u3 = stsVec(i,3)
339 stsPres(i) = stsPres(i) + stsVec(i,4)
340 stsPresSqr(i) = stsPresSqr(i) + stsVec(i,4)*stsVec(i,4)
353 stsStress(i,1) = stsStress(i,1) + stsVec(i,6)
354 stsStress(i,2) = stsStress(i,2) + stsVec(i,7)
355 stsStress(i,3) = stsStress(i,3) + stsVec(i,8)
356 stsStress(i,4) = stsStress(i,4) + stsVec(i,9)
357 stsStress(i,5) = stsStress(i,5) + stsVec(i,10)
358 stsStress(i,6) = stsStress(i,6) + stsVec(i,11)