Fortran Tip集

前へ   上へ   次へ

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



前へ   上へ   次へ
関連情報
ご案内
© 髫エ魃会スス�・髫エ蟷「�ス�ャ驛「譏懶スケ譁溽、シ�ケ譎「�ス�シ驛「譎「�ス�。驛「譎「�ス�ェ驛「�ァ�ス�ォ驛「譎「�ス�ォ驛「�ァ�ス�「驛「譎「�ス�ォ驛「�ァ�ス�エ驛「譎「�ス�ェ驛「�ァ�ス�コ驛「譎「�ソ�ス驛「�ァ�ス�コ驛「�ァ�ス�ー驛「譎「�ス�ォ驛「譎「�ス�シ驛「譎芽サク�ス�ス�ス�ェ髯溷床�ク闌ィ�ス�シ陞溘q�ス�、�ス�セ 2024
Privacy Policy  /  Trademarks