% pic3.m
%
% Usage : pic3;
%
% Here we make a picture (100X100) with various shapes
%
% Written by : Michael Haag

function pic2 = picture2()

pic2 = zeros(100,100);

x1 = 1:100;
y1 = 1:100;
[x,y] = meshgrid(x1,y1);

%  Rectangle on left
 pic2(70:90, 10:20) = ones(21,11);
 pic2(70:90, 80:90) = ones(21,11);

%  Rectangle on Right
 %pic2(30:85, 75:95) = ones(56,21);

%  Thin Horiz. Line
 %pic2(85,10:30) = ones(1,21);

%  Circle
 p = (x-50).^2 + (y-57).^2;
 size = 250;
 pic2(find(p<=size)) = ones(1,length(find(p<=size)));

%  Triangle
 i = 0;
 n = 30;
 pic2(10,50) = ones(1,1);
 for i = 1:n,
     pic2(i+10,50-i: 50+i) = ones(1,2*i+1);
 end;

  
