流体力学から数値計算まで

広告


ファイル操作

ファイルから読み込む

       open(10,file=”hoge.inf”)
       do i=1,10
         read(10,*)ary(i)
       enddo
       close(10)

ファイルに書き込む

       open(10,file=”hoge.inf”)
       do i=1,10
         write(10,*)ary(i)
       enddo
       close(10)

prev | top | next

カウンタ

（2011.3.15〜）