Fortran Coder

标题: 怎么将二维数组输出成TXT格式 [打印本页]

作者: 916115735 时间: 2021-6-8 12:46
标题: 怎么将二维数组输出成TXT格式

[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格式文件呢？

作者: SolaProject 时间: 2021-6-9 02:03
。。。open一个新文件，然后向文件内按照你希望的形式输入数组的值即可，具体参考Fortran的I/O操作部分。举个例子：

[Fortran] 纯文本查看 复制代码

    open(unit=1, file='example.txt', status='replace', action='readwrite', iostat=errorLevel)

    do i = 1, size(SJ, 1)

        write(1, *) SJ(i, :)

    end do

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)