double precision JETRADIUS, ptjmax
        double precision MuScalefactor, MuMScalefactor, mode
        COMPLEX MuHScalefactor
        parameter (JETRADIUS= 0.40d0)
	parameter (ptjmax= 20.00d0)
        parameter (MuScalefactor= 1.00d0)
        parameter (MuHScalefactor= 1.00d0)
        parameter (MuMScalefactor= 1.00d0)
        parameter (mode=1)