|
[Sponsors] |
May 28, 2002, 15:47 |
usrbcs for inlet boundary
|
#1 |
Guest
Posts: n/a
|
Can anyone help me with this problem?
I am trying to set up a time varying boundary condition for an inlet of air from a diffusor. The diffusor is implemented as a patch with a time varying velocity of air. My problem is that I canīt associate the velocities defined in fortran with the patch in the command file, ie. i donīt get an inlet of air in the output file. The piece of code defined in Fortran USRBCS is: CALL GETVAR('USRBCS','V ',IV) CALL IPREC('BELUFTER1','PATCH','CENTRES',IPT,ILEN,JLEN, KLEN, + CWORK,IWORK) DO 702 k=12,15 DO 701 j = 1,1 DO 700 i=7,7 inode =ip(i,j,k) varbcs(iv,2,inode)=1.0 700 continue 701 continue 702 continue The system is a multi fase system, and air is phase number 2. The inlet velocity is in the y-direction, normal to the tank bottom. Regards Jesper Laursen, University of Aalborg, Denmark |
|
May 29, 2002, 08:57 |
Re: usrbcs for inlet boundary
|
#2 |
Guest
Posts: n/a
|
Hi,
Why don't you use IPALL instead of using the IPREC utility subroutine? It would be something like this: CALL GETVAR('USRBCS','V ',IV) CALL IPALL('BELUFTER1','*','PATCH','CENTRES',IPT,NPT,CW ORK,IWORK) DO 200 I=1,NPT INODE=IPT(I) VARBCS(IV,2,INODE)=1.0 200 CONTINUE This may work. Good luck! cfd guy |
|
May 31, 2002, 17:34 |
Re: usrbcs for inlet boundary
|
#3 |
Guest
Posts: n/a
|
Hi cfd guy.
Thanks for your reply. I found out that the problem was related to the way the patch was defined in the command file, but now it works. Regards Jesper Laursen |
|
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
mass flow in is not equal to mass flow out | saii | CFX | 12 | March 19, 2018 06:21 |
inlet velocity boundary condition | murali | CFX | 5 | August 3, 2012 09:56 |
CFX doesn't continue calculation... | mactech001 | CFX | 6 | November 15, 2009 22:25 |
Boundary conditions? | Tom | Main CFD Forum | 0 | November 5, 2002 02:54 |
Boundary Conditions | Jan Ramboer | Main CFD Forum | 11 | August 16, 1999 09:59 |