Home
last modified time | relevance | path

Searched refs:zeta1 (Results 1 – 25 of 87) sorted by relevance

1234

/dports/math/libflame/libflame-5.2.0/src/base/flamec/blis/fused/
H A Dbl1_axmyv2.c74 zeta1 = z; in bl1_daxmyv2()
87 zeta1 += inc_z; in bl1_daxmyv2()
117 zeta1 += 4; in bl1_daxmyv2()
134 zeta1 += inc_z; in bl1_daxmyv2()
169 zeta1 = z;
185 zeta1 += inc_z;
231 zeta1 += inc_z;
272 zeta1 = z; in bl1_zaxmyv2()
298 zeta1 += inc_z; in bl1_zaxmyv2()
327 zeta1 += 1; in bl1_zaxmyv2()
[all …]
H A Dbl1_dotaxmyv2.c80 zeta1 = z; in bl1_ddotaxmyv2()
98 zeta1 += inc_z; in bl1_ddotaxmyv2()
123 zeta1 += 2; in bl1_ddotaxmyv2()
145 zeta1 += inc_z; in bl1_ddotaxmyv2()
187 zeta1 = z;
206 zeta1 += inc_z;
254 zeta1 += inc_z;
310 zeta1 = z; in bl1_zdotaxmyv2()
358 zeta1 += 1; in bl1_zdotaxmyv2()
386 zeta1 = z;
[all …]
H A Dbl1_axpyv2bdotaxpy.c81 zeta1 = z; in bl1_daxpyv2bdotaxpy()
109 zeta1 += inc_z; in bl1_daxpyv2bdotaxpy()
155 zeta1 += 4; in bl1_daxpyv2bdotaxpy()
185 zeta1 += inc_z; in bl1_daxpyv2bdotaxpy()
226 zeta1 = z;
253 zeta1 += inc_z;
315 zeta1 += inc_z;
380 zeta1 = z; in bl1_zaxpyv2bdotaxpy()
451 zeta1 += 1; in bl1_zaxpyv2bdotaxpy()
477 zeta1 = z;
[all …]
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/
H A Dslaic1.c187 zeta1 = alpha / absest; in slaic1_()
190 b = (1.f - zeta1 * zeta1 - zeta2 * zeta2) * .5f; in slaic1_()
191 *c__ = zeta1 * zeta1; in slaic1_()
198 sine = -zeta1 / t; in slaic1_()
274 r__3 = zeta1 * zeta1 + 1.f + (r__1 = zeta1 * zeta2, dabs(r__1)), in slaic1_()
280 test = (zeta1 - zeta2) * 2.f * (zeta1 + zeta2) + 1.f; in slaic1_()
285 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.f) * .5f; in slaic1_()
288 sine = zeta1 / (1.f - t); in slaic1_()
295 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.f) * .5f; in slaic1_()
296 *c__ = zeta1 * zeta1; in slaic1_()
[all …]
H A Ddlaic1.c189 zeta1 = alpha / absest; in dlaic1_()
192 b = (1. - zeta1 * zeta1 - zeta2 * zeta2) * .5; in dlaic1_()
193 *c__ = zeta1 * zeta1; in dlaic1_()
200 sine = -zeta1 / t; in dlaic1_()
276 d__3 = zeta1 * zeta1 + 1. + (d__1 = zeta1 * zeta2, abs(d__1)), in dlaic1_()
282 test = (zeta1 - zeta2) * 2. * (zeta1 + zeta2) + 1.; in dlaic1_()
287 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.) * .5; in dlaic1_()
290 sine = zeta1 / (1. - t); in dlaic1_()
297 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.) * .5; in dlaic1_()
298 *c__ = zeta1 * zeta1; in dlaic1_()
[all …]
H A Dclaic1.c28 static real test, zeta1, zeta2; in claic1_() local
216 zeta1 = absalp / absest; in claic1_()
219 b = (1.f - zeta1 * zeta1 - zeta2 * zeta2) * .5f; in claic1_()
220 r__1 = zeta1 * zeta1; in claic1_()
355 zeta1 = absalp / absest; in claic1_()
359 r__1 = zeta1 * zeta1 + 1.f + zeta1 * zeta2, r__2 = zeta1 * zeta2 in claic1_()
365 test = (zeta1 - zeta2) * 2.f * (zeta1 + zeta2) + 1.f; in claic1_()
370 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.f) * .5f; in claic1_()
391 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.f) * .5f; in claic1_()
392 r__1 = zeta1 * zeta1; in claic1_()
H A Dzlaic1.c30 static doublereal test, zeta1, zeta2; in zlaic1_() local
219 zeta1 = absalp / absest; in zlaic1_()
222 b = (1. - zeta1 * zeta1 - zeta2 * zeta2) * .5; in zlaic1_()
223 d__1 = zeta1 * zeta1; in zlaic1_()
358 zeta1 = absalp / absest; in zlaic1_()
362 d__1 = zeta1 * zeta1 + 1. + zeta1 * zeta2, d__2 = zeta1 * zeta2 + in zlaic1_()
368 test = (zeta1 - zeta2) * 2. * (zeta1 + zeta2) + 1.; in zlaic1_()
373 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.) * .5; in zlaic1_()
394 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.) * .5; in zlaic1_()
395 d__1 = zeta1 * zeta1; in zlaic1_()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/
H A Dslaic1.c242 zeta1 = alpha / absest; in slaic1_()
244 b = (1.f - zeta1 * zeta1 - zeta2 * zeta2) * .5f; in slaic1_()
245 *c__ = zeta1 * zeta1; in slaic1_()
254 sine = -zeta1 / t; in slaic1_()
341 zeta1 = alpha / absest; in slaic1_()
344 r__3 = zeta1 * zeta1 + 1.f + (r__1 = zeta1 * zeta2, f2c_abs(r__1)); in slaic1_()
348 test = (zeta1 - zeta2) * 2.f * (zeta1 + zeta2) + 1.f; in slaic1_()
352 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.f) * .5f; in slaic1_()
362 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.f) * .5f; in slaic1_()
363 *c__ = zeta1 * zeta1; in slaic1_()
[all …]
H A Ddlaic1.c242 zeta1 = alpha / absest; in dlaic1_()
244 b = (1. - zeta1 * zeta1 - zeta2 * zeta2) * .5; in dlaic1_()
245 *c__ = zeta1 * zeta1; in dlaic1_()
254 sine = -zeta1 / t; in dlaic1_()
341 zeta1 = alpha / absest; in dlaic1_()
344 d__3 = zeta1 * zeta1 + 1. + (d__1 = zeta1 * zeta2, f2c_abs(d__1)); in dlaic1_()
348 test = (zeta1 - zeta2) * 2. * (zeta1 + zeta2) + 1.; in dlaic1_()
352 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.) * .5; in dlaic1_()
362 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.) * .5; in dlaic1_()
363 *c__ = zeta1 * zeta1; in dlaic1_()
[all …]
H A Dzlaic1.c139 doublereal test, zeta1, zeta2; in zlaic1_() local
287 zeta1 = absalp / absest; in zlaic1_()
289 b = (1. - zeta1 * zeta1 - zeta2 * zeta2) * .5; in zlaic1_()
290 d__1 = zeta1 * zeta1; in zlaic1_()
477 zeta1 = absalp / absest; in zlaic1_()
480 d__1 = zeta1 * zeta1 + 1. + zeta1 * zeta2; in zlaic1_()
481 d__2 = zeta1 * zeta2 + zeta2 * zeta2; // , expr subst in zlaic1_()
484 test = (zeta1 - zeta2) * 2. * (zeta1 + zeta2) + 1.; in zlaic1_()
488 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.) * .5; in zlaic1_()
518 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.) * .5; in zlaic1_()
[all …]
H A Dclaic1.c139 real test, zeta1, zeta2; in claic1_() local
286 zeta1 = absalp / absest; in claic1_()
288 b = (1.f - zeta1 * zeta1 - zeta2 * zeta2) * .5f; in claic1_()
289 r__1 = zeta1 * zeta1; in claic1_()
476 zeta1 = absalp / absest; in claic1_()
479 r__1 = zeta1 * zeta1 + 1.f + zeta1 * zeta2; in claic1_()
480 r__2 = zeta1 * zeta2 + zeta2 * zeta2; // , expr subst in claic1_()
483 test = (zeta1 - zeta2) * 2.f * (zeta1 + zeta2) + 1.f; in claic1_()
487 b = (zeta1 * zeta1 + zeta2 * zeta2 + 1.f) * .5f; in claic1_()
517 b = (zeta2 * zeta2 + zeta1 * zeta1 - 1.f) * .5f; in claic1_()
[all …]
/dports/math/blis/blis-0.8.1/kernels/penryn/1f/
H A Dbli_dotaxpyv_penryn_int.c72 double* restrict zeta1; in bli_ddotaxpyv_penryn_int() local
147 zeta1 = z_cast; in bli_ddotaxpyv_penryn_int()
155 *zeta1 += alpha1c * chi1c; in bli_ddotaxpyv_penryn_int()
159 zeta1 += incz; in bli_ddotaxpyv_penryn_int()
170 z1v.v = _mm_load_pd( ( double* )zeta1 ); in bli_ddotaxpyv_penryn_int()
177 _mm_store_pd( ( double* )zeta1, z1v.v ); in bli_ddotaxpyv_penryn_int()
184 zeta1 += 2; in bli_ddotaxpyv_penryn_int()
195 *zeta1 += alpha1c * chi1c; in bli_ddotaxpyv_penryn_int()
199 zeta1 += incz; in bli_ddotaxpyv_penryn_int()
/dports/math/libflame/libflame-5.2.0/src/lapack/red/tridiagut/l/flamec/
H A DFLA_Fused_Her2_Ax_l_opt_var1.c149 float* zeta1 = buff_z + (i )*inc_z; in FLA_Fused_Her2_Ax_l_ops_var1() local
177 minus_conj_zeta1 = - *zeta1; in FLA_Fused_Her2_Ax_l_ops_var1()
180 *alpha11 -= 2.0F * *zeta1 * *upsilon1; in FLA_Fused_Her2_Ax_l_ops_var1()
269 double* zeta1 = buff_z + (i )*inc_z; in FLA_Fused_Her2_Ax_l_opd_var1() local
297 minus_conj_zeta1 = - *zeta1; in FLA_Fused_Her2_Ax_l_opd_var1()
300 *alpha11 -= 2.0 * *zeta1 * *upsilon1; in FLA_Fused_Her2_Ax_l_opd_var1()
385 alpha11->real -= zeta1->real * upsilon1->real - -zeta1->imag * upsilon1->imag + in FLA_Fused_Her2_Ax_l_opc_var1()
386 zeta1->real * upsilon1->real - zeta1->imag * -upsilon1->imag; in FLA_Fused_Her2_Ax_l_opc_var1()
387 alpha11->imag -= -zeta1->imag * upsilon1->real + zeta1->real * upsilon1->imag + in FLA_Fused_Her2_Ax_l_opc_var1()
388 zeta1->imag * upsilon1->real + zeta1->real * -upsilon1->imag; in FLA_Fused_Her2_Ax_l_opc_var1()
[all …]
/dports/science/chrono/chrono-7.0.1/src/chrono/fea/
H A DChElementTetraCorot_10.cpp112 double zeta1, in ComputeJacobian() argument
145 double zeta1, in ComputeMatrB() argument
151 ComputeJacobian(Jacobian, zeta1, zeta2, zeta3, zeta4); in ComputeMatrB()
156 mmatrB(0, 0) = (4 * zeta1 - 1) * in ComputeMatrB()
209 mmatrB(1, 1) = (4 * zeta1 - 1) * in ComputeMatrB()
262 mmatrB(2, 2) = (4 * zeta1 - 1) * in ComputeMatrB()
398 double zeta1 = 0.58541020; in ComputeStiffnessMatrix() local
403 ComputeMatrB(this->MatrB[0], zeta1, zeta2, zeta3, zeta4, JacobianDet); in ComputeStiffnessMatrix()
408 zeta1 = 0.1381966; in ComputeStiffnessMatrix()
417 zeta1 = 0.1381966; in ComputeStiffnessMatrix()
[all …]
/dports/math/libmesh/libmesh-1.6.2/src/fe/
H A Dfe_lagrange_shape_2D.C357 const Real zeta1 = p(0); in fe_lagrange_2D_shape() local
359 const Real zeta0 = 1. - zeta1 - zeta2; in fe_lagrange_2D_shape()
369 return zeta1; in fe_lagrange_2D_shape()
447 const Real zeta1 = p(0); in fe_lagrange_2D_shape() local
449 const Real zeta0 = 1. - zeta1 - zeta2; in fe_lagrange_2D_shape()
459 return 2.*zeta1*(zeta1-0.5); in fe_lagrange_2D_shape()
465 return 4.*zeta0*zeta1; in fe_lagrange_2D_shape()
468 return 4.*zeta1*zeta2; in fe_lagrange_2D_shape()
735 const Real zeta1 = p(0); in fe_lagrange_2D_shape_deriv() local
737 const Real zeta0 = 1. - zeta1 - zeta2; in fe_lagrange_2D_shape_deriv()
[all …]
H A Dfe_hierarchic_shape_2D.C354 const Real zeta1 = p(0); in fe_hierarchic_2D_shape() local
356 const Real zeta0 = 1. - zeta1 - zeta2; in fe_hierarchic_2D_shape()
365 return zeta1; in fe_hierarchic_2D_shape()
373 const Real crossval = zeta0 + zeta1; in fe_hierarchic_2D_shape()
374 const Real edgenumerator = zeta1 - zeta0; in fe_hierarchic_2D_shape()
383 const Real crossval = zeta2 + zeta1; in fe_hierarchic_2D_shape()
384 const Real edgenumerator = zeta2 - zeta1; in fe_hierarchic_2D_shape()
411 returnval *= zeta1; in fe_hierarchic_2D_shape()
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/fast/
H A Dcart_trans.F374 $ zeta1, x1, y1, z1, argument
379 $ zeta1, x1, y1, z1, local
398 zeta = (zeta1+zeta2)
400 q = (zeta1*zeta2)*rzeta
401 a = (zeta1*x1 + zeta2*x2)*rzeta
402 b = (zeta1*y1 + zeta2*y2)*rzeta
403 c = (zeta1*z1 + zeta2*z2)*rzeta
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/fast/
H A Dcart_trans.F374 $ zeta1, x1, y1, z1,
379 $ zeta1, x1, y1, z1,
398 zeta = (zeta1+zeta2)
400 q = (zeta1*zeta2)*rzeta
401 a = (zeta1*x1 + zeta2*x2)*rzeta
402 b = (zeta1*y1 + zeta2*y2)*rzeta
403 c = (zeta1*z1 + zeta2*z2)*rzeta
/dports/lang/gnu-apl/apl-1.8/src/
H A DLApack.hh940 const APL_Float zeta1 = abs_alpha / abs_estimate; in laic1_max() local
942 const APL_Float b = (1.0 - zeta1*zeta1 - zeta2*zeta2)*0.5; in laic1_max()
943 const APL_Float zeta1_2 = zeta1*zeta1; in laic1_max()
1054 const APL_Float zeta1 = abs_alpha / abs_estimate; in laic1_min() local
1057 const APL_Float norma_1 = 1.0 + zeta1*zeta1 + zeta1*zeta2; in laic1_min()
1058 const APL_Float norma_2 = zeta1*zeta2 + zeta2*zeta2; in laic1_min()
1061 const APL_Float test = 1.0 + 2.0*(zeta1-zeta2)*(zeta1+zeta2); in laic1_min()
1068 const APL_Float b = (zeta1*zeta1 + zeta2*zeta2 + 1.0)*0.5; in laic1_min()
1079 const APL_Float b = (zeta2*zeta2 + zeta1*zeta1 - 1.0)*0.5; in laic1_min()
1080 const APL_Float zeta1_2 = zeta1*zeta1; in laic1_min()
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dpao_potentials.F115 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
176 zeta1 => basis_set%zet(:, iset)
192 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
201 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
H A Dpao_linpot_rotinv.F132 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
180 zeta1 => basis_set%zet(:, iset)
224 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
345 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
418 zeta1 => basis_set%zet(:, iset)
469 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dpao_potentials.F115 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
176 zeta1 => basis_set%zet(:, iset)
192 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
201 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
H A Dpao_linpot_rotinv.F132 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
180 zeta1 => basis_set%zet(:, iset)
224 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
345 … REAL(dp), DIMENSION(:), POINTER :: rpgfa1, rpgfa2, rpgfb, zeta1, zeta2, zetb local
418 zeta1 => basis_set%zet(:, iset)
469 … CALL overlap_aab(la1_max=la1_max, la1_min=la1_min, npgfa1=npgfa1, rpgfa1=rpgfa1, zeta1=zeta1, &
/dports/science/nwchem-data/nwchem-7.0.2-release/src/solvation/
H A Dgrad_hnd_cos.F114 double precision zeta1, zeta2, zeta12
354 zeta1 = zeta*sqrt(ptspatm)
386 fact = fact - 2.0d0*zeta1*sqrt(2.0d0/pi)*invscreen
414 zeta1 = zeta*sqrt(ptspatm)
423 zeta12 = zeta1*zeta2/sqrt(zeta1**2+zeta2**2)
/dports/science/pcmsolver/pcmsolver-1.3.0/src/green/
H A DSphericalDiffuse.cpp312 double zeta1 = 0.0, zeta2 = 0.0, d_zeta2 = 0.0; in imagePotentialComponent_impl() local
314 std::tie(zeta1, std::ignore) = zeta_[L](y1); in imagePotentialComponent_impl()
333 gr12 = std::exp(zeta1 - zeta2) * (2 * L + 1) / denominator; in imagePotentialComponent_impl()
361 double zeta1 = 0.0, zeta2 = 0.0, d_zeta2 = 0.0; in coefficient_impl() local
363 std::tie(zeta1, std::ignore) = zetaC_(y1); in coefficient_impl()
386 tmp = std::exp(zeta1 - zeta2) * (2 * maxLC_ + 1) / denominator; in coefficient_impl()

1234