홈>2020-03-18 16:14

arrays - 포트란 재구성 데이터 파일

열이 4 개인 데이터 파일이 있습니다 :

x    y    u    v

x와 y가 값 u와 v와 관련된 좌표 위치가되도록

데이터는 다음과 같이 구성되어 있습니다

x    y    u    v
1    1    #    #
2    1    #    #
3    1    #    #
...

그러나 파일을 재구성하여

x    y    u    v
1    1    #    #
1    2    #    #
1    3    #    #
...

이 기능을 수행 할 수있는 포트란 기능이 있습니까?

arraysfortran

답변 # 1

글쎄, 나는 "예쁜"에 대한 주장을하지는 않지만 그 일을해야합니다. 분명히 FORMAT 문을 확인해야합니다.

     PROGRAM TEST
      REAL*8 :: U(4,4)
      REAL*8 :: V(4,4)
      INTEGER :: X, Y
      DO
         READ(*,'(2I2)',ADVANCE='NO',END=10) X,Y
         READ(*,'(2F6.1)',ADVANCE='YES',END=10) U(X,Y),V(X,Y)
      END DO
 10   CONTINUE
      WRITE(*,'(2I4,2F10.2)') ((I,J,U(I,J),V(I,J),J=1,4),I=1,4)
      END

어레이가 이미 올바르게 할당되었다고 가정합니다.

입력 파일은 다음과 같습니다.

$ cat test.in
 1 1    5.0  10.0
 2 1    1.3  -0.2
 3 1    5.1   0.0
 4 1   -9.1   3.0
 1 2    4.0   2.0
 2 2   14.0  -8.0
 3 2   -8.0   8.0
 4 2    4.0   9.6
 1 3    2.0   1.1
 2 3    3.4   8.0
 3 3    4.0   7.0
 4 3    4.0   4.1
 1 4    5.5   8.4
 2 4   34.1  23.0
 3 4   -4.1   4.0
 4 4    6.0   8.4

그리고 출력 :

$ cat test.in | ./a.out
 1 1    5.0  10.0
 1 2    4.0   2.0
 1 3    2.0   1.1
 1 4    5.5   8.4
 2 1    1.3  -0.2
 2 2   14.0  -8.0
 2 3    3.4   8.0
 2 4   34.1  23.0
 3 1    5.1   0.0
 3 2   -8.0   8.0
 3 3    4.0   7.0
 3 4   -4.1   4.0
 4 1   -9.1   3.0
 4 2    4.0   9.6
 4 3    4.0   4.1
 4 4    6.0   8.4

Python2.net

arrays - 포트란 재구성 데이터 파일

관련 자료