230     real r__1, r__2, r__3, r__4, r__5, r__6;  in ctgevc_()  local
488 …r__4 = rwork[j] + ((r__1 = s[i__2].r, f2c_abs(r__1)) + ( r__2 = r_imag(&s[j + j * s_dim1]), f2c_ab…  in ctgevc_()
489         anorm = max(r__3,r__4);  in ctgevc_()
493 …r__4 = rwork[*n + j] + ((r__1 = p[i__2].r, f2c_abs(r__1)) + (r__2 = r_imag(&p[j + j * p_dim1]), f2…  in ctgevc_()
494         bnorm = max(r__3,r__4);  in ctgevc_()
547 …r__4 = ((r__2 = s[i__2].r, f2c_abs(r__2)) + (r__3 = r_imag(&s[je + je * s_dim1]), f2c_abs(r__3))) …  in ctgevc_()
549                 r__4 = max(r__4,r__5); // ; expr subst  in ctgevc_()
550                 temp = 1.f / max(r__4,safmin);  in ctgevc_()
567 …s(r__2)) >= safmin && (r__3 = bcoeff.r, f2c_abs(r__3)) + (r__4 = r_imag(&bcoeff), f2c_abs(r__4)) <…  in ctgevc_()
577 …r__4 = small / ((r__1 = salpha.r, f2c_abs(r__1)) + (r__2 = r_imag(&salpha), f2c_abs(r__2))) * min(…  in ctgevc_()
578                     scale = max(r__3,r__4);  in ctgevc_()
588                     r__4 = 1.f / (safmin * max(r__5,r__6)); // , expr subst  in ctgevc_()
589                     scale = min(r__3,r__4);  in ctgevc_()
726 …f2c_abs(r__2)) >= bignum * ((r__3 = d__.r, f2c_abs( r__3)) + (r__4 = r_imag(&d__), f2c_abs(r__4))))  in ctgevc_()
758 …r__4 = (r__1 = work[i__3].r, f2c_abs(r__1)) + ( r__2 = r_imag(&work[j]), f2c_abs(r__2)); // , expr…  in ctgevc_()
759                     xmax = max(r__3,r__4);  in ctgevc_()
785 …r__4 = (r__1 = work[i__3].r, f2c_abs(r__1)) + ( r__2 = r_imag(&work[(isrc - 1) * *n + jr]), f2c_ab…  in ctgevc_()
786                     xmax = max(r__3,r__4);  in ctgevc_()
871 …r__4 = ((r__2 = s[i__1].r, f2c_abs(r__2)) + (r__3 = r_imag(&s[je + je * s_dim1]), f2c_abs(r__3))) …  in ctgevc_()
873                 r__4 = max(r__4,r__5); // ; expr subst  in ctgevc_()
874                 temp = 1.f / max(r__4,safmin);  in ctgevc_()
891 …s(r__2)) >= safmin && (r__3 = bcoeff.r, f2c_abs(r__3)) + (r__4 = r_imag(&bcoeff), f2c_abs(r__4)) <…  in ctgevc_()
901 …r__4 = small / ((r__1 = salpha.r, f2c_abs(r__1)) + (r__2 = r_imag(&salpha), f2c_abs(r__2))) * min(…  in ctgevc_()
902                     scale = max(r__3,r__4);  in ctgevc_()
912                     r__4 = 1.f / (safmin * max(r__5,r__6)); // , expr subst  in ctgevc_()
913                     scale = min(r__3,r__4);  in ctgevc_()
1010 …f2c_abs(r__2)) >= bignum * ((r__3 = d__.r, f2c_abs(r__3)) + (r__4 = r_imag(&d__), f2c_abs( r__4))))  in ctgevc_()
1117 …r__4 = (r__1 = work[i__2].r, f2c_abs(r__1)) + ( r__2 = r_imag(&work[(isrc - 1) * *n + jr]), f2c_ab…  in ctgevc_()
1118                     xmax = max(r__3,r__4);  in ctgevc_()