result 폴더 생성

FORTRAN의 경우 CALL SYSTEM(COMMAND [, STATUS])를 이용하면 되며, result 폴더를 생성하는 예제는 아래와 같습니다.

      program sample
      ...

      ...
!      결과 파일이 저장될 result 폴더 생성
      CALL SYSTEM("rm -rf result")
      CALL SYSTEM("mkdir result")
      ...

출력 파일 쓰기

      ...
!      result/result.txt을 오픈
      open(2,file="result/result.txt")
      ...

      ...
!      파일안에 데이터를 씀
      write(2,*)"Hello EDISON."
      ...


      ...
!      파일을 닫음
      CLOSE(2)

open() 함수를 이용해 장치번호(UNIT)을 2로 설정하여 result 폴더 안 result.txt 파일을 오픈한다. 여러개의 파일을 동시에 쓰거나 읽는 경우 장치번호가 겹치지 않게 조심해야합니다.

장치번호는 1 부터 99 사이의 정수로 설정할 수 있으며, 5는 표준 입력 standard input, 6은 표준 출력 standard output으로 이미 설정되어 있습니다.

장치 번호와 write()함수를 통해 파일에 데이터를 쓸 수 있으며, 파일쓰기가 완료된 이후 close() 함수를 이용해 파일을 닫습니다.