c
c ::::: cuser.i: user parameters for specific problem
c
common /param/ gamma,gamma1,q0
common /PhysData/ Wk(2), RU, PA
common /Left/ rhol, ul, pl, Yl
common /Right/ rhor, ur, pr, Yr, sloc
common /CJ/ V0,P0,Vj,Pj,Yact
common /bc/ Nbnd
c