| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/single/ |
| H A D | slasv2.c | 31 double sqrt(doublereal), r_sign(real *, real *); in slasv2_()
315 t = r_sign(&c_b3, &ft) * r_sign(&c_b4, >); in slasv2_()
319 t = gt / r_sign(&d__, &ft) + m / t; in slasv2_()
369 tsign = r_sign(&c_b4, csr) * r_sign(&c_b4, csl) * r_sign(&c_b4, f); in slasv2_()
373 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, csl) * r_sign(&c_b4, g); in slasv2_()
377 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, snl) * r_sign(&c_b4, h__); in slasv2_()
380 *ssmax = r_sign(ssmax, &tsign); in slasv2_()
382 r__1 = tsign * r_sign(&c_b4, f) * r_sign(&c_b4, h__); in slasv2_()
383 *ssmin = r_sign(ssmin, &r__1); in slasv2_()
|
| H A D | slarfg.c | 27 double r_sign(real *, real *); in slarfg_()
149 beta = -r_sign(&r__1, alpha); in slarfg_()
184 beta = -r_sign(&r__1, alpha); in slarfg_()
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | slasv2.c | 20 double sqrt(doublereal), r_sign(real *, real *); in slasv2_()
222 t = r_sign(&c_b3, &ft) * r_sign(&c_b4, >); in slasv2_()
224 t = gt / r_sign(&d__, &ft) + m / t; in slasv2_()
251 tsign = r_sign(&c_b4, csr) * r_sign(&c_b4, csl) * r_sign(&c_b4, f); in slasv2_()
254 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, csl) * r_sign(&c_b4, g); in slasv2_()
257 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, snl) * r_sign(&c_b4, h__); in slasv2_()
259 *ssmax = r_sign(ssmax, &tsign); in slasv2_()
260 r__1 = tsign * r_sign(&c_b4, f) * r_sign(&c_b4, h__); in slasv2_()
261 *ssmin = r_sign(ssmin, &r__1); in slasv2_()
|
| H A D | slanv2.c | 19 double r_sign(real *, real *), sqrt(doublereal); in slanv2_()
109 } else if (*a - *d__ == 0.f && r_sign(&c_b4, b) != r_sign(&c_b4, c__)) { in slanv2_()
122 bcmis = dmin(r__1,r__2) * r_sign(&c_b4, b) * r_sign(&c_b4, c__); in slanv2_()
136 z__ = p + r_sign(&r__1, &p); in slanv2_()
155 *sn = -(p / (tau * *cs)) * r_sign(&c_b4, &sigma); in slanv2_()
179 if (r_sign(&c_b4, b) == r_sign(&c_b4, c__)) { in slanv2_()
186 p = r_sign(&r__1, c__); in slanv2_()
|
| H A D | slacon.c | 21 double r_sign(real *, real *); in slacon_()
144 x[i__] = r_sign(&c_b11, &x[i__]); in slacon_()
181 r__1 = r_sign(&c_b11, &x[i__]); in slacon_()
198 x[i__] = r_sign(&c_b11, &x[i__]); in slacon_()
|
| H A D | slarfg.c | 16 double r_sign(real *, real *); in slarfg_()
118 beta = -r_sign(&r__1, alpha); in slarfg_()
141 beta = -r_sign(&r__1, alpha); in slarfg_()
|
| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | slasv2.c | 135 double sqrt(doublereal), r_sign(real *, real *); in slasv2_()
258 t = r_sign(&c_b3, &ft) * r_sign(&c_b4, >); in slasv2_()
262 t = gt / r_sign(&d__, &ft) + m / t; in slasv2_()
293 tsign = r_sign(&c_b4, csr) * r_sign(&c_b4, csl) * r_sign(&c_b4, f); in slasv2_()
297 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, csl) * r_sign(&c_b4, g); in slasv2_()
301 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, snl) * r_sign(&c_b4, h__); in slasv2_()
303 *ssmax = r_sign(ssmax, &tsign); in slasv2_()
304 r__1 = tsign * r_sign(&c_b4, f) * r_sign(&c_b4, h__); in slasv2_()
305 *ssmin = r_sign(ssmin, &r__1); in slasv2_()
|
| H A D | slanv2.c | 123 double r_sign(real *, real *), sqrt(doublereal); in slanv2_()
162 else if (*a - *d__ == 0.f && r_sign(&c_b4, b) != r_sign(&c_b4, c__)) in slanv2_()
179 bcmis = min(r__1,r__2) * r_sign(&c_b4, b) * r_sign(&c_b4, c__); in slanv2_()
190 z__ = p + r_sign(&r__1, &p); in slanv2_()
207 *sn = -(p / (tau * *cs)) * r_sign(&c_b4, &sigma); in slanv2_()
227 if (r_sign(&c_b4, b) == r_sign(&c_b4, c__)) in slanv2_()
233 p = r_sign(&r__1, c__); in slanv2_()
|
| H A D | slacn2.c | 132 double r_sign(real *, real *); in slacn2_()
212 x[i__] = r_sign(&c_b11, &x[i__]); in slacn2_()
249 r__1 = r_sign(&c_b11, &x[i__]); in slacn2_()
268 x[i__] = r_sign(&c_b11, &x[i__]); in slacn2_()
|
| H A D | slacon.c | 112 double r_sign(real *, real *); in slacon_()
193 x[i__] = r_sign(&c_b11, &x[i__]); in slacon_()
230 r__1 = r_sign(&c_b11, &x[i__]); in slacon_()
249 x[i__] = r_sign(&c_b11, &x[i__]); in slacon_()
|
| H A D | sla_geamv.c | 168 double r_sign(real *, real *); in sla_geamv_()
317 y[iy] += r_sign(&safe1, &y[iy]); in sla_geamv_()
357 y[iy] += r_sign(&safe1, &y[iy]); in sla_geamv_()
402 y[iy] += r_sign(&safe1, &y[iy]); in sla_geamv_()
444 y[iy] += r_sign(&safe1, &y[iy]); in sla_geamv_()
|
| H A D | slarfg.c | 101 double r_sign(real *, real *); in slarfg_()
150 beta = -r_sign(&r__1, alpha); in slarfg_()
172 beta = -r_sign(&r__1, alpha); in slarfg_()
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/single/ |
| H A D | slasv2.c | 31 double sqrt(doublereal), r_sign(real *, real *); in slasv2_()
315 t = r_sign(&c_b3, &ft) * r_sign(&c_b4, >); in slasv2_()
319 t = gt / r_sign(&d__, &ft) + m / t; in slasv2_()
369 tsign = r_sign(&c_b4, csr) * r_sign(&c_b4, csl) * r_sign(&c_b4, f); in slasv2_()
373 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, csl) * r_sign(&c_b4, g); in slasv2_()
377 tsign = r_sign(&c_b4, snr) * r_sign(&c_b4, snl) * r_sign(&c_b4, h__); in slasv2_()
380 *ssmax = r_sign(ssmax, &tsign); in slasv2_()
382 r__1 = tsign * r_sign(&c_b4, f) * r_sign(&c_b4, h__); in slasv2_()
383 *ssmin = r_sign(ssmin, &r__1); in slasv2_()
|
| H A D | slarfg.c | 27 double r_sign(real *, real *); in slarfg_()
149 beta = -r_sign(&r__1, alpha); in slarfg_()
184 beta = -r_sign(&r__1, alpha); in slarfg_()
|
| /dports/math/geogram/geogram-1.7.7/src/lib/third_party/numerics/CLAPACK/ |
| H A D | slanv2.c | 27 double r_sign(real *, real *), sqrt(doublereal); in slanv2_()
116 } else if (*a - *d__ == 0.f && r_sign(&c_b4, b) != r_sign(&c_b4, c__)) { in slanv2_()
129 bcmis = dmin(r__1,r__2) * r_sign(&c_b4, b) * r_sign(&c_b4, c__); in slanv2_()
143 z__ = p + r_sign(&r__1, &p); in slanv2_()
162 *sn = -(p / (tau * *cs)) * r_sign(&c_b4, &sigma); in slanv2_()
186 if (r_sign(&c_b4, b) == r_sign(&c_b4, c__)) { in slanv2_()
193 p = r_sign(&r__1, c__); in slanv2_()
|
| H A D | slacn2.c | 29 double r_sign(real *, real *); in slacn2_()
163 x[i__] = r_sign(&c_b11, &x[i__]); in slacn2_()
200 r__1 = r_sign(&c_b11, &x[i__]); in slacn2_()
217 x[i__] = r_sign(&c_b11, &x[i__]); in slacn2_()
|
| H A D | slarfg.c | 24 double r_sign(real *, real *); in slarfg_()
125 beta = -r_sign(&r__1, alpha); in slarfg_()
148 beta = -r_sign(&r__1, alpha); in slarfg_()
|
| H A D | slarfp.c | 24 double r_sign(real *, real *); in slarfp_()
139 beta = r_sign(&r__1, alpha); in slarfp_()
162 beta = r_sign(&r__1, alpha); in slarfp_()
|
| /dports/science/cdcl/dcl-5.4.8-C/src/grph1/stpack/ |
| H A D | stftr3.c | 30 double r_sign(real *, real *), r_lg10(real *); in stftr3_0_()
67 xx = r_sign(&c_b2, &uxmin3) * xx; in stftr3_0_()
76 yy = r_sign(&c_b2, &uymin3) * yy; in stftr3_0_()
85 zz = r_sign(&c_b2, &uzmin3) * zz; in stftr3_0_()
101 xx = r_sign(&c_b2, &uxmin3) * xx; in stftr3_0_()
113 zz = r_sign(&c_b2, &uzmin3) * zz; in stftr3_0_()
128 xx = r_sign(&c_b2, &uxmin3) * xx; in stftr3_0_()
|
| H A D | stftrn.c | 32 double r_sign(real *, real *), r_lg10(real *), pow_dd(doublereal *, in stftrn_0_()
85 uys = r_sign(&c_b2, &uymin) * *uy; in stftrn_0_()
93 uxs = r_sign(&c_b2, &uxmin) * *ux; in stftrn_0_()
102 uxs = r_sign(&c_b2, &uxmin) * *ux; in stftrn_0_()
103 uys = r_sign(&c_b2, &uymin) * *uy; in stftrn_0_()
185 *uy = r_sign(&c_b2, &uymin) * pow_dd(&c_b19, &d__1); in stftrn_0_()
189 *ux = r_sign(&c_b2, &uxmin) * pow_dd(&c_b19, &d__1); in stftrn_0_()
194 *ux = r_sign(&c_b2, &uxmin) * pow_dd(&c_b19, &d__1); in stftrn_0_()
196 *uy = r_sign(&c_b2, &uymin) * pow_dd(&c_b19, &d__1); in stftrn_0_()
|
| /dports/science/cdcl/dcl-5.4.8-C/src/grph2/umpack/ |
| H A D | umspct.c | 39 double sin(doublereal), cos(doublereal), acos(doublereal), r_sign(real *, in umspct_()
70 alph = r_sign(&r__1, &rotz); in umspct_()
72 beta = r_sign(&r__1, &rotz); in umspct_()
120 alph = r_sign(&r__1, &rotz); in umspct_()
122 beta = r_sign(&r__1, &rotz); in umspct_()
|
| /dports/science/cdcl/dcl-5.4.8-C/src/grph1/szpack/ |
| H A D | szsgcl.c | 30 doublereal, doublereal), r_sign(real *, real *), atan(doublereal), in szsgcl_0_()
83 tyy = r_sign(&r__1, &r__2); in szsgcl_0_()
106 *tx = r_sign(&pi, &xlm) + xla; in szsgcl_0_()
109 *tx = r_sign(&r__1, &xlm) + xla; in szsgcl_0_()
|
| H A D | szpipt.c | 41 double r_sign(real *, real *); in szpipt_0_()
99 yla = r_sign(&r__1, ty0); in szpipt_0_()
107 yla = r_sign(&r__1, ty1); in szpipt_0_()
116 yla = r_sign(&r__1, &r__2); in szpipt_0_()
|
| /dports/science/cdcl/dcl-5.4.8-C/src/math1/gnmlib/ |
| H A D | gnsblk.c | 37 double r_lg10(real *), pow_ri(real *, integer *), r_sign(real *, real *); in gnsblk_0_()
104 *bx = r_sign(&xbz[ibd - 1], rx); in gnsblk_0_()
129 *bx = r_sign(&xbz[ibd - 1], rx); in gnsblk_0_()
154 *bx = r_sign(&xbz[ibd - 1], rx); in gnsblk_0_()
179 *bx = r_sign(&xbz[ibd - 1], rx); in gnsblk_0_()
|
| /dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/TESTING/MATGEN/ |
| H A D | r_sign.c | 4 double r_sign(a,b) real *a, *b; in r_sign() function
6 double r_sign(real *a, real *b)
|