应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » allocate与data共存的问题
51/1返回列表
查看: 2138  |  回复: 14
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

koorb

铁虫 (初入文坛)

[求助] allocate与data共存的问题

Fortran代码：
integer, allocatable::num(
allocate( num(2) )
data num /2*3/
程序报错，This is an invalid DATA statement object。请指点一下！谢谢！
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
天道
1楼 2011-11-10 09:51:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

koorb

铁虫 (初入文坛)
引用回帖:
9楼: Originally posted by snoopyzhao at 2011-11-11 13:29:58:
可以跑得通，但不知道如何解释它们的结果：

[code]
program test
integer :: num(5)
print *,  num
data num /5*3/
print *, num
end program test      

D:\>gfortran -Wall -std=f95 zvv.f90

...

Data是用来赋初值的，这一点毫无疑问。无论你把它放在哪它都是只能是初始化一个数组变量，再有赋值语句当然将它覆盖了。

我发帖的本意是想问问，对于一个动态分配维数的数组，为什么不能用data初始化。用其它的方法是可以给它赋值的，我只想知道为啥不能用data来赋初值。
赞一下 回复此楼
天道
10楼2011-11-14 06:47:30
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 15 个回答

holmescn

金虫 (正式写手)

【答案】应助回帖

★
jjdg(金币+1): 感谢参与 2011-11-10 13:07:33
F90的话，不用Data也行啊。直接num=/()/这样的语法就行。
赞一下(1人) 回复此楼
2楼2011-11-10 11:14:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)

【答案】应助回帖

xzhdty: 谢谢参与 2011-11-10 12:13:24
koorb(金币+2): 谢谢！ 2011-11-10 13:17:39
example:
CODE:
program test
integer, allocatable :: num(:)
integer i
allocate (num(10))
num = (/(10, i=1,10)/)
print *, num
end program test
赞一下(1人) 回复此楼
3楼2011-11-10 11:24:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

snoopyzhao

至尊木虫 (职业作家)
★
余泽成(金币+1): 谢谢参与应助！ 2011-11-10 21:48:06
引用回帖:
1楼: Originally posted by koorb at 2011-11-10 09:51:32:
Fortran代码：
integer, allocatable::num(
allocate( num(2) )
data num /2*3/
程序报错，This is an invalid DATA statement object。请指点一下！谢谢！

即使在 Fortran 77 中这么用也是不正确的啊， data 必须出现在所有可执行程序之前……

你的这种情况直接 num = 3 就可以了，呵呵……
赞一下(1人) 回复此楼
4楼2011-11-10 13:21:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 15 个回答
普通表情 龙 兔 虎 猫
信息提示
关闭
请填处理意见
关闭