代码搜索：F
找到约 10,000 项符合「F」的源代码
代码结果 10,000
www.eeworm.com/read/261064/11667843
f traffic.f
! traffic - Program to solve the generalized Burger
! equation for the traffic at a stop light problem
program traffic
integer*4 MAXN, MAXnStep
parameter( MAXN = 200, MAXnStep = 100
www.eeworm.com/read/261064/11667845
f neutrn.f
! neutrn - Program to solve the neutron diffusion equation
! using the Forward Time Centered Space (FTCS) scheme.
program neutrn
integer*4 MAXN, MAXnplots
parameter( MAXN = 500, MAX
www.eeworm.com/read/261064/11667848
f intrpf.f
real*8 function intrpf( xi, x, y )
! Function to interpolate between data points
! using Lagrange polynomial (quadratic)
! Inputs
! xi The x value where interpolation is computed
! x Ve
www.eeworm.com/read/261064/11667851
f fnewt.f
subroutine fnewt( x, a, Nm, f, D)
integer*4 Nm
real*8 x(Nm), a(Nm), f(Nm), D(Nm,Nm)
! Function used by the N-variable Newton's method
! Inputs
! x State vector [x y z]
www.eeworm.com/read/261064/11667855
f legndr.f
subroutine legndr( n, x, p)
integer*4 n
real*8 x, p(*)
! Legendre polynomials function
! Inputs
! n Highest order polynomial returned
! x Value at which polynomial
www.eeworm.com/read/261064/11667857
f cinv.f
! Compute inverse of complex matrix
subroutine cinv( A, N, MAXN, Ainv )
integer*4 N, MAXN
complex*16 A(MAXN,MAXN), Ainv(MAXN,MAXN)
! Inputs
! A Matrix A to be inverted
! N
www.eeworm.com/read/261064/11667862
f relax.f
! relax - Program to solve the Laplace equation using
! Jacobi, Gauss-Seidel and SOR methods on a square grid
program relax
integer*4 MAXN, MAXiterMax
parameter( MAXN = 200, MAXiter
www.eeworm.com/read/261064/11667865
f linreg.f
subroutine linreg( x, y, sigma, N, a_fit, sig_a, yy, chisqr )
integer*4 N
real*8 x(N), y(N), sigma(N), a_fit(2), sig_a(2)
real*8 yy(N), chisqr
! Function to perform linear regr
www.eeworm.com/read/347161/11687007
f fcal.f
www.eeworm.com/read/347161/11687013