/dports/math/libflame/libflame-5.2.0/src/lapack/dec/bsvd/v/flamec/ |
H A D | FLA_Bsvd_francis_v_opt_var1.c | 91 float sn, oldsn = 0.0F; in FLA_Bsvd_francis_v_ops_var1() local 120 if ( i > 0 ) *alpha01 = oldsn * r; in FLA_Bsvd_francis_v_ops_var1() 127 &oldsn, in FLA_Bsvd_francis_v_ops_var1() 133 *sigmaL = oldsn; in FLA_Bsvd_francis_v_ops_var1() 138 *e_last = temp * oldsn; in FLA_Bsvd_francis_v_ops_var1() 276 double sn, oldsn = 0; in FLA_Bsvd_francis_v_opd_var1() local 305 if ( i > 0 ) *alpha01 = oldsn * r; in FLA_Bsvd_francis_v_opd_var1() 312 &oldsn, in FLA_Bsvd_francis_v_opd_var1() 318 *sigmaL = oldsn; in FLA_Bsvd_francis_v_opd_var1() 323 *e_last = temp * oldsn; in FLA_Bsvd_francis_v_opd_var1()
|
/dports/lang/yorick/yorick-y_2_2_04/matrix/ |
H A D | dbdsqr.c | 573 work_1( 1+nm13 ) = oldsn; in dbdsqr() 577 e_1( i-1 ) = oldsn*r; in dbdsqr() 584 work_1( irot+nm13 ) = oldsn; in dbdsqr() 588 e_1( m-1 ) = h*oldsn; in dbdsqr() 611 e_1( i-1 ) = oldsn*r; in dbdsqr() 617 e_1( m-1 ) = h*oldsn; in dbdsqr() 642 work_1( m-ll+nm13 ) = -oldsn; in dbdsqr() 646 e_1( i ) = oldsn*r; in dbdsqr() 657 e_1( ll ) = h*oldsn; in dbdsqr() 678 e_1( i ) = oldsn*r; in dbdsqr() [all …]
|
/dports/sysutils/restic/restic-0.12.1/cmd/restic/ |
H A D | cmd_find.go | 114 oldsn *restic.Snapshot member 147 if s.newsn != s.oldsn { 148 if s.oldsn != nil { 149 Printf("],\"hits\":%d,\"snapshot\":%q},", s.hits, s.oldsn.ID()) 152 s.oldsn = s.newsn 163 if s.newsn != s.oldsn { 164 if s.oldsn != nil { 167 s.oldsn = s.newsn 168 …Verbosef("Found matching entries in snapshot %s from %s\n", s.oldsn.ID().Str(), s.oldsn.Time.Local… 235 if s.oldsn != nil { [all …]
|
/dports/security/aws-iam-authenticator/aws-iam-authenticator-0.5.2/vendor/gonum.org/v1/gonum/lapack/gonum/ |
H A D | dbdsqr.go | 317 var sn, r, oldsn float64 321 e[i-1] = oldsn * r 323 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i+1]*sn) 327 work[i-l2+nm13] = oldsn 331 e[m-2] = h * oldsn 347 var sn, r, oldsn float64 351 e[i] = oldsn * r 353 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i-1]*sn) 357 work[i-l2+nm13-1] = -oldsn 361 e[l2] = h * oldsn
|
/dports/www/carbonapi/carbonapi-0.14.1/vendor/gonum.org/v1/gonum/lapack/gonum/ |
H A D | dbdsqr.go | 317 var sn, r, oldsn float64 321 e[i-1] = oldsn * r 323 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i+1]*sn) 327 work[i-l2+nm13] = oldsn 331 e[m-2] = h * oldsn 347 var sn, r, oldsn float64 351 e[i] = oldsn * r 353 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i-1]*sn) 357 work[i-l2+nm13-1] = -oldsn 361 e[l2] = h * oldsn
|
/dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/lapack/gonum/ |
H A D | dbdsqr.go | 317 var sn, r, oldsn float64 321 e[i-1] = oldsn * r 323 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i+1]*sn) 327 work[i-l2+nm13] = oldsn 331 e[m-2] = h * oldsn 347 var sn, r, oldsn float64 351 e[i] = oldsn * r 353 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i-1]*sn) 357 work[i-l2+nm13-1] = -oldsn 361 e[l2] = h * oldsn
|
/dports/sysutils/kubectl/kubernetes-1.22.2/vendor/gonum.org/v1/gonum/lapack/gonum/ |
H A D | dbdsqr.go | 317 var sn, r, oldsn float64 321 e[i-1] = oldsn * r 323 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i+1]*sn) 327 work[i-l2+nm13] = oldsn 331 e[m-2] = h * oldsn 347 var sn, r, oldsn float64 351 e[i] = oldsn * r 353 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i-1]*sn) 357 work[i-l2+nm13-1] = -oldsn 361 e[l2] = h * oldsn
|
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/lapack/gonum/ |
H A D | dbdsqr.go | 317 var sn, r, oldsn float64 321 e[i-1] = oldsn * r 323 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i+1]*sn) 327 work[i-l2+nm13] = oldsn 331 e[m-2] = h * oldsn 347 var sn, r, oldsn float64 351 e[i] = oldsn * r 353 oldcs, oldsn, d[i] = impl.Dlartg(oldcs*r, d[i-1]*sn) 357 work[i-l2+nm13-1] = -oldsn 361 e[l2] = h * oldsn
|
/dports/misc/visp/visp-3.4.0/3rdparty/clapack/src/ |
H A D | dbdsqr.c | 61 doublereal shift, sigmn, oldsn; in dbdsqr_() local 628 e[i__ - 1] = oldsn * r__; in dbdsqr_() 632 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 636 work[i__ - ll + 1 + nm13] = oldsn; in dbdsqr_() 641 e[m - 1] = h__ * oldsn; in dbdsqr_() 679 e[i__] = oldsn * r__; in dbdsqr_() 683 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 687 work[i__ - ll + nm13] = -oldsn; in dbdsqr_() 692 e[ll] = h__ * oldsn; in dbdsqr_()
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | zbdsqr.c | 48 static doublereal shift, sigmn, oldsn; in zbdsqr_() local 603 e[i__ - 1] = oldsn * r__; in zbdsqr_() 607 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in zbdsqr_() 611 rwork[i__ - ll + 1 + nm13] = oldsn; in zbdsqr_() 616 e[m - 1] = h__ * oldsn; in zbdsqr_() 656 e[i__] = oldsn * r__; in zbdsqr_() 660 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in zbdsqr_() 664 rwork[i__ - ll + nm13] = -oldsn; in zbdsqr_() 669 e[ll] = h__ * oldsn; in zbdsqr_()
|
H A D | dbdsqr.c | 54 static doublereal shift, sigmn, oldsn; in dbdsqr_() local 605 e[i__ - 1] = oldsn * r__; in dbdsqr_() 609 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 613 work[i__ - ll + 1 + nm13] = oldsn; in dbdsqr_() 618 e[m - 1] = h__ * oldsn; in dbdsqr_() 658 e[i__] = oldsn * r__; in dbdsqr_() 662 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 666 work[i__ - ll + nm13] = -oldsn; in dbdsqr_() 671 e[ll] = h__ * oldsn; in dbdsqr_()
|
H A D | cbdsqr.c | 52 static real shift, sigmn, oldsn; in cbdsqr_() local 606 e[i__ - 1] = oldsn * r__; in cbdsqr_() 610 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in cbdsqr_() 614 rwork[i__ - ll + 1 + nm13] = oldsn; in cbdsqr_() 619 e[m - 1] = h__ * oldsn; in cbdsqr_() 659 e[i__] = oldsn * r__; in cbdsqr_() 663 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in cbdsqr_() 667 rwork[i__ - ll + nm13] = -oldsn; in cbdsqr_() 672 e[ll] = h__ * oldsn; in cbdsqr_()
|
H A D | sbdsqr.c | 51 static real shift, sigmn, oldsn; in sbdsqr_() local 606 e[i__ - 1] = oldsn * r__; in sbdsqr_() 610 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in sbdsqr_() 614 work[i__ - ll + 1 + nm13] = oldsn; in sbdsqr_() 619 e[m - 1] = h__ * oldsn; in sbdsqr_() 659 e[i__] = oldsn * r__; in sbdsqr_() 663 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in sbdsqr_() 667 work[i__ - ll + nm13] = -oldsn; in sbdsqr_() 672 e[ll] = h__ * oldsn; in sbdsqr_()
|
/dports/science/hypre/hypre-2.23.0/src/lapack/ |
H A D | dbdsqr.c | 59 static doublereal shift, sigmn, oldsn; in dbdsqr_() local 606 e[i__ - 1] = oldsn * r__; in dbdsqr_() 610 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 614 work[i__ - ll + 1 + nm13] = oldsn; in dbdsqr_() 619 e[m - 1] = h__ * oldsn; in dbdsqr_() 657 e[i__] = oldsn * r__; in dbdsqr_() 661 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 665 work[i__ - ll + nm13] = -oldsn; in dbdsqr_() 670 e[ll] = h__ * oldsn; in dbdsqr_()
|
/dports/science/gromacs/gromacs-2021.4/src/gromacs/linearalgebra/gmx_lapack/ |
H A D | dbdsqr.cpp | 51 double shift, sigmn, oldsn = 0.; in F77_FUNC() local 329 e[i__ - 1] = oldsn * r__; in F77_FUNC() 333 F77_FUNC(dlartg,DLARTG)(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in F77_FUNC() 337 work[i__ - ll + 1 + nm13] = oldsn; in F77_FUNC() 341 e[m - 1] = h__ * oldsn; in F77_FUNC() 368 e[i__] = oldsn * r__; in F77_FUNC() 372 F77_FUNC(dlartg,DLARTG)(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in F77_FUNC() 376 work[i__ - ll + nm13] = -oldsn; in F77_FUNC() 380 e[ll] = h__ * oldsn; in F77_FUNC()
|
H A D | sbdsqr.cpp | 51 float shift, sigmn, oldsn = 0.; in F77_FUNC() local 329 e[i__ - 1] = oldsn * r__; in F77_FUNC() 333 F77_FUNC(slartg,SLARTG)(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in F77_FUNC() 337 work[i__ - ll + 1 + nm13] = oldsn; in F77_FUNC() 341 e[m - 1] = h__ * oldsn; in F77_FUNC() 368 e[i__] = oldsn * r__; in F77_FUNC() 372 F77_FUNC(slartg,SLARTG)(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in F77_FUNC() 376 work[i__ - ll + nm13] = -oldsn; in F77_FUNC() 380 e[ll] = h__ * oldsn; in F77_FUNC()
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | dbdsqr.c | 256 doublereal shift, sigmn, oldsn; in dbdsqr_() local 692 e[i__ - 1] = oldsn * r__; in dbdsqr_() 696 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 700 work[i__ - ll + 1 + nm13] = oldsn; in dbdsqr_() 705 e[m - 1] = h__ * oldsn; in dbdsqr_() 743 e[i__] = oldsn * r__; in dbdsqr_() 747 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in dbdsqr_() 751 work[i__ - ll + nm13] = -oldsn; in dbdsqr_() 756 e[ll] = h__ * oldsn; in dbdsqr_()
|
H A D | zbdsqr.c | 247 doublereal shift, sigmn, oldsn; in zbdsqr_() local 681 e[i__ - 1] = oldsn * r__; in zbdsqr_() 685 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in zbdsqr_() 689 rwork[i__ - ll + 1 + nm13] = oldsn; in zbdsqr_() 694 e[m - 1] = h__ * oldsn; in zbdsqr_() 732 e[i__] = oldsn * r__; in zbdsqr_() 736 dlartg_(&d__1, &d__2, &oldcs, &oldsn, &d__[i__]); in zbdsqr_() 740 rwork[i__ - ll + nm13] = -oldsn; in zbdsqr_() 745 e[ll] = h__ * oldsn; in zbdsqr_()
|
H A D | sbdsqr.c | 257 real shift, sigmn, oldsn; in sbdsqr_() local 698 e[i__ - 1] = oldsn * r__; in sbdsqr_() 702 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in sbdsqr_() 706 work[i__ - ll + 1 + nm13] = oldsn; in sbdsqr_() 711 e[m - 1] = h__ * oldsn; in sbdsqr_() 749 e[i__] = oldsn * r__; in sbdsqr_() 753 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in sbdsqr_() 757 work[i__ - ll + nm13] = -oldsn; in sbdsqr_() 762 e[ll] = h__ * oldsn; in sbdsqr_()
|
H A D | cbdsqr.c | 250 real shift, sigmn, oldsn; in cbdsqr_() local 690 e[i__ - 1] = oldsn * r__; in cbdsqr_() 694 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in cbdsqr_() 698 rwork[i__ - ll + 1 + nm13] = oldsn; in cbdsqr_() 703 e[m - 1] = h__ * oldsn; in cbdsqr_() 741 e[i__] = oldsn * r__; in cbdsqr_() 745 slartg_(&r__1, &r__2, &oldcs, &oldsn, &d__[i__]); in cbdsqr_() 749 rwork[i__ - ll + nm13] = -oldsn; in cbdsqr_() 754 e[ll] = h__ * oldsn; in cbdsqr_()
|
/dports/math/vtk6/VTK-6.2.0/ThirdParty/alglib/ |
H A D | bdsvd.cpp | 246 double oldsn = 0.; // Eliminate compiler warning. in bidiagonalsvddecompositioninternal() local 747 e(i-1) = oldsn*r; in bidiagonalsvddecompositioninternal() 749 generaterotation(oldcs*r, d(i+1)*sn, oldcs, oldsn, tmp); in bidiagonalsvddecompositioninternal() 754 work3(i-ll+1) = oldsn; in bidiagonalsvddecompositioninternal() 758 e(m-1) = h*oldsn; in bidiagonalsvddecompositioninternal() 798 e(i) = oldsn*r; in bidiagonalsvddecompositioninternal() 800 generaterotation(oldcs*r, d(i-1)*sn, oldcs, oldsn, tmp); in bidiagonalsvddecompositioninternal() 805 work3(i-ll) = -oldsn; in bidiagonalsvddecompositioninternal() 809 e(ll) = h*oldsn; in bidiagonalsvddecompositioninternal()
|
/dports/math/maxima/maxima-5.43.2/share/lapack/lapack/ |
H A D | dbdsqr.lisp | 50 (f 0.0) (g 0.0) (h 0.0) (mu 0.0) (oldcs 0.0) (oldsn 0.0) (r 0.0) 497 (* oldsn r))) 506 oldcs oldsn 510 (setf oldsn var-3) 543 oldsn) 551 (* h oldsn)) 642 (* oldsn r))) 651 oldcs oldsn 655 (setf oldsn var-3) 683 (- oldsn)) [all …]
|
/dports/math/singular/Singular-Release-4-2-1/Singular/svd/ |
H A D | bdsvd.h | 291 amp::ampf<Precision> oldsn; in bidiagonalsvddecompositioninternal() local 798 e(i-1) = oldsn*r; in bidiagonalsvddecompositioninternal() 800 … rotations::generaterotation<Precision>(oldcs*r, d(i+1)*sn, oldcs, oldsn, tmp); in bidiagonalsvddecompositioninternal() 805 work3(i-ll+1) = oldsn; in bidiagonalsvddecompositioninternal() 809 e(m-1) = h*oldsn; in bidiagonalsvddecompositioninternal() 849 e(i) = oldsn*r; in bidiagonalsvddecompositioninternal() 851 … rotations::generaterotation<Precision>(oldcs*r, d(i-1)*sn, oldcs, oldsn, tmp); in bidiagonalsvddecompositioninternal() 856 work3(i-ll) = -oldsn; in bidiagonalsvddecompositioninternal() 860 e(ll) = h*oldsn; in bidiagonalsvddecompositioninternal()
|
/dports/misc/rump/buildrump.sh-b914579/src/sys/ufs/lfs/ |
H A D | lfs_segment.c | 994 u_int32_t oldsn = lfs_dtosn(fs, daddr); in lfs_update_iaddr() local 996 int ndupino = (sp->seg_number == oldsn) ? sp->ndupino : 0; in lfs_update_iaddr() 998 LFS_SEGENTRY(sup, fs, oldsn, bp); in lfs_update_iaddr() 1009 oldsn, sp->seg_number, daddr, in lfs_update_iaddr() 1028 LFS_WRITESEGENTRY(sup, fs, oldsn, bp); /* Ifile */ in lfs_update_iaddr() 1547 u_int32_t oldsn = lfs_dtosn(fs, daddr); local 1551 if (sp && sp->seg_number == oldsn) { 1557 KASSERT(oldsn < lfs_sb_getnseg(fs)); 1562 LFS_SEGENTRY(sup, fs, oldsn, bp); 1589 LFS_WRITESEGENTRY(sup, fs, oldsn, bp);
|
/dports/dns/bind911/bind-9.11.37/contrib/dlz/modules/mysqldyn/ |
H A D | dlz_mysqldyn_mod.c | 1415 int oldsn = 0, newsn = 0; in dlz_closeversion() local 1433 sscanf(row[0], "%d", &oldsn); in dlz_closeversion() 1470 if (newsn > oldsn) in dlz_closeversion()
|