作者DMFC (solebaby)
看板Programming
标题Re: [FORTRAN] 如果档名是变数 要怎麽去读它
时间Tue Oct 30 12:26:37 2007
不罗嗦~直接说
character*32 in
open(8,file='input.inp')
read(8,*) sk
read(8,"(a20)") in
假设 in=t454001090.txt
open(22,file=''//in)
do i=1,n
read(22) TIM(I) , Vertical(I) , Nouth(I) , EAST(I)
end do
大概就是这样
重点是~open(#,file=''/in)
在 ' ' 里也可以加东西
但不能没有 ' '
这方式我在 intel compiler 都可以成功
其他种 compiler 就没试过了
※ 引述《kidd007008 (谁是接班人)》之铭言：
: 想请问一下
: open(8,FILE='input.inp',status='old')
: READ(8,*) SK
: READ(8,*) DT
: READ(8,*) N
: READ(8,*) M
: READ(8,"(A20)") in
: CLOSE(8)
: 我想从input.inp这个档案里面去读我要执行的档案
: 其中 in是档名的变数
: 例如:in=T454001090.txt
: 然後T454001090档案里面有4行一维阵列
: 要怎麽去读这个档案里面的资料
: 例:一般在程式里面都会用
: OPEN(12,FILE='T454001090.txt')
: DO I=1,N
: READ(12,*) TIM(I) , Vertical(I) , Nouth(I) , EAST(I)
: END DO
: 这种写法去读档
: 那要怎麽从innput.inp去读T454001090.txt这个档案
: 然後读T454001090.txt里面4个一维阵列
: 谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.109.112.232
1F：推 kidd007008:感谢218.162.100.227 10/31 09:15