Lines Matching refs:rmass
14 dimension rerrsm(nshg, 10), rerr(nshg,10), rmass(nshg),
27 rmass = zero
60 & rmass)
68 call commu (rmass , ilwork, 1 , 'in ')
76 rmass(i) = rmass(i) + rmass(j)
84 rmass(j) = rmass(i)
91 rmass = one/rmass
94 rerrsm(:,i) = rmass*rerrsm(:,i)
110 & rerrsm, rmass ) argument
137 & rerrsm(nshg,10), rmass(nshg)
207 call local (rmass, rmassl, ien, 1, 'scatter ')