load parameters_pairwisem_2_3_047

P6=pintegrate(p,6);
P7=pintegrate(p,7);

%Cle6=cement(P6,0,6);
%savepnm('Cle6.pgm',chnan255(Cle6));
cementcolor(P6,0,6,1,'c0_6r6');
disp('first image written: needs to be scaled up 118% to match second')

%Cge7=cement(P7,7,47);
%savepnm('Cge7.pgm',chnan255(Cge7));

cementcolor(P7,7,47,1,'c7_47r7');

