Fortran Coder

查看: 9258|回复: 1
打印 上一主题 下一主题

[文件读写] 怎么将二维数组输出成TXT格式

[复制链接]

29

帖子

10

主题

0

精华

熟手

F 币
152 元
贡献
98 点
跳转到指定楼层
楼主
发表于 2021-6-8 12:46:44 | 显示全部楼层 回帖奖励 |倒序浏览 |阅读模式
[Fortran] 纯文本查看 复制代码
SJ(7744,93)
DO i1=1,7744,1
           DO j=4,93,1
               DO i2=0,900,10
                   IF (i1==NOEL)THEN
                       SJ(i1,1)=COORDS(1)-115.5
                       SJ(i1,2)=COORDS(2)
                       SJ(i1,3)=COORDS(3)
                    ENDIF   
                       IF (i2==TIME(1))THEN
                         SJ(i1,j)=STATEV(10)
               ENDIF
           ENDDO
       ENDDO
      ENDDO

通过建立二维数组保存数据 怎么将该数组输出成txt格式文件或者dat格式文件呢?
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

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

GMT+8, 2024-5-4 12:27

Powered by Tencent X3.4

© 2013-2024 Tencent

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