代码搜索：implicit

找到约 5,250 项符合「implicit」的源代码

代码结果 5,250
热门代码： main.c GPIO I2C SPI UART timer interrupt ADC PWM LED
www.eeworm.com/read/258562/11854296

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/258562/11854301

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/258562/11854308

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/258562/11854312

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/258562/11854316

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/258562/11854330

f90 eigen.f90

program main use IMSL implicit none real :: A(3,3) = (/ 1,0,0,& 0,2,0,& 0,0,3 /) real :: eigenvalue(3) real :: eigenvector(3,3) integer i eigenval
·
www.eeworm.com/read/258562/11854340

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/258562/11854344

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,
·
www.eeworm.com/read/258562/11854350

f90 qdagi.f90

program main use IMSL implicit none real, external :: F real :: BOUND = 1.0 integer :: INTER = 1 real, parameter :: ERRABS = 1E-3 real, parameter :: ERRREL = 1E-3 real ANS, ERR
·
www.eeworm.com/read/258562/11854367

f90 zplrc.f90

program main use imsl ! 在Visual Fortran使用IMSL前最好先use imsl implicit none ! f(x) = X^2-3X+2 real :: p(3) = (/ 2.0, -3.0, 1.0 /) complex r(2) ! 答案是复数类型 call zplrc( 2, p, r ) ! 求解X^2-3
·