Home
last modified time | relevance | path

Searched refs:aimag (Results 1 – 25 of 167) sorted by relevance

1234567

/dports/math/spooles-mpich/spooles.2.2/InpMtx/src/
H A Dgmvm.c158 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
159 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
186 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
187 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
229 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
230 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
388 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
389 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
416 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
417 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
[all …]
H A DmvmVector.c136 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
137 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
164 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
165 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
207 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
208 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
348 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
349 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
376 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
377 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
[all …]
H A Dgmmm.c181 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
182 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
218 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
219 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
270 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
271 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
453 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
454 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
490 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
491 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
[all …]
H A Dmvm.c205 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
206 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
242 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
243 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
294 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
295 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
506 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
507 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
543 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
544 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
[all …]
/dports/math/spooles-mpich/spooles.2.2_SHARED/InpMtx/src/
H A DmvmVector.c136 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
137 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
164 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
165 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
207 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
208 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
348 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
349 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
376 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
377 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
[all …]
H A Dgmvm.c158 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
159 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
186 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
187 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
229 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
230 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
388 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
389 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
416 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
417 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
[all …]
H A Dgmmm.c181 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
182 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
218 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
219 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
270 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
271 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
453 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
454 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
490 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
491 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
[all …]
H A Dmvm.c205 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
206 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
242 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
243 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
294 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
295 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
506 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
507 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
543 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
544 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
[all …]
/dports/math/spooles/spooles.2.2_SHARED/InpMtx/src/
H A Dgmvm.c158 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
159 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
186 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
187 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
229 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
230 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
388 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
389 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
416 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
417 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
[all …]
H A DmvmVector.c136 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
137 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
164 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
165 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
207 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
208 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
348 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
349 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
376 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
377 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
[all …]
H A Dgmmm.c181 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
182 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
218 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
219 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
270 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
271 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
453 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
454 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
490 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
491 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
[all …]
H A Dmvm.c205 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
206 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
242 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
243 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
294 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
295 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
506 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
507 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
543 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
544 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
[all …]
/dports/math/spooles/spooles.2.2/InpMtx/src/
H A DmvmVector.c136 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
137 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
164 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
165 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
207 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector()
208 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector()
348 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
349 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
376 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmmVector_T()
377 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmmVector_T()
[all …]
H A Dgmvm.c158 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
159 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
186 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
187 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
229 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm()
230 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm()
388 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
389 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
416 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmvm_T()
417 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmvm_T()
[all …]
H A Dgmmm.c181 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
182 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
218 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
219 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
270 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm()
271 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm()
453 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
454 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
490 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_gmmm_T()
491 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_gmmm_T()
[all …]
H A Dmvm.c205 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
206 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
242 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
243 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
294 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm()
295 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm()
506 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
507 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
543 t1 = areal*xreal - aimag*ximag ; in InpMtx_nonsym_mmm_T()
544 t2 = areal*ximag + aimag*xreal ; in InpMtx_nonsym_mmm_T()
[all …]
/dports/math/blis/blis-0.8.1/frame/include/level0/old/
H A Dbli_invscalcjs.h90 float aimag = ( bli_is_conj( conj ) ? ( float ) -(a).imag : \
92 float temp = ( float ) (a).real * (a).real + ( float ) aimag * (a).imag; \
93 float xr = ( float ) ( ( float ) (a).real * (x).real + ( float ) aimag * (x).imag ) / temp; \
94 float xi = ( float ) ( ( float ) (a).real * (x).imag - ( float ) aimag * (x).real ) / temp; \
100 float aimag = ( bli_is_conj( conj ) ? ( float ) -(a).imag : \
102 float temp = ( float ) (a).real * (a).real + ( float ) aimag * (a).imag; \
103 float xr = ( float ) ( ( float ) (a).real * (x).real + ( float ) aimag * (x).imag ) / temp; \
121 double aimag = ( bli_is_conj( conj ) ? ( double ) -(a).imag : \
123 double temp = ( double ) (a).real * (a).real + ( double ) aimag * (a).imag; \
131 double aimag = ( bli_is_conj( conj ) ? ( double ) -(a).imag : \
[all …]
H A Dbli_scalcjs.h91 float aimag = ( bli_is_conj( conj ) ? ( float ) -(a).imag : \
93 float tempr = ( float ) (a).real * (x).real - ( float ) aimag * (x).imag; \
94 float tempi = ( float ) (a).real * (x).imag + ( float ) aimag * (x).real; \
100 float aimag = ( bli_is_conj( conj ) ? ( float ) -(a).imag : \
102 float tempr = ( float ) (a).real * (x).real - ( float ) aimag * (x).imag; \
103 float tempi = ( float ) (a).real * (x).imag + ( float ) aimag * (x).real; \
120 double aimag = ( bli_is_conj( conj ) ? ( double ) -(a).imag : \
122 double tempr = ( double ) (a).real * (x).real - ( double ) aimag * (x).imag; \
123 double tempi = ( double ) (a).real * (x).imag + ( double ) aimag * (x).real; \
129 double aimag = ( bli_is_conj( conj ) ? ( double ) -(a).imag : \
[all …]
/dports/science/qwalk/mainline-1.0.1-300-g1b7e381/src/attic/
H A Dget_zpol.pl15 ($areal[0],$areal[1],$aimag[0], $aimag[1])=get_realimag("centro", $suffix);
16 print "centro real/imag $areal[0] $aimag[0] errors $areal[1] $aimag[1] \n";
17 @a=magnitude(@areal, @aimag);
29 $adotb[0]=$areal[0]*$breal[0]+$aimag[0]*$bimag[0];
31 +$aimag[1]*$bimag[0]+$aimag[0]*$bimag[1];
/dports/math/spooles/spooles.2.2/Utilities/
H A DZV.h30 double aimag,
54 double aimag,
182 double aimag,
201 double aimag,
221 double aimag
/dports/math/spooles-mpich/spooles.2.2_SHARED/Utilities/
H A DZV.h30 double aimag,
54 double aimag,
182 double aimag,
201 double aimag,
221 double aimag
/dports/math/spooles-mpich/spooles.2.2/Utilities/
H A DZV.h30 double aimag,
54 double aimag,
182 double aimag,
201 double aimag,
221 double aimag
/dports/math/spooles/spooles.2.2_SHARED/Utilities/
H A DZV.h30 double aimag,
54 double aimag,
182 double aimag,
201 double aimag,
221 double aimag
/dports/math/spooles-mpich/spooles.2.2/Iter/src/
H A Dutil.c287 aimag=*(alpha+1); in DenseMtx_colGenAxpy()
291 if (aimag == 0.0) { in DenseMtx_colGenAxpy()
294 else if (aimag == 1.0){ in DenseMtx_colGenAxpy()
300 {tmp=Ai[k]; Ai[k]=-aimag*Ai[k+1]; Ai[k+1]=aimag*tmp;} in DenseMtx_colGenAxpy()
304 if (aimag == 1.0) { in DenseMtx_colGenAxpy()
308 else if (aimag != 0.0) { in DenseMtx_colGenAxpy()
310 {tmp=Ai[k]; Ai[k]-=aimag*Ai[k+1]; Ai[k+1]+=aimag*tmp;} in DenseMtx_colGenAxpy()
314 if (aimag == 0) { in DenseMtx_colGenAxpy()
317 else if (aimag == 1.0) { in DenseMtx_colGenAxpy()
324 Ai[k]=areal*Ai[k]-aimag*Ai[k+1]; in DenseMtx_colGenAxpy()
[all …]
/dports/math/spooles-mpich/spooles.2.2_SHARED/Iter/src/
H A Dutil.c287 aimag=*(alpha+1); in DenseMtx_colGenAxpy()
291 if (aimag == 0.0) { in DenseMtx_colGenAxpy()
294 else if (aimag == 1.0){ in DenseMtx_colGenAxpy()
300 {tmp=Ai[k]; Ai[k]=-aimag*Ai[k+1]; Ai[k+1]=aimag*tmp;} in DenseMtx_colGenAxpy()
304 if (aimag == 1.0) { in DenseMtx_colGenAxpy()
308 else if (aimag != 0.0) { in DenseMtx_colGenAxpy()
310 {tmp=Ai[k]; Ai[k]-=aimag*Ai[k+1]; Ai[k+1]+=aimag*tmp;} in DenseMtx_colGenAxpy()
314 if (aimag == 0) { in DenseMtx_colGenAxpy()
317 else if (aimag == 1.0) { in DenseMtx_colGenAxpy()
324 Ai[k]=areal*Ai[k]-aimag*Ai[k+1]; in DenseMtx_colGenAxpy()
[all …]

1234567