声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 2682|回复: 3

[Fortran] [求助]关于write

[复制链接]
发表于 2006-4-18 08:56 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
write(11,'(10f10.5)') ((A(i,,j),,j=1,m),i=1,n)<BR>我想写一个10列的矩阵,m=10,可以这样写。但m为别的数时,我只有改f前面的数,有没有办法使得写入的列数随m变化?
回复
分享到:

使用道具 举报

发表于 2006-4-26 16:55 | 显示全部楼层
<P>是Fortran吧<BR>可以这样使用write:<BR>write(11, fmts) [输出表列]<BR>其中fmts事先声明成字符变量,名字可以随便,不一定是fmts. 在这个字符变量里面保存格式编辑符,如<BR>fmts="(10f10.5)"<BR>这样通过一个能根据需要改变变量fmts值的模块,应该能实现你的目标<BR>比方说,让fmts="("//rep//"f10.5)"<BR>式中rep是另一个字符变量,编一个子程序,把m的值转换成字符,传递给rep<BR>试试吧,其实我也没这么使过</P>
发表于 2006-4-26 17:06 | 显示全部楼层
试了一下,应该没问题<BR>不过这样的话,在CVF里就不能用Format Editor看格式了
发表于 2006-4-26 18:17 | 显示全部楼层
用一个比较大的数,一般可以解决问题的。
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-12-25 23:07 , Processed in 0.094895 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表