% insert missionID and load this file in each directory
% ship head, bearing to auv, dist to auv (km)
% longitude west should be POSITIVE -- program bearing.m will adjust
% startrng includes ship head, bearing to auv, dist to auv (km)

missionID='2000.243.12';
surveydate='M1 to C1 / 60-m isobath, 30 August 2000'; %for graph title

shipstart=[36 45.33 121 51.39] ; 
startrng =[200 6 195] ;          

shipend=[36 43.697 121 51.58] ;
endrng=[217 10 134];

ep([1 3])=bearing(shipstart,startrng);
ep([2 4])=bearing(shipend,endrng);
[dist phas]=sw_dist(ep([1 2]),ep([3 4]),'km');

