24小时热门版块排行榜

返回列表

aaa080501

新虫 (初入文坛)

应助: 0 (幼儿园)
金币: 20
帖子: 11
在线: 8小时
虫号: 2550579
注册: 2013-07-17

[求助] 求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
这是我在子程序流动中加入的方柱，但是运行之后，处理数据的时候云图中这方块不是空白，真心求教！

回复此楼

» 猜你喜欢

1楼 2013-09-27 16:20:44

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

相关版块跳转我要订阅楼主 aaa080501 的主题更新

返回列表