代码搜索:F

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

代码结果 10,000
www.eeworm.com/read/116390/14975244

gif f.gif

www.eeworm.com/read/116385/14977314

gif f.gif

www.eeworm.com/read/216898/14987047

h f.h

/* * F distribution * * This code has been adapted from RANDLIB.C 1.3, by * Barry W. Brown, James Lovato, Kathy Russell, and John Venier. * Code was originally by Ahrens and Dieter (see above).
www.eeworm.com/read/216898/14987536

f fidaxpy.f

subroutine fidaxpy(a, x, y, n, iters) integer i double precision x(n), y(n), a double precision b b = - a do 2000 j = 1, iters do 1000 i = 1, n y(i
www.eeworm.com/read/216898/14987545

f acousticf.f

! INTEGER N, iters ! REAL check ! N = 128 ! iters = N*3 ! CALL echo_f77(N,iters,check) ! PRINT *, check ! END SUBROUTINE echo_f77(N, niters, check)
www.eeworm.com/read/216898/14987546

f cfdf.f

www.eeworm.com/read/216898/14987609

f qcdf.f

www.eeworm.com/read/216898/14987704

f arrdaxpyf.f

subroutine arrdaxpyf(A, B, N, iters, c1) integer N, iters double precision A(N,N,N), B(N,N,N) double precision c1 double precision c2 c2 = - c1 do z=1
www.eeworm.com/read/216898/14987724

f haneyf.f

www.eeworm.com/read/216898/14987742

f stencilf.f

subroutine stencilf(A, B, N, iters) integer N, iters double precision A(N,N,N), B(N,N,N) integer i,j,k,z double precision c c = 1 / 7. do z=1,iters