% IFAM Adjunta de Godel...

clear;
load facesdual;

W = minI_M(X,X'); 

yIFAMa_M=minI_M(Xin',W)';

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