/dports/math/lapack/lapack-3.10.0/SRC/ |
H A D | cgejsv.f | 604 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF 1286 IWOFF = 2*N 1288 IWOFF = N 1292 IWORK(IWOFF+p) = q 1299 CALL CLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1647 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2003 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2067 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2177 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | zgejsv.f | 607 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF 1288 IWOFF = 2*N 1290 IWOFF = N 1294 IWORK(IWOFF+p) = q 1301 CALL ZLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1649 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2005 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2069 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2179 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | dgesvdq.f | 432 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 748 IWOFF = 1 750 IWOFF = M 908 $ WORK, IWORK(N+IWOFF), IERR ) 911 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | sgesvdq.f | 433 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 751 IWOFF = 1 753 IWOFF = M 911 $ WORK, IWORK(N+IWOFF), IERR ) 914 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/math/lapacke/lapack-3.10.0/SRC/ |
H A D | zgejsv.f | 607 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF 1288 IWOFF = 2*N 1290 IWOFF = N 1294 IWORK(IWOFF+p) = q 1301 CALL ZLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1649 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2005 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2069 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2179 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | dgesvdq.f | 432 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 748 IWOFF = 1 750 IWOFF = M 908 $ WORK, IWORK(N+IWOFF), IERR ) 911 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | sgesvdq.f | 433 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 751 IWOFF = 1 753 IWOFF = M 911 $ WORK, IWORK(N+IWOFF), IERR ) 914 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
H A D | cgejsv.f | 607 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF local 1289 IWOFF = 2*N 1291 IWOFF = N 1295 IWORK(IWOFF+p) = q 1302 CALL CLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1650 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2006 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2070 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2180 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | zgejsv.f | 610 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF local 1291 IWOFF = 2*N 1293 IWOFF = N 1297 IWORK(IWOFF+p) = q 1304 CALL ZLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1652 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2008 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2072 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2182 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | dgesvdq.f | 434 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q local 750 IWOFF = 1 752 IWOFF = M 910 $ WORK, IWORK(N+IWOFF), IERR ) 913 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | sgesvdq.f | 435 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q local 753 IWOFF = 1 755 IWOFF = M 913 $ WORK, IWORK(N+IWOFF), IERR ) 916 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/math/cblas/lapack-3.10.0/SRC/ |
H A D | cgejsv.f | 604 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF 1286 IWOFF = 2*N 1288 IWOFF = N 1292 IWORK(IWOFF+p) = q 1299 CALL CLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1647 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2003 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2067 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2177 $ CALL CLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | zgejsv.f | 607 $ LWSVDJ, LWSVDJV, LRWQP3, LRWCON, LRWSVDJ, IWOFF 1288 IWOFF = 2*N 1290 IWOFF = N 1294 IWORK(IWOFF+p) = q 1301 CALL ZLASWP( N, A, LDA, 1, M-1, IWORK(IWOFF+1), 1 ) 1649 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2005 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2069 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 ) 2179 $ CALL ZLASWP( N1, U, LDU, 1, M-1, IWORK(IWOFF+1), -1 )
|
H A D | dgesvdq.f | 432 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 748 IWOFF = 1 750 IWOFF = M 908 $ WORK, IWORK(N+IWOFF), IERR ) 911 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | sgesvdq.f | 433 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 751 IWOFF = 1 753 IWOFF = M 911 $ WORK, IWORK(N+IWOFF), IERR ) 914 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/math/xlapack/lapack-3.10.0/SRC/ |
H A D | dgesvdq.f | 432 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 748 IWOFF = 1 750 IWOFF = M 908 $ WORK, IWORK(N+IWOFF), IERR ) 911 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | sgesvdq.f | 433 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 751 IWOFF = 1 753 IWOFF = M 911 $ WORK, IWORK(N+IWOFF), IERR ) 914 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/math/blas/lapack-3.10.0/SRC/ |
H A D | sgesvdq.f | 433 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 751 IWOFF = 1 753 IWOFF = M 911 $ WORK, IWORK(N+IWOFF), IERR ) 914 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
H A D | dgesvdq.f | 432 INTEGER IERR, IWOFF, NR, N1, OPTRATIO, p, q 748 IWOFF = 1 750 IWOFF = M 908 $ WORK, IWORK(N+IWOFF), IERR ) 911 $ WORK(N+1), IWORK(N+IWOFF), IERR )
|
/dports/science/dalton/dalton-66052b3af5ea7225e31178bf9a8b031913c72190/maintenance/ |
H A D | ChangeLog | 372 * abacus/dalgnr.F: IWOFF can't be constant, OPTMIN modifies it.
|
/dports/science/siesta/siesta-4.1.5/Src/Libs/ |
H A D | lapack.F | 13776 $ ITMP2, IW, IWOFF, J, JBLK, JDISC, JE, JEE, NB, local 13957 IWOFF = M - IWORK( 1 ) 13977 DO 50 JE = IWORK( J ) + 1 + IWOFF, 13978 $ IWORK( J+IN ) + IWOFF 13981 INDEXW( JE ) = JE - IWOFF 20533 $ ITMP1, IW, IWOFF, J, JB, JDISC, JE, NB, NWL, local 20759 IWOFF = M - IWORK( 1 ) 20774 DO 50 JE = IWORK( J ) + 1 + IWOFF, 20775 $ IWORK( J+IN ) + IWOFF
|
/dports/math/R/R-4.1.2/src/modules/lapack/ |
H A D | dlapack.f | 75121 $ ITMP2, IW, IWOFF, J, JBLK, JDISC, JE, JEE, NB, 75439 IWOFF = M - IWORK( 1 ) 75468 DO 50 JE = IWORK( J ) + 1 + IWOFF, 75469 $ IWORK( J+IN ) + IWOFF 75472 INDEXW( JE ) = JE - IWOFF 128053 $ ITMP1, IW, IWOFF, J, JB, JDISC, JE, NB, NWL, 128372 IWOFF = M - IWORK( 1 ) 128397 DO 50 JE = IWORK( J ) + 1 + IWOFF, 128398 $ IWORK( J+IN ) + IWOFF
|
/dports/math/libRmath/R-4.1.1/src/modules/lapack/ |
H A D | dlapack.f | 75121 $ ITMP2, IW, IWOFF, J, JBLK, JDISC, JE, JEE, NB, 75439 IWOFF = M - IWORK( 1 ) 75468 DO 50 JE = IWORK( J ) + 1 + IWOFF, 75469 $ IWORK( J+IN ) + IWOFF 75472 INDEXW( JE ) = JE - IWOFF 128053 $ ITMP1, IW, IWOFF, J, JB, JDISC, JE, NB, NWL, 128372 IWOFF = M - IWORK( 1 ) 128397 DO 50 JE = IWORK( J ) + 1 + IWOFF, 128398 $ IWORK( J+IN ) + IWOFF
|