s*r
2 楼
写在一个文件里?
【在 l****y 的大作中提到】
: 如果想在每一个循环中有一个文件（有数据写入）输出，请问用fortran如何实现？？？
: 谢谢
【在 l****y 的大作中提到】
: 如果想在每一个循环中有一个文件（有数据写入）输出，请问用fortran如何实现？？？
: 谢谢
l*y
3 楼
不是，是每一次循环，就把计算结果写入一个文件，然后输出。
如果循环10次，就有10个文件输出，依此类推，
请问怎么解决
？？
【在 s*r 的大作中提到】
: 写在一个文件里?
如果循环10次，就有10个文件输出，依此类推，
请问怎么解决
？？
【在 s*r 的大作中提到】
: 写在一个文件里?
s*r
4 楼
文件名用char,要输出前修改char
【在 l****y 的大作中提到】
: 不是，是每一次循环，就把计算结果写入一个文件，然后输出。
: 如果循环10次，就有10个文件输出，依此类推，
: 请问怎么解决
:
: ？？
【在 l****y 的大作中提到】
: 不是，是每一次循环，就把计算结果写入一个文件，然后输出。
: 如果循环10次，就有10个文件输出，依此类推，
: 请问怎么解决
:
: ？？
l*y
5 楼
是在循环程序内修改吗？
文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
【在 s*r 的大作中提到】
: 文件名用char,要输出前修改char
文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
【在 s*r 的大作中提到】
: 文件名用char,要输出前修改char
h*o
6 楼
character*3 fname, lab
fname = 'out'
do 10 i = 1, 100
write(lab,'(i3.3)') i
open(unit=7, file=fname//lab, .....)
.....
....
write(7, *) ....
10 continue
output files are out001, out002, ...., out099, out100
【在 l****y 的大作中提到】
: 是在循环程序内修改吗？
: 文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
fname = 'out'
do 10 i = 1, 100
write(lab,'(i3.3)') i
open(unit=7, file=fname//lab, .....)
.....
....
write(7, *) ....
10 continue
output files are out001, out002, ...., out099, out100
【在 l****y 的大作中提到】
: 是在循环程序内修改吗？
: 文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
t*o
7 楼
高
但fname//lab
不是所有的FORTRAN都支持把？
【在 h***o 的大作中提到】
: character*3 fname, lab
: fname = 'out'
: do 10 i = 1, 100
: write(lab,'(i3.3)') i
: open(unit=7, file=fname//lab, .....)
: .....
: ....
: write(7, *) ....
: 10 continue
: output files are out001, out002, ...., out099, out100
但fname//lab
不是所有的FORTRAN都支持把？
【在 h***o 的大作中提到】
: character*3 fname, lab
: fname = 'out'
: do 10 i = 1, 100
: write(lab,'(i3.3)') i
: open(unit=7, file=fname//lab, .....)
: .....
: ....
: write(7, *) ....
: 10 continue
: output files are out001, out002, ...., out099, out100
h*o
8 楼
我家f77, g77和最挑剔的ifc都支持的呀
【在 t*****o 的大作中提到】
: 高
: 但fname//lab
: 不是所有的FORTRAN都支持把？
【在 t*****o 的大作中提到】
: 高
: 但fname//lab
: 不是所有的FORTRAN都支持把？
l*y
9 楼
我用ifc编译后可以生成执行文件（没有任何错误提示），可是执行后没有任何文件输出
，怎么解决啊？
【在 h***o 的大作中提到】
: 我家f77, g77和最挑剔的ifc都支持的呀
，怎么解决啊？
【在 h***o 的大作中提到】
: 我家f77, g77和最挑剔的ifc都支持的呀
h*o
10 楼
debug吧
【在 l****y 的大作中提到】
: 我用ifc编译后可以生成执行文件（没有任何错误提示），可是执行后没有任何文件输出
: ，怎么解决啊？
【在 l****y 的大作中提到】
: 我用ifc编译后可以生成执行文件（没有任何错误提示），可是执行后没有任何文件输出
: ，怎么解决啊？
c*n
11 楼
FILENAME = 'char01'
DO I = 1, 10
J = 10+II
WRITE(FILENAME(5:6),I2.2) I
OPEN(UNIT=J,FILE=FILENAME)
ENDDO
result:
char01
char02
....
【在 l****y 的大作中提到】
: 是在循环程序内修改吗？
: 文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
DO I = 1, 10
J = 10+II
WRITE(FILENAME(5:6),I2.2) I
OPEN(UNIT=J,FILE=FILENAME)
ENDDO
result:
char01
char02
....
【在 l****y 的大作中提到】
: 是在循环程序内修改吗？
: 文件名用char，怎么修改啊？可以给个简单示范吗？本人接触fortran不久，谢谢
相关阅读
anybody know how to solve the question?Need Rank in cs of China UniversitiesR&D Engineer Position in Numerical Methods有人用 NumPy 来计算吗为啥我的matlab r2007b少了一些function两本书share[合集] 能不能在fortran里面自动更改I/O文件名请推荐一本numerical PDE的好教材MATLAB画图问题有人在ubuntu上装过那个meep包吗？2008 ISMVL Call for Paper (转载)How to read binary(data) file generated by Fortran in C/C++?请问大侠们有谁能够帮小女子辅导一下VBA的使用？欢迎参加北京化工大学赴明尼苏达大学人才招聘会！！关于三维快速傅立叶（FFT）Matlab 的积分函数中的函数调用问题software to calculate similarity between chemicals请教一个Monte Carlo simulation问题 (转载)两个方向，想听听大家的意见Ask questions on Latin Hypercube sampling