代码搜索:F
找到约 10,000 项符合「F」的源代码
代码结果 10,000
www.eeworm.com/read/367160/9773242
f strsm.f
SUBROUTINE STRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
* .. Scalar Arguments ..
REAL ALPHA
INTEGER LDA,LDB,M,N
CHARACTER DIAG,SIDE,TRANSA,UPLO
* ..
* .
www.eeworm.com/read/367160/9773245
f saxpy.f
SUBROUTINE SAXPY(N,SA,SX,INCX,SY,INCY)
* .. Scalar Arguments ..
REAL SA
INTEGER INCX,INCY,N
* ..
* .. Array Arguments ..
REAL SX(*),SY(*)
* ..
*
* Pur
www.eeworm.com/read/367160/9773249
f zgeru.f
SUBROUTINE ZGERU(M,N,ALPHA,X,INCX,Y,INCY,A,LDA)
* .. Scalar Arguments ..
DOUBLE COMPLEX ALPHA
INTEGER INCX,INCY,LDA,M,N
* ..
* .. Array Arguments ..
DOUBLE CO
www.eeworm.com/read/367160/9773254
f ctpmv.f
SUBROUTINE CTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX)
* .. Scalar Arguments ..
INTEGER INCX,N
CHARACTER DIAG,TRANS,UPLO
* ..
* .. Array Arguments ..
COMPLEX AP(*),X(*
www.eeworm.com/read/367160/9773258
f strmv.f
SUBROUTINE STRMV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
* .. Scalar Arguments ..
INTEGER INCX,LDA,N
CHARACTER DIAG,TRANS,UPLO
* ..
* .. Array Arguments ..
REAL A(LDA
www.eeworm.com/read/367160/9773261
f sscal.f
SUBROUTINE SSCAL(N,SA,SX,INCX)
* .. Scalar Arguments ..
REAL SA
INTEGER INCX,N
* ..
* .. Array Arguments ..
REAL SX(*)
* ..
*
* Purpose
* =======
*
www.eeworm.com/read/367160/9773265
f scasum.f
REAL FUNCTION SCASUM(N,CX,INCX)
* .. Scalar Arguments ..
INTEGER INCX,N
* ..
* .. Array Arguments ..
COMPLEX CX(*)
* ..
*
* Purpose
* =======
*
* tak
www.eeworm.com/read/367160/9773269
f dtrsm.f
SUBROUTINE DTRSM(SIDE,UPLO,TRANSA,DIAG,M,N,ALPHA,A,LDA,B,LDB)
* .. Scalar Arguments ..
DOUBLE PRECISION ALPHA
INTEGER LDA,LDB,M,N
CHARACTER DIAG,SIDE,TRANSA,UPLO
*
www.eeworm.com/read/367160/9773273
f ctrsv.f
SUBROUTINE CTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX)
* .. Scalar Arguments ..
INTEGER INCX,LDA,N
CHARACTER DIAG,TRANS,UPLO
* ..
* .. Array Arguments ..
COMPLEX A(
www.eeworm.com/read/367160/9773277
f zgemv.f
SUBROUTINE ZGEMV(TRANS,M,N,ALPHA,A,LDA,X,INCX,BETA,Y,INCY)
* .. Scalar Arguments ..
DOUBLE COMPLEX ALPHA,BETA
INTEGER INCX,INCY,LDA,M,N
CHARACTER TRANS
* ..
*