% plot1.m 96/07/14
%
% Program to plot simple graph of integral of surface
% 

    hold off;
    plot3([1 1],[1 3],[0 0],'w--'); 
    hold on
    plot3([3 3],[1 3],[0 0],'w--'); 
    plot3([1 3],[1 1],[0 0],'w--'); 
    plot3([1 3],[3 3],[0 0],'w--'); 
    axis([0 4 0 4 0 4]);

    x0=1;
    x1=3;
    y0=1;
    y1=3;
    z00=2;
    z10=2.3;
    z01=2.2;
    z11=2.5;

    plot3([x0 x1 x1 x0 x0],[y0 y0 y1 y1 y0],[z00 z10 z11 z01 z00],'w-');
    plot3([x0],[y0],[z00],'o');
    plot3([x1],[y0],[z10],'o');
    plot3([x0],[y1],[z01],'o');
    
    text(.9,.7,0,'x_0');
    text(2.9,.7,0,'x_0+dx');
    text(.3,1.2,0,'y_0');
    text(.3,3.2,0,'y_0+dy');

    text(.5,3,2.3,'(2)');
    text(3.1,.7,2.3,'(1)');
    text(1.4,1.7,2,'(0)');

    text(2,1.2,2.3,'u');
    text(1.2,2,2.3,'v');
    text(1.3,2.7,0,'R');

    hold off;
