L(247)
    GROUP 1. Run title and other preliminaries
TEXT(Area Restriction With Inlet Swirl 
TITLE
  This run studies the same flow as the previous one except that
  incoming fluid has a non-zero u-velocity, i.e.the incoming
  fluid is swirling about the axis. Since NX=1, u is solved as a
  scalar variable; it has no pressure gradient source term.
  However, u influences the hydrodynamic variables v, w and p
  through the centrifugal force exerted on v.
SOLVE(U1); SOLUTN(P1,Y,Y,Y,N,N,N)
  ** Set non-zero U-value at inlet.
VALUE(IN,U1,0.05)
LITER(U1)=2; LITER(V1)=2; LITER(W1)=2
RELAX(P1,LINRLX,0.5)
RELAX(U1,FALSDT,0.1); RELAX(W1,FALSDT,0.1); RELAX(V1,FALSDT,0.1)
PLOT(PIPE,U1,0.0,10.0)