A BASIC program for the generation of Latin squares