| 查看: 455 | 回复: 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 这是我在子程序流动中加入的方柱,但是运行之后,处理数据的时候云图中这方块不是空白,真心求教! |
» 猜你喜欢
什么是人一生最重要的?
已经有3人回复
过年走亲戚时感受到了所开私家车的鄙视链
已经有10人回复
今年春晚有几个节目很不错,点赞!
已经有12人回复
情人节自我反思:在爱情中有过遗憾吗?
已经有13人回复
体制内长辈说体制内绝大部分一辈子在底层,如同你们一样大部分普通教师忙且收入低
已经有12人回复
基金正文30页指的是报告正文还是整个申请书
已经有5人回复













回复此楼