%Second, assuming events.wb2 printed out sorted file of instruments

load /home3/ocn/jmanning/gbs97/text/o303sort.txt
d=o303sort;

% define instrument of taste
% where:  zpn  pump m1/4  M1 drift bongo
%       = 1    2    3    4    5    6
% in a file with:
% lat lon sta haul day hhmm code s/e(0/1)
%  1   2  3   4    5   6    7    8
inst=4;
d=d(find(d(:,7)==inst),:);

