% show white to black

close all
figure
axis equal off
hold on

white= [1 1 1];  % rgb values of white

for k= 0:.2:1
    colr= k*white;
    DrawRect(0,k,.8,.2,colr)
end

hold off