clear all;
close all;

load /local/class/psych221/tutorials/cMatch/monitorGam

white = ones(10,3);
for n=1:size(white,1)-1
  white(n+1,:) = 0.1*(size(white,1)-n);
end
grayImage = 1:10;
figure
colormap(white);
image(grayImage);
%image(5)


%whiteCorr = round(1000*white);
%whiteCorr = monitorInvGam(whiteCorr);
%whiteCorr = whiteCorr/mmax(whiteCorr);

%figure
%colormap(whiteCorr);
%image(grayImage);
%image(5)

%gamma = [2.2 2.7 2.2];
gamma = 2.7;
myWhite(:,1) = white(:,1).^(1/gamma);
myWhite(:,2) = white(:,2).^(1/gamma);
myWhite(:,3) = white(:,3).^(1/gamma);
figure
colormap(myWhite);
image(grayImage);
