| 查看: 1636 | 回复: 3 | ||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||
goalry金虫 (正式写手)
|
[求助]
【求助】Fortran语言赋值问题？
|
|
|
我想写个能读取数据的小程序，因为数据量多，首先定义几个一维数组，这个一维数组的维数为10000，程序前几行如下，但老是提示对整形变量定义加赋值语句有错误，还请指导一下。 1. 如果这样写程序： PROGRAM RATIO INTEGER(NUM=100) REAL UOC(NUM),ISC(NUM),RS(NUM) REAL RSH(NUM),FF(NUM),NCELL(NUM) 错误提示： D:\Analysis\analysis.f90(3) : Error: Syntax error, found END-OF-STATEMENT when expecting one of: :: %FILL , TYPE COMPLEX BYTE CHARACTER DOUBLE DOUBLECOMPLEX DOUBLEPRECISION ... INTEGER(NUM=100) ----------------^ Error executing df.exe. 2. 如果这样写程序： PROGRAM RATIO INTEGER:: NUM=10000 REAL UOC(NUM),ISC(NUM),RS(NUM) REAL RSH(NUM),FF(NUM),NCELL(NUM) 错误提示： D:\Analysis\analysis.f90(3) : Error: This object is not a valid DATA statement object. [NUM] INTEGER:: NUM=10000 ----------^ D:\Analysis\analysis.f90(3) : Error: A specification expression object must be a dummy argument, a COMMON block object, or an object accessible through host or use association [NUM] INTEGER:: NUM=10000 ----------^ D:\Analysis\analysis.f90(4) : Error: An automatic object is invalid in a main program. [UOC] REAL UOC(NUM),ISC(NUM),RS(NUM) -----^ D:\Analysis\analysis.f90(4) : Error: An automatic object is invalid in a main program. [ISC] REAL UOC(NUM),ISC(NUM),RS(NUM) --------------^ D:\Analysis\analysis.f90(4) : Error: An automatic object is invalid in a main program. [RS] REAL UOC(NUM),ISC(NUM),RS(NUM) -----------------------^ D:\Analysis\analysis.f90(5) : Error: An automatic object is invalid in a main program. [RSH] REAL RSH(NUM),FF(NUM),NCELL(NUM) -----^ D:\Analysis\analysis.f90(5) : Error: An automatic object is invalid in a main program. [FF] REAL RSH(NUM),FF(NUM),NCELL(NUM) --------------^ D:\Analysis\analysis.f90(5) : Error: An automatic object is invalid in a main program. [NCELL] REAL RSH(NUM),FF(NUM),NCELL(NUM) ----------------------^ Error executing df.exe. analysis.obj - 8 error(s), 0 warning(s) 我认为以上两种定义变量的同时赋值语句应该没错啊，求解！！ 谢谢 |
回复此楼» 猜你喜欢
【复旦大学】二维材料方向招收2026年博士研究生1名
已经有0人回复
-
北京纳米能源与系统研究所 王中林院士/曹南颖研究员课题组2026级硕/博/博后招生
已经有10人回复
-
物理学I论文润色/翻译怎么收费?
已经有59人回复
-
荷兰Utrecht University超快太赫兹光谱王海教授课题招收2026 CSC博士生
已经有23人回复
-
反铁磁体中的磁性切换：两种不同的机制已成功可视化
已经有0人回复
-
求标准粉末衍射卡号 ICDD 01-076-1802
已经有0人回复
-
新西兰Robinson研究所招收全奖PhD
已经有0人回复
-
石墨烯转移--二氧化硅衬底石墨烯
已经有0人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 新手入门，如何理解计算机编程
已经有8人回复
- allocate与data共存的问题
已经有14人回复
- FORTRAN 基础知识讲解
已经有21人回复
- 求助Fortran编程
已经有8人回复
- 请教一个fortran小程序编译出错的问题，谢谢
已经有9人回复
- 注册化工工程师
已经有10人回复
- 【求助】求指点，在Fortran里面，怎样实现“数组维度可调”的数组?
已经有5人回复
- 【求助】有很多错误的程序，找不出来了
已经有18人回复
- 【求助】大家谈谈对注册环保工程师的了解
已经有15人回复
- 【信息】环保工程师报考条件
已经有11人回复
- 【交流】Fortran语言答疑专帖
已经有157人回复
zhfzh
木虫 (正式写手)
- 应助: 19 (小学生)
- 金币: 6620.5
- 散金: 200
- 红花: 4
- 帖子: 685
- 在线: 665小时
- 虫号: 715595
- 注册: 2009-03-05
- 专业: 原子和分子物理
4楼2011-07-22 17:14:23
zhfzh
木虫 (正式写手)
- 应助: 19 (小学生)
- 金币: 6620.5
- 散金: 200
- 红花: 4
- 帖子: 685
- 在线: 665小时
- 虫号: 715595
- 注册: 2009-03-05
- 专业: 原子和分子物理
2楼2011-07-22 12:40:56
goalry
金虫 (正式写手)
- 应助: 0 (幼儿园)
- 金币: 850.9
- 散金: 22
- 帖子: 317
- 在线: 38.3小时
- 虫号: 446377
- 注册: 2007-10-29
- 性别: GG
- 专业: 凝聚态物性I:结构、力学和
3楼2011-07-22 13:46:13