A:=array(
(3.00,8.35,23.53,7.51,8.62,17.42,10.00,1.04,11.21),
(3.00,9.25,23.75,6.61,9.19,17.77,10.48,1.72,10.51),
(3.00,8.19,30.5,4.72,9.78,16.28,7.6,2.52,10.32),
(3.00,7.73,29.2,5.42,9.43,19.29,8.49,2.52,10.00),
(3.00,9.42,27.93,8.2,8.14,16.17,9.42,1.55,9.76),
(3.00,9.16,27.98,9.01,9.32,15.99,9.1,1.82,11.35),
(3.00,10.06,28.64,10.52,10.05,16.18,8.39,1.96,10.81),
(1.00,8.67,36.05,7.31,7.75,16.67,11.68,2.38,12.88),
(1.00,9.98,37.69,7.01,8.94,16.15,11.08,0.83,11.67),
(1.00,6.77,38.69,6.01,8.82,14.79,11.44,1.74,13.23),
(1.00,8.14,37.75,9.61,8.49,13.15,9.76,1.28,11.28),
(1.00,7.67,35.71,8.04,8.31,15.13,7.67,1.41,13.25),
(1.00,7.9,39.77,8.49,12.94,19.29,11.05,2.04,13.29),
(1.00,7.18,40.91,7.32,8.94,17.6,12.75,1.14,14.8),
(1.00,8.82,33.7,7.59,10.98,18.82,14.73,1.78,10.1),
(1.00,6.25,35.02,4.72,6.28,10.03,7.15,1.93,10.39),
(2.00,10.6,52.41,7.7,9.98,12.53,11.7,2.31,14.69),
(3.00,7.27,52.65,3.84,9.16,13.03,15.26,1.98,14.57),
(3.00,13.45,55.85,5.5,7.45,9.55,9.52,2.21,16.3),
(3.00,10.85,44.68,7.32,14.51,17.13,12.08,1.26,11.57),
(3.00,7.21,45.79,7.66,10.36,16.56,12.86,2.25,11.69),
(3.00,7.68,50.37,11.35,13.3,19.25,14.59,2.75,14.87),
(2.00,7.78,48.44,8.00,20.51,22.12,15.73,1.15,16.61));
X:=array(
(9.09,28.12,7.4,9.62,17.26,11.12,2.49,12.65),
(9.41,28.2,5.77,10.8,16.36,11.56,1.53,12.17),
(8.7,28.12,7.21,10.53,19.45,13.3,1.66,11.96),
(6.93,29.85,4.54,9.49,16.62,10.65,1.88,13.61));
options := array('cov':1,'backtest':1,'crosstest':1);
return Discrim(A,X,0,options);