22     complex q__1, q__2, q__3, q__4;  in chpmv_()  local
257 		    q__2.r = temp1.r * ap[i__5].r - temp1.i * ap[i__5].i,   in chpmv_()
258 			    q__2.i = temp1.r * ap[i__5].i + temp1.i * ap[i__5]  in chpmv_()
260 		    q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;  in chpmv_()
264 		    q__2.r = q__3.r * x[i__3].r - q__3.i * x[i__3].i, q__2.i =  in chpmv_()
266 		    q__1.r = temp2.r + q__2.r, q__1.i = temp2.i + q__2.i;  in chpmv_()
276 		q__2.r = y[i__3].r + q__3.r, q__2.i = y[i__3].i + q__3.i;  in chpmv_()
279 		q__1.r = q__2.r + q__4.r, q__1.i = q__2.i + q__4.i;  in chpmv_()
301 		    q__2.r = temp1.r * ap[i__5].r - temp1.i * ap[i__5].i,   in chpmv_()
302 			    q__2.i = temp1.r * ap[i__5].i + temp1.i * ap[i__5]  in chpmv_()
304 		    q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;  in chpmv_()
308 		    q__2.r = q__3.r * x[i__3].r - q__3.i * x[i__3].i, q__2.i =  in chpmv_()
310 		    q__1.r = temp2.r + q__2.r, q__1.i = temp2.i + q__2.i;  in chpmv_()
321 		q__2.r = y[i__3].r + q__3.r, q__2.i = y[i__3].i + q__3.i;  in chpmv_()
324 		q__1.r = q__2.r + q__4.r, q__1.i = q__2.i + q__4.i;  in chpmv_()
348 		q__2.r = r__1 * temp1.r, q__2.i = r__1 * temp1.i;  in chpmv_()
349 		q__1.r = y[i__3].r + q__2.r, q__1.i = y[i__3].i + q__2.i;  in chpmv_()
357 		    q__2.r = temp1.r * ap[i__5].r - temp1.i * ap[i__5].i,   in chpmv_()
358 			    q__2.i = temp1.r * ap[i__5].i + temp1.i * ap[i__5]  in chpmv_()
360 		    q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;  in chpmv_()
364 		    q__2.r = q__3.r * x[i__3].r - q__3.i * x[i__3].i, q__2.i =  in chpmv_()
366 		    q__1.r = temp2.r + q__2.r, q__1.i = temp2.i + q__2.i;  in chpmv_()
373 		q__2.r = alpha->r * temp2.r - alpha->i * temp2.i, q__2.i =   in chpmv_()
375 		q__1.r = y[i__3].r + q__2.r, q__1.i = y[i__3].i + q__2.i;  in chpmv_()
394 		q__2.r = r__1 * temp1.r, q__2.i = r__1 * temp1.i;  in chpmv_()
395 		q__1.r = y[i__3].r + q__2.r, q__1.i = y[i__3].i + q__2.i;  in chpmv_()
406 		    q__2.r = temp1.r * ap[i__5].r - temp1.i * ap[i__5].i,   in chpmv_()
407 			    q__2.i = temp1.r * ap[i__5].i + temp1.i * ap[i__5]  in chpmv_()
409 		    q__1.r = y[i__4].r + q__2.r, q__1.i = y[i__4].i + q__2.i;  in chpmv_()
413 		    q__2.r = q__3.r * x[i__3].r - q__3.i * x[i__3].i, q__2.i =  in chpmv_()
415 		    q__1.r = temp2.r + q__2.r, q__1.i = temp2.i + q__2.i;  in chpmv_()
421 		q__2.r = alpha->r * temp2.r - alpha->i * temp2.i, q__2.i =   in chpmv_()
423 		q__1.r = y[i__3].r + q__2.r, q__1.i = y[i__3].i + q__2.i;  in chpmv_()