open(10,file=xxx.dat,position='append')
(最終更新日:2005/08/22)
write(filename,'(a,i3,a)') 'NO', var, '.dat' open(10,file=filename)
(j(n)=n, n=1,3)
(最終更新日:2005/10/11)
Copyright 2005 小松 研吾 (最終更新日:2005/10/11)