c -*- Fortran -*-
c ::::: cuser.i: user parameters for specific problem
c
common /param/ gamma,gamma1,pi
common /Vortex/ xlc,ylc,rvortex,ua,uw,rho0,p0
common /LSet/ rl0,rl1
double precision gamma,gamma1,pi
double precision xlc,ylc,rvortex,ua,uw,rho0,p0
double precision rl0,rl1