# BCDEFW and attached fluid cells

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

 March 14, 2003, 11: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, 00: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, 03: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.