	map classifySingleVec
	.
	toRows
	where
		classifySingleVec :: Vector -> Label
		classifySingleVec vec =
			snd $
			maximumBy (\x y -> fst x `compare` fst y) $
			map `flip` param $ mapToFst $
			\Class{ class_min = center, class_cov = cov } ->
				mahalanobis center cov vec

infoStringForParam :: ClassificationParam -> String
infoStringForParam =
	intercalate "\n"