/dports/science/gromacs/gromacs-2021.4/src/gromacs/linearalgebra/gmx_lapack/ |
H A D | slasd4.cpp | 31 float temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, in F77_FUNC() local 301 sg2ub = delsq2; in F77_FUNC() 314 sg2ub = 0.; in F77_FUNC() 397 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC() 477 if (temp > sg2ub || temp < sg2lb) { in F77_FUNC() 479 eta = (sg2ub - tau) / 2.; in F77_FUNC() 529 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC() 648 if (temp > sg2ub || temp < sg2lb) { in F77_FUNC() 650 eta = (sg2ub - tau) / 2.; in F77_FUNC() 703 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC()
|
H A D | dlasd4.cpp | 31 double temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, in F77_FUNC() local 301 sg2ub = delsq2; in F77_FUNC() 314 sg2ub = 0.; in F77_FUNC() 397 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC() 477 if (temp > sg2ub || temp < sg2lb) { in F77_FUNC() 479 eta = (sg2ub - tau) / 2.; in F77_FUNC() 529 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC() 648 if (temp > sg2ub || temp < sg2lb) { in F77_FUNC() 650 eta = (sg2ub - tau) / 2.; in F77_FUNC() 703 sg2ub = (sg2ub < tau) ? sg2ub : tau; in F77_FUNC()
|
/dports/misc/visp/visp-3.4.0/3rdparty/clapack/src/ |
H A D | dlasd4.c | 38 doublereal temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, dtiip; in dlasd4_() local 513 sg2ub = delsq2; in dlasd4_() 537 sg2ub = 0.; in dlasd4_() 641 sg2ub = min(sg2ub,tau); in dlasd4_() 735 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 737 eta = (sg2ub - tau) / 2.; in dlasd4_() 794 sg2ub = min(sg2ub,tau); in dlasd4_() 931 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 933 eta = (sg2ub - tau) / 2.; in dlasd4_() 993 sg2ub = min(sg2ub,tau); in dlasd4_()
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | slasd4.c | 29 static real temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, dtiip; in slasd4_() local 506 sg2ub = delsq2; in slasd4_() 530 sg2ub = 0.f; in slasd4_() 634 sg2ub = dmin(sg2ub,tau); in slasd4_() 728 if (temp > sg2ub || temp < sg2lb) { in slasd4_() 730 eta = (sg2ub - tau) / 2.f; in slasd4_() 787 sg2ub = dmin(sg2ub,tau); in slasd4_() 924 if (temp > sg2ub || temp < sg2lb) { in slasd4_() 926 eta = (sg2ub - tau) / 2.f; in slasd4_() 986 sg2ub = dmin(sg2ub,tau); in slasd4_()
|
H A D | dlasd4.c | 30 static doublereal temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, in dlasd4_() local 507 sg2ub = delsq2; in dlasd4_() 531 sg2ub = 0.; in dlasd4_() 635 sg2ub = min(sg2ub,tau); in dlasd4_() 729 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 731 eta = (sg2ub - tau) / 2.; in dlasd4_() 788 sg2ub = min(sg2ub,tau); in dlasd4_() 925 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 927 eta = (sg2ub - tau) / 2.; in dlasd4_() 987 sg2ub = min(sg2ub,tau); in dlasd4_()
|
/dports/math/maxima/maxima-5.43.2/share/lapack/lapack/ |
H A D | dlasd4.lisp | 51 (psi 0.0) (rhoinv 0.0) (sg2lb 0.0) (sg2ub 0.0) (tau 0.0) 58 eta phi prew psi rhoinv sg2lb sg2ub tau 642 (setf sg2ub delsq2) 679 (setf sg2ub zero) 834 (setf sg2ub (min sg2ub tau)))) 1054 ((or (> temp sg2ub) (< temp sg2lb)) 1057 (setf eta (/ (- sg2ub tau) two))) 1143 (setf sg2ub (min sg2ub tau)))) 1450 ((or (> temp sg2ub) (< temp sg2lb)) 1453 (setf eta (/ (- sg2ub tau) two))) [all …]
|
/dports/science/plumed/plumed2-2.7.2/src/lapack/ |
H A D | lapack.cpp | 7551 sg2ub = delsq2; in PLUMED_BLAS_F77_FUNC() 7564 sg2ub = 0.; in PLUMED_BLAS_F77_FUNC() 7647 sg2ub = (sg2ub < tau) ? sg2ub : tau; in PLUMED_BLAS_F77_FUNC() 7729 eta = (sg2ub - tau) / 2.; in PLUMED_BLAS_F77_FUNC() 7779 sg2ub = (sg2ub < tau) ? sg2ub : tau; in PLUMED_BLAS_F77_FUNC() 7953 sg2ub = (sg2ub < tau) ? sg2ub : tau; in PLUMED_BLAS_F77_FUNC() 23154 sg2ub = delsq2; in PLUMED_BLAS_F77_FUNC() 23167 sg2ub = 0.; in PLUMED_BLAS_F77_FUNC() 23250 sg2ub = (sg2ub < tau) ? sg2ub : tau; in PLUMED_BLAS_F77_FUNC() 23382 sg2ub = (sg2ub < tau) ? sg2ub : tau; in PLUMED_BLAS_F77_FUNC() [all …]
|
/dports/audio/praat/praat-6.2.03/external/clapack/ |
H A D | lapack_dlar.cpp | 10507 double temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, dtiip; in dlasd4_() local 10977 sg2ub = delsq2; in dlasd4_() 11001 sg2ub = 0.; in dlasd4_() 11105 sg2ub = std::min(sg2ub,tau); in dlasd4_() 11199 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 11201 eta = (sg2ub - tau) / 2.; in dlasd4_() 11258 sg2ub = std::min(sg2ub,tau); in dlasd4_() 11395 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 11397 eta = (sg2ub - tau) / 2.; in dlasd4_() 11457 sg2ub = std::min(sg2ub,tau); in dlasd4_()
|
/dports/math/py-numpy/numpy-1.20.3/numpy/linalg/lapack_lite/ |
H A D | f2c_d_lapack.c | 25667 static doublereal temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, in dlasd4_() local 26145 sg2ub = delsq2; in dlasd4_() 26173 sg2ub = 0.; in dlasd4_() 26281 sg2ub = min(sg2ub,tau); in dlasd4_() 26377 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 26379 eta = (sg2ub - tau) / 2.; in dlasd4_() 26436 sg2ub = min(sg2ub,tau); in dlasd4_() 26575 if (temp > sg2ub || temp < sg2lb) { in dlasd4_() 26577 eta = (sg2ub - tau) / 2.; in dlasd4_() 26637 sg2ub = min(sg2ub,tau); in dlasd4_()
|
H A D | f2c_s_lapack.c | 25573 static real temp, prew, sg2lb, sg2ub, temp1, temp2, dtiim, delsq, dtiip; in slasd4_() local 26051 sg2ub = delsq2; in slasd4_() 26079 sg2ub = 0.f; in slasd4_() 26187 sg2ub = dmin(sg2ub,tau); in slasd4_() 26283 if (temp > sg2ub || temp < sg2lb) { in slasd4_() 26285 eta = (sg2ub - tau) / 2.f; in slasd4_() 26342 sg2ub = dmin(sg2ub,tau); in slasd4_() 26481 if (temp > sg2ub || temp < sg2lb) { in slasd4_() 26483 eta = (sg2ub - tau) / 2.f; in slasd4_() 26543 sg2ub = dmin(sg2ub,tau); in slasd4_()
|