Lines Matching refs:ZERO

105       DOUBLE COMPLEX ZERO  local
106       PARAMETER (ZERO= (0.0D+0,0.0D+0))
142       IF ((N.EQ.0) .OR. ((ALPHA.EQ.ZERO).AND. (BETA.EQ.ONE))) RETURN
164               IF (BETA.EQ.ZERO) THEN
166                       Y(I) = ZERO
175               IF (BETA.EQ.ZERO) THEN
177                       Y(IY) = ZERO
188       IF (ALPHA.EQ.ZERO) RETURN
197                   TEMP2 = ZERO
212                   TEMP2 = ZERO
234                   TEMP2 = ZERO
250                   TEMP2 = ZERO