代码搜索：implicit

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

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

f90 adi.f90

SUBROUTINE adi(a,b,c,d,e,f,g,u,jmax,k,alpha,beta,eps) IMPLICIT REAL*8(a-h,o-z) PARAMETER (jj=100,kk=6,nrr=2**(kk-1),maxits=100,& zero=0.d0,two=2.d0,half=0.5d0) DIMENSION a(jmax,jmax),b(
·
www.eeworm.com/read/477762/6733856

f currentz0.f

real*8 function current(z,w) implicit none real*8 PI,EL,MASS,H,Vb real*8 EFS,EFT,WS,WT,bat real*8 temp0,e0,e1,grunch,e,err real*8 bohr,bbmin,fi,z,zz,w,ww integer nmax,ip common/om/zz,ww comm
·
www.eeworm.com/read/476406/6761112

f90 ex0435.f90

program ex0435 implicit none ! 判断可以记录9个位数的整数kind值 integer, parameter :: long_int = selected_int_kind( 9 ) ! 判断可以记录3个位数的整数kind值 integer, parameter :: short_int = selected_int_kind( 3 ) ! 判断可以
·
www.eeworm.com/read/409260/11339131

f90 ex0435.f90

program ex0435 implicit none ! 判断可以记录9个位数的整数kind值 integer, parameter :: long_int = selected_int_kind( 9 ) ! 判断可以记录3个位数的整数kind值 integer, parameter :: short_int = selected_int_kind( 3 ) ! 判断可以
·
www.eeworm.com/read/347161/11687022

f distcal.f

subroutine distcal(rval,dist,notus1,nd1) c implicit none c integer notus1,nd1 c integer iotus0,iotus1,id c real dist(0:notus1,0:notus1),rval(0:nd1,0:notus1) c do 10
·
www.eeworm.com/read/258562/11855052

f90 ex0435.f90

program ex0435 implicit none ! 判断可以记录9个位数的整数kind值 integer, parameter :: long_int = selected_int_kind( 9 ) ! 判断可以记录3个位数的整数kind值 integer, parameter :: short_int = selected_int_kind( 3 ) ! 判断可以
·
www.eeworm.com/read/153743/12009341

f90 unfill_cent.f90

subroutine unfill_cent(md1,md3,lot,n1dfft,max3,m3,n3,zw,zf) implicit real*8 (a-h,o-z) dimension zw(2,lot,n3),zf(2,md1,md3) ! Here, zero and positive frequencies
·
www.eeworm.com/read/338854/12277021

f90 qiebixuefu.f90

SUBROUTINE TT !QIE_BXF(PRN1,NHS,X000) !PRN卫星号,N几皆拟合,X还是Y坐标 implicit none integer prn,nian,yue,ri,i,nj,k,toc,shi,fen,miao,WN,TOW,Gpszh integer::status=0,T,NHS REAL*8 wpian,wpiao,wpsu,iode,crs,on
·
www.eeworm.com/read/221868/14717057

f90 ex0435.f90

program ex0435 implicit none ! 判断可以记录9个位数的整数kind值 integer, parameter :: long_int = selected_int_kind( 9 ) ! 判断可以记录3个位数的整数kind值 integer, parameter :: short_int = selected_int_kind( 3 ) ! 判断可以
·
www.eeworm.com/read/208614/15242601

f90 ex0435.f90

program ex0435 implicit none ! 判断可以记录9个位数的整数kind值 integer, parameter :: long_int = selected_int_kind( 9 ) ! 判断可以记录3个位数的整数kind值 integer, parameter :: short_int = selected_int_kind( 3 ) ! 判断可以
·