- 积分
 - 8049
 
	- 贡献
 -  
 
	- 精华
 
	- 在线时间
 -  小时
 
	- 注册时间
 - 2012-5-29
 
	- 最后登录
 - 1970-1-1
 
 
 
 
 
 
 | 
	
 
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册 
 
 
 
x
 
我在windows下写了一个fortran程序force.f90,内容如下: 
program  main 
implicit none 
parameter m=10844 
 
integer ::a(m,5) 
real ::b(m,8) 
 
integer:: i,j,k 
open(10,file='/home/zll/Test/1.txt') 
open(20,file='/home/zll/Test/2.txt') 
open(30,file='/home/zll/Test/qudong.txt') 
do i=1,m 
   read(10,*) (a(i,j),j=1,5) 
   read(20,*) (b(i,j),j=1,8) 
enddo  
close(10)  
close(20)    
 
 
!write(1,100)((a(i,j),j=1,5),i=1,m) 
DO I=1,m 
write(30,100) a(i,1), a(i,2), a(i,3), a(i,4), a(i,5),b(i,1),b(i,2),b(i,3),b(i,4),b(i,5),b(i,6),b(i,7),b(i,8) 
100 format(I4,4I3,8F17.10) 
ENDDO 
 
end 
在windows下运行可以生成qudong.txt文件,在linux下如何运行这个程序才能生成qudong.txt文件? 
 |   
 
 
 
 |