From c1f57553f2a337642997a1b1acb6d89bb6e80482 Mon Sep 17 00:00:00 2001
From: David Tonhofer <ronerycoder@gluino.name>
Date: Fri, 13 Aug 2021 16:33:48 +0200
Subject: [PATCH] Comment added and rectangle descriptor numbered

---
 packing/rotation/sbprgeost.dzn | 99 ++++++++++++++++++----------------
 1 file changed, 52 insertions(+), 47 deletions(-)

diff --git a/packing/rotation/sbprgeost.dzn b/packing/rotation/sbprgeost.dzn
index 37b37ca..185d669 100644
--- a/packing/rotation/sbprgeost.dzn
+++ b/packing/rotation/sbprgeost.dzn
@@ -1,59 +1,64 @@
+ 
 n = 5; 
 m = 45;
-h = 9; 
+h = 9;
 maxl = 16;
 
-d = [| 1,0,1,1
-     | 0,1,5,2
-     | 0,3,1,1
-     | 1,0,2,5
-     | 3,4,1,1
-     | 3,1,1,1
-     | 0,0,1,1
-     | 3,3,1,1
-     | 4,0,1,1
-     | 0,0,4,4
-     | 1,4,3,1
-     | 4,2,2,2
-     | 0,2,4,4
-     | 4,2,1,3
-     | 2,0,2,2
-     | 1,0,4,4
-     | 0,1,1,3
-     | 1,4,2,2
-     | 2,1,4,4
-     | 2,0,3,1
-     | 0,1,2,2
-     | 1,5,1,2
-     | 1,0,3,5
-     | 4,1,1,4
-     | 5,3,2,1
-     | 0,1,5,3
-     | 1,0,4,1
-     | 3,0,3,1
-     | 0,1,2,1
-     | 2,1,5,3
-     | 2,4,4,1
-     | 4,3,1,3
-     | 3,0,1,2
-     | 1,2,3,5
-     | 0,2,1,4
-     | 0,0,1,3
-     | 1,0,3,4
-     | 0,3,3,1
-     | 0,0,4,3
-     | 1,0,3,1
-     | 0,1,4,3
-     | 3,1,1,3
-     | 0,0,3,4
-     | 0,0,5,4
-     | 0,0,4,5
+d = [| 1,0,1,1  % 1
+     | 0,1,5,2  % 2
+     | 0,3,1,1  % 3
+     | 1,0,2,5  % 4
+     | 3,4,1,1  % 5
+     | 3,1,1,1  % 6
+     | 0,0,1,1  % 7
+     | 3,3,1,1  % 8
+     | 4,0,1,1  % 9
+     | 0,0,4,4  % 10
+     | 1,4,3,1  % 11
+     | 4,2,2,2  % 12
+     | 0,2,4,4  % 13
+     | 4,2,1,3  % 14
+     | 2,0,2,2  % 15
+     | 1,0,4,4  % 16
+     | 0,1,1,3  % 17
+     | 1,4,2,2  % 18
+     | 2,1,4,4  % 19
+     | 2,0,3,1  % 20
+     | 0,1,2,2  % 21
+     | 1,5,1,2  % 22
+     | 1,0,3,5  % 23
+     | 4,1,1,4  % 24
+     | 5,3,2,1  % 25
+     | 0,1,5,3  % 26
+     | 1,0,4,1  % 27
+     | 3,0,3,1  % 28
+     | 0,1,2,1  % 29
+     | 2,1,5,3  % 30
+     | 2,4,4,1  % 31
+     | 4,3,1,3  % 32
+     | 3,0,1,2  % 33
+     | 1,2,3,5  % 34
+     | 0,2,1,4  % 35
+     | 0,0,1,3  % 36
+     | 1,0,3,4  % 37
+     | 0,3,3,1  % 38
+     | 0,0,4,3  % 39
+     | 1,0,3,1  % 40
+     | 0,1,4,3  % 41
+     | 3,1,1,3  % 42
+     | 0,0,3,4  % 43
+     | 0,0,5,4  % 44
+     | 0,0,4,5  % 45 = m
 |];
 
+% The shape array has been flattened and information about which 
+% shape descriptions are rotated versions of each other has been 
+% moved to the shapeind array.
+
 shape = [ {1,2,3}, {3,4,5}, {6,4,7}, {8,2,9},
           {10,11,12}, {13,14,15}, {16,17,18}, {19,20,21},
           {17,22,23,24}, {11,25,26,27}, {28,29,30,31}, {32,33,34,35},
           {44}, {45}, 
           {36,37}, {38,39}, {40,41}, {42,43} ];
 
-shapeind = [ {1,2,3,4}, {5,6,7,8}, {9,10,11,12}, {13,14}, {15,16,17,18} ];
\ No newline at end of file
+shapeind = [ {1,2,3,4}, {5,6,7,8}, {9,10,11,12}, {13,14}, {15,16,17,18} ];