Fortran 编译器 4 与 11

发布于 2024-08-06 18:10:18 字数 311 浏览 6 评论 0原文

我正在将应用程序从 Fortran 旧版本 (4.0) 移植到新版本 (11.0)。在移植时，我遇到了一些有关 real*4 变量的问题：

real*4 a,b,c

a=0.9876875
b=0.6754345

c=a*b

旧编译器 0.667118 中 c 的值，这是正确的值。但是使用新的编译器，我得到的输出（c 变量）有一些微小的变化，例如 0.667120。尽管变化很小，但我在其他计算中使用了这些值。所以整体的输出有很大的差异。如何克服这个问题？

原文

I am porting an application from fortran older version (4.0) to new version (11.0). While porting I am facing some problems with real*4 variables:

real*4 a,b,c

a=0.9876875
b=0.6754345

c=a*b

value for c in old compiler 0.667118, which is correct value. But with new compiler I am getting a small variation from the output(c variable) like 0.667120. Though it is a small variation, I am using these values in some other calculation. So the overall output has a huge difference. How to overcome this issue?

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

—━☆沉默づ 2024-08-13 18:10:18

我假设您正在从 Microsoft Fortran Powerstation 4 转到 Intel Visual Fortran 11.xx ？

无论如何，试试这个：

program test32

integer, parameter :: iwp = selected_real_kind(15,300)

real(iwp) :: a,b,c

a=0.9876875
b=0.6754345

c=a*b
write(*,'(3f12.8)')a,b,c

end program test32

它给出：

0.98768753  0.67543453  0.66711826

我不会解释 selected_real_kind ，不是因为我不希望，而是因为帮助可能会做得更好。但是，如果这里有不清楚的地方，请务必询问。

ps real*4 或任何类型的 real 的表示形式取决于处理器和编译器，这就是您获得不同结果的原因之一。

You are, I'm assuming, going from Microsoft Fortran Powerstation 4 to Intel Visual Fortran 11.xx ?

Anyways, try this:

program test32

integer, parameter :: iwp = selected_real_kind(15,300)

real(iwp) :: a,b,c

a=0.9876875
b=0.6754345

c=a*b
write(*,'(3f12.8)')a,b,c

end program test32

which gives out:

0.98768753  0.67543453  0.66711826

I will not explain selected_real_kind, not because I do not wish, but because the help will probably do it much better. But, do ask if something in here is not clear.

p.s. The representation of real*4, or any type of real is processor dependent, and compiler dependent and that is one of the reasons why you're getting different results.

回复收藏 0 原文