ファイルの中身を全部コピーしたいんですけど、
read文を使う場合、読み込ませる変数を細かく設定しなければいけませんよね？

例えば、
"do i=1,10"
を読ませたかったら、
read(1,*)a1,a2となりますよね？

毎回ファイルの中身が変わるので、それは面倒なんですよ。
とにかく、そのままコピーしたいんですけど、いい手ありませんか？