/dports/math/xlapack/lapack-3.10.0/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/blas/lapack-3.10.0/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/lapacke/lapack-3.10.0/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/lapack/lapack-3.10.0/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/cblas/lapack-3.10.0/TESTING/ |
H A D | Makefile | 237 sec.out: sec.in EIG/xeigtsts 241 sed.out: sed.in EIG/xeigtsts 245 sgg.out: sgg.in EIG/xeigtsts 249 sgd.out: sgd.in EIG/xeigtsts 253 ssb.out: ssb.in EIG/xeigtsts 257 ssg.out: ssg.in EIG/xeigtsts 277 sbb.out: sbb.in EIG/xeigtsts 579 $(MAKE) -C EIG xeigtsts 582 $(MAKE) -C EIG xeigtstc 585 $(MAKE) -C EIG xeigtstd [all …]
|
/dports/math/octave/octave-6.4.0/liboctave/numeric/ |
H A D | EIG.h | 40 EIG 47 EIG (void) : lambda (), v (), w () { } in EIG() function 49 EIG (const Matrix& a, bool calc_rev = true, 56 EIG (const Matrix& a, octave_idx_type& info, 63 EIG (const Matrix& a, const Matrix& b, 77 EIG (const ComplexMatrix& a, bool calc_rev = true, 84 EIG (const ComplexMatrix& a, octave_idx_type& info, 91 EIG (const ComplexMatrix& a, const ComplexMatrix& b, 106 EIG (const EIG& a) : lambda (a.lambda), v (a.v), w (a.w) { } in EIG() function 108 EIG& operator = (const EIG& a) [all …]
|
/dports/biology/mopac/mopac7-1.15/fortran/ |
H A D | greenf.f | 660 2((EIG(J)+EIG(I)-EIG(M)-EIG(N))*(EIG(K)+EIG(I)-EIG(M)-EIG(N))) 754 2((EIG(J)+EIG(I)-EIG(M)-EIG(N))*(EIG(J)+EIG(I)-EIG(M)-EIG(L))) 826 2((EIG(J)+EIG(I)-EIG(M)-EIG(N))*(EIG(J)-EIG(L))) 896 2((EIG(J)+EIG(I)-EIG(M)-EIG(N))*(EIG(K)-EIG(N))) 1167 *EIG(M)-EIG(N))*(EIG(J)+EIG(K)-EIG(M)-EIG(N))) 1264 *EIG(I)-EIG(J))*(EIG(I)+EIG(J)-EIG(N)-EIG(L))) 1522 2((EP+EIG(I)-EIG(M)-EIG(N))*(EP+EIG(J)-EIG(N)-EIG(L)))+ 1662 2((EP+EIG(I)-EIG(M)-EIG(L))*(EIG(I)+EIG(J)-EIG(M)-EIG(N)))+ 1665 5((EP+EIG(I)-EIG(M)-EIG(L))*(EIG(I)+EIG(J)-EIG(M)-EIG(N)))) 1803 2((EP+EIG(M)-EIG(J)-EIG(K))*(EIG(I)+EIG(J)-EIG(M)-EIG(N)))+ [all …]
|
H A D | axis.f | 17 1 Z(NUMATM), ROT(3), XYZMOM(3), EIG(3), EVEC(3,3) 20 SAVE ICALCN, T, FIRST, EIG, ROT, XYZMOM 113 CALL RSP(T,3,3,EIG,EVEC) 119 IF(EIG(I).LT.3.D-4) THEN 120 EIG(I)=0.D0 123 ROT(I)=CONST2/EIG(I) 125 70 XYZMOM(I)=EIG(I)*CONST1
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/cacsd/src/slicot/ |
H A D | Ex-schur.f | 244 LOGICAL FUNCTION ZB02MV( EIG ) 292 COMPLEX*16 EIG local 297 ZB02MV = DREAL(EIG).LT.ZERO 303 LOGICAL FUNCTION ZB02MW( EIG ) 351 COMPLEX*16 EIG local 356 ZB02MW = ABS(EIG).LT.ONE
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/nwpwlib/utilities/ |
H A D | matrix.f | 4 SUBROUTINE EIGEN(NEMAX,NE,HML,EIG,WORK,IERR) argument 9 DIMENSION EIG(*),HML(NEMAX,*),WORK(*) 11 CALL DCOPY(NEMAX,0.0d0,0,EIG,1) 14 EIG(1)=HML(1,1) 18 CALL TRED3(HML,NE,NEMAX,EIG,WORK) 19 CALL TQLI(EIG,WORK,NE,NEMAX,HML,IERR) 21 CALL EIGSRT(EIG,HML,NE,NEMAX) 32 DIMENSION EIG(*),HML(NEMAX,*),WORK(*) 34 CALL DCOPY(NEMAX,0.0d0,0,EIG,1) 37 EIG(1)=HML(1,1) [all …]
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/nwpwlib/utilities/ |
H A D | matrix.f | 4 SUBROUTINE EIGEN(NEMAX,NE,HML,EIG,WORK,IERR) argument 9 DIMENSION EIG(*),HML(NEMAX,*),WORK(*) 11 CALL DCOPY(NEMAX,0.0d0,0,EIG,1) 14 EIG(1)=HML(1,1) 18 CALL TRED3(HML,NE,NEMAX,EIG,WORK) 19 CALL TQLI(EIG,WORK,NE,NEMAX,HML,IERR) 21 CALL EIGSRT(EIG,HML,NE,NEMAX) 32 DIMENSION EIG(*),HML(NEMAX,*),WORK(*) 34 CALL DCOPY(NEMAX,0.0d0,0,EIG,1) 37 EIG(1)=HML(1,1) [all …]
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/TESTING/EIG/ |
H A D | sstech.f | 102 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 114 REAL A( * ), B( * ), EIG( * ), WORK( * ) 161 MX = ABS( EIG( 1 ) ) 163 MX = MAX( MX, ABS( EIG( I ) ) ) 170 WORK( I ) = EIG( I )
|
/dports/math/xlapack/lapack-3.10.0/TESTING/EIG/ |
H A D | dstech.f | 100 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
H A D | sstech.f | 100 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 REAL A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
/dports/math/blas/lapack-3.10.0/TESTING/EIG/ |
H A D | dstech.f | 100 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
H A D | sstech.f | 100 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 REAL A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
/dports/math/lapack/lapack-3.10.0/TESTING/EIG/ |
H A D | sstech.f | 100 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 REAL A( * ), B( * ), EIG( * ), WORK( * ) local 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
H A D | dstech.f | 100 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) local 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
/dports/math/lapacke/lapack-3.10.0/TESTING/EIG/ |
H A D | sstech.f | 100 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 REAL A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
H A D | dstech.f | 100 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 111 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) 158 MX = ABS( EIG( 1 ) ) 160 MX = MAX( MX, ABS( EIG( I ) ) ) 167 WORK( I ) = EIG( I )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.5.0/EIG/ |
H A D | sstech.f | 102 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 114 REAL A( * ), B( * ), EIG( * ), WORK( * ) local 161 MX = ABS( EIG( 1 ) ) 163 MX = MAX( MX, ABS( EIG( I ) ) ) 170 WORK( I ) = EIG( I )
|
H A D | dstech.f | 102 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 114 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) 161 MX = ABS( EIG( 1 ) ) 163 MX = MAX( MX, ABS( EIG( I ) ) ) 170 WORK( I ) = EIG( I )
|
/dports/math/libflame/libflame-5.2.0/old/lapack-test/3.4.2/EIG/ |
H A D | sstech.f | 102 SUBROUTINE SSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 114 REAL A( * ), B( * ), EIG( * ), WORK( * ) local 161 MX = ABS( EIG( 1 ) ) 163 MX = MAX( MX, ABS( EIG( I ) ) ) 170 WORK( I ) = EIG( I )
|
H A D | dstech.f | 102 SUBROUTINE DSTECH( N, A, B, EIG, TOL, WORK, INFO ) argument 114 DOUBLE PRECISION A( * ), B( * ), EIG( * ), WORK( * ) local 161 MX = ABS( EIG( 1 ) ) 163 MX = MAX( MX, ABS( EIG( I ) ) ) 170 WORK( I ) = EIG( I )
|