Home
last modified time | relevance | path

Searched refs:SZI (Results 1 – 25 of 78) sorted by relevance

1234

/dports/math/cmlib/cmlib-3.0_8/src/eispack/
H A Dqzval.f235 SZI = (A1 * A2I - A1I * A2) / CZ
236 R = SQRT(CZ*CZ+SZR*SZR+SZI*SZI)
239 SZI = SZI / R
242 SZI = 0.0E0
245 A1I = SZI * B12
247 A2I = SZI * B22
250 A1I = SZI * A12
252 A2I = SZI * A22
267 500 SSR = SQR * SZR + SQI * SZI
268 SSI = SQR * SZI - SQI * SZR
[all …]
/dports/math/slatec/src/
H A Dqzval.f251 SZI = (A1 * A2I - A1I * A2) / CZ
252 R = SQRT(CZ*CZ+SZR*SZR+SZI*SZI)
255 SZI = SZI / R
258 SZI = 0.0E0
261 A1I = SZI * B12
263 A2I = SZI * B22
266 A1I = SZI * A12
268 A2I = SZI * A22
283 500 SSR = SQR * SZR + SQI * SZI
284 SSI = SQR * SZI - SQI * SZR
[all …]
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/toms/
H A Drpoly.f24 * H, SZR, SZI, LZR, LZI, ETA, ARE, MRE, N, NN
27 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
219 ZEROI(J) = SZI
254 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
366 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
380 10 CALL QUAD(1.D0, U, V, SZR, SZI, LZR, LZI)
388 MP = DABS(A-SZR*B) + DABS(SZI*B)
451 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
484 SZI = 0.D0
542 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
[all …]
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/toms/
H A Drpoly.f24 * H, SZR, SZI, LZR, LZI, ETA, ARE, MRE, N, NN
27 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
219 ZEROI(J) = SZI
254 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
366 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
380 10 CALL QUAD(1.D0, U, V, SZR, SZI, LZR, LZI)
388 MP = DABS(A-SZR*B) + DABS(SZI*B)
451 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
484 SZI = 0.D0
542 * A1, A2, A3, A6, A7, E, F, G, H, SZR, SZI,
[all …]
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/
H A Ddhgeqz.f228 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T,
851 SZI = -C11I / T
857 SZI = ZERO
864 SZI = C21*TEMPI / T
880 SQI = -SZI*B22
883 A1I = SZI*A12
885 A2I = SZI*A22
905 TEMPR = SQR*SZR - SQI*SZI
906 TEMPI = SQR*SZI + SQI*SZR
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Dshgeqz.f342 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
976 SZI = -C11I / T1
982 SZI = ZERO
989 SZI = C21*TEMPI / T1
1005 SQI = -SZI*B22
1008 A1I = SZI*A12
1010 A2I = SZI*A22
1030 TEMPR = SQR*SZR - SQI*SZI
1031 TEMPI = SQR*SZI + SQI*SZR
/dports/math/xlapack/lapack-3.10.0/SRC/
H A Ddhgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
/dports/math/libflame/libflame-5.2.0/old/lapack-test/lapack-timing/EIG/EIGSRC/
H A Ddhgeqz.f239 $ SAFMAX, SAFMIN, SCALE, SL, SQI, SQR, SR, SZI,
913 SZI = -C11I / T
919 SZI = ZERO
926 SZI = C21*TEMPI / T
942 SQI = -SZI*B22
945 A1I = SZI*A12
947 A2I = SZI*A22
967 TEMPR = SQR*SZR - SQI*SZI
968 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f239 $ SAFMAX, SAFMIN, SCALE, SL, SQI, SQR, SR, SZI,
913 SZI = -C11I / T
919 SZI = ZERO
926 SZI = C21*TEMPI / T
942 SQI = -SZI*B22
945 A1I = SZI*A12
947 A2I = SZI*A22
967 TEMPR = SQR*SZR - SQI*SZI
968 TEMPI = SQR*SZI + SQI*SZR
/dports/math/blas/lapack-3.10.0/SRC/
H A Ddhgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
/dports/math/lapack/lapack-3.10.0/SRC/
H A Dshgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
H A Ddhgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Ddhgeqz.f228 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T, local
851 SZI = -C11I / T
857 SZI = ZERO
864 SZI = C21*TEMPI / T
880 SQI = -SZI*B22
883 A1I = SZI*A12
885 A2I = SZI*A22
905 TEMPR = SQR*SZR - SQI*SZI
906 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f228 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T, local
851 SZI = -C11I / T
857 SZI = ZERO
864 SZI = C21*TEMPI / T
880 SQI = -SZI*B22
883 A1I = SZI*A12
885 A2I = SZI*A22
905 TEMPR = SQR*SZR - SQI*SZI
906 TEMPI = SQR*SZI + SQI*SZR
/dports/math/lapacke/lapack-3.10.0/SRC/
H A Ddhgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f339 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
982 SZI = -C11I / T1
988 SZI = ZERO
995 SZI = C21*TEMPI / T1
1011 SQI = -SZI*B22
1014 A1I = SZI*A12
1016 A2I = SZI*A22
1036 TEMPR = SQR*SZR - SQI*SZI
1037 TEMPI = SQR*SZI + SQI*SZR
/dports/math/algae/algae-4.3.6/lapack/
H A Ddhgeqz.f230 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1,
853 SZI = -C11I / T1
859 SZI = ZERO
866 SZI = C21*TEMPI / T1
882 SQI = -SZI*B22
885 A1I = SZI*A12
887 A2I = SZI*A22
907 TEMPR = SQR*SZR - SQI*SZI
908 TEMPI = SQR*SZI + SQI*SZR
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Ddhgeqz.f342 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1, local
976 SZI = -C11I / T1
982 SZI = ZERO
989 SZI = C21*TEMPI / T1
1005 SQI = -SZI*B22
1008 A1I = SZI*A12
1010 A2I = SZI*A22
1030 TEMPR = SQR*SZR - SQI*SZI
1031 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f342 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T1, local
976 SZI = -C11I / T1
982 SZI = ZERO
989 SZI = C21*TEMPI / T1
1005 SQI = -SZI*B22
1008 A1I = SZI*A12
1010 A2I = SZI*A22
1030 TEMPR = SQR*SZR - SQI*SZI
1031 TEMPI = SQR*SZI + SQI*SZR
/dports/math/openblas/TIMING/EIG/EIGSRC/
H A Ddhgeqz.f239 $ SAFMAX, SAFMIN, SCALE, SL, SQI, SQR, SR, SZI,
913 SZI = -C11I / T
919 SZI = ZERO
926 SZI = C21*TEMPI / T
942 SQI = -SZI*B22
945 A1I = SZI*A12
947 A2I = SZI*A22
967 TEMPR = SQR*SZR - SQI*SZI
968 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f239 $ SAFMAX, SAFMIN, SCALE, SL, SQI, SQR, SR, SZI,
913 SZI = -C11I / T
919 SZI = ZERO
926 SZI = C21*TEMPI / T
942 SQI = -SZI*B22
945 A1I = SZI*A12
947 A2I = SZI*A22
967 TEMPR = SQR*SZR - SQI*SZI
968 TEMPI = SQR*SZI + SQI*SZR
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/
H A Ddhgeqz.f228 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T,
851 SZI = -C11I / T
857 SZI = ZERO
864 SZI = C21*TEMPI / T
880 SQI = -SZI*B22
883 A1I = SZI*A12
885 A2I = SZI*A22
905 TEMPR = SQR*SZR - SQI*SZI
906 TEMPI = SQR*SZI + SQI*SZR
H A Dshgeqz.f228 $ SAFMIN, SCALE, SL, SQI, SQR, SR, SZI, SZR, T,
851 SZI = -C11I / T
857 SZI = ZERO
864 SZI = C21*TEMPI / T
880 SQI = -SZI*B22
883 A1I = SZI*A12
885 A2I = SZI*A22
905 TEMPR = SQR*SZR - SQI*SZI
906 TEMPI = SQR*SZI + SQI*SZR

1234