/dports/science/qwalk/mainline-1.0.1-300-g1b7e381/src/attic/ |
H A D | get_zpol.pl | 20 ($breal[0],$breal[1],$bimag[0], $bimag[1])=get_realimag("dist", $suffix); 21 print "dist real/imag $breal[0] $bimag[0] errors $breal[1] $bimag[1] \n"; 22 @b=magnitude(@breal, @bimag); 29 $adotb[0]=$areal[0]*$breal[0]+$aimag[0]*$bimag[0]; 31 +$aimag[1]*$bimag[0]+$aimag[0]*$bimag[1];
|
/dports/math/spooles-mpich/spooles.2.2/Iter/src/ |
H A D | util.c | 288 bimag=*(beta+1); in DenseMtx_colGenAxpy() 330 if (bimag == 1.0){ in DenseMtx_colGenAxpy() 334 else if (bimag != 0.0) { in DenseMtx_colGenAxpy() 336 {Ai[j]-=bimag*Bj[k+1]; Ai[j+1]+=bimag*Bj[k];} in DenseMtx_colGenAxpy() 340 if (bimag == 0.0) { in DenseMtx_colGenAxpy() 344 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 350 {Ai[j]+=(Bj[k]-bimag*Bj[k+1]); Ai[j+1]+=(Bj[k+1]+bimag*Bj[k]);} in DenseMtx_colGenAxpy() 354 if (bimag == 0) { in DenseMtx_colGenAxpy() 358 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 364 {Ai[j]+=(breal*Bj[k]-bimag*Bj[k+1]); in DenseMtx_colGenAxpy() [all …]
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/Iter/src/ |
H A D | util.c | 288 bimag=*(beta+1); in DenseMtx_colGenAxpy() 330 if (bimag == 1.0){ in DenseMtx_colGenAxpy() 334 else if (bimag != 0.0) { in DenseMtx_colGenAxpy() 336 {Ai[j]-=bimag*Bj[k+1]; Ai[j+1]+=bimag*Bj[k];} in DenseMtx_colGenAxpy() 340 if (bimag == 0.0) { in DenseMtx_colGenAxpy() 344 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 350 {Ai[j]+=(Bj[k]-bimag*Bj[k+1]); Ai[j+1]+=(Bj[k+1]+bimag*Bj[k]);} in DenseMtx_colGenAxpy() 354 if (bimag == 0) { in DenseMtx_colGenAxpy() 358 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 364 {Ai[j]+=(breal*Bj[k]-bimag*Bj[k+1]); in DenseMtx_colGenAxpy() [all …]
|
/dports/math/spooles/spooles.2.2/Iter/src/ |
H A D | util.c | 288 bimag=*(beta+1); in DenseMtx_colGenAxpy() 330 if (bimag == 1.0){ in DenseMtx_colGenAxpy() 334 else if (bimag != 0.0) { in DenseMtx_colGenAxpy() 336 {Ai[j]-=bimag*Bj[k+1]; Ai[j+1]+=bimag*Bj[k];} in DenseMtx_colGenAxpy() 340 if (bimag == 0.0) { in DenseMtx_colGenAxpy() 344 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 350 {Ai[j]+=(Bj[k]-bimag*Bj[k+1]); Ai[j+1]+=(Bj[k+1]+bimag*Bj[k]);} in DenseMtx_colGenAxpy() 354 if (bimag == 0) { in DenseMtx_colGenAxpy() 358 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 364 {Ai[j]+=(breal*Bj[k]-bimag*Bj[k+1]); in DenseMtx_colGenAxpy() [all …]
|
/dports/math/spooles/spooles.2.2_SHARED/Iter/src/ |
H A D | util.c | 288 bimag=*(beta+1); in DenseMtx_colGenAxpy() 330 if (bimag == 1.0){ in DenseMtx_colGenAxpy() 334 else if (bimag != 0.0) { in DenseMtx_colGenAxpy() 336 {Ai[j]-=bimag*Bj[k+1]; Ai[j+1]+=bimag*Bj[k];} in DenseMtx_colGenAxpy() 340 if (bimag == 0.0) { in DenseMtx_colGenAxpy() 344 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 350 {Ai[j]+=(Bj[k]-bimag*Bj[k+1]); Ai[j+1]+=(Bj[k+1]+bimag*Bj[k]);} in DenseMtx_colGenAxpy() 354 if (bimag == 0) { in DenseMtx_colGenAxpy() 358 else if (bimag == 1.0) { in DenseMtx_colGenAxpy() 364 {Ai[j]+=(breal*Bj[k]-bimag*Bj[k+1]); in DenseMtx_colGenAxpy() [all …]
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/Chv/src/ |
H A D | factor.c | 937 bimag = entries[3] ; in symmetric2x2() 945 areal, aimag, breal, bimag, in symmetric2x2() 946 breal, -bimag, creal, cimag) ; in symmetric2x2() 951 areal, aimag, breal, bimag, in symmetric2x2() 952 breal, bimag, creal, cimag) ; in symmetric2x2() 957 breal, -bimag, creal, 0.0, in symmetric2x2() 963 breal, bimag, creal, cimag, in symmetric2x2() 1072 + u1real*breal - u1imag*bimag ; in symmetric2x2() 1074 + u1real*bimag + u1imag*breal ; in symmetric2x2() 1075 l1real = u0real*breal - u0imag*bimag in symmetric2x2() [all …]
|
H A D | findPivot.c | 581 double aimag, areal, bimag, breal, cimag, creal, imag, real ; in sym2x2() local 584 Chv_complexEntry(chv, irow, jcol, &breal, &bimag) ; in sym2x2() 588 bmag = Zabs(breal, bimag) ; in sym2x2() 590 denom = fabs(areal*creal - breal*breal - bimag*bimag) ; in sym2x2() 593 bmag = Zabs(breal, bimag) ; in sym2x2() 595 real = areal*creal - aimag*cimag - breal*breal + bimag*bimag ; in sym2x2() 596 imag = areal*cimag + aimag*creal - 2*breal*bimag ; in sym2x2()
|
/dports/math/spooles-mpich/spooles.2.2/Chv/src/ |
H A D | factor.c | 937 bimag = entries[3] ; in symmetric2x2() 945 areal, aimag, breal, bimag, in symmetric2x2() 946 breal, -bimag, creal, cimag) ; in symmetric2x2() 951 areal, aimag, breal, bimag, in symmetric2x2() 952 breal, bimag, creal, cimag) ; in symmetric2x2() 957 breal, -bimag, creal, 0.0, in symmetric2x2() 963 breal, bimag, creal, cimag, in symmetric2x2() 1072 + u1real*breal - u1imag*bimag ; in symmetric2x2() 1074 + u1real*bimag + u1imag*breal ; in symmetric2x2() 1075 l1real = u0real*breal - u0imag*bimag in symmetric2x2() [all …]
|
H A D | findPivot.c | 581 double aimag, areal, bimag, breal, cimag, creal, imag, real ; in sym2x2() local 584 Chv_complexEntry(chv, irow, jcol, &breal, &bimag) ; in sym2x2() 588 bmag = Zabs(breal, bimag) ; in sym2x2() 590 denom = fabs(areal*creal - breal*breal - bimag*bimag) ; in sym2x2() 593 bmag = Zabs(breal, bimag) ; in sym2x2() 595 real = areal*creal - aimag*cimag - breal*breal + bimag*bimag ; in sym2x2() 596 imag = areal*cimag + aimag*creal - 2*breal*bimag ; in sym2x2()
|
/dports/math/spooles/spooles.2.2_SHARED/Chv/src/ |
H A D | factor.c | 937 bimag = entries[3] ; in symmetric2x2() 945 areal, aimag, breal, bimag, in symmetric2x2() 946 breal, -bimag, creal, cimag) ; in symmetric2x2() 951 areal, aimag, breal, bimag, in symmetric2x2() 952 breal, bimag, creal, cimag) ; in symmetric2x2() 957 breal, -bimag, creal, 0.0, in symmetric2x2() 963 breal, bimag, creal, cimag, in symmetric2x2() 1072 + u1real*breal - u1imag*bimag ; in symmetric2x2() 1074 + u1real*bimag + u1imag*breal ; in symmetric2x2() 1075 l1real = u0real*breal - u0imag*bimag in symmetric2x2() [all …]
|
H A D | findPivot.c | 581 double aimag, areal, bimag, breal, cimag, creal, imag, real ; in sym2x2() local 584 Chv_complexEntry(chv, irow, jcol, &breal, &bimag) ; in sym2x2() 588 bmag = Zabs(breal, bimag) ; in sym2x2() 590 denom = fabs(areal*creal - breal*breal - bimag*bimag) ; in sym2x2() 593 bmag = Zabs(breal, bimag) ; in sym2x2() 595 real = areal*creal - aimag*cimag - breal*breal + bimag*bimag ; in sym2x2() 596 imag = areal*cimag + aimag*creal - 2*breal*bimag ; in sym2x2()
|
/dports/math/spooles/spooles.2.2/Chv/src/ |
H A D | factor.c | 937 bimag = entries[3] ; in symmetric2x2() 945 areal, aimag, breal, bimag, in symmetric2x2() 946 breal, -bimag, creal, cimag) ; in symmetric2x2() 951 areal, aimag, breal, bimag, in symmetric2x2() 952 breal, bimag, creal, cimag) ; in symmetric2x2() 957 breal, -bimag, creal, 0.0, in symmetric2x2() 963 breal, bimag, creal, cimag, in symmetric2x2() 1072 + u1real*breal - u1imag*bimag ; in symmetric2x2() 1074 + u1real*bimag + u1imag*breal ; in symmetric2x2() 1075 l1real = u0real*breal - u0imag*bimag in symmetric2x2() [all …]
|
H A D | findPivot.c | 581 double aimag, areal, bimag, breal, cimag, creal, imag, real ; in sym2x2() local 584 Chv_complexEntry(chv, irow, jcol, &breal, &bimag) ; in sym2x2() 588 bmag = Zabs(breal, bimag) ; in sym2x2() 590 denom = fabs(areal*creal - breal*breal - bimag*bimag) ; in sym2x2() 593 bmag = Zabs(breal, bimag) ; in sym2x2() 595 real = areal*creal - aimag*cimag - breal*breal + bimag*bimag ; in sym2x2() 596 imag = areal*cimag + aimag*creal - 2*breal*bimag ; in sym2x2()
|
/dports/math/spooles/spooles.2.2/Utilities/ |
H A D | ZV.h | 56 double bimag, 204 double bimag,
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/Utilities/ |
H A D | ZV.h | 56 double bimag, 204 double bimag,
|
/dports/math/spooles-mpich/spooles.2.2/Utilities/ |
H A D | ZV.h | 56 double bimag, 204 double bimag,
|
/dports/math/spooles/spooles.2.2_SHARED/Utilities/ |
H A D | ZV.h | 56 double bimag, 204 double bimag,
|
/dports/audio/sc3-plugins/sc3-plugins-Version-3.9.0/source/PitchDetection/ |
H A D | Qitch.cpp | 554 float bimag= unit->imagb; 561 …l= fftbuf[k] - (0.5*((breal*fftbuf[k+1]) - (bimag*fftbuf[fftN- (k+1)]))) - (0.5*((breal*fftbuf[k-1… 562 …N-k] - (0.5*((breal*fftbuf[fftN- (k+1)]) + (bimag*fftbuf[k+1]))) - (0.5*((breal*fftbuf[fftN- (k-1)…
|
/dports/math/spooles/spooles.2.2/Utilities/src/ |
H A D | ZV.c | 52 double bimag, breal, fac ; in Zrecip() local 59 bimag = -fac * breal ; in Zrecip() 62 bimag = -1./(aimag + fac*areal) ; in Zrecip() 63 breal = -fac * bimag ; in Zrecip() 66 *pbimag = bimag ; in Zrecip() 93 double bimag, in Zrecip2() argument 113 xreal = areal*dreal - aimag*dimag - breal*creal + bimag*cimag ; in Zrecip2() 135 *pfreal = -breal*yreal + bimag*yimag ; in Zrecip2() 138 *pfimag = -breal*yimag - bimag*yreal ; in Zrecip2() 660 double bimag, in ZVaxpy2() argument [all …]
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/Utilities/src/ |
H A D | ZV.c | 52 double bimag, breal, fac ; in Zrecip() local 59 bimag = -fac * breal ; in Zrecip() 62 bimag = -1./(aimag + fac*areal) ; in Zrecip() 63 breal = -fac * bimag ; in Zrecip() 66 *pbimag = bimag ; in Zrecip() 93 double bimag, in Zrecip2() argument 113 xreal = areal*dreal - aimag*dimag - breal*creal + bimag*cimag ; in Zrecip2() 135 *pfreal = -breal*yreal + bimag*yimag ; in Zrecip2() 138 *pfimag = -breal*yimag - bimag*yreal ; in Zrecip2() 660 double bimag, in ZVaxpy2() argument [all …]
|
/dports/math/spooles-mpich/spooles.2.2/Utilities/src/ |
H A D | ZV.c | 52 double bimag, breal, fac ; in Zrecip() local 59 bimag = -fac * breal ; in Zrecip() 62 bimag = -1./(aimag + fac*areal) ; in Zrecip() 63 breal = -fac * bimag ; in Zrecip() 66 *pbimag = bimag ; in Zrecip() 93 double bimag, in Zrecip2() argument 113 xreal = areal*dreal - aimag*dimag - breal*creal + bimag*cimag ; in Zrecip2() 135 *pfreal = -breal*yreal + bimag*yimag ; in Zrecip2() 138 *pfimag = -breal*yimag - bimag*yreal ; in Zrecip2() 660 double bimag, in ZVaxpy2() argument [all …]
|
/dports/math/spooles/spooles.2.2_SHARED/Utilities/src/ |
H A D | ZV.c | 52 double bimag, breal, fac ; in Zrecip() local 59 bimag = -fac * breal ; in Zrecip() 62 bimag = -1./(aimag + fac*areal) ; in Zrecip() 63 breal = -fac * bimag ; in Zrecip() 66 *pbimag = bimag ; in Zrecip() 93 double bimag, in Zrecip2() argument 113 xreal = areal*dreal - aimag*dimag - breal*creal + bimag*cimag ; in Zrecip2() 135 *pfreal = -breal*yreal + bimag*yimag ; in Zrecip2() 138 *pfimag = -breal*yimag - bimag*yreal ; in Zrecip2() 660 double bimag, in ZVaxpy2() argument [all …]
|
/dports/math/mfem/mfem-4.3/linalg/ |
H A D | complex_operator.cpp | 393 Vector bimag; in Mult() local 396 bimag.SetDataAndSize(&datab[n],n); in Mult() 397 bimag *=-1.0; in Mult() 430 bimag *=-1.0; in Mult() 446 Vector bimag; in MultTranspose() local 447 bimag.SetDataAndSize(&datab[n],n); in MultTranspose() 454 bimag *=-1.0; in MultTranspose() 493 bimag *=-1.0; in MultTranspose()
|
/dports/math/spooles-mpich/spooles.2.2/FrontMtx/src/ |
H A D | util.c | 102 double arm, areal, bimag, breal, creal, mid, val ; in FrontMtx_inertia() local 225 bimag = entries[2*ii+3] ; in FrontMtx_inertia() 229 + breal*breal + bimag*bimag) ; in FrontMtx_inertia()
|
/dports/math/spooles-mpich/spooles.2.2_SHARED/FrontMtx/src/ |
H A D | util.c | 102 double arm, areal, bimag, breal, creal, mid, val ; in FrontMtx_inertia() local 225 bimag = entries[2*ii+3] ; in FrontMtx_inertia() 229 + breal*breal + bimag*bimag) ; in FrontMtx_inertia()
|