24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1631  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

hanye0517

木虫 (小有名气)

[求助] fortran 如何获取变量名称 已有2人参与

我想在fortran的输出时自动生成文件进行格式化输出,请问怎样能够获取变量的名称?
比如:我想输出一个beta.txt
beta是我定义过的一个变量。
我想请问的是:我定一个个字符串变量:output
令output=function(beta)
output返回值为‘beta’
然后
output1=trim(output)//'txt'

请问这个function怎么写?
有没有相关的函数?
回复此楼
道之所在,虽千万人吾往矣。
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jerkwin

专家顾问 (正式写手)

引用回帖:
3楼: Originally posted by hanye0517 at 2014-04-24 23:15:20
哥,我四百多变量…………这咋整?一个个输?...

多了用循环
4楼2014-04-25 02:48:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

jerkwin

专家顾问 (正式写手)

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
hanye0517: 金币+10, 有帮助 2014-04-27 16:24:45
你这是变量转为字符串吧
不用那么麻烦, 直接write(output, *) beta 就可以了
2楼2014-04-24 22:52:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hanye0517

木虫 (小有名气)

引用回帖:
2楼: Originally posted by jerkwin at 2014-04-24 22:52:42
你这是变量转为字符串吧
不用那么麻烦, 直接write(output, *) beta 就可以了

哥,我四百多变量…………这咋整?一个个输?
道之所在,虽千万人吾往矣。
3楼2014-04-24 23:15:20
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

锐利的碎片

木虫 (正式写手)

star watcher

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★
感谢参与,应助指数 +1
hanye0517: 金币+10, 有帮助 2014-04-27 16:24:30
Fortran编译器不会保存变量名。
可以定义预处理宏
#define varname(x) #x
不过要编译器能够处理c
的宏

[ 发自手机版 http://muchong.com/3g ]
5楼2014-04-25 07:57:19
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 一志愿中海洋320化学工程与技术学硕求调剂 +3 披星河 2026-03-30 3/150 2026-03-30 23:38 by 果果妈咪
[考研] 11408总分309,一志愿东南大学求调剂,不挑专业 +5 天赋带到THU 2026-03-29 6/300 2026-03-30 20:49 by dick_runner
[考研] 367求调剂 +5 芋泥啵啵… 2026-03-28 5/250 2026-03-30 19:56 by 无际的草原
[考研] 085601材料工程找调剂 +17 oatmealR 2026-03-29 18/900 2026-03-30 19:21 by Wang200018
[考研] 一志愿厦门大学材料工程专硕354找调剂!!! +5 贝呗钡钡 2026-03-30 5/250 2026-03-30 18:16 by 无际的草原
[考研] 材料专硕 085600求调剂 +7 BBQ233 2026-03-30 7/350 2026-03-30 17:44 by oooqiao
[考研] 本科211生物医学工程085409求调剂339分 +3 里子木yy 2026-03-29 3/150 2026-03-30 13:29 by gyzj2026
[考研] 化学308分调剂 +7 你好明天你好 2026-03-30 8/400 2026-03-30 13:02 by 你好明天你好
[考研] 332求调剂 +6 Lyy930824@ 2026-03-29 6/300 2026-03-30 10:53 by 1172367218
[考研] 一志愿211,335分,0856,求调剂院校和导师 +7 倾____萧 2026-03-27 8/400 2026-03-30 09:37 by longlotian
[考研] 318一志愿吉林大学生物与医药 求调剂 +5 笃行致远. 2026-03-28 5/250 2026-03-30 06:56 by ilovexiaobin
[考研] 329求调剂 +10 钮恩雪 2026-03-25 10/500 2026-03-29 13:32 by peike
[考研] 数一英一271专硕(085401)求调剂,可跨 +7 前行必有光 2026-03-28 8/400 2026-03-28 23:22 by 小木虫tim
[考研] 299求调剂 +7 嗯嗯嗯嗯2 2026-03-27 7/350 2026-03-28 13:09 by 唐沐儿
[考研] 308求调剂 +7 墨墨漠 2026-03-27 7/350 2026-03-28 07:43 by 热情沙漠
[考研] 315分求调剂 +7 26考研上岸版26 2026-03-26 7/350 2026-03-28 04:05 by fmesaito
[考研] 总分322求生物学/生化与分子/生物信息学相关调剂 +5 星沉uu 2026-03-26 6/300 2026-03-26 19:02 by macy2011
[考研] 一志愿 南京邮电大学 288分 材料考研 求调剂 +3 jl0720 2026-03-26 3/150 2026-03-26 13:39 by zzll406
[考研] 296求调剂 +4 汪!?! 2026-03-25 7/350 2026-03-25 16:41 by 汪!?!
[考研] 344求调剂 +3 desto 2026-03-24 3/150 2026-03-24 10:09 by 搏击518
信息提示
请填处理意见