From c1cb985235ead06852c5a213bd745aaa8a6e66f3 Mon Sep 17 00:00:00 2001 From: Anri Kennel Date: Sat, 6 Mar 2021 19:51:31 +0100 Subject: [PATCH] fix mise en page --- resolveur.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/resolveur.pl b/resolveur.pl index 9b4bf0f..ac88d9f 100644 --- a/resolveur.pl +++ b/resolveur.pl @@ -12,7 +12,7 @@ airereverse(X1, Y1, X2, Y2, 0, T) :- case(X1, Y1, 0), NX is X1 - 1, NX \= T, air % cellule -case(X, Y, C) :-write("\n"), write("Coordonnées: X="), write(X), write(", Y="), write(Y), write(". Couleur : "), write(C). +case(X, Y, C) :-write("\n"), write("Coordonnées: X="), write(X), write(", Y="), write(Y), write("| Couleur: "), write(C). run([]) :- write('0: case blanc, 1: case noire'). run([[X1, Y1, X2, Y2, E] | Q]) :- T is X2 - X1, aire(X1, Y1, X2, Y2, E, T), run(Q).