Fortran Coder

查看: 14215|回复: 0
打印 上一主题 下一主题

[求助] 一维黎曼问题,自己算的比较网上标准代码,不符,求助

[复制链接]

17

帖子

5

主题

0

精华

入门

F 币
98 元
贡献
61 点
跳转到指定楼层
楼主
发表于 2020-6-12 22:29:36 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
1F 币
这里分别有我的代码结果和网上的标准代码结果,我就是按照网上的代码略微修改,基本没改。但是算出来的结果,尤其是压力图,多了一个台阶,希望大神帮助,我都比较了一天,也没找到问题所在。

我的代码:
!     MAIN (Explicit method)(我的代码)
!     MacCormack_1D_Rimenn problem
!===============================================================

      PROGRAM MacCormack_1D_Rimenn
      IMPLICIT NONE
      INTEGER, PARAMETER :: NMAX = 1001
      REAL(KIND=8), DIMENSION(NMAX) :: X

分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-27 00:20

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表