% square.m  96/08/08
%
% Plot of unit square
%
% x^2/4+y^2=1
%

    hold off;
    plot([1 1],[0 1],'w-');
    hold on;
    plot([0 1],[1 1],'w-');
    axis square;
    plot([-.5 1.5],[0 0],'w-');
    plot([0 0],[-.5 1.5],'w-');
    len=.05;
    arrow([1; .4],[1; .5],len);
    arrow([.6; 1],[.5; 1],len);
    arrow([0; .6],[0; .5],len);
    arrow([.4; 0],[.5; 0],len);
    
    text(.45,-.1,'C_1');
    text(1.1,.45,'C_2');
    text(.45,1.1,'C_3');
    text(-.2,.45,'C_4');
    text(.1,.9,'R');

    text(1.3,-.1,'x');
    text(-.1,1.3,'y');
