代码搜索:F

找到约 10,000 项符合「F」的源代码

代码结果 10,000
www.eeworm.com/read/240162/4583559

f 20010426.f

function f(c) implicit none real*8 c, f f = sqrt(c) return end
www.eeworm.com/read/240162/4583569

f xformat.f

PRINT 10, 2, 3 10 FORMAT (I1, X, I1) END
www.eeworm.com/read/233522/4668076

f zlahrd.f

SUBROUTINE ZLAHRD( N, K, NB, A, LDA, TAU, T, LDT, Y, LDY ) * * -- LAPACK auxiliary routine (version 2.0) -- * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., * Courant I
www.eeworm.com/read/233522/4668081

f zlarfb.f

SUBROUTINE ZLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, $ T, LDT, C, LDC, WORK, LDWORK ) * * -- LAPACK auxiliary routine (version 2.0) -- * Univ. of Tenn
www.eeworm.com/read/233522/4668082

f dlatrs.f

SUBROUTINE DLATRS( UPLO, TRANS, DIAG, NORMIN, N, A, LDA, X, SCALE, $ CNORM, INFO ) * * -- LAPACK auxiliary routine (version 3.0) -- * Univ. of Tennessee, Univ. of
www.eeworm.com/read/233522/4668085

f sggsvp.f

SUBROUTINE SGGSVP( JOBU, JOBV, JOBQ, M, P, N, A, LDA, B, LDB, $ TOLA, TOLB, K, L, U, LDU, V, LDV, Q, LDQ, $ IWORK, TAU, WORK, INFO ) * * -- LAP
www.eeworm.com/read/233522/4668086

f dlange.f

DOUBLE PRECISION FUNCTION DLANGE( NORM, M, N, A, LDA, WORK ) * * -- LAPACK auxiliary routine (version 2.0) -- * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., * Courant
www.eeworm.com/read/233522/4668088

f dgeqpf.f

SUBROUTINE DGEQPF( M, N, A, LDA, JPVT, TAU, WORK, INFO ) * * -- LAPACK test routine (version 2.0) -- * Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., * Courant Institut
www.eeworm.com/read/233522/4668089

f zgemv.f

SUBROUTINE ZGEMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, $ BETA, Y, INCY ) * .. Scalar Arguments .. COMPLEX*16 ALPHA, BETA INTEGER IN
www.eeworm.com/read/233522/4668096

f dggsvd.f

SUBROUTINE DGGSVD( JOBU, JOBV, JOBQ, M, N, P, K, L, A, LDA, B, $ LDB, ALPHA, BETA, U, LDU, V, LDV, Q, LDQ, WORK, $ IWORK, INFO ) * * -- LAPACK