L(245)
    GROUP 1. Run title and other preliminaries
TEXT(Abrupt Enlargement At Pipe Entra  
TITLE
  This case represents the flow in a circular duct that has an
  abrupt enlargement at the inlet.The duct walls are held at a
  constant temperature. Interesting variants include: changes
  to the inlet area; to the wall-boundary conditions; and to the
  inlet velocity.
solve(p1)
FIINIT(W1)=0.1
INLET(IN,LOW,1,1,1,NY/2,1,1,1,1)
VALUE(IN,P1,0.4); VALUE(IN,W1,0.4)