function [p_shapes, d, r_shape, p_num] = LPmake_Figure9b ()

% LPMAKE_FIGURE9B defines some arrays needed to generate Figure 9b 
% using 12 pentominoes (with copies) to tile the 11 x 11 square with 
% four 2 x 2 holes

% Create binary matrices for the pentominoes
p_shapes = pentomino_pack ( 11, 11 );
% Create the binary matrix for the region with the four 2 x 2 holes
r_shape = ones(11,11);
r_shape(4:5,4:5) = 0;
r_shape(4:5,7:8) = 0;
r_shape(7:8,4:5) = 0;
r_shape(7:8,7:8) = 0;
% Create d and p_num
d = [2 2 2 2 2 2 2 1 1 1 2 2];
p_num = 12;
% Create the linear system
[ a, b, var_p ]  = polyomino_multihedral_matrix ( r_shape, p_num, ...
    p_shapes, d );
[m,n] = size(a);
% Create and save the LP file
polyomino_lp_write ( 'Figure9b.lp', '\ Figure9b', m, n, a, b );
end