koideforest https://blog.hatena.ne.jp/koideforest/ nano_exit https://koideforest.hatenadiary.com/ プログラミング fortranでファイルを限界まで読み続けると、End of file でエラーが返って来る。この辺がなんとも原始的な香りを感じさせる。 この End of file を検出/処理するためには、以下の二通りが考えられる。 END で行番号へ飛ぶ。 Fortran 入門: ファイル操作 implicit none character( 99 ) :: input open( UNIT, FILE, STATUS = 'old' ) do while ( .true. ) read( UNIT, FORMAT, END = 999 ) input print *, input end do 999… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fkoideforest.hatenadiary.com%2Fentry%2F2019%2F12%2F09%2F232723" title="fortran で End of file を検出する。 - nano_exit" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> https://cdn.user.blog.st-hatena.com/default_entry_og_image/89449353/1514224948935857 Hatena Blog https://hatena.blog 2019-12-09 23:27:23 rich https://koideforest.hatenadiary.com/entry/2019/12/09/232723 1.0 100%