24小时热门版块排行榜    

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

dongjianzhi

主管区长

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

[求助] Fortran 声明变量

大家好:

我刚刚接触Fortran,看见个代码中用了dimension这个东西, 我在书里翻了一下,没看到dimension可以声明变量。

请问这个是什么意思呢? 谢谢!

      Program Main_hydrus
      double precision P,R,S,Q,RTime1,t,tInit,tOld,RTime,tMax,tAtm,
     !                 tPrint1,tAtm1,tAtm2,tAtmOld,tAtmN,tAtm2O,
     !                 TPrint,tPrintInt
      character cFileName*260,cDataPath*260,ccname*260

      dimension x(NumNPD),hNew(NumNPD),hOld(NumNPD),hTemp(NumNPD)
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

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

zhaiyu_jlu

实习版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

【答案】应助回帖

dimension是声明数组大小用的。
比如:
      real a
      dimension a(10)
fortran90的新语法可以写成:
real a(10)
不过我看lz的代码前面都有缩进,所以估计是旧语法。新语法向前兼容,但是老板看不懂……
5楼2013-01-09 21:36:58
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

11jxli1

专家顾问


感谢参与,应助指数 +1
xzhdty: 金币+1, 谢谢参与 2012-12-23 18:19:50
本帖内容被屏蔽

2楼2012-12-23 09:41:24
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

jingjingdou

实习版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

【答案】应助回帖

感谢参与,应助指数 +1
dimension在fortran是定义数组,楼主的程序段中,
dimension x(NumNPD),hNew(NumNPD),hOld(NumNPD),hTemp(NumNPD)
定义了x,hNew,hOld,hTemp四个一位数组,括号内的变量代表了数组的大小。需要注意的是在fortran中默认以a-h和o-z开头的变量为实型变量,而其他的均为整型变量,所以在这里NumNPD是一个整型变量。
例如:dimension x(100)即定义了一个容量了100的一维数组,记为x(100),上述四个数组含义类似。
fortran语言对语法要求相对严格一些,祝学习顺利!
以上愚见,如有不当之处,请见谅……
顺一点,一点就好!
3楼2012-12-24 17:51:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

@我的朋友@

版主

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

楼上解答的很好,建议多给点鼓励。
性情中人!
4楼2012-12-25 21:16:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料调剂 +4 一样YWY 2026-03-31 4/200 2026-03-31 23:06 by liu823948201
[考研] 一志愿085600中科院宁波所276分求调剂 +15 材料学257求调剂 2026-03-28 16/800 2026-03-31 22:51 by wwytracy
[考研] 考研调剂 +9 小蜡新笔 2026-03-29 10/500 2026-03-31 19:52 by Dyhoer
[考研] 0710生物学求调剂! +5 叙述文 2026-03-31 5/250 2026-03-31 17:32 by 唐沐儿
[考研] 263求调剂 +3 DDDDuu 2026-03-27 3/150 2026-03-31 16:21 by 土木硕士招生
[考研] 282求调剂 不挑专业 求收留 +4 Yam. 2026-03-30 5/250 2026-03-31 14:41 by 王亮_大连医科大
[考研] 一志愿浙江大学工科动力工程370,数一121,专业课135,现在能去哪里 +3 080700调剂 2026-03-30 4/200 2026-03-31 12:00 by KLMY666
[考研] 一志愿西电085401数一英一299求调剂 六级521 +4 爱吃大鸭梨 2026-03-31 4/200 2026-03-31 11:51 by 搏击518
[考研] 材料与化工调剂一志愿大连海事085600,349 +6 吃的不少 2026-03-30 6/300 2026-03-31 04:17 by fmesaito
[考研] 285求调剂 +6 AZMK 2026-03-29 9/450 2026-03-30 21:02 by dophin1985
[考研] 332求调剂 +6 @MZB382400 2026-03-28 6/300 2026-03-30 16:57 by 无际的草原
[考研] 071010 323 分求调剂 +3 Baekzhy 2026-03-27 3/150 2026-03-30 14:24 by andresqi
[考研] 085602 化学工程专硕 340分求调剂 +4 qianbai11 2026-03-29 4/200 2026-03-30 11:34 by 唐沐儿
[考研] 299求调剂 +10 15188958825 2026-03-25 10/500 2026-03-29 17:51 by 王亮_大连医科大
[考研] 数一英一271专硕(085401)求调剂,可跨 +7 前行必有光 2026-03-28 8/400 2026-03-28 23:22 by 小木虫tim
[考研] 266求调剂 +11 阳阳哇塞 2026-03-27 12/600 2026-03-27 17:56 by yu221
[考研] 08开头275求调剂 +4 拉谁不重要 2026-03-26 4/200 2026-03-27 14:12 by Delta2012
[论文投稿] Journal of Mechanical Science and Technology +3 Russ_ss 2026-03-25 5/250 2026-03-27 10:49 by 陆小果画大饼
[考研] 081200-11408-276学硕求调剂 +4 崔wj 2026-03-26 4/200 2026-03-27 08:04 by chemisry
[考研] 环境专硕324分求调剂推荐 +5 轩小宁—— 2026-03-26 5/250 2026-03-26 12:05 by i_cooler
信息提示
请填处理意见