帮忙讲一下这一小段fortran的运行逻辑关系我不明白程序里 goto后面跟的数字都是怎么运行的!
来源:学生作业帮 编辑:大师作文网作业帮 分类:英语作业 时间:2024/11/18 11:58:50
帮忙讲一下这一小段fortran的运行逻辑关系我不明白程序里 goto后面跟的数字都是怎么运行的!
if (lud.eq.0) goto 99
do 6 i=1,N
do 6 j=1,N
AMD(i,j)=A(i,j)
6 continue
c This part for decomposing A is taken from DGEFA.
info=0
if (nm1.lt.1) go to 70
do 60 k=1,nm1
kp1=k+1
l=IDAMAX(N-k+1,AMD(k,k),1)+k-1
ipvt(k)=l
if (AMD(l,k).eq.0.0d0) goto 40
if (l.eq.k) goto 10
t=AMD(l,k)
AMD(l,k)=AMD(k,k)
AMD(k,k)=t
10 continue
t=-1.0d0/AMD(k,k)
call DSCAL(N-k,t,AMD(k+1,k),1)
do 30 j=kp1,N
t=AMD(l,j)
if (l.eq.k) go to 20
AMD(l,j)=AMD(k,j)
AMD(k,j)=t
20 continue
call DAXPY(N-k,t,AMD(k+1,k),1,AMD(k+1,j),1)
30 continue
go to 50
40 continue
info=k
50 continue
60 continue
70 continue
ipvt(N)=N
if (AMD(N,N).eq.0.0d0) info=N
if (info.ne.0) pause 'Division by zero in SOLVER!'
99 continue
if (nm1.it.1) go to 70 我想问,如果条件成立,是直接跳到70,运行,还是从这句话之后开始运行到70结束呢?
还有这要是在MATLAB里面怎么表示呢?
if (lud.eq.0) goto 99
do 6 i=1,N
do 6 j=1,N
AMD(i,j)=A(i,j)
6 continue
c This part for decomposing A is taken from DGEFA.
info=0
if (nm1.lt.1) go to 70
do 60 k=1,nm1
kp1=k+1
l=IDAMAX(N-k+1,AMD(k,k),1)+k-1
ipvt(k)=l
if (AMD(l,k).eq.0.0d0) goto 40
if (l.eq.k) goto 10
t=AMD(l,k)
AMD(l,k)=AMD(k,k)
AMD(k,k)=t
10 continue
t=-1.0d0/AMD(k,k)
call DSCAL(N-k,t,AMD(k+1,k),1)
do 30 j=kp1,N
t=AMD(l,j)
if (l.eq.k) go to 20
AMD(l,j)=AMD(k,j)
AMD(k,j)=t
20 continue
call DAXPY(N-k,t,AMD(k+1,k),1,AMD(k+1,j),1)
30 continue
go to 50
40 continue
info=k
50 continue
60 continue
70 continue
ipvt(N)=N
if (AMD(N,N).eq.0.0d0) info=N
if (info.ne.0) pause 'Division by zero in SOLVER!'
99 continue
if (nm1.it.1) go to 70 我想问,如果条件成立,是直接跳到70,运行,还是从这句话之后开始运行到70结束呢?
还有这要是在MATLAB里面怎么表示呢?
直接跳转到70行,几乎所有的程序语言,goto都是这个含义.
帮忙讲一下这一小段fortran的运行逻辑关系我不明白程序里 goto后面跟的数字都是怎么运行的!
一段fortran程序,do后面的数字跟continue前面的数字各有什么作用?
帮忙分析一下下面这道程序的运行详细运行过程(因为是笔试试题)
简单的一个fortran程序为什么运行不出正确答案啊.
fortran程序的作用是读入两个文件中的数字,忽略字母,并作适当变换,构建没有错误,运行错误如图,
这是一个matlab程序,为什么这个程序只运行else后面的语句,
有谁会操作LINGO,帮忙写一下计算下面所需要运行的程序,
一下程序段运行后,变量sum的值是
MATLAB程序问题:运行下面的程序,
一下程序段运行后,循环体中的“count+=2;”语句运行的次数为()
恳求fortran大神帮忙编译一小段简单程序
帮我看一下下面的matlab程序,运行时提示有错误,