Home
last modified time | relevance | path

Searched refs:alphai (Results 1 – 25 of 538) sorted by relevance

12345678910>>...22

/dports/databases/jdb/jdb-1.14/
H A DDbTDistr.pm149 my($alphai);
150 for ($alphai = 0; $alphai <= $#t_alphas; $alphai++) {
151 last if ($t_alphas[$alphai] <= $alpha);
154 if ($alphai > $#t_alphas);
158 my($alpha_left) = $t_alphas[$alphai-1];
159 my($alpha_right) = $t_alphas[$alphai];
160 if (floats_equal($t_alphas[$alphai], $alpha)) {
/dports/science/cdk/cdk-cdk-2.3/legacy/src/main/java/org/openscience/cdk/math/qm/
H A DGaussiansBasis.java324 …return Math.exp(-((alphai * alphaj) / (alphai + alphaj)) * (dx * dx + dy * dy + dz * dz)) * normi … in calcD()
337 double alphaij = alphai + alphaj; in calcI()
375 …return -4d * alphai * alphai * calcI(ni + 2, nj, alphai, alphaj, xi, xj) + 2d * alphai * (2 * ni +… in calcJ()
378 return -4d * alphai * alphai * calcI(3, nj, alphai, alphaj, xi, xj) + 6d * alphai in calcJ()
381 return -4d * alphai * alphai * calcI(2, nj, alphai, alphaj, xi, xj) + 2d * alphai in calcJ()
409 …return ((n - 1) / (2 * (alphai + alphaj))) * calcG(n - 2, t, alphai, alphaj, xi, xj, xN) - (n - 1)… in calcG()
411 + (((alphai * xi + alphaj * xj) / (alphai + alphaj)) - xi) in calcG()
413 + (((alphai * xi + alphaj * xj) / (alphai + alphaj)) - xN) * t * t in calcG()
417 …return (((alphai * xi + alphaj * xj) / (alphai + alphaj)) - xi) * calcG(0, t, alphai, alphaj, xi, … in calcG()
418 + (((alphai * xi + alphaj * xj) / (alphai + alphaj)) - xN) * t * t in calcG()
[all …]
/dports/math/openblas/OpenBLAS-0.3.18/kernel/mips/
H A Dcgemm_kernel_8x4_msa.c699 pc0[0] -= alphai * res1; \
701 pc0[1] += alphai * res0; \
703 pc0[2] -= alphai * res3; \
705 pc0[3] += alphai * res2; \
709 pc1[0] -= alphai * res5; \
711 pc1[1] += alphai * res4; \
713 pc1[2] -= alphai * res7; \
715 pc1[3] += alphai * res6; \
721 pc0[0] -= alphai * res1; \
723 pc0[1] += alphai * res0; \
[all …]
/dports/audio/fdk-aac/fdk-aac-2.0.2/libSBRdec/src/
H A Dlpp_tran.cpp303 alphai[0] = FL2FXCONST_SGL(0.0f); in lppTransposer()
304 alphai[1] = FL2FXCONST_SGL(0.0f); in lppTransposer()
562 alphai[1] = -alphai[1]; in lppTransposer()
621 alphai[0] = -alphai[0]; in lppTransposer()
628 if ((fMultDiv2(alphar[0], alphar[0]) + fMultDiv2(alphai[0], alphai[0])) >= in lppTransposer()
631 if ((fMultDiv2(alphar[1], alphar[1]) + fMultDiv2(alphai[1], alphai[1])) >= in lppTransposer()
908 alphai[0] = FL2FXCONST_SGL(0.0f); in lppTransposerHBE()
1097 alphai[1] = -alphai[1]; in lppTransposerHBE()
1145 alphai[0] = -alphai[0]; in lppTransposerHBE()
1151 if ((fMultDiv2(alphar[0], alphar[0]) + fMultDiv2(alphai[0], alphai[0])) >= in lppTransposerHBE()
[all …]
/dports/multimedia/handbrake/fdk-aac-2.0.1/libSBRdec/src/
H A Dlpp_tran.cpp303 alphai[0] = FL2FXCONST_SGL(0.0f); in lppTransposer()
304 alphai[1] = FL2FXCONST_SGL(0.0f); in lppTransposer()
544 alphai[1] = -alphai[1]; in lppTransposer()
603 alphai[0] = -alphai[0]; in lppTransposer()
610 if ((fMultDiv2(alphar[0], alphar[0]) + fMultDiv2(alphai[0], alphai[0])) >= in lppTransposer()
613 if ((fMultDiv2(alphar[1], alphar[1]) + fMultDiv2(alphai[1], alphai[1])) >= in lppTransposer()
890 alphai[0] = FL2FXCONST_SGL(0.0f); in lppTransposerHBE()
1079 alphai[1] = -alphai[1]; in lppTransposerHBE()
1127 alphai[0] = -alphai[0]; in lppTransposerHBE()
1133 if ((fMultDiv2(alphar[0], alphar[0]) + fMultDiv2(alphai[0], alphai[0])) >= in lppTransposerHBE()
[all …]
/dports/science/tinker/tinker/source/
H A Dechgtrn2.f47 real*8 alphai,alphak local
98 alphai = dmpct(ii)
99 if (alphai .eq. 0.0d0) alphai = 1000.0d0
100 alphai2 = alphai * alphai
140 expi = exp(-alphai*r)
147 alphaik = 0.5d0 * (alphai+alphak)
246 alphai = dmpct(ii)
247 if (alphai .eq. 0.0d0) alphai = 1000.0d0
248 alphai2 = alphai * alphai
289 expi = exp(-alphai*r)
[all …]
H A Dechgtrn.f72 real*8 alphai,alphak local
110 alphai = dmpct(ii)
111 if (alphai .eq. 0.0d0) alphai = 1000.0d0
210 alphai = dmpct(ii)
211 if (alphai .eq. 0.0d0) alphai = 1000.0d0
347 real*8 alphai,alphak local
406 alphai = dmpct(ii)
407 if (alphai .eq. 0.0d0) alphai = 1000.0d0
583 real*8 alphai,alphak local
630 alphai = dmpct(ii)
[all …]
H A Dechgtrn1.f73 real*8 alphai,alphak local
120 alphai = dmpct(ii)
121 if (alphai .eq. 0.0d0) alphai = 1000.0d0
160 expi = exp(-alphai*r)
261 alphai = dmpct(ii)
262 if (alphai .eq. 0.0d0) alphai = 1000.0d0
302 expi = exp(-alphai*r)
445 real*8 alphai,alphak local
502 alphai = dmpct(ii)
503 if (alphai .eq. 0.0d0) alphai = 1000.0d0
[all …]
H A Dechgtrn3.f81 real*8 alphai,alphak local
135 alphai = dmpct(ii)
136 if (alphai .eq. 0.0d0) alphai = 1000.0d0
264 alphai = dmpct(ii)
265 if (alphai .eq. 0.0d0) alphai = 1000.0d0
442 real*8 alphai,alphak local
517 alphai = dmpct(ii)
518 if (alphai .eq. 0.0d0) alphai = 1000.0d0
732 real*8 alphai,alphak local
796 alphai = dmpct(ii)
[all …]
/dports/audio/praat/praat-6.2.03/dwsys/
H A DNUMcomplex.cpp83 const dcomplex alphai = *alpha + di; in xShiftTerm() local
85 *p = 1.0 / alphai; in xShiftTerm()
95 if (real (alphai * cdlx) > xlim && i != 0) { in xShiftTerm()
96 *p *= (alphai - 1.0) / alphai; in xShiftTerm()
100 if (norm1 (& alphai) > tol) in xShiftTerm()
101 *p = (1.0 - std::pow (*x, alphai)) / alphai; in xShiftTerm()
103 *p = -cdlx * (1.0 + cdlx * alphai * 0.5); in xShiftTerm()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/
H A Ddgges.c365 --alphai; in dgges_()
619 bwork[i__] = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dgges_()
649 if (alphai[i__] != 0.) in dgges_()
656 alphai[i__] *= work[1]; in dgges_()
658 … else if (alphai[i__] / safmax > anrmto / anrm || safmin / alphai[i__] > anrm / anrmto) in dgges_()
663 alphai[i__] *= work[1]; in dgges_()
676 if (alphai[i__] != 0.) in dgges_()
683 alphai[i__] *= work[1]; in dgges_()
694 dlascl_("G", &c__0, &c__0, &anrmto, &anrm, n, &c__1, &alphai[1], n, & ierr); in dgges_()
713 cursl = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dgges_()
[all …]
H A Dsgges.c367 --alphai; in sgges_()
621 bwork[i__] = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in sgges_()
651 if (alphai[i__] != 0.f) in sgges_()
658 alphai[i__] *= work[1]; in sgges_()
660 … else if (alphai[i__] / safmax > anrmto / anrm || safmin / alphai[i__] > anrm / anrmto) in sgges_()
665 alphai[i__] *= work[1]; in sgges_()
678 if (alphai[i__] != 0.f) in sgges_()
685 alphai[i__] *= work[1]; in sgges_()
696 slascl_("G", &c__0, &c__0, &anrmto, &anrm, n, &c__1, &alphai[1], n, & ierr); in sgges_()
715 cursl = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in sgges_()
[all …]
H A Ddggesx.c456 --alphai; in dggesx_()
761 bwork[i__] = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dggesx_()
818 if (alphai[i__] != 0.) in dggesx_()
825 alphai[i__] *= work[1]; in dggesx_()
827 … else if (alphai[i__] / safmax > anrmto / anrm || safmin / alphai[i__] > anrm / anrmto) in dggesx_()
832 alphai[i__] *= work[1]; in dggesx_()
845 if (alphai[i__] != 0.) in dggesx_()
852 alphai[i__] *= work[1]; in dggesx_()
863 dlascl_("G", &c__0, &c__0, &anrmto, &anrm, n, &c__1, &alphai[1], n, & ierr); in dggesx_()
882 cursl = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dggesx_()
[all …]
H A Dsggesx.c453 --alphai; in sggesx_()
758 bwork[i__] = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in sggesx_()
815 if (alphai[i__] != 0.f) in sggesx_()
822 alphai[i__] *= work[1]; in sggesx_()
824 … else if (alphai[i__] / safmax > anrmto / anrm || safmin / alphai[i__] > anrm / anrmto) in sggesx_()
829 alphai[i__] *= work[1]; in sggesx_()
842 if (alphai[i__] != 0.f) in sggesx_()
849 alphai[i__] *= work[1]; in sggesx_()
860 slascl_("G", &c__0, &c__0, &anrmto, &anrm, n, &c__1, &alphai[1], n, & ierr); in sggesx_()
879 cursl = (*selctg)(&alphar[i__], &alphai[i__], &beta[i__]); in sggesx_()
[all …]
H A Dsgegv.c381 --alphai; in sgegv_()
708 if (alphai[jc] < 0.f) in sgegv_()
713 if (alphai[jc] == 0.f) in sgegv_()
746 if (alphai[jc] == 0.f) in sgegv_()
786 if (alphai[jc] < 0.f) in sgegv_()
791 if (alphai[jc] == 0.f) in sgegv_()
824 if (alphai[jc] == 0.f) in sgegv_()
867 salfai = anrm * alphai[jc]; in sgegv_()
890 alphai[jc - 1] = 0.f; in sgegv_()
894 alphai[jc + 1] = 0.f; in sgegv_()
[all …]
H A Ddgegv.c381 --alphai; in dgegv_()
708 if (alphai[jc] < 0.) in dgegv_()
713 if (alphai[jc] == 0.) in dgegv_()
746 if (alphai[jc] == 0.) in dgegv_()
786 if (alphai[jc] < 0.) in dgegv_()
791 if (alphai[jc] == 0.) in dgegv_()
824 if (alphai[jc] == 0.) in dgegv_()
867 salfai = anrm * alphai[jc]; in dgegv_()
890 alphai[jc - 1] = 0.; in dgegv_()
894 alphai[jc + 1] = 0.; in dgegv_()
[all …]
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/
H A Ddgges.c30 integer *ldb, integer *sdim, doublereal *alphar, doublereal *alphai, in dgges_() argument
326 --alphai; in dgges_()
695 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in dgges_()
731 if (alphai[i__] != 0.) { in dgges_()
743 alphai[i__] *= work[1]; in dgges_()
746 alphai[i__] > anrm / anrmto) { in dgges_()
755 alphai[i__] *= work[1]; in dgges_()
772 if (alphai[i__] != 0.) { in dgges_()
784 alphai[i__] *= work[1]; in dgges_()
839 cursl = (*delctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dgges_()
[all …]
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/
H A Dsgges.c18 integer *sdim, real *alphar, real *alphai, real *beta, real *vsl, in sgges_() argument
287 --alphai; in sgges_()
531 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in sgges_()
560 if (alphai[i__] != 0.f) { in sgges_()
567 alphai[i__] *= work[1]; in sgges_()
569 alphai[i__] > anrm / anrmto) { in sgges_()
570 work[1] = (r__1 = a[i__ + (i__ + 1) * a_dim1] / alphai[ in sgges_()
574 alphai[i__] *= work[1]; in sgges_()
584 if (alphai[i__] != 0.f) { in sgges_()
591 alphai[i__] *= work[1]; in sgges_()
[all …]
H A Ddgges.c18 integer *ldb, integer *sdim, doublereal *alphar, doublereal *alphai, in dgges_() argument
292 --alphai; in dgges_()
536 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in dgges_()
565 if (alphai[i__] != 0.) { in dgges_()
572 alphai[i__] *= work[1]; in dgges_()
574 alphai[i__] > anrm / anrmto) { in dgges_()
575 work[1] = (d__1 = a[i__ + (i__ + 1) * a_dim1] / alphai[ in dgges_()
579 alphai[i__] *= work[1]; in dgges_()
589 if (alphai[i__] != 0.) { in dgges_()
596 alphai[i__] *= work[1]; in dgges_()
[all …]
H A Dsggesx.c18 integer *ldb, integer *sdim, real *alphar, real *alphai, real *beta, in sggesx_() argument
330 --alphai; in sggesx_()
608 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in sggesx_()
654 if (alphai[i__] != 0.f) { in sggesx_()
661 alphai[i__] *= work[1]; in sggesx_()
663 alphai[i__] > anrm / anrmto) { in sggesx_()
664 work[1] = (r__1 = a[i__ + (i__ + 1) * a_dim1] / alphai[ in sggesx_()
668 alphai[i__] *= work[1]; in sggesx_()
678 if (alphai[i__] != 0.f) { in sggesx_()
685 alphai[i__] *= work[1]; in sggesx_()
[all …]
H A Ddggesx.c19 doublereal *alphai, doublereal *beta, doublereal *vsl, integer *ldvsl, in dggesx_() argument
337 --alphai; in dggesx_()
615 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in dggesx_()
661 if (alphai[i__] != 0.) { in dggesx_()
668 alphai[i__] *= work[1]; in dggesx_()
670 alphai[i__] > anrm / anrmto) { in dggesx_()
671 work[1] = (d__1 = a[i__ + (i__ + 1) * a_dim1] / alphai[ in dggesx_()
675 alphai[i__] *= work[1]; in dggesx_()
685 if (alphai[i__] != 0.) { in dggesx_()
692 alphai[i__] *= work[1]; in dggesx_()
[all …]
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/
H A Ddgges.c30 integer *ldb, integer *sdim, doublereal *alphar, doublereal *alphai, in dgges_() argument
326 --alphai; in dgges_()
695 b_offset], ldb, &alphar[1], &alphai[1], &beta[1], &vsl[ in dgges_()
731 if (alphai[i__] != 0.) { in dgges_()
743 alphai[i__] *= work[1]; in dgges_()
746 alphai[i__] > anrm / anrmto) { in dgges_()
755 alphai[i__] *= work[1]; in dgges_()
772 if (alphai[i__] != 0.) { in dgges_()
784 alphai[i__] *= work[1]; in dgges_()
839 cursl = (*delctg)(&alphar[i__], &alphai[i__], &beta[i__]); in dgges_()
[all …]
/dports/math/xtensor-blas/xtensor-blas-0.20.0/include/xflens/cxxlapack/interface/
H A Dlagv2.tcc49 float *alphai, in lagv2() argument
63 alphai, in lagv2()
79 double *alphai, in lagv2() argument
93 alphai, in lagv2()
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/core/vnl/algo/
H A Dvnl_generalized_schur.cxx16 vnl_vector<double> *alphai, in vnl_generalized_schur() argument
27 assert(alphai!=nullptr); alphai->set_size(n); alphai->fill(0); in vnl_generalized_schur()
46 alphai->data_block(), in vnl_generalized_schur()
/dports/misc/vxl/vxl-3.3.2/core/vnl/algo/
H A Dvnl_generalized_schur.cxx17 vnl_vector<double> * alphai, in vnl_generalized_schur() argument
30 assert(alphai != nullptr); in vnl_generalized_schur()
31 alphai->set_size(n); in vnl_generalized_schur()
32 alphai->fill(0); in vnl_generalized_schur()
60 alphai->data_block(), in vnl_generalized_schur()

12345678910>>...22