24小时热门版块排行榜    

Znn3bq.jpeg
查看: 480  |  回复: 1

wring9005

金虫 (著名写手)

[交流] 这个判断有什么用啊 已有1人参与

If (side_rank .EQ. 'N') Then
         H1E=H1Imp
         S1E=S1Imp
Else
     Do I=1, N
          Do J=1, N
              H1E(I, J)=DCONJG(H1Imp(J, I))
              S1E(I, J)=DCONJG(S1Imp(J, I))
          EndDo
      EndDo
EndIf
回复此楼

» 猜你喜欢

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

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

jingjingdou

银虫 (小有名气)


小木虫: 金币+0.5, 给个红包,谢谢回帖
这个是if的条件语句啊,当括号()内的内容成立时,即side_rank是字符'N'时,执行
      H1E=H1Imp
         S1E=S1Imp
除此之外的情形执行以下赋值循环
Do I=1, N
          Do J=1, N
              H1E(I, J)=DCONJG(H1Imp(J, I))
              S1E(I, J)=DCONJG(S1Imp(J, I))
          EndDo
      EndDo
然后结束该次判断(endif)
鄙人愚见,仅供参考。如有不恰当的地方,请见谅。
顺一点,一点就好!
2楼2012-12-22 08:49:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 wring9005 的主题更新
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料工程281还有调剂机会吗 +29 xaw. 2026-04-11 30/1500 2026-04-13 00:20 by 1005715100
[考研] 化学070300 求调剂 +16 哈哈哈^_^ 2026-04-12 16/800 2026-04-13 00:17 by wadb64
[考研] 339求调剂 +8 hanwudada 2026-04-11 9/450 2026-04-12 15:36 by laoshidan
[考研] 327求调剂 +5 拾光任染 2026-04-06 5/250 2026-04-12 02:29 by 秋豆菜芽
[考研] 计算机22408 281分,求调剂 +7 17715607211 2026-04-06 7/350 2026-04-12 00:43 by xuxiang
[考研] 求调剂 +18 MAX怅惘 2026-04-09 20/1000 2026-04-11 23:31 by zhen~
[考研] 296求调剂 +6 汪!?! 2026-04-09 6/300 2026-04-11 11:25 by zhq0425
[考研] 农业管理302分求调剂 +3 xuening1 2026-04-10 3/150 2026-04-11 10:18 by zhq0425
[考研] 298求调剂 +9 钉叮咚冬瓜 2026-04-07 11/550 2026-04-11 09:35 by zhq0425
[考研] 083200 305分 求二轮调剂 不接受跨专业 +9 Claireyyyy 2026-04-09 10/500 2026-04-10 21:21 by Claireyyyy
[考研] 求调剂288 +6 ioodiiij 2026-04-10 8/400 2026-04-10 21:07 by zhouxiaoyu
[考研] 263能源动力专硕求调剂 +4 加大号饭盒袋 2026-04-10 4/200 2026-04-10 20:52 by gong120082
[考研] 362求调剂 +10 我要考大 2026-04-06 14/700 2026-04-10 17:00 by luoyongfeng
[考研] 调剂 +19 2261744733 2026-04-08 19/950 2026-04-09 19:11 by vgtyfty
[考研] 材料307分求大佬组收留 +17 Hll胡 2026-04-07 17/850 2026-04-09 10:53 by liuhuiying09
[考研] 二次调剂求老师收留 +3 笑笑袁 2026-04-08 3/150 2026-04-08 23:50 by 醉在风里
[考研] 生物学328分求调剂 +9 闪电kkl 2026-04-08 10/500 2026-04-08 21:42 by liuhuiying09
[考研] 一志愿211,化学学硕,310分,本科重点双非,求调剂 +10 努力奋斗112 2026-04-07 10/500 2026-04-08 15:01 by screening
[考研] 318求调剂 +5 李青山山山 2026-04-07 5/250 2026-04-07 18:24 by 蓝云思雨
[考研] 081200-11408-367学硕求调剂 +4 1_2_3111 2026-04-06 4/200 2026-04-07 08:13 by jp9609
信息提示
请填处理意见