Lines Matching refs:xbm
16 xbm(1)=zero
17 xbm(2)=zero
18 xbm(3)=zero
25 xbm(1)=xbm(1)+ww*xwm(iwm,1)
26 xbm(2)=xbm(2)+ww*xwm(iwm,2)
27 xbm(3)=xbm(3)+ww*xwm(iwm,3)
33 xbm(1)=xbm(1)+ww*xs(isa,1)
34 xbm(2)=xbm(2)+ww*xs(isa,2)
35 xbm(3)=xbm(3)+ww*xs(isa,3)
38 xbm(1)=xbm(1)/wbox
39 xbm(2)=xbm(2)/wbox
40 xbm(3)=xbm(3)/wbox
44 if(np.gt.1) call ga_dgop(mcf_37,xbm,3,'+')