23     doublecomplex z__1, z__2, z__3, z__4;  in zhbmv_()  local
301 		    z__2.r = temp1.r * a[i__5].r - temp1.i * a[i__5].i,   in zhbmv_()
302 			    z__2.i = temp1.r * a[i__5].i + temp1.i * a[i__5]  in zhbmv_()
304 		    z__1.r = y[i__3].r + z__2.r, z__1.i = y[i__3].i + z__2.i;  in zhbmv_()
308 		    z__2.r = z__3.r * x[i__2].r - z__3.i * x[i__2].i, z__2.i =  in zhbmv_()
310 		    z__1.r = temp2.r + z__2.r, z__1.i = temp2.i + z__2.i;  in zhbmv_()
319 		z__2.r = y[i__2].r + z__3.r, z__2.i = y[i__2].i + z__3.i;  in zhbmv_()
322 		z__1.r = z__2.r + z__4.r, z__1.i = z__2.i + z__4.i;  in zhbmv_()
346 		    z__2.r = temp1.r * a[i__5].r - temp1.i * a[i__5].i,   in zhbmv_()
347 			    z__2.i = temp1.r * a[i__5].i + temp1.i * a[i__5]  in zhbmv_()
349 		    z__1.r = y[i__2].r + z__2.r, z__1.i = y[i__2].i + z__2.i;  in zhbmv_()
353 		    z__2.r = z__3.r * x[i__4].r - z__3.i * x[i__4].i, z__2.i =  in zhbmv_()
355 		    z__1.r = temp2.r + z__2.r, z__1.i = temp2.i + z__2.i;  in zhbmv_()
366 		z__2.r = y[i__4].r + z__3.r, z__2.i = y[i__4].i + z__3.i;  in zhbmv_()
369 		z__1.r = z__2.r + z__4.r, z__1.i = z__2.i + z__4.i;  in zhbmv_()
396 		z__2.r = d__1 * temp1.r, z__2.i = d__1 * temp1.i;  in zhbmv_()
397 		z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i;  in zhbmv_()
407 		    z__2.r = temp1.r * a[i__5].r - temp1.i * a[i__5].i,   in zhbmv_()
408 			    z__2.i = temp1.r * a[i__5].i + temp1.i * a[i__5]  in zhbmv_()
410 		    z__1.r = y[i__2].r + z__2.r, z__1.i = y[i__2].i + z__2.i;  in zhbmv_()
414 		    z__2.r = z__3.r * x[i__4].r - z__3.i * x[i__4].i, z__2.i =  in zhbmv_()
416 		    z__1.r = temp2.r + z__2.r, z__1.i = temp2.i + z__2.i;  in zhbmv_()
422 		z__2.r = alpha->r * temp2.r - alpha->i * temp2.i, z__2.i =   in zhbmv_()
424 		z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i;  in zhbmv_()
442 		z__2.r = d__1 * temp1.r, z__2.i = d__1 * temp1.i;  in zhbmv_()
443 		z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i;  in zhbmv_()
457 		    z__2.r = temp1.r * a[i__5].r - temp1.i * a[i__5].i,   in zhbmv_()
458 			    z__2.i = temp1.r * a[i__5].i + temp1.i * a[i__5]  in zhbmv_()
460 		    z__1.r = y[i__2].r + z__2.r, z__1.i = y[i__2].i + z__2.i;  in zhbmv_()
464 		    z__2.r = z__3.r * x[i__4].r - z__3.i * x[i__4].i, z__2.i =  in zhbmv_()
466 		    z__1.r = temp2.r + z__2.r, z__1.i = temp2.i + z__2.i;  in zhbmv_()
472 		z__2.r = alpha->r * temp2.r - alpha->i * temp2.i, z__2.i =   in zhbmv_()
474 		z__1.r = y[i__4].r + z__2.r, z__1.i = y[i__4].i + z__2.i;  in zhbmv_()