# BCDEFW and attached fluid cells

 Register Blogs Members List Search Today's Posts Mark Forums Read

 March 14, 2003, 12:35 BCDEFW and attached fluid cells #1 Joern Beilke Guest   Posts: n/a How is it possible to get the Star or Prostar cell number of the fluid cell, which is attached to the boundary number "IBP" in the subroutine bcdefw.f ?

 March 16, 2003, 01:02 Re: BCDEFW and attached fluid cells #2 cjtune Guest   Posts: n/a Hi Joern, Maybe this snippet of code from Adapco-Online could help: do 220 ib=1,nbp23 ip=lx(ib)/7 indx=mod(lx(ib),7) ibnd=lq(indx,ip) ibndp=iblmap(-ibnd) 220 continue Given a certain IB (IBP if passed thru IBLMAP; here it's ibndp), you can get IP with the help of the COMMON LX(IB).

 March 17, 2003, 04:51 Re: BCDEFW and attached fluid cells #3 Joern Beilke Guest   Posts: n/a I had this type of coding in mind when I started but it is much easier: IF(IREG.EQ.2) THEN WRITE(*,*) ' BCDEFW called for boundary ' , IBP , WRITE(*,*) ' BCDEFW called for Prostar CELL ' , IP , WRITE(*,*) ' BCDEFW called for Star CELL ' , IPSTAR , ENDIF IP and IPSTAR are already available in the subroutine.

 July 8, 2003, 18:24 Re: BCDEFW and attached fluid cells #4 ed Guest   Posts: n/a This doesn't work for baffles. IBP is always zero if you are on "side 2" of the baffle The only way round I could find was to write a Prostar subroutine to output a table (using graph registers) of fluid cell and boundary numbers. This table can then be read into BCDEFW and used to find the real IBP number from the IP number by lookup, when the IBP in the subroutine returns zero. If anyone else has seen this problem or has other solutions I would be interested to know.

 Thread Tools Display Modes Linear Mode

 Posting Rules You may not post new threads You may not post replies You may not post attachments You may not edit your posts BB code is On Smilies are On [IMG] code is On HTML code is OffTrackbacks are On Pingbacks are On Refbacks are On Forum Rules

 Similar Threads Thread Thread Starter Forum Replies Last Post jaswi OpenFOAM Running, Solving & CFD 0 November 4, 2008 03:02 kcg Siemens 4 March 13, 2007 10:39 Tommy Siemens 0 May 7, 2006 07:49 Mahbub Siemens 1 October 20, 2003 15:21 Dong Main CFD Forum 2 November 5, 1999 18:37

All times are GMT -4. The time now is 02:19.