24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 539  |  回复: 5
当前主题已经存档。

liyi3344520

木虫 (正式写手)

[交流] 【求助】fortran 定义character变量的疑问?

看的一段程序,其定义for为如下:
  character(len=20) :: for='(??(1x,f6.3))'
但是不懂等号后面什么意思?问号是什么意思?

[ Last edited by liyi3344520 on 2008-12-31 at 20:14 ]
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

coldwind042

金虫 (正式写手)

应该就是将: (??(1x,f6.3))  这段字符赋值给for这个字符串变量吧
2楼2008-12-31 20:53:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

liyi3344520

木虫 (正式写手)

引用回帖:
Originally posted by coldwind042 at 2008-12-31 20:53:
应该就是将: (??(1x,f6.3))  这段字符赋值给for这个字符串变量吧

我表述不太清楚,
这个 (??(1x,f6.3))  是什么意思?
3楼2008-12-31 21:45:11
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

coldwind042

金虫 (正式写手)

这是一个符号而已。可能是要生成一个fortran的输入格式命令流。不过,??可能是没有正确显式
4楼2008-12-31 22:58:10
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

liyi3344520

木虫 (正式写手)

感谢战友的回复!

character(len=20) :: for='(??(1x,f6.3))' 这里的??是以后要替换掉的
一般都是这么用的,如下:
character(len=20) :: for='(??(1x,f6.3))'
integer :: N=2
real,dimension(N) :: a
   write(for(2:3),'(i2)') N   ! 这里就是将??替换为N的数值,相当于 for='( 2(1x,f6.3))'
   write(*,fmt=for) a
这样如果改变a的大小,只改变N的值就可以了
5楼2009-01-01 01:16:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

weiwei43

至尊木虫 (正式写手)

这个真是高级应用。
6楼2009-01-08 08:12:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 liyi3344520 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 070305高分子化学与物理 304分求调剂 +7 c297914 2026-03-28 7/350 2026-03-29 01:17 by 544594351
[考研] 一志愿哈尔滨工业大学材料与化工方向336分 +9 辰沐5211314 2026-03-26 9/450 2026-03-29 01:12 by 我是小康
[考研] 各位老师好,我的一志愿为北京科技大学085601材料专硕 +7 Koxui 2026-03-28 7/350 2026-03-29 00:58 by 我是小康
[考研] 085600 材料与化工 329分求调剂 +10 Mr. Z 2026-03-25 10/500 2026-03-29 00:34 by 我是小康
[考研] 295求调剂 +4 wei-5 2026-03-26 4/200 2026-03-28 23:20 by 小木虫tim
[考研] 283求调剂 +7 A child 2026-03-28 7/350 2026-03-28 12:05 by zllcz
[考研] 291求调剂 +15 hhhhxn.. 2026-03-23 21/1050 2026-03-28 11:26 by self2008
[考研] 0856,材料与化工321分求调剂 +12 大馋小子 2026-03-27 13/650 2026-03-28 10:56 by self2008
[考研] 张芳铭-中国农业大学-环境工程专硕-298 +4 手机用户 2026-03-26 4/200 2026-03-28 07:17 by mmm just
[考研] 086502化学工程342求调剂 +6 阿姨复古不过 2026-03-27 6/300 2026-03-28 07:06 by wangy0907
[考博] 26申博 +3 加油冲啊! 2026-03-26 3/150 2026-03-27 15:38 by cls512
[考研] 求调剂 +6 林之夕 2026-03-24 6/300 2026-03-27 08:38 by hypershenger
[考研] 材料学硕,求调剂 6+5 糖葫芦888ll 2026-03-22 10/500 2026-03-27 08:18 by hypershenger
[考研] 总分322求生物学/生化与分子/生物信息学相关调剂 +5 星沉uu 2026-03-26 6/300 2026-03-26 19:02 by macy2011
[考研] 生物学 296 求调剂 +4 朵朵- 2026-03-26 6/300 2026-03-26 19:01 by 不吃魚的貓
[考研] 总分293求调剂 +6 加一一九 2026-03-25 8/400 2026-03-26 13:30 by yujianx
[考研] 打过很多竞赛,085406控制工程300分,求调剂 +3 askeladz 2026-03-26 3/150 2026-03-26 09:08 by 给你你注意休息
[考研] 求b区院校调剂 +4 周56 2026-03-24 5/250 2026-03-25 17:12 by yishunmin
[考研] 361求调剂 +3 Glack 2026-03-22 3/150 2026-03-23 22:03 by fuyu_
[考研] 269求调剂 +4 我想读研11 2026-03-23 4/200 2026-03-23 21:25 by pswait
信息提示
请填处理意见