% Draw the letter
t=[0:0.01:1];
            % parameter used to construct all segments
xmin_1=0.3; ymin_1=0.05; xmax_1=0.7; ymax_1=0.5;
            % coordinates of end points of the 1st segment
x_1=xmin_1+(xmax_1-xmin_1)*t; y_1=ymin_1+(ymax_1-ymin_1)*t;
            % 1st segment of the letter
xmin_2=0.7; ymin_2=0.05; xmax_2=0.7; ymax_2=0.95;
x_2=xmin_2+(xmax_2-xmin_2)*t; y_2=ymin_2+(ymax_2-ymin_2)*t;
            % 2n segment of the letter          
xmin_3=0.7; ymin_3=0.95; xmax_3=0.45; ymax_3=0.8;
x_3=xmin_3+(xmax_3-xmin_3)*t; y_3=ymin_3+(ymax_3-ymin_3)*t;
            % 3rd segment of the letter
xmin_4=0.45; ymin_4=0.8; xmax_4=0.45; ymax_4=0.65;
x_4=xmin_4+(xmax_4-xmin_4)*t; y_4=ymin_4+(ymax_4-ymin_4)*t;
            % 4th segment of the letter
xmin_5=0.45; ymin_5=0.65; xmax_5=0.67; ymax_5=0.47;
x_5=xmin_5+(xmax_5-xmin_5)*t; y_5=ymin_5+(ymax_5-ymin_5)*t;
            % 5th segment of the letter
x_letter=[x_1 x_2 x_3 x_4 x_5]; y_letter=[y_1 y_2 y_3 y_4 y_5];
            % put all segments together into a letter
figure(1);  % open a new figure and name it "figure 1"
plot(x_letter,y_letter,'k')
axis([0 1 0 1])
            % plot the letter inside the rectangle [0 1] x [0 1];
            %  the option 'k' specifies the color (black)