Home
last modified time | relevance | path

Searched refs:taucs_dcomplex (Results 1 – 14 of 14) sorted by relevance

/dports/math/taucs/taucs-2.2_23/progs/
H A Dtest_complex.c31 taucs_dcomplex m1 = taucs_zminusone; in main()
32 taucs_dcomplex p1 = taucs_zone; in main()
33 taucs_dcomplex z = taucs_zzero; in main()
34 taucs_dcomplex i = taucs_zsqrt(m1); in main()
35 taucs_dcomplex x = taucs_zadd(p1,i); in main()
55 taucs_dcomplex p = x; in main()
H A Ddirect.c20 extern int zscal_(int*, taucs_dcomplex*,
199 taucs_dcomplex* Xz = NULL; in actual_main()
200 taucs_dcomplex* Bz = NULL; in actual_main()
201 taucs_dcomplex* PXz = NULL; in actual_main()
202 taucs_dcomplex* PBz = NULL; in actual_main()
203 taucs_dcomplex* NXz = NULL; in actual_main()
467 Xz =(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in actual_main()
475 Bz =(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in actual_main()
486 NXz=(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in actual_main()
487 PXz=(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in actual_main()
[all …]
H A Ddirect_coverage.c22 extern int zscal_(int*, taucs_dcomplex*,
265 taucs_dcomplex* Xz = NULL; in direct_main()
266 taucs_dcomplex* Bz = NULL; in direct_main()
267 taucs_dcomplex* PXz; in direct_main()
268 taucs_dcomplex* PBz; in direct_main()
269 taucs_dcomplex* NXz; in direct_main()
523 Xz =(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in direct_main()
531 Bz =(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in direct_main()
540 NXz=(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in direct_main()
541 PXz=(taucs_dcomplex*)malloc(N*sizeof(taucs_dcomplex)); in direct_main()
[all …]
H A Dooc_factor_solve.c85 x = malloc((A->n) * sizeof(taucs_dcomplex)); in main()
H A Dtaucs_mumps.c276 taucs_re(((taucs_dcomplex*)X)[i])=(taucs_double) ((double)random()/(double)RAND_MAX); in main()
277 taucs_im(((taucs_dcomplex*)X)[i])=(taucs_double) ((double)random()/(double)RAND_MAX); in main()
H A Dtaucs_run.c196 ((taucs_dcomplex*)X)[i] = taucs_zcomplex_create(zre,zim); in main()
/dports/math/taucs/taucs-2.2_23/src/
H A Dtaucs_vec_base.c80 (taucs_double) a, (taucs_dcomplex*) x, in taucs_vec_axpby()
81 (taucs_double) b, (taucs_dcomplex*) y, in taucs_vec_axpby()
82 (taucs_dcomplex*) axpby); in taucs_vec_axpby()
133 taucs_zvec_permute(n, (taucs_dcomplex*) v, (taucs_dcomplex*) pv, p); in taucs_vec_permute()
156 taucs_zvec_ipermute(n, (taucs_dcomplex*) v, (taucs_dcomplex*) pv, p); in taucs_vec_ipermute()
H A Dtaucs_complex.c42 taucs_dcomplex taucs_zzero_const = 0.0+0.0*_Complex_I;
43 taucs_dcomplex taucs_zone_const = 1.0+0.0*_Complex_I;
44 taucs_dcomplex taucs_zminusone_const = -1.0+0.0*_Complex_I;
56 taucs_dcomplex taucs_zzero_const = { 0.0 , 0.0 };
57 taucs_dcomplex taucs_zone_const = { 1.0 , 0.0 };
58 taucs_dcomplex taucs_zminusone_const = {-1.0 , 0.0 };
H A Dtaucs_ccs_solve_llt.c402 (taucs_dcomplex*)x, in taucs_ccs_solve_schur()
403 (taucs_dcomplex*)b); in taucs_ccs_solve_schur()
437 return taucs_zccs_solve_llt(L,(taucs_dcomplex*) x, (taucs_dcomplex*) b); in taucs_ccs_solve_llt()
466 return taucs_zccs_solve_ldlt(L,(taucs_dcomplex*) x, (taucs_dcomplex*) b); in taucs_ccs_solve_ldlt()
H A Dtaucs.h141 typedef _Complex double taucs_dcomplex; typedef
288 typedef struct {double r,i;} taucs_dcomplex; typedef
451 extern taucs_dcomplex taucs_zzero_const ;
452 extern taucs_dcomplex taucs_zone_const ;
453 extern taucs_dcomplex taucs_zminusone_const;
550 taucs_dcomplex* z;
583 #define taucs_datatype taucs_dcomplex
645 typedef taucs_dcomplex taucs_datatype;
769 extern int zreadhb_(char*, int*, int*, int*, int*, int*, taucs_dcomplex*);
830 taucs_double taucs_blas_name(dznrm2)(int*, taucs_dcomplex*, int*);
H A Dtaucs_ccs_io.c93 bytes_read = read(f,A->values.z,colptr[ncols]*sizeof(taucs_dcomplex)); in taucs_ccs_read_binary()
993 v = taucs_malloc(n * sizeof(taucs_dcomplex)); in taucs_vec_read_binary()
995 bytes_read = read(f,v,n*sizeof(taucs_dcomplex)); in taucs_vec_read_binary()
1033 bytes_read = write(f,v,n*sizeof(taucs_dcomplex)); in taucs_vec_write_binary()
H A Dtaucs_ccs_ops.c285 taucs_zccs_times_vec(m, (taucs_dcomplex*) X, (taucs_dcomplex*) B); in taucs_ccs_times_vec()
H A Dtaucs_linsolve.c31 if (flags & TAUCS_DCOMPLEX) return sizeof(taucs_dcomplex); in element_size()
H A Dtaucs_ooc_io.c109 if (flags & TAUCS_DCOMPLEX) return sizeof(taucs_dcomplex); in element_size()