| 查看: 493 | 回复: 0 | ||
[求助]
求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 这是我在子程序流动中加入的方柱,但是运行之后,处理数据的时候云图中这方块不是空白,真心求教! |
» 猜你喜欢
微信指数没变化,科研之友没阅读
已经有4人回复
这种情况还有戏吗
已经有9人回复
同事接到电话了,我却没有
已经有4人回复
准备明年的基金了
已经有5人回复
今年的WR进展到哪一步了?
已经有6人回复
时间戳他又来了
已经有11人回复
小木虫看见有人已经知道结果了
已经有15人回复
这个自发加氧反应的机理是什么?
已经有6人回复
J-J-W不为人知的一面
已经有18人回复
没消息就是被刷了呗
已经有13人回复











回复此楼