bin/maint/toclapack.sh

1752     doublereal d__1, d__2;
1845 	    d__1 = -a;
1846 	    c__ = dlamc3_(&c__, &d__1);
1875 	d__1 = -a;
1876 	c__ = dlamc3_(&c__, &d__1);
1883 	d__1 = b / 2;
1885 	f = dlamc3_(&d__1, &d__2);
1892 	d__1 = b / 2;
1894 	f = dlamc3_(&d__1, &d__2);
1906 	d__1 = b / 2;
1907 	t1 = dlamc3_(&d__1, &a);
1908 	d__1 = b / 2;
1909 	t2 = dlamc3_(&d__1, &savec);
1929 	    d__1 = -a;
1930 	    c__ = dlamc3_(&c__, &d__1);
1969     doublereal d__1, d__2, d__3, d__4, d__5;
2099 	d__1 = -half;
2100 	sixth = dlamc3_(&b, &d__1);
2102 	d__1 = -half;
2103 	b = dlamc3_(&third, &d__1);
2116 	    d__1 = half * leps;
2122 	    c__ = dlamc3_(&d__1, &d__2);
2123 	    d__1 = -c__;
2124 	    c__ = dlamc3_(&half, &d__1);
2126 	    d__1 = -b;
2127 	    c__ = dlamc3_(&half, &d__1);
2146 	    d__1 = small * rbase;
2147 	    small = dlamc3_(&d__1, &zero);
2152 	d__1 = -one;
2153 	dlamc4_(&ngnmin, &d__1, &lbeta);
2155 	d__1 = -a;
2156 	dlamc4_(&gnmin, &d__1, &lbeta);
2236 	    d__1 = lrmin * rbase;
2237 	    lrmin = dlamc3_(&d__1, &zero);
2311     doublereal d__1;
2359     d__1 = a * rbase;
2360     b1 = dlamc3_(&d__1, &zero);
2371 	d__1 = a / *base;
2372 	b1 = dlamc3_(&d__1, &zero);
2373 	d__1 = b1 * *base;
2374 	c1 = dlamc3_(&d__1, &zero);
2381 	d__1 = a * rbase;
2382 	b2 = dlamc3_(&d__1, &zero);
2383 	d__1 = b2 / rbase;
2384 	c2 = dlamc3_(&d__1, &zero);
2409     doublereal d__1;
2564 	d__1 = y * *beta;
2565 	y = dlamc3_(&d__1, &c_b32);
3743     halfreal d__1, d__2;
3836 	    d__1 = -a;
3837 	    c__ = hlamc3_(&c__, &d__1);
3866 	d__1 = -a;
3867 	c__ = hlamc3_(&c__, &d__1);
3874 	d__1 = b / 2;
3876 	f = hlamc3_(&d__1, &d__2);
3883 	d__1 = b / 2;
3885 	f = hlamc3_(&d__1, &d__2);
3897 	d__1 = b / 2;
3898 	t1 = hlamc3_(&d__1, &a);
3899 	d__1 = b / 2;
3900 	t2 = hlamc3_(&d__1, &savec);
3920 	    d__1 = -a;
3921 	    c__ = hlamc3_(&c__, &d__1);
3960     halfreal d__1, d__2, d__3, d__4, d__5;
4090 	d__1 = -half;
4091 	sixth = hlamc3_(&b, &d__1);
4093 	d__1 = -half;
4094 	b = hlamc3_(&third, &d__1);
4107 	    d__1 = half * leps;
4113 	    c__ = hlamc3_(&d__1, &d__2);
4114 	    d__1 = -c__;
4115 	    c__ = hlamc3_(&half, &d__1);
4117 	    d__1 = -b;
4118 	    c__ = hlamc3_(&half, &d__1);
4137 	    d__1 = small * rbase;
4138 	    small = hlamc3_(&d__1, &zero);
4143 	d__1 = -one;
4144 	hlamc4_(&ngnmin, &d__1, &lbeta);
4146 	d__1 = -a;
4147 	hlamc4_(&gnmin, &d__1, &lbeta);
4227 	    d__1 = lrmin * rbase;
4228 	    lrmin = hlamc3_(&d__1, &zero);
4302     halfreal d__1;
4350     d__1 = a * rbase;
4351     b1 = hlamc3_(&d__1, &zero);
4362 	d__1 = a / *base;
4363 	b1 = hlamc3_(&d__1, &zero);
4364 	d__1 = b1 * *base;
4365 	c1 = hlamc3_(&d__1, &zero);
4372 	d__1 = a * rbase;
4373 	b2 = hlamc3_(&d__1, &zero);
4374 	d__1 = b2 / rbase;
4375 	c2 = hlamc3_(&d__1, &zero);
4400     halfreal d__1;
4555 	d__1 = y * *beta;
4556 	y = hlamc3_(&d__1, &c_b32);