代码搜索：implicit

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

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

cpp fig21_16.cpp

// Fig. 21.16: fig21_16.cpp // Using virtual base classes. #include using std::cout; using std::endl; class Base { public: // implicit default constructor virtual voi
·
www.eeworm.com/read/210047/15208895

for jixijifen.for

IMPLICIT REAL*8 (A-H,O-Z) real*8 h(4,4),f(4),hD(4,4),sum(4,4),ta(4,4),F0(4) data h/0.0d0,0.0d0,-6.0d0,2.0d0,0.0d0,0.0d0,2.0d0,-4.0d0, & 0.5d0,0.0d0,0.0d0,0.0d0,0.0d0,1.0d0,0.0d0,0.0d0/
·
www.eeworm.com/read/208614/15242228

f90 bsearch.f90

! ! 折半查找法范例 ! By Perng 1997/8/31 program BINARY_SEARCH_DEMO implicit none integer, parameter :: N=10 ! 类型的大小 integer :: A(N)=(/2,5,7,9,10,11,13,17,21,23/) integer KEY integer LO
·
www.eeworm.com/read/208614/15242232

f90 btree.f90

! ! 二元树排序范例 ! module typedef implicit none type :: data integer :: n ! 存放的数据 integer :: repeat ! 数据重覆的次数 type(data), pointer :: left ! 左枝 type(data), pointer :: r
·
www.eeworm.com/read/208614/15242240

f90 bisect0.f90

! 二分法求解 ! By Pon 1997/9/2 module NUMERICAL implicit none real, parameter :: zero = 0.00001 contains real function bisect( A, B ) implicit none real A,B ! 输入的猜值 real C ! 用来算(A+B)/
·
www.eeworm.com/read/208614/15242241

f90 newton.f90

module NUMERICAL implicit none real, parameter :: zero=0.00001 ! 小于zero的值会被当成0 contains ! 割线法的函数 real function newton(a,f,df) implicit none real :: a ! 起始的猜值 real, external :: f
·
www.eeworm.com/read/208614/15242242

f90 determinant.f90

module LinearAlgebra implicit none contains ! 求矩阵的Determinant值 real function Determinant(matrix) real :: matrix(:,:) real, allocatable :: ma(:,:) integer :: i,N N = size(matrix,1)
·
www.eeworm.com/read/208614/15242243

f90 bisect.f90

! 二分法求解 ! By Pon 1997/9/2 module NUMERICAL implicit none real, parameter :: zero = 0.00001 contains real function bisect( A, B, func ) implicit none real A,B ! 输入的猜值 real C ! 用来算
·
www.eeworm.com/read/208614/15242246

f90 secant.f90

module NUMERICAL implicit none real, parameter :: zero=0.00001 ! 小于zero的值会被当成0 contains ! 割线法的函数 real function secant(a,b,f) implicit none real :: a,b ! 起始的两个猜值 real :: c ! 新的解
·
www.eeworm.com/read/208614/15242247

f90 least_square.f90

module datas implicit none integer, parameter :: N=5 real :: temperature(N) = (/5.0,10.0,15.0,20.0,25.0/) ! 记录温度 real :: length(N) = (/1.047,1.112,1.1152,1.191,1.252/)! 记录不同温度下的长度 real
·