% Recall using MAM Aditiva...

clear;
load faces;

W = boxmin(X,-X');

yMAM_A=boxmax(W,Xin);
disp('MAM Aditiva test - concluded');

figure(3); clf;
for i=1:size(yMAM_A,2)
	subplot(4,6,i); imshow(reshape(yMAM_A(:,i),s1,s2));
	disp(sprintf('%.4f',norm(yMAM_A(:,i)-X(:,1))/norm(X(:,1))));
end
print -deps facesMAM_A.eps