function point=pt(delta,pitch)
%function point=pt(delta,pitch)
%JRA, 7/1/03
%Plots a point on the diagram given the dip and the pitch.  This one uses simple trig.  It could have been much fancier and intersected the pitch and dip lines. 

xscale = 2/sqrt(3);

xend1 = ((90-delta)./10)*xscale./18;		
xend3 = ((90-delta)./10)*xscale./9;
xline = [xend3 (xscale./2 + xend1)];
yend2 = -((90-delta)./10)./9;
yline = [-1 yend2];

L=sqrt((xline(1)-xline(2))^2+(yline(1)-yline(2))^2);

l = (pitch/90).*L;

deltax=l.*cos(60.*pi./180);
deltay=l.*sin(60.*pi./180);

point=[xline(1)+deltax, yline(1)+deltay];




