代码搜索：parameter

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

代码结果 10,000
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/409260/11338657

f90 qand.f90

program main use IMSL implicit none real, external :: F integer, parameter :: N=3 real A(N), B(N) real, parameter :: ERRABS = 0.0001 real, parameter :: ERRREL = 0.001 integer,
·
www.eeworm.com/read/409260/11338659

f90 qdagp.f90

program main use IMSL implicit none real, external :: F real A, B integer, parameter :: NPTS = 2 real :: POINTS(NPTS) = (/ 1.0, 2.0 /) real, parameter :: ERRABS = 1E-2 real, pa
·
www.eeworm.com/read/409260/11338661

f90 twodq.f90

program main use IMSL implicit none real A, B real, parameter :: ERRABS = 0.001 real, parameter :: ERRREL = 0.001 integer, parameter :: IRULE = 6 real, external :: F,G,H real :
·
www.eeworm.com/read/409260/11338663

f90 deriv.f90

program main use IMSL implicit none real, external :: F integer, parameter :: KORDER = 1 real :: x=0.0 real, parameter :: BGSTEP = 1E-3 real, parameter :: TOL = 1E-3 write(*,*
·
www.eeworm.com/read/409260/11338665

f90 ivpag.f90

! IMSL IVPAG范例 ! 求解Y'(t)=-0.01*Y(t) ! initial value Y(0)=2 program main use IMSL implicit none integer, parameter :: MXPARM = 50 integer, parameter :: N = 1 integer IDO, ISTEP, NOUT
·
www.eeworm.com/read/409260/11338667

f90 zanly.f90

program main use IMSL implicit none integer, parameter :: N = 3 integer :: INFO(N) integer, parameter :: ITMAX = 100 integer, parameter :: NKNOWN = 0 integer, parameter :: NNEW =
·
www.eeworm.com/read/409260/11338668

f90 ivmrk.f90

! IMSL IVMRK范例 ! 求解Y1'(t)=-5*Y1(t) + 2*Y2(t) ! Y2'(t)=13*Y1(t) - 0.5*Y2(t) ! initial condition Y1(0)=1, Y2(0)=1 program main use IMSL implicit none integer, parameter :: MXPARM = 50
·
www.eeworm.com/read/409260/11338671

f90 rline.f90

program main use IMSL implicit none integer, parameter :: NOBS = 5 real XDATA(NOBS), YDATA(NOBS) real B0, B1 real STAT(12) real xinc, xp, value real F,X F(X) = 2*X + 3 in
·
www.eeworm.com/read/409260/11338673

f90 zbren.f90

program main use IMSL implicit none real, parameter :: ERRABS = 0.0 real, parameter :: ERRREL = 0.001 integer :: MAXFN = 100 real :: A,B real, external :: F A=-1.0 B=1.0
·
www.eeworm.com/read/409260/11338675

f90 neqnf.f90

program main use IMSL implicit none external FCN real, parameter :: ERRREL = 0.0001 integer, parameter :: N = 3 integer, parameter :: ITMAX = 100 real :: XGUESS(N) = (/ 0.0, 1.0,
·