/dports/math/xblas/xblas-1.0.248/testing/test-trsv/ |
H A D | testgen_BLAS_sdot_x.c | 39 x_ii_t = x_t[ix]; in r_truth() 84 x_i_t = x_t[i]; in gen_y_to_cancel() 247 tmp_l = x_t[k] * y[k] + x_t[k + 2] * y[k + 2]; in testgen_BLAS_sdot_x() 249 ddmuld(x_l[k], x_t[k], y[k], &f, &tmp_t); in testgen_BLAS_sdot_x() 253 if (x_l[k + 1] == 0. && x_t[k + 1] == 0.) in testgen_BLAS_sdot_x() 272 tmp_l = x_t[k] * y[k] + x_t[k + 3] * y[k + 3]; in testgen_BLAS_sdot_x() 274 ddmuld(x_l[k], x_t[k], y[k], &f, &tmp_t); in testgen_BLAS_sdot_x() 380 if (frees > 0 && x_t[k] == 0.0) { in testgen_BLAS_sdot_x() 411 tmp_l = x_t[k] * y[k] + x_t[k + 2] * y[k + 2]; in testgen_BLAS_sdot_x() 413 ddmuld(x_l[k], x_t[k], y[k], &f, &tmp_t); in testgen_BLAS_sdot_x() [all …]
|
/dports/science/PETSc/petsc-3.14.1/src/dm/impls/da/ |
H A D | da3.c | 786 s_t = bases[n1] + x_t*y_t*z_t - (s_y+1-i)*x_t - (s_z-k-1)*x_t*y_t; in DMSetUp_DA_3D() 814 s_t = bases[n4] + i*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 825 s_t = bases[n5] + i*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 836 s_t = bases[n6] + i*x_t - s_x + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 844 s_t = bases[n7] + (i-1)*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 852 s_t = bases[n8] + (i-1)*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 1094 s_t = bases[n4] + i*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 1108 s_t = bases[n5] + i*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 1120 s_t = bases[n6] + i*x_t - s_x + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() 1129 s_t = bases[n7] + (i-1)*x_t + x_t*y_t*z_t - (s_z-k)*x_t*y_t; in DMSetUp_DA_3D() [all …]
|
/dports/math/blasfeo/blasfeo-0.1.2/kernel/generic/ |
H A D | kernel_dsymv_4_lib4.c | 173 x_t += 4; in kernel_dgemv_nt_4_vs_lib4() 202 x_t += 1; in kernel_dgemv_nt_4_vs_lib4() 423 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 444 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 468 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 497 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 525 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 553 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 581 x_t += 1; in kernel_dsymv_l_4_gen_lib4() 604 x_t += 1; in kernel_dsymv_l_4_gen_lib4() [all …]
|
H A D | kernel_ssymv_4_lib4.c | 173 x_t += 4; in kernel_sgemv_nt_4_vs_lib4() 202 x_t += 1; in kernel_sgemv_nt_4_vs_lib4() 423 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 444 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 468 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 497 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 525 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 553 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 581 x_t += 1; in kernel_ssymv_l_4_gen_lib4() 604 x_t += 1; in kernel_ssymv_l_4_gen_lib4() [all …]
|
/dports/lang/guile2/guile-2.2.7/test-suite/standalone/ |
H A D | test-smob-mark.c | 38 typedef struct x_tag x_t; typedef 55 x_t *c_x; in make_x() 58 c_x = (x_t *) scm_gc_malloc (sizeof (x_t), "x"); in make_x() 68 x_t *c_x; in mark_x() 69 c_x = (x_t *) SCM_SMOB_DATA (x); in mark_x() 78 x_t *c_x; in free_x() 79 c_x = (x_t *) SCM_SMOB_DATA (x); in free_x() 80 scm_gc_free (c_x, sizeof (x_t), "x"); in free_x() 88 x_t *c_x = (x_t *) SCM_SMOB_DATA (x); in print_x() 90 if (c_x == (x_t *) NULL) in print_x() [all …]
|
/dports/lang/guile/guile-3.0.7/test-suite/standalone/ |
H A D | test-smob-mark.c | 39 typedef struct x_tag x_t; typedef 56 x_t *c_x; in make_x() 59 c_x = (x_t *) scm_gc_malloc (sizeof (x_t), "x"); in make_x() 69 x_t *c_x; in mark_x() 70 c_x = (x_t *) SCM_SMOB_DATA (x); in mark_x() 79 x_t *c_x; in free_x() 80 c_x = (x_t *) SCM_SMOB_DATA (x); in free_x() 81 scm_gc_free (c_x, sizeof (x_t), "x"); in free_x() 89 x_t *c_x = (x_t *) SCM_SMOB_DATA (x); in print_x() 91 if (c_x == (x_t *) NULL) in print_x() [all …]
|
/dports/science/thermofun/thermofun-0.3.8/ThermoFun/Substances/Solvent/Reaktoro/ |
H A D | WaterHelmholtzStateHGK.cpp | 254 const auto x_t = y_t * x2; in calculateWaterHelmholtzStateHGK2() local 259 const auto x_rrt = y_rrt*x2 + 2*(y_rt*x_r + y_rr*x_t) + 2*y_r*(x_rt*x + x_r*x_t); in calculateWaterHelmholtzStateHGK2() 260 const auto x_rtt = y_rtt*x2 + 4*y_rt*x_t*x + 2*y_r*(x_tt*x + x_t*x_t); in calculateWaterHelmholtzStateHGK2() 261 const auto x_ttt = y_ttt*x2 + 4*y_tt*x_t*x + 2*y_t*(x_tt*x + x_t*x_t); in calculateWaterHelmholtzStateHGK2() 265 const auto u_t = x_t/x; in calculateWaterHelmholtzStateHGK2() 267 const auto u_rt = x_rt/x - x_r*x_t/(x*x); in calculateWaterHelmholtzStateHGK2() 268 const auto u_tt = x_tt/x - x_t*x_t/(x*x); in calculateWaterHelmholtzStateHGK2() 270 const auto u_rrt = x_rrt/x - (2*x_rt*x_r + x_rr*x_t)/(x*x) + 2*x_r*x_r*x_t/(x*x*x); in calculateWaterHelmholtzStateHGK2() 271 const auto u_rtt = x_rtt/x - (2*x_rt*x_t + x_tt*x_r)/(x*x) + 2*x_t*x_t*x_r/(x*x*x); in calculateWaterHelmholtzStateHGK2() 272 const auto u_ttt = x_ttt/x - 3*x_tt*x_t/(x*x) + 2*x_t*x_t*x_t/(x*x*x); in calculateWaterHelmholtzStateHGK2() [all …]
|
/dports/math/xlapack/lapack-3.10.0/LAPACKE/src/ |
H A D | lapacke_slapmt_work.c | 48 float* x_t = NULL; in LAPACKE_slapmt_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmt_work() 57 if( x_t == NULL ) { in LAPACKE_slapmt_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmt_work() 64 LAPACK_slapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmt_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmt_work()
|
H A D | lapacke_slapmr_work.c | 48 float* x_t = NULL; in LAPACKE_slapmr_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmr_work() 57 if( x_t == NULL ) { in LAPACKE_slapmr_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmr_work() 64 LAPACK_slapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmr_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmr_work()
|
H A D | lapacke_dlapmr_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmr_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmr_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmr_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmr_work() 64 LAPACK_dlapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmr_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmr_work()
|
H A D | lapacke_dlapmt_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmt_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmt_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmt_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmt_work() 64 LAPACK_dlapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmt_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmt_work()
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/LAPACKE/src/ |
H A D | lapacke_slapmr_work.c | 49 float* x_t = NULL; in LAPACKE_slapmr_work() local 57 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmr_work() 58 if( x_t == NULL ) { in LAPACKE_slapmr_work() 63 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmr_work() 65 LAPACK_slapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmr_work() 68 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmr_work() 70 LAPACKE_free( x_t ); in LAPACKE_slapmr_work()
|
H A D | lapacke_dlapmr_work.c | 49 double* x_t = NULL; in LAPACKE_dlapmr_work() local 57 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmr_work() 58 if( x_t == NULL ) { in LAPACKE_dlapmr_work() 63 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmr_work() 65 LAPACK_dlapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmr_work() 68 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmr_work() 70 LAPACKE_free( x_t ); in LAPACKE_dlapmr_work()
|
H A D | lapacke_dlapmt_work.c | 49 double* x_t = NULL; in LAPACKE_dlapmt_work() local 57 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmt_work() 58 if( x_t == NULL ) { in LAPACKE_dlapmt_work() 63 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmt_work() 65 LAPACK_dlapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmt_work() 68 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmt_work() 70 LAPACKE_free( x_t ); in LAPACKE_dlapmt_work()
|
/dports/math/blas/lapack-3.10.0/LAPACKE/src/ |
H A D | lapacke_slapmr_work.c | 48 float* x_t = NULL; in LAPACKE_slapmr_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmr_work() 57 if( x_t == NULL ) { in LAPACKE_slapmr_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmr_work() 64 LAPACK_slapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmr_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmr_work()
|
H A D | lapacke_dlapmr_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmr_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmr_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmr_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmr_work() 64 LAPACK_dlapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmr_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmr_work()
|
H A D | lapacke_slapmt_work.c | 48 float* x_t = NULL; in LAPACKE_slapmt_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmt_work() 57 if( x_t == NULL ) { in LAPACKE_slapmt_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmt_work() 64 LAPACK_slapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmt_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmt_work()
|
H A D | lapacke_dlapmt_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmt_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmt_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmt_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmt_work() 64 LAPACK_dlapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmt_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmt_work()
|
/dports/math/lapacke/lapack-3.10.0/LAPACKE/src/ |
H A D | lapacke_slapmr_work.c | 48 float* x_t = NULL; in LAPACKE_slapmr_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmr_work() 57 if( x_t == NULL ) { in LAPACKE_slapmr_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmr_work() 64 LAPACK_slapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmr_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmr_work()
|
H A D | lapacke_slapmt_work.c | 48 float* x_t = NULL; in LAPACKE_slapmt_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmt_work() 57 if( x_t == NULL ) { in LAPACKE_slapmt_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmt_work() 64 LAPACK_slapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmt_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmt_work()
|
H A D | lapacke_dlapmr_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmr_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmr_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmr_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmr_work() 64 LAPACK_dlapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmr_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmr_work()
|
H A D | lapacke_dlapmt_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmt_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmt_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmt_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmt_work() 64 LAPACK_dlapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmt_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmt_work()
|
/dports/math/lapack/lapack-3.10.0/LAPACKE/src/ |
H A D | lapacke_slapmr_work.c | 48 float* x_t = NULL; in LAPACKE_slapmr_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmr_work() 57 if( x_t == NULL ) { in LAPACKE_slapmr_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmr_work() 64 LAPACK_slapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmr_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmr_work()
|
H A D | lapacke_slapmt_work.c | 48 float* x_t = NULL; in LAPACKE_slapmt_work() local 56 x_t = (float*)LAPACKE_malloc( sizeof(float) * ldx_t * MAX(1,n) ); in LAPACKE_slapmt_work() 57 if( x_t == NULL ) { in LAPACKE_slapmt_work() 62 LAPACKE_sge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_slapmt_work() 64 LAPACK_slapmt( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_slapmt_work() 67 LAPACKE_sge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_slapmt_work() 69 LAPACKE_free( x_t ); in LAPACKE_slapmt_work()
|
H A D | lapacke_dlapmr_work.c | 48 double* x_t = NULL; in LAPACKE_dlapmr_work() local 56 x_t = (double*)LAPACKE_malloc( sizeof(double) * ldx_t * MAX(1,n) ); in LAPACKE_dlapmr_work() 57 if( x_t == NULL ) { in LAPACKE_dlapmr_work() 62 LAPACKE_dge_trans( matrix_layout, m, n, x, ldx, x_t, ldx_t ); in LAPACKE_dlapmr_work() 64 LAPACK_dlapmr( &forwrd, &m, &n, x_t, &ldx_t, k ); in LAPACKE_dlapmr_work() 67 LAPACKE_dge_trans( LAPACK_COL_MAJOR, m, n, x_t, ldx_t, x, ldx ); in LAPACKE_dlapmr_work() 69 LAPACKE_free( x_t ); in LAPACKE_dlapmr_work()
|