24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 459  |  回复: 0

aaa080501

新虫 (初入文坛)

[求助] 求fortran的一段代码,D2Q9方柱绕流如何加入方柱

!-------OBSTACLE AT THE INLET X=10, Y=10
      do i=50,60
        f(2,i,10)=f(4,i,10)
        f(5,i,10)=f(7,i,10)
        f(6,i,10)=f(8,i,10)
        end do
        do j=0,10
      f(3,50,j)=f(1,50,j)
        f(7,50,j)=f(5,50,j)
        f(6,50,j)=f(8,50,j)
        end do
        do j=0,10
      f(1,60,j)=f(3,60,j)
        f(5,60,j)=f(7,60,j)
        f(8,60,j)=f(6,60,j)
        end do
这是我在子程序流动中加入的方柱,但是运行之后,处理数据的时候云图中这方块不是空白,真心求教!
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 aaa080501 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 071000生物学调剂 +4 知昭蔓 2026-04-02 4/200 2026-04-02 14:22 by plum
[考研] 285求调剂 +3 AZMK 2026-04-02 3/150 2026-04-02 14:10 by 乔哒哒哒
[考研] 301求调剂 +14 骆驼男人 2026-04-02 14/700 2026-04-02 14:08 by baoball
[考研] 336求调剂 +5 kiyy 2026-04-01 5/250 2026-04-02 07:14 by chixmc
[考研] 282求调剂 +17 ycy1201 2026-04-01 19/950 2026-04-01 22:54 by peike
[考研] 286求调剂 +5 Sa67890. 2026-04-01 7/350 2026-04-01 19:50 by 6781022
[考研] 一志愿郑大085600,310分求调剂 +6 李潇可 2026-03-26 6/300 2026-04-01 14:44 by chenqifeng666
[考研] 283求调剂 +9 A child 2026-03-28 9/450 2026-04-01 14:20 by Jaylen.
[考研] 土木304求调剂 +5 顶级擦擦 2026-03-31 5/250 2026-04-01 08:15 by fdcxdystjk¥
[考研] 一志愿华东师范大学有机化学专业,初试351分,复试被刷求调剂! +9 真名有冰 2026-03-29 10/500 2026-03-31 18:01 by xhai2011
[考研] 学硕274求调剂 +17 Li李鱼 2026-03-26 17/850 2026-03-31 15:19 by 客尔美德
[考研] 286求调剂 +5 丢掉懒惰 2026-03-27 8/400 2026-03-31 11:27 by Delta2012
[考研] 274求调剂 +6 xiao爱同学 2026-03-30 6/300 2026-03-31 10:04 by cal0306
[考研] 一志愿大连理工大学材料求调剂 +6 Gymno 2026-03-30 6/300 2026-03-31 07:26 by 无际的草原
[考研] 调剂 +4 GK72 2026-03-30 4/200 2026-03-30 20:32 by dick_runner
[考研] 304材料求调剂 +5 钟llll 2026-03-26 5/250 2026-03-30 19:37 by 源_2020
[考研] 332求调剂 +6 @MZB382400 2026-03-28 6/300 2026-03-30 16:57 by 无际的草原
[考研] 085602 化工专硕 338分 求调剂 +12 路痴小琪 2026-03-27 12/600 2026-03-28 15:41 by L135790
[考研] 070300化学求调剂 +4 起个名咋这么难 2026-03-27 4/200 2026-03-27 21:39 by 83503孙老师
[考研] 324求调剂 +5 hanamiko 2026-03-26 5/250 2026-03-27 10:33 by wangjy2002
信息提示
请填处理意见