Searched defs:DGELSY1_F95 (Results 1 – 1 of 1) sorted by relevance
| /dports/math/lapack95/LAPACK95/SRC/ |
| H A D | la_dgelsy1.f90 | 1 SUBROUTINE DGELSY1_F95( A, B, RANK, JPVT, RCOND, INFO ) subroutine
14 INTEGER, INTENT(OUT), OPTIONAL :: RANK
15 INTEGER, INTENT(OUT), OPTIONAL :: INFO
16 REAL(WP), INTENT(IN), OPTIONAL :: RCOND
19 REAL(WP), INTENT(INOUT) :: A(:,:), B(:)
21 CHARACTER(LEN=8), PARAMETER :: SRNAME = 'LA_GELSY'
23 INTEGER :: LINFO, ISTAT, ISTAT1, LWORK, N, M, MN, LRANK, SJPVT
24 REAL(WP) :: LRCOND
26 INTEGER, POINTER :: LJPVT(:)
27 REAL(WP), POINTER :: WORK(:)
[all …]
|