RosettaCodeData/Task/Box-the-compass/Prolog/box-the-compass-2.pro

8 lines
282 B
Prolog

printTableRow(Angle) :- compassangle(Index, Name, _, Angle),
write(Index), write(' '),
write(Name), write(' '),
write(Angle).
printTable([X|Xs]) :- printTableRow(X), nl, printTable(Xs),!.
printTable([]).