Lines Matching refs:zero
32 res(:,1) = zero
52 res(:,1) = zero
56 res(:,1) = zero
81 res(:,2) = zero
89 res(:,3) = zero
96 res(:,2) = zero
97 res(:,3) = zero
105 res(:,4) = zero
112 res(:,2) = zero
113 res(:,4) = zero
120 res(:,3) = zero
121 res(:,4) = zero
127 res(:,2) = zero
128 res(:,3) = zero
129 res(:,4) = zero
136 res(:,1) = zero
137 res(:,2) = zero
138 res(:,3) = zero
139 res(:,4) = zero
140 res(:,5) = zero ! added to correspond to genscale (Elaine)
144 res(:,2) = zero
145 res(:,3) = zero
146 res(:,4) = zero
147 res(:,5) = zero ! added to correspond to genscale (Elaine)
153 where (btest(iBC,1)) res(:,5) = zero
161 res(j,:) = zero
190 res(isgbeg:isgend,:) = zero
240 rest(:) = zero
249 rest(j) = zero !changed
281 rest(isgbeg:isgend) = zero