Lines Matching refs:diss
1004 & stress(nshg,9), diss(nshg,3),
1073 diss = zero
1091 & stress, diss, vol)
1096 if(numpe>1) call commu (diss, ilwork, 3, 'in ')
1106 diss(i,:) = diss(i,:) + diss(j,:)
1115 diss(j,:) = diss(i,:)
1121 if(numpe>1) call commu (diss, ilwork, 3, 'out ')
1129 diss(:,i) = diss(:,i)*vol(:)
1137 xave(:,10) = diss(:,1)
1138 xave(:,11) = diss(:,2)
1139 xave(:,12) = diss(:,3)