Lines Matching refs:intp
43 shape(:,i) = shp(i,intp)
45 shdrv(:,j,i) = shgl(j,i,intp)
50 shape(:,i) = sgn(:,i) * shp(i,intp)
52 shdrv(:,j,i) = shgl(j,i,intp)*sgn(:,i)
73 shape(:,i) = shp(i,intp)
75 shdrv(:,j,i) = shgl(j,i,intp)
80 shape(:,i) = sgn(:,i) * shp(i,intp)
82 shdrv(:,j,i) = shgl(j,i,intp)*sgn(:,i)
336 do intp = 1, npts
345 yvl(:,intp,j) = yvl(:,intp,j) + shape(:,i) * ycl(:,i,j)
371 yvl(:,intp,6 ) = two * rmu * gradV(:,1,1)
372 yvl(:,intp,7 ) = two * rmu * gradV(:,2,2)
373 yvl(:,intp,8 ) = two * rmu * gradV(:,3,3)
375 yvl(:,intp,9 ) = rmu * ( gradV(:,1,2) + gradV(:,2,1) )
376 yvl(:,intp,10) = rmu * ( gradV(:,1,3) + gradV(:,3,1) )
377 yvl(:,intp,11) = rmu * ( gradV(:,2,3) + gradV(:,3,2) )