最初にキーボードからintegerを読み込ませて(例えば100とします)、
保存対象のファイルをこのintegerによって変えたいのですが(この場合'100.dat'に保存したい)、
下のようにするとうまくいきません。どこがおかしいのでしょうか？
教えてくださいお願いします。
implicit none
integer :: i
character*16 :: name
read(*,*) i
name = (char(i))//'.dat'
open(11,file = name)
write(11,*) 'ここに書き込む内容をかく'
close(11)
stop
end