今だけ! NAG Fortran コンパイラ 
大学生協様限定 年度末キャンペーン実施中! 
 詳細は 大学生協様専用URL からどうぞ 
Fortran Builder Logo
Fortran Builder
関連情報

ナビゲーション:前へ   上へ   次へ

4 1行すべてを読み込む方法

ファイルからの読み込みにおいて行内の空白などもふくめ1行すべてを読み込みたい場合があります。 このような場合には以下の例のように書式の指定で '(a)' を用いて実現可能です。 '(a)'を指定した場合空白なども含めて行の最初から最後までを読み込む事が可能です。

[ read-whole-line.f90 ] - 1行すべてを読み込むサンプル
program read_whole_line
  implicit none
  integer,parameter :: max_line_len = 4000
  character(max_line_len) linebuf
  open(99, file='mydata.dat', recl=max_line_len )
  read (99,'(a)') linebuf
  close(99)
  print *, trim(linebuf)
end



ナビゲーション:前へ   上へ   次へ

Results matter. Trust NAG.
Privacy Policy | Trademarks