L(W878)
TEXT(CF=1.E7 RHO2=1.E2 POUT=-.5 :        W879
TITLE
RHO2=100.0
COVAL(OUTLET,P1,1.E3,-0.5);COVAL(OUTLET,P2,1.E3*RHO2/RHO1A,-0.5)
COVAL(INLET,P2,FIXFLU,5.0)