Advertisement
Guest User

Untitled

a guest
Apr 27th, 2017
146
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 1.15 KB | None | 0 0
  1. dominos([(0,0),(0,1),(0,2),(0,3),(0,4),(0,5),(0,6),(0,7),(0,8),(0,9),(0,a),
  2.                (1,1),(1,2),(1,3),(1,4),(1,5),(1,6),(1,7),(1,8),(1,9),(1,a),
  3.                      (2,2),(2,3),(2,4),(2,5),(2,6),(2,7),(2,8),(2,9),(2,a),
  4.                            (3,3),(3,4),(3,5),(3,6),(3,7),(3,8),(3,9),(3,a),
  5.                                  (4,4),(4,5),(4,6),(4,7),(4,8),(4,9),(4,a),
  6.                                        (5,5),(5,6),(5,7),(5,8),(5,9),(5,a),
  7.                                              (6,6),(6,7),(6,8),(6,9),(6,a),
  8.                                                    (7,7),(7,8),(7,9),(7,a),
  9.                                                          (8,8),(8,9),(8,a),
  10.                                                                (9,9),(9,a),(a,a)]).
  11.  
  12. frame([[6,5,0,5,5,3,3,1,1,4,6],
  13.        [1,2,2,a,a,5,7,0,1,0,7],
  14.        [5,8,6,0,8,0,9,7,7,4,2],
  15.        [4,0,9,0,7,7,9,9,8,8,0],
  16.        [1,a,3,8,8,5,a,8,0,0,3],
  17.        [9,2,3,5,7,6,9,1,6,3,9],
  18.        [2,2,2,5,8,6,0,4,6,a,a],
  19.        [9,4,2,1,7,9,5,4,a,4,a],
  20.        [9,a,4,9,5,5,6,6,0,a,2],
  21.        [1,a,1,2,1,1,8,2,2,7,8],
  22.        [7,7,3,3,4,3,6,6,4,3,1],
  23.        [5,9,6,3,3,a,7,4,4,8,8]]).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement