DISCRIM: A BASIC program to perform discriminant function analysis