本文介绍了Fortran90 未分类语句 While 循环的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
限时送ChatGPT账号..我正在尝试在 Fortran90 中运行一小段代码,但我收到了一个带有 while 语句的未分类语句错误.我在网上查看并找不到为什么会在 while 语句中发生这种情况.这是我收到的错误:
I'm trying to make a little snipett of code run in Fortran90 and I'm getting an Unclassified Statement Error with a while statement. I've looked online and could not find why this would occur with a while statement. Here is the errors I'm getting:
Test.f90:11.4:
while (R < MinimumEnergy) do
1
Error: Unclassifiable statement at (1)
Test.f90:15.8:
while (f < R) do
1
Error: Unclassifiable statement at (1)
Test.f90:19.11:
enddo
1
Error: Expecting END PROGRAM statement at (1)
Test.f90:23.7:
enddo
1
Error: Expecting END PROGRAM statement at (1)
这是我的代码:
program FD_Number
REAL :: MinimumEnergy = 4.5;
REAL :: a = -9;
REAL :: b = 9;
REAL R, randomN, f
REAL :: FD
FD(R) = (1 + exp(R))**(-1)
R = 0;
while (R < MinimumEnergy) do
R = 999999;
f = FD(a + (b - a)*R);
while (f < R) do
call random_number(randomN)
f = FD(a + (b - a)*randomN);
call random_number(R)
enddo
R = a + (b - a)*R;
f = FD(R);
enddo
print *, f
end
推荐答案
我有代码
while (statement) do
code
enddo
而不是
identifier: do while (statement)
code
end do identifier
这篇关于Fortran90 未分类语句 While 循环的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
更多推荐
[db:关键词]
发布评论