*! version 6.0.0  03aug1999   (STB-52 sg120)
prog def rocfit_p
version 6.0
	noi di in red "Predict not allowed after rocfit"
	exit 198
end