Changeset 181 for palm/trunk/SOURCE/poismg.f90
- Timestamp:
- Jul 30, 2008 7:07:47 AM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/poismg.f90
r139 r181 8 8 ! Actual revisions: 9 9 ! ----------------- 10 ! 10 ! Bugfix: grid_level+1 has to be used in restrict for flags-array 11 11 ! 12 12 ! Former revisions: … … 274 274 ! 275 275 !-- Choose flag array of the upper level 276 SELECT CASE ( l )276 SELECT CASE ( l+1 ) 277 277 CASE ( 1 ) 278 278 flags => wall_flags_1
Note: See TracChangeset
for help on using the changeset viewer.