/dports/math/openblas/OpenBLAS-0.3.18/kernel/x86_64/ |
H A D | cscal.c | 89 t0 = - da_i *x[1]; in cscal_kernel_16_zero_r() 90 t1 = - da_i *x[3]; in cscal_kernel_16_zero_r() 91 t2 = - da_i *x[5]; in cscal_kernel_16_zero_r() 92 t3 = - da_i *x[7]; in cscal_kernel_16_zero_r() 94 x[1] = da_i * x[0]; in cscal_kernel_16_zero_r() 215 if ( da_i == 0.0 ) in CNAME() 345 alpha[1] = da_i; in CNAME() 348 if ( da_i == 0 ) in CNAME() 353 if ( da_i == 0 ) in CNAME() 366 if ( da_i == 0.0 ) in CNAME() [all …]
|
H A D | zscal.c | 87 t0 = - da_i *x[1]; in zscal_kernel_8_zero_r() 88 t1 = - da_i *x[3]; in zscal_kernel_8_zero_r() 89 t2 = - da_i *x[5]; in zscal_kernel_8_zero_r() 90 t3 = - da_i *x[7]; in zscal_kernel_8_zero_r() 92 x[1] = da_i * x[0]; in zscal_kernel_8_zero_r() 213 if ( da_i == 0.0 ) in CNAME() 343 alpha[1] = da_i; in CNAME() 346 if ( da_i == 0 ) in CNAME() 351 if ( da_i == 0 ) in CNAME() 364 if ( da_i == 0.0 ) in CNAME() [all …]
|
H A D | zaxpy.c | 50 FLOAT da_i = alpha[1]; in zaxpy_kernel_4() local 56 y[ix] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in zaxpy_kernel_4() 57 y[ix+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in zaxpy_kernel_4() 58 y[ix+2] += ( da_r * x[ix+2] - da_i * x[ix+3] ) ; in zaxpy_kernel_4() 59 y[ix+3] += ( da_r * x[ix+3] + da_i * x[ix+2] ) ; in zaxpy_kernel_4() 61 y[ix] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in zaxpy_kernel_4() 62 y[ix+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in zaxpy_kernel_4() 63 y[ix+2] += ( da_r * x[ix+2] + da_i * x[ix+3] ) ; in zaxpy_kernel_4() 64 y[ix+3] -= ( da_r * x[ix+3] - da_i * x[ix+2] ) ; in zaxpy_kernel_4() 92 da[1] = da_i; in CNAME() [all …]
|
H A D | caxpy.c | 50 FLOAT da_i = alpha[1]; in caxpy_kernel_8() local 56 y[ix] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in caxpy_kernel_8() 57 y[ix+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in caxpy_kernel_8() 58 y[ix+2] += ( da_r * x[ix+2] - da_i * x[ix+3] ) ; in caxpy_kernel_8() 59 y[ix+3] += ( da_r * x[ix+3] + da_i * x[ix+2] ) ; in caxpy_kernel_8() 61 y[ix] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in caxpy_kernel_8() 62 y[ix+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in caxpy_kernel_8() 63 y[ix+2] += ( da_r * x[ix+2] + da_i * x[ix+3] ) ; in caxpy_kernel_8() 64 y[ix+3] -= ( da_r * x[ix+3] - da_i * x[ix+2] ) ; in caxpy_kernel_8() 92 da[1] = da_i; in CNAME() [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/zarch/ |
H A D | cscal.c | 46 vector_float da_i_vec = { -da_i, da_i, -da_i, da_i }; in cscal_kernel_16() 212 if (da_i == 0.0) { in CNAME() 239 x[i + 1] = da_i * x[i]; in CNAME() 252 x[i + 1] = da_i * x[i]; in CNAME() 263 if (da_i == 0.0) { in CNAME() 319 alpha[1] = da_i; in CNAME() 322 if (da_i == 0) in CNAME() 326 else if (da_i == 0) in CNAME() 337 if (da_i == 0.0) { in CNAME() 353 x[i + 1] = da_i * x[i]; in CNAME() [all …]
|
H A D | zscal.c | 46 vector_float da_i_vec = { -da_i, da_i }; in zscal_kernel_8() 210 if (da_i == 0.0) { in CNAME() 237 x[i + 1] = da_i * x[i]; in CNAME() 250 x[i + 1] = da_i * x[i]; in CNAME() 261 if (da_i == 0.0) { in CNAME() 317 alpha[1] = da_i; in CNAME() 320 if (da_i == 0) in CNAME() 324 else if (da_i == 0) in CNAME() 335 if (da_i == 0.0) { in CNAME() 351 x[i + 1] = da_i * x[i]; in CNAME() [all …]
|
H A D | caxpy.c | 110 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, in CNAME() argument 126 da[1] = da_i; in CNAME() 133 y[ix] += (da_r * x[ix] - da_i * x[ix + 1]); in CNAME() 134 y[ix + 1] += (da_r * x[ix + 1] + da_i * x[ix]); in CNAME() 136 y[ix] += (da_r * x[ix] + da_i * x[ix + 1]); in CNAME() 137 y[ix + 1] -= (da_r * x[ix + 1] - da_i * x[ix]); in CNAME() 153 y[iy] += (da_r * x[ix] - da_i * x[ix + 1]); in CNAME() 154 y[iy + 1] += (da_r * x[ix + 1] + da_i * x[ix]); in CNAME() 156 y[iy] += (da_r * x[ix] + da_i * x[ix + 1]); in CNAME() 157 y[iy + 1] -= (da_r * x[ix + 1] - da_i * x[ix]); in CNAME()
|
H A D | zaxpy.c | 106 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, in CNAME() argument 122 da[1] = da_i; in CNAME() 129 y[ix] += (da_r * x[ix] - da_i * x[ix + 1]); in CNAME() 130 y[ix + 1] += (da_r * x[ix + 1] + da_i * x[ix]); in CNAME() 132 y[ix] += (da_r * x[ix] + da_i * x[ix + 1]); in CNAME() 133 y[ix + 1] -= (da_r * x[ix + 1] - da_i * x[ix]); in CNAME() 149 y[iy] += (da_r * x[ix] - da_i * x[ix + 1]); in CNAME() 150 y[iy + 1] += (da_r * x[ix + 1] + da_i * x[ix]); in CNAME() 152 y[iy] += (da_r * x[ix] + da_i * x[ix + 1]); in CNAME() 153 y[iy + 1] -= (da_r * x[ix + 1] - da_i * x[ix]); in CNAME()
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/power/ |
H A D | zaxpy.c | 58 y[ix] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in zaxpy_kernel_4() 59 y[ix+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in zaxpy_kernel_4() 60 y[ix+2] += ( da_r * x[ix+2] - da_i * x[ix+3] ) ; in zaxpy_kernel_4() 61 y[ix+3] += ( da_r * x[ix+3] + da_i * x[ix+2] ) ; in zaxpy_kernel_4() 63 y[ix] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in zaxpy_kernel_4() 64 y[ix+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in zaxpy_kernel_4() 65 y[ix+2] += ( da_r * x[ix+2] + da_i * x[ix+3] ) ; in zaxpy_kernel_4() 66 y[ix+3] -= ( da_r * x[ix+3] - da_i * x[ix+2] ) ; in zaxpy_kernel_4() 92 zaxpy_kernel_4 (n1, x, y, da_r, da_i); in CNAME() 121 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() [all …]
|
H A D | zaxpy_power10.c | 48 y[ix] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in zaxpy_kernel_4() 49 y[ix+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in zaxpy_kernel_4() 50 y[ix+2] += ( da_r * x[ix+2] - da_i * x[ix+3] ) ; in zaxpy_kernel_4() 51 y[ix+3] += ( da_r * x[ix+3] + da_i * x[ix+2] ) ; in zaxpy_kernel_4() 53 y[ix] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in zaxpy_kernel_4() 54 y[ix+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in zaxpy_kernel_4() 55 y[ix+2] += ( da_r * x[ix+2] + da_i * x[ix+3] ) ; in zaxpy_kernel_4() 56 y[ix+3] -= ( da_r * x[ix+3] - da_i * x[ix+2] ) ; in zaxpy_kernel_4() 82 zaxpy_kernel_4 (n1, x, y, da_r, da_i); in CNAME() 111 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() [all …]
|
H A D | caxpy_power10.c | 48 y[ix] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in caxpy_kernel_8() 49 y[ix+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in caxpy_kernel_8() 50 y[ix+2] += ( da_r * x[ix+2] - da_i * x[ix+3] ) ; in caxpy_kernel_8() 51 y[ix+3] += ( da_r * x[ix+3] + da_i * x[ix+2] ) ; in caxpy_kernel_8() 53 y[ix] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in caxpy_kernel_8() 54 y[ix+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in caxpy_kernel_8() 55 y[ix+2] += ( da_r * x[ix+2] + da_i * x[ix+3] ) ; in caxpy_kernel_8() 56 y[ix+3] -= ( da_r * x[ix+3] - da_i * x[ix+2] ) ; in caxpy_kernel_8() 82 caxpy_kernel_8 (n1, x, y, da_r, da_i); in CNAME() 111 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() [all …]
|
H A D | zscal.c | 62 static void zscal_kernel_8(BLASLONG n, FLOAT *x, FLOAT da_r, FLOAT da_i) in zscal_kernel_8() argument 69 FLOAT alpha_i1=-da_i; in zscal_kernel_8() 70 FLOAT alpha_i2=da_i; in zscal_kernel_8() 125 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, FLOAT *x, BLASLONG i… in CNAME() argument 139 if (da_r == ZERO && da_i == ZERO) { in CNAME() 165 zscal_kernel_8(n1, x, da_r, da_i); in CNAME() 174 temp = da_r * x[ip] - da_i * x[ip+1] ; in CNAME() 175 x[ip+1] = da_r * x[ip+1] + da_i * x[ip] ; in CNAME() 190 temp = da_r * x[ip] - da_i * x[ip+1] ; in CNAME() 191 x[ip+1] = da_r * x[ip+1] + da_i * x[ip] ; in CNAME()
|
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/interface/ |
H A D | zrotg.c | 18 long double da_i = *(DA + 1); in NAME() local 23 long double ada = fabs(da_r) + fabs(da_i); in NAME() 34 ada = sqrt(da_r * da_r + da_i * da_i); in NAME() 36 r = sqrt(da_r * da_r + da_i * da_i + db_r * db_r + db_i * db_i); in NAME() 39 alpha_i = da_i / ada; in NAME() 49 FLOAT da_i = *(DA + 1); in NAME() local 54 FLOAT ada = fabs(da_r) + fabs(da_i); in NAME() 69 aa_i = fabs(da_i); in NAME() 72 aa_r = fabs(da_i); in NAME() 93 aa_i = da_i / scale; in NAME() [all …]
|
/dports/cad/meshlab/meshlab-Meshlab-2020.05/src/plugins_unsupported/external/GotoBLAS2/interface/ |
H A D | zrotg.c | 18 long double da_i = *(DA + 1); in NAME() local 23 long double ada = fabs(da_r) + fabs(da_i); in NAME() 34 ada = sqrt(da_r * da_r + da_i * da_i); in NAME() 36 r = sqrt(da_r * da_r + da_i * da_i + db_r * db_r + db_i * db_i); in NAME() 39 alpha_i = da_i / ada; in NAME() 49 FLOAT da_i = *(DA + 1); in NAME() local 54 FLOAT ada = fabs(da_r) + fabs(da_i); in NAME() 69 aa_i = fabs(da_i); in NAME() 72 aa_r = fabs(da_i); in NAME() 93 aa_i = da_i / scale; in NAME() [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/interface/ |
H A D | zrotg.c | 12 long double da_i = *(DA + 1); in NAME() local 17 long double ada = fabsl(da_r) + fabsl(da_i); in NAME() 34 ada = sqrt(da_r * da_r + da_i * da_i); in NAME() 36 r = sqrt(da_r * da_r + da_i * da_i + db_r * db_r + db_i * db_i); in NAME() 39 alpha_i = da_i / ada; in NAME() 49 FLOAT da_i = *(DA + 1); in NAME() 54 FLOAT ada = fabs(da_r) + fabs(da_i); in NAME() 75 aa_i = fabs(da_i); in NAME() 78 aa_r = fabs(da_i); in NAME() 106 aa_i = da_i / scale; in NAME() [all …]
|
/dports/math/gotoblas/GotoBLAS2/interface/ |
H A D | zrotg.c | 18 long double da_i = *(DA + 1); in NAME() local 23 long double ada = fabs(da_r) + fabs(da_i); in NAME() 34 ada = sqrt(da_r * da_r + da_i * da_i); in NAME() 36 r = sqrt(da_r * da_r + da_i * da_i + db_r * db_r + db_i * db_i); in NAME() 39 alpha_i = da_i / ada; in NAME() 49 FLOAT da_i = *(DA + 1); in NAME() local 54 FLOAT ada = fabs(da_r) + fabs(da_i); in NAME() 69 aa_i = fabs(da_i); in NAME() 72 aa_r = fabs(da_i); in NAME() 93 aa_i = da_i / scale; in NAME() [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/riscv64/ |
H A D | zscal.c | 39 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, FLOAT *x, BLASLONG i… in CNAME() argument 55 if ( da_i == 0.0 ) in CNAME() 62 temp = - da_i * x[ip+1] ; in CNAME() 63 x[ip+1] = da_i * x[ip] ; in CNAME() 68 if ( da_i == 0.0 ) in CNAME() 75 temp = da_r * x[ip] - da_i * x[ip+1] ; in CNAME() 76 x[ip+1] = da_r * x[ip+1] + da_i * x[ip] ; in CNAME()
|
H A D | zaxpy_vector.c | 46 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, FLOAT *x, BLASLONG … in CNAME() argument 51 if(da_r == 0.0 && da_i == 0.0) return(0); in CNAME() 67 vy0 = VFNMSACVF_FLOAT(vy0, da_i, vx1, gvl); in CNAME() 69 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 72 vy0 = VFMACCVF_FLOAT(vy0, da_i, vx1, gvl); in CNAME() 74 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 90 vy0 = VFNMSACVF_FLOAT(vy0, da_i, vx1, gvl); in CNAME() 92 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME() 95 vy0 = VFMACCVF_FLOAT(vy0, da_i, vx1, gvl); in CNAME() 97 vy1 = VFMACCVF_FLOAT(vy1, da_i, vx0, gvl); in CNAME()
|
H A D | zaxpy.c | 40 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, FLOAT *x, BLASLONG … in CNAME() argument 48 if ( da_r == 0.0 && da_i == 0.0 ) return(0); in CNAME() 59 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() 60 y[iy+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in CNAME() 62 y[iy] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in CNAME() 63 y[iy+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in CNAME()
|
H A D | zscal_vector.c | 49 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, FLOAT *x, BLASLONG i… in CNAME() argument 60 if(da_r == 0.0 && da_i == 0.0){ in CNAME() 70 vt = VFMULVF_FLOAT(v1, -da_i, gvl); in CNAME() 71 v1 = VFMULVF_FLOAT(v0, da_i, gvl); in CNAME() 84 vt = VFMULVF_FLOAT(v1, -da_i, gvl); in CNAME() 85 v1 = VFMULVF_FLOAT(v0, da_i, gvl); in CNAME() 90 }else if(da_i == 0.0){ in CNAME() 127 vt = VFNMSACVF_FLOAT(vt, da_i, v1, gvl); in CNAME() 129 v1 = VFMACCVF_FLOAT(v1, da_i, v0, gvl); in CNAME() 143 vt = VFNMSACVF_FLOAT(vt, da_i, v1, gvl); in CNAME() [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/mips/ |
H A D | zscal.c | 30 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, FLOAT *x, BLASLONG i… in CNAME() argument 42 if ( da_i == 0.0 ) in CNAME() 49 temp = - da_i * x[ip+1] ; in CNAME() 50 x[ip+1] = da_i * x[ip] ; in CNAME() 55 if ( da_i == 0.0 ) in CNAME() 62 temp = da_r * x[ip] - da_i * x[ip+1] ; in CNAME() 63 x[ip+1] = da_r * x[ip+1] + da_i * x[ip] ; in CNAME()
|
H A D | caxpy_msa.c | 176 yd0 OP1 da_i * xd1; in CNAME() 177 yd2 OP1 da_i * xd3; in CNAME() 178 yd1 OP2 da_i * xd0; in CNAME() 394 yd0 OP1 da_i * xd1; in CNAME() 395 yd2 OP1 da_i * xd3; in CNAME() 396 yd4 OP1 da_i * xd5; in CNAME() 397 yd6 OP1 da_i * xd7; in CNAME() 398 yd1 OP2 da_i * xd0; in CNAME() 399 yd3 OP2 da_i * xd2; in CNAME() 400 yd5 OP2 da_i * xd4; in CNAME() [all …]
|
H A D | zaxpy.c | 30 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, FLOAT *x, BLASLONG … in CNAME() argument 38 if ( da_r == 0.0 && da_i == 0.0 ) return(0); in CNAME() 49 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() 50 y[iy+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in CNAME() 52 y[iy] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in CNAME() 53 y[iy+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in CNAME()
|
/dports/math/openblas/OpenBLAS-0.3.18/kernel/arm/ |
H A D | zscal.c | 39 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r,FLOAT da_i, FLOAT *x, BLASLONG i… in CNAME() argument 55 if ( da_i == 0.0 ) in CNAME() 62 temp = - da_i * x[ip+1] ; in CNAME() 63 x[ip+1] = da_i * x[ip] ; in CNAME() 68 if ( da_i == 0.0 ) in CNAME() 75 temp = da_r * x[ip] - da_i * x[ip+1] ; in CNAME() 76 x[ip+1] = da_r * x[ip+1] + da_i * x[ip] ; in CNAME()
|
H A D | zaxpy.c | 40 int CNAME(BLASLONG n, BLASLONG dummy0, BLASLONG dummy1, FLOAT da_r, FLOAT da_i, FLOAT *x, BLASLONG … in CNAME() argument 48 if ( da_r == 0.0 && da_i == 0.0 ) return(0); in CNAME() 59 y[iy] += ( da_r * x[ix] - da_i * x[ix+1] ) ; in CNAME() 60 y[iy+1] += ( da_r * x[ix+1] + da_i * x[ix] ) ; in CNAME() 62 y[iy] += ( da_r * x[ix] + da_i * x[ix+1] ) ; in CNAME() 63 y[iy+1] -= ( da_r * x[ix+1] - da_i * x[ix] ) ; in CNAME()
|