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