L(453)
TEXT(Free Surface Flow, 2D Shllw  Water
TITLE
  Compressibility is re-activated, & because nz=1 the true shallow-
  water equations now apply.
CON=9.81*0.025;VARMIN(P1)=0.001-CON
RHO1=COMPRESS;RHO1A=CON**-0.5;PRESS0=CON;RHO1B=0.5;RHO1C=0.0