/dports/math/lapack95/LAPACK95/TESTING/ |
H A D | la_test_ssbevx.f90 | 34 & IIL, IIU, IIFAIL local 43 IQ2 = N; IIL=IL; IIU=IU; IIFAIL=N 67 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 75 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 80 IIFAIL = IZ1 - 3 83 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 101 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 105 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 109 & Z(1:IZ1, 1: IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), &
|
H A D | la_test_chbevx.f90 | 36 & IIL, IIU, IIFAIL local 45 IQ2 = N; IIL=IL; IIU=IU; IIFAIL=N 69 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 77 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 82 IIFAIL = IZ1 - 3 85 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 93 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 103 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 107 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 111 & Z(1:IZ1, 1: IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), &
|
H A D | la_test_dsbevx.f90 | 34 & IIL, IIU, IIFAIL local 43 IQ2 = N; IIL=IL; IIU=IU; IIFAIL=N 67 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 75 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 80 IIFAIL = IZ1 - 3 83 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 101 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 105 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 109 & Z(1:IZ1, 1: IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), &
|
H A D | la_test_zhbevx.f90 | 36 & IIL, IIU, IIFAIL local 45 IQ2 = N; IIL=IL; IIU=IU; IIFAIL=N 69 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 77 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 82 IIFAIL = IZ1 - 3 85 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 93 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 103 & Z(1:IZ1, 1: IZ2), IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL),& 107 & Z(1:IZ1, 1: IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 111 & Z(1:IZ1, 1: IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), &
|
H A D | la_test_zhpgvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 66 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 76 IIFAIL = IAP - 1 83 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 87 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_sspgvx.f90 | 37 INTEGER :: IIL, IIU, IIFAIL local 42 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 64 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 74 IIFAIL = IAP - 1 81 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 85 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 89 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_dspgvx.f90 | 37 INTEGER :: IIL, IIU, IIFAIL local 42 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 64 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 74 IIFAIL = IAP - 1 81 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 85 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 89 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_chpgvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 66 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 76 IIFAIL = IAP - 1 83 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 87 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_dsbgvx.f90 | 38 INTEGER :: IIL, IIU, IIFAIL local 43 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 64 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 73 IIFAIL = IAB1 - 1 82 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 86 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 90 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_ssbgvx.f90 | 38 INTEGER :: IIL, IIU, IIFAIL local 43 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 64 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 73 IIFAIL = IAB1 - 1 82 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 86 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 90 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_chbgvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 65 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 74 IIFAIL = IAB1 - 1 83 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 87 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_zhbgvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 65 & IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 74 IIFAIL = IAB1 - 1 83 & Z=Z(1:IZ1,1:IZ2), M=M, IFAIL=IFAIL(1:IIFAIL), & 87 & Z=Z(1:IZ1,1:IZ2), IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL),& 91 & Z=Z(1:IZ1,1:IZ2), VL=IVL, VU=IVU, M=M, IFAIL=IFAIL(1:IIFAIL),&
|
H A D | la_test_chegvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 72 IIFAIL = IA2 - 1 79 & IITYPE, IJOBZ, IUPLO, M=M, IFAIL=IFAIL(1:IIFAIL), & 84 & IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO ) 88 & IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO )
|
H A D | la_test_zhegvx.f90 | 39 INTEGER :: IIL, IIU, IIFAIL local 44 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 72 IIFAIL = IA2 - 1 79 & IITYPE, IJOBZ, IUPLO, M=M, IFAIL=IFAIL(1:IIFAIL), & 84 & IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO ) 88 & IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO )
|
H A D | la_test_dstevx.f90 | 30 INTEGER :: I, J, IE, IZ1, IZ2, ID, IW, IIL, IIU, IIFAIL local 38 IW=N; IVL=VL; IVU=VU; IIL=IL; IIU=IU; IIFAIL=N; M=0 73 & IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO) 76 & IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL,& 80 & M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO)
|
H A D | la_test_sstevx.f90 | 30 INTEGER :: I, J, IE, IZ1, IZ2, ID, IW, IIL, IIU, IIFAIL local 38 IW=N; IVL=VL; IVU=VU; IIL=IL; IIU=IU; IIFAIL=N; M=0 73 & IVL, IVU, M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO) 76 & IL=IIL, IU=IIU, M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL,& 80 & M=M, IFAIL=IFAIL(1:IIFAIL), ABSTOL=IABSTOL, INFO=INFO)
|
H A D | la_test_dsygvx.f90 | 38 INTEGER :: IIL, IIU, IIFAIL local 43 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 78 IIFAIL = IA2 - 1
|
H A D | la_test_ssygvx.f90 | 38 INTEGER :: IIL, IIU, IIFAIL local 43 IW = N; IZ1 = N; IZ2 = N; IIL = IL; IIU = IU; IIFAIL = N 78 IIFAIL = IA2 - 1
|
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
H A D | dbdsvdx.f | 249 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 381 IIFAIL = 1 382 IIWORK = IIFAIL + N*2 417 $ IWORK( IIFAIL ), INFO ) 441 $ IWORK( IIFAIL ), INFO ) 449 $ IWORK( IIFAIL ), INFO ) 589 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
H A D | sbdsvdx.f | 249 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 381 IIFAIL = 1 382 IIWORK = IIFAIL + N*2 417 $ IWORK( IIFAIL ), INFO ) 441 $ IWORK( IIFAIL ), INFO ) 449 $ IWORK( IIFAIL ), INFO ) 589 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | sbdsvdx.f | 255 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 386 IIFAIL = 1 387 IIWORK = IIFAIL + N*2 422 $ IWORK( IIFAIL ), INFO ) 446 $ IWORK( IIFAIL ), INFO ) 454 $ IWORK( IIFAIL ), INFO ) 594 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
H A D | dbdsvdx.f | 255 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 386 IIFAIL = 1 387 IIWORK = IIFAIL + N*2 422 $ IWORK( IIFAIL ), INFO ) 446 $ IWORK( IIFAIL ), INFO ) 454 $ IWORK( IIFAIL ), INFO ) 594 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | dbdsvdx.f | 255 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 386 IIFAIL = 1 387 IIWORK = IIFAIL + N*2 422 $ IWORK( IIFAIL ), INFO ) 446 $ IWORK( IIFAIL ), INFO ) 454 $ IWORK( IIFAIL ), INFO ) 594 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
H A D | sbdsvdx.f | 255 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 386 IIFAIL = 1 387 IIWORK = IIFAIL + N*2 422 $ IWORK( IIFAIL ), INFO ) 446 $ IWORK( IIFAIL ), INFO ) 454 $ IWORK( IIFAIL ), INFO ) 594 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | dbdsvdx.f | 255 $ IETGK, IIFAIL, IIWORK, ILTGK, IROWU, IROWV, 386 IIFAIL = 1 387 IIWORK = IIFAIL + N*2 422 $ IWORK( IIFAIL ), INFO ) 446 $ IWORK( IIFAIL ), INFO ) 454 $ IWORK( IIFAIL ), INFO ) 594 $ IWORK( IIWORK ), IWORK( IIFAIL ),
|