当前位置: 首页 > 程序语言 >求一段FORTRAN程序 转成 MATLAB 语言

求一段FORTRAN程序 转成 MATLAB 语言

作者 清风点兵
来源: 小木虫 150 3 举报帖子
+关注

拜托了大家, 哪位精通 matlab和 fortran 语言,,麻烦帮我看一下 下面这段 fortran程序 怎么转成 matlab程序。。难点在于在matlab中不能定义 复数矩阵,所以 在matlab中要注意复数阵的处理。
PROGRAM MAIN

    DOUBLEPRECISION A(0:20,0:10)            
        COMPLEX  B(0:20,0:10)
     DO I=0,20
            DO J=0,10
                   A(I,J)=2*I+J
               B(I,J)=CMPLX(A(I,J),0.0)
            ENDDO
          ENDDO
         
     ! ! !  输出A和B   ! ! !

        OPEN(1,FILE='A.DAT')
        WRITE(1,10) ((A(I,J),J=0,10),I=0,20)
    CLOSE(1)
        OPEN(2,FILE='B.DAT')
        WRITE(2,20) ((B(I,J),J=0,10),I=0,20)
    CLOSE(2)   
10  FORMAT(X,11F14.8)   
20 format( 22f14.8 )                              
  END

求一段FORTRAN程序 转成 MATLAB 语言
w90h5674050_1507728181_350.png 返回小木虫查看更多

今日热帖
  • 精华评论
  • ecnadwodahs

    Matlab可以定义复数矩阵,A,B是矩阵,A+iB就是复数矩阵

  • 清风点兵

    引用回帖:
    2楼: Originally posted by cooooldog at 2017-10-12 11:38:13
    matlab没有你想象的那么弱

    https://www.mathworks.com/help/matlab/ref/complex.html

    谢谢老师的回复。可是我用FORTRAN 和 MATLAB 运行同一段程序,得不出一样的结果,如下:

    FORTRAN 程序和相应的matlab程序如下图:



    计算出的BBF结果图不一样:
    求一段FORTRAN程序 转成 MATLAB 语言-1
    QQ图片20171015170908.png


    求一段FORTRAN程序 转成 MATLAB 语言-2
    QQ图片20171015171030.png


    求一段FORTRAN程序 转成 MATLAB 语言-3
    QQ图片20171015171215.png


    求一段FORTRAN程序 转成 MATLAB 语言-4
    QQ图片20171015171343.png


猜你喜欢
下载小木虫APP
与700万科研达人随时交流
  • 二维码
  • IOS
  • 安卓