代码搜索：continue

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

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

for stoerm.for

SUBROUTINE stoerm(y,d2y,nv,xs,htot,nstep,yout,derivs) INTEGER nstep,nv,NMAX REAL htot,xs,d2y(nv),y(nv),yout(nv) EXTERNAL derivs PARAMETER (NMAX=50) CU USES derivs
·
www.eeworm.com/read/414769/11102520

for cntab1.for

SUBROUTINE cntab1(nn,ni,nj,chisq,df,prob,cramrv,ccc) INTEGER ni,nj,nn(ni,nj),MAXI,MAXJ REAL ccc,chisq,cramrv,df,prob,TINY PARAMETER (MAXI=100,MAXJ=100,TINY=1.e-30) CU US
·
www.eeworm.com/read/414769/11102524

for ratval.for

FUNCTION ratval(x,cof,mm,kk) INTEGER kk,mm DOUBLE PRECISION ratval,x,cof(mm+kk+1) INTEGER j DOUBLE PRECISION sumd,sumn sumn=cof(mm+1) do 11 j=mm,1,-1
·
www.eeworm.com/read/414769/11102527

for newt.for

SUBROUTINE newt(x,n,check) INTEGER n,nn,NP,MAXITS LOGICAL check REAL x(n),fvec,TOLF,TOLMIN,TOLX,STPMX PARAMETER (NP=40,MAXITS=200,TOLF=1.e-4,TOLMIN=1.e-6,TOLX=1.e-7,
·
www.eeworm.com/read/414769/11102529

for asolve.for

SUBROUTINE asolve(n,b,x,itrnsp) INTEGER n,itrnsp,ija,NMAX,i DOUBLE PRECISION x(n),b(n),sa PARAMETER (NMAX=1000) COMMON /mat/ sa(NMAX),ija(NMAX) do 11 i=1,n
·
www.eeworm.com/read/414769/11102531

for snrm.for

FUNCTION snrm(n,sx,itol) INTEGER n,itol,i,isamax DOUBLE PRECISION sx(n),snrm if (itol.le.3)then snrm=0. do 11 i=1,n snrm=snrm+sx(i)**2 11
·
www.eeworm.com/read/414769/11102536

for memcof.for

SUBROUTINE memcof(data,n,m,xms,d) INTEGER m,n,MMAX,NMAX REAL xms,d(m),data(n) PARAMETER (MMAX=60,NMAX=2000) INTEGER i,j,k REAL denom,p,pneum,wk1(NMAX),wk2(NMAX
·
www.eeworm.com/read/414769/11102541

for cyclic.for

SUBROUTINE cyclic(a,b,c,alpha,beta,r,x,n) INTEGER n,NMAX REAL alpha,beta,a(n),b(n),c(n),r(n),x(n) PARAMETER (NMAX=500) CU USES tridag INTEGER i REAL fact,g
·
www.eeworm.com/read/414769/11102543

for fdjac.for

SUBROUTINE fdjac(n,x,fvec,np,df) INTEGER n,np,NMAX REAL df(np,np),fvec(n),x(n),EPS PARAMETER (NMAX=40,EPS=1.e-4) CU USES funcv INTEGER i,j REAL h,temp,f(NM
·
www.eeworm.com/read/414769/11102553

for mpsqrt.for

SUBROUTINE mpsqrt(w,u,v,n,m) INTEGER m,n,NMAX,MF CHARACTER*1 w(*),u(*),v(*) REAL BI PARAMETER (NMAX=2048,MF=3,BI=1./256.) CU USES mplsh,mpmov,mpmul,mpneg,mpsdv
·