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

24小时热门版块排行榜    

Znn3bq.jpeg
小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » Fortran » 关于复数在Fortran中如何定义的问题
41/1返回列表
查看: 2989  |  回复: 3
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

songyunl1980

银虫 (小有名气)

[求助] 关于复数在Fortran中如何定义的问题

最近刚刚接触复数求解的问题，不知道哪位曾经做过。

我想定义一个6×1的实数向量，共13个向量的话可以定义
REAL A(6，1，13)
那如果我想定义一个6×1的复数向量，实部6个，虚部6个。共13个复数向量的话是否是
COMPLEX  A（6,6,13）


？？求明白人帮助，十分感谢！
回复此楼

» 收录本帖的淘帖专辑推荐

经典帖子集合

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
1楼 2013-05-13 20:24:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

baobiao007

木虫 (职业作家)

中国特色
这种东西自己在电脑上一试便知。
赞一下 回复此楼
我同意叔本华的观点，人们投身艺术和科学领域的强烈愿望之一就是逃离痛苦、残酷和枯燥无味的现实生活，逃离自己飘忽不定的七情六欲的桎梏。--爱因斯坦
2楼2013-05-14 13:28:04
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

btx97

金虫 (小有名气)

【答案】应助回帖

感谢参与，应助指数 +1
跟定义实数是一样的。找本基本的书看看吧。决定用fortran了，不可能不看基础的，踏实点。
赞一下 回复此楼
3楼2013-05-14 16:48:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

pippi6

铁杆木虫 (著名写手)

工程和科学数值计算咨询

【答案】应助回帖

★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★ ★
songyunl1980: 金币+15, ★★★★★最佳答案 2013-05-20 19:36:07
如果想定义一个6×1的复数向量，A
complex*16, dimension （6) :: A
或
complex*16 :: A(6)

如果想定义一个6×13的复数数组，A
complex*16, dimension （6,13)  :: A
或
complex*16 :: A(6,13)

这里 complex*16 是双精度， 如果单精度足够，就用 complex*8
赞一下 回复此楼
4楼2013-05-20 16:42:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 songyunl1980 的主题更新
41/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 296求调剂 +11 汪！？！ 2026-04-10 13/650 2026-04-10 23:16 by Ftglcn90
[考研] 297求调剂 +11 ORCHID1 2026-04-10 12/600 2026-04-10 21:07 by cyh—315
[考研] 材料工程085601，270求调剂 +28 @ASDF1234 2026-04-08 30/1500 2026-04-10 19:28 by dick_runner
[考研] 266求调剂 +29 阳阳哇塞 2026-04-07 29/1450 2026-04-10 16:20 by 高维春
[考研] 材料调剂 +11 一样YWY 2026-04-05 11/550 2026-04-10 09:32 by 钟洲2011
[考研] 生物学求调剂 一志愿沪9，326分 +7 刘墨墨 2026-04-06 7/350 2026-04-10 08:11 by kangsm
[考研] 288求调剂，一志愿华南理工大学071005 +16 ioodiiij 2026-04-08 16/800 2026-04-09 23:08 by wolf97
[考研] 材料调剂 +10 18815505510 2026-04-09 11/550 2026-04-09 17:07 by 544594351
[考研] 材料与化工专硕306分找合适调剂 +27 沧海轻舟e 2026-04-06 28/1400 2026-04-08 22:06 by wdyheheeh
[考研] 327求调剂 +12 Xxjc1107. 2026-04-06 12/600 2026-04-08 16:46 by luoyongfeng
[考研] 化学0703-一志愿211-338分求调剂 +10 vants 2026-04-05 11/550 2026-04-08 16:02 by screening
[考研] 287求调剂 +6 Fnhc 2026-04-07 6/300 2026-04-08 10:05 by xingguangj
[考研] 复试调剂 +14 呼呼？~+123456 2026-04-05 14/700 2026-04-06 22:50 by chenzhimin
[考研] 工科 22408 267求推荐 +4 wanwan00 2026-04-05 5/250 2026-04-06 22:47 by chenzhimin
[考研] 304求调剂 +4 luoye0105 2026-04-05 4/200 2026-04-06 21:05 by 木子君1218
[考研] 362求调剂一志愿中国石油大学 +4 我要考大 2026-04-06 6/300 2026-04-06 14:11 by 无际的草原
[考研] 求调剂 +10 chenxrlkx 2026-04-05 10/500 2026-04-06 11:31 by 猪会飞
[考研] 341求调剂 +3 学无止境，冲 2026-04-05 3/150 2026-04-05 09:40 by lbsjt
[考研] 求生物学学硕调剂——364分 +7 云朵遛弯指南 2026-04-04 7/350 2026-04-04 22:49 by zhyzzh
[考研] 325求调剂 +4 春风不借意 2026-04-04 4/200 2026-04-04 14:46 by 湘农储能材料
信息提示
关闭
请填处理意见
关闭