/*
 * nota determina la calificación alfanumérica a patir de la nota numérica
 *
 */

nota(X,suspenso):- X < 5.
nota(X,aprobado):- 5 =< X, X < 7.
nota(X,notable):-  7 =< X, X < 9.
nota(X,sobresaliente):- 9 =< X, X < 10.
nota(X, matricula_honor):- X = 10.


/*
 * nota_bis determina la calificación alfanumérica a patir de la nota numérica
 * Se utiliza el corte
 *
 */


nota_bis(X,suspenso):- X < 5, !.
nota_bis(X,aprobado):- X < 7, !.
nota_bis(X,notable):-  X < 9, !.
nota_bis(X,sobresaliente):- X < 10, !.
nota_bis(10, matricula_honor).
