代码搜索:continue
找到约 10,000 项符合「continue」的源代码
代码结果 10,000
www.eeworm.com/read/414769/11102665
for bandec.for
SUBROUTINE bandec(a,n,m1,m2,np,mp,al,mpl,indx,d)
INTEGER m1,m2,mp,mpl,n,np,indx(n)
REAL d,a(np,mp),al(np,mpl),TINY
PARAMETER (TINY=1.e-20)
INTEGER i,j,k,l,mm
R
www.eeworm.com/read/414769/11102680
for mglin.for
SUBROUTINE mglin(u,n,ncycle)
INTEGER n,ncycle,NPRE,NPOST,NG,MEMLEN
DOUBLE PRECISION u(n,n)
PARAMETER (NG=5,MEMLEN=13*2**(2*NG)/3+14*2**NG+8*NG-100/3)
PARAMETER (NPRE=
www.eeworm.com/read/414769/11102684
for fredin.for
FUNCTION fredin(x,n,a,b,t,f,w,g,ak)
INTEGER n
REAL fredin,a,b,x,f(n),t(n),w(n),g,ak
EXTERNAL ak,g
CU USES ak,g
INTEGER i
REAL sum
sum=0.
do 1
www.eeworm.com/read/414769/11102694
for pccheb.for
SUBROUTINE pccheb(d,c,n)
INTEGER n
REAL c(n),d(n)
INTEGER j,jm,jp,k
REAL fac,pow
pow=1.
c(1)=2.*d(1)
do 12 k=2,n
c(k)=0.
fac=d(
www.eeworm.com/read/414769/11102698
for dsvbksb.for
SUBROUTINE dsvbksb(u,w,v,m,n,mp,np,b,x)
INTEGER m,mp,n,np,NMAX
DOUBLE PRECISION b(mp),u(mp,np),v(np,np),w(np),x(np)
PARAMETER (NMAX=500)
INTEGER i,j,jj
DOUBLE
www.eeworm.com/read/414769/11102706
for rzextr.for
SUBROUTINE rzextr(iest,xest,yest,yz,dy,nv)
INTEGER iest,nv,IMAX,NMAX
REAL xest,dy(nv),yest(nv),yz(nv)
PARAMETER (IMAX=13,NMAX=50)
INTEGER j,k
REAL b,b1,c,ddy,v
www.eeworm.com/read/414769/11102719
for fpoly.for
SUBROUTINE fpoly(x,p,np)
INTEGER np
REAL x,p(np)
INTEGER j
p(1)=1.
do 11 j=2,np
p(j)=p(j-1)*x
11 continue
return
END
www.eeworm.com/read/269220/11105982
cpp f0214.cpp
//=====================================
// f0214.cpp
// 百钱买百鸡
//=====================================
#include
using namespace std;
//-------------------------------------
int main(){
www.eeworm.com/read/268797/11121390
cmd command.cmd
set trace-commands on
# Debugger test of 'command' command
#
# Try to set command when there is none.
command 1
#
# Now a command for a real breakpoint
break 23
command 1
x x
end
#
###################
www.eeworm.com/read/268797/11121479
cmd brkpt2.cmd
set trace-commands on
# Test break, watch, watche, step, next, continue and stack handling
#
### Try a simple line number breakpoint...
break 23
info break
continue
info program
#
### Try watch...
w