AS 165

An algorithm to construct a discriminant function in Fortran for categorical data.