Searched defs:CSPSV_F95 (Results 1 – 1 of 1) sorted by relevance
| /dports/math/lapack95/LAPACK95/SRC/ |
| H A D | la_cspsv.f90 | 1 SUBROUTINE CSPSV_F95( AP, B, UPLO, IPIV, INFO ) subroutine
14 CHARACTER(LEN=1), INTENT(IN), OPTIONAL :: UPLO
15 INTEGER, INTENT(OUT), OPTIONAL :: INFO
17 INTEGER, INTENT(OUT), OPTIONAL, TARGET :: IPIV(:)
18 COMPLEX(WP), INTENT(INOUT) :: AP(:), B(:,:)
98 CHARACTER(LEN=7), PARAMETER :: SRNAME = 'LA_SPSV'
100 CHARACTER(LEN=1) :: LUPLO
101 INTEGER :: LINFO, N, NN, NRHS, SIPIV, ISTAT, ISTAT1
102 COMPLEX(WP) :: WW
126 END SUBROUTINE CSPSV_F95 argument
|