代码搜索：continue
找到约 10,000 项符合「continue」的源代码
代码结果 10,000
www.eeworm.com/read/367160/9778533
f slagsy.f
SUBROUTINE SLAGSY( N, K, D, A, LDA, ISEED, WORK, INFO )
*
* -- LAPACK auxiliary test routine (version 3.1)
* Univ. of Tennessee, Univ. of California Berkeley and NAG Ltd..
* Novembe
www.eeworm.com/read/366853/9795869
m tc_downhill_newton.m
function x=tc_DownHill_newton(x0,f)
%newton法的变形，newton下山法，含有下山因子w初始值为1
%f=inline('[x^3-x-1,3*x^2-1]');
ff=f(x0);
w=1;
while 1
ff=f(x0);
x1=x0-w*ff(1)/ff(2);
fff=f(x1);
x=x1;
www.eeworm.com/read/269691/11082985
c loop.c
#include "calld.h"
#include
static void cli_done(int);
static void child_done(int);
/*
* One bit per client cxn, plus one for listenfd;
* modified by loop() and cli_done()
*/
static fd_
www.eeworm.com/read/269691/11083134
c zap.c
#include "apue.h"
#include
#include
int
main(int argc, char *argv[])
{
int i, fd;
struct stat statbuf;
struct utimbuf timebuf;
for (i = 1; i < argc; i++) {
if (stat(arg
www.eeworm.com/read/269691/11083565
21 fig4.21
#include "apue.h"
#include
#include
int
main(int argc, char *argv[])
{
int i, fd;
struct stat statbuf;
struct utimbuf timebuf;
for (i = 1; i < argc; i++) {
if (stat(arg
www.eeworm.com/read/414843/11099962
m step_by_step.m
F_= menu([' 是否清除Matlab上以前的内存、图片、屏幕信息'],'是','否');
if F_==1
clf,clear ,clc
end
pause(1.6)
%第一块:
%生成一道习题
%误差系数:K 超调量P.O.:P_O_ 调节时间Ts:Ts_ 相位裕量:Fai_M 增益裕量:Fai_F 系统类型:N 阻尼比
www.eeworm.com/read/414769/11101948
for mgfas.for
SUBROUTINE mgfas(u,n,maxcyc)
INTEGER maxcyc,n,NPRE,NPOST,NG,MEMLEN
DOUBLE PRECISION u(n,n),ALPHA
PARAMETER (NG=5,MEMLEN=17*2**(2*NG)/3+18*2**NG+10*NG-86/3)
PARAMETER
www.eeworm.com/read/414769/11101958
for chebev.for
FUNCTION chebev(a,b,c,m,x)
INTEGER m
REAL chebev,a,b,x,c(m)
INTEGER j
REAL d,dd,sv,y,y2
if ((x-a)*(x-b).gt.0.) pause 'x not in range in chebev'
d=0.
www.eeworm.com/read/414769/11102111
for bcuint.for
SUBROUTINE bcuint(y,y1,y2,y12,x1l,x1u,x2l,x2u,x1,x2,ansy,ansy1,
*ansy2)
REAL ansy,ansy1,ansy2,x1,x1l,x1u,x2,x2l,x2u,y(4),y1(4),y12(4),
*y2(4)
CU USES bcucof
INTEGER
www.eeworm.com/read/414769/11102127
for fill0.for
SUBROUTINE fill0(u,n)
INTEGER n
DOUBLE PRECISION u(n,n)
INTEGER i,j
do 12 j=1,n
do 11 i=1,n
u(i,j)=0.d0
11 continue
12 continue
r