24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1632  |  回复: 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的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料与化工(0856)304求B区调剂 +6 邱gl 2026-03-30 10/500 2026-03-31 07:43 by yishunmin
[考研] 一志愿中海洋320化学工程与技术学硕求调剂 +6 披星河 2026-03-30 6/300 2026-03-31 07:38 by JourneyLucky
[考研] 266分,求材料相关专业调剂 +6 哇呼哼呼哼 2026-03-30 8/400 2026-03-30 23:48 by 哇呼哼呼哼
[考研] 297 地理学070500 复试求调剂 +3 小圆圈圈ooo 2026-03-30 3/150 2026-03-30 21:05 by 余震yz
[考研] 085600 295分求调剂 +7 W55j 2026-03-30 9/450 2026-03-30 20:36 by dick_runner
[考研] 抱歉 +3 田洪有 2026-03-30 3/150 2026-03-30 19:11 by 迷糊CCPs
[考研] 085701求调剂初试286分 +5 secret0328 2026-03-28 5/250 2026-03-30 12:54 by fangnagu
[考研] 070305高分子化学与物理 304分求调剂 +12 c297914 2026-03-28 12/600 2026-03-29 16:21 by Serene1974
[考研] 327求调剂 +6 汲亦昊 2026-03-29 6/300 2026-03-29 13:40 by peike
[考研] 291求调剂 +5 Y-cap 2026-03-29 6/300 2026-03-29 13:18 by mumin1990
[考研] 298求调剂 +3 种圣赐 2026-03-29 3/150 2026-03-29 12:06 by longlotian
[考研] 本科新能源科学与工程,一志愿华理能动285求调剂 +3 AZMK 2026-03-27 5/250 2026-03-28 16:19 by xxxsssccc
[考研] 材料277求调剂 +7 min3 2026-03-24 7/350 2026-03-28 11:39 by xuxiang
[考研] 085405 考的11408求各位老师带走 +3 Qiu学ing 2026-03-28 3/150 2026-03-28 09:19 by 乐呵呵的追梦人
[考研] 295求调剂 +5 1428151015 2026-03-27 6/300 2026-03-28 04:04 by fmesaito
[考研] 调剂 +3 李嘉图·S·路 2026-03-27 3/150 2026-03-27 11:19 by wangjy2002
[论文投稿] Journal of Mechanical Science and Technology +3 Russ_ss 2026-03-25 5/250 2026-03-27 10:49 by 陆小果画大饼
[考研] 286求调剂 +4 lim0922 2026-03-26 4/200 2026-03-27 10:28 by guoweigw
[考研] 机械学硕310分,数一英一,一志愿211本科双非找调剂信息 +3 @357 2026-03-25 3/150 2026-03-26 16:34 by by.MENG
[考研] 一志愿天津大学339材料与化工求调剂 +3 江往卖鱼 2026-03-26 3/150 2026-03-26 09:42 by 王小欠i
信息提示
请填处理意见