L(328)
TEXT(1D Piston With Bowl; High Speed   
TITLE
     In this case the rotational speed is increased by
  the (unrealistic) factor of 1000.0, in order to show
  the occurrence of compression and rarefaction waves.
OMEGA=OMEGA*1000.0
GRDPWR(T,20,2.0*PI/OMEGA,1.0);AZW1=OMEGA