function [uv,omega] = drogin(filename,nlevel)
% drogin.m
% Read the drogue file produced by fundy
% [uv,omega] = drogin('drog',11);


fid = fopen([filename],'rt');
if fid~=-1
s = fscanf(fid,'%s',2)
s = fscanf(fid,'%s',2)
n = fscanf(fid,'%i',1)
m = fscanf(fid,'%i',1)
omega = fscanf(fid,'%f',1)
uv = fscanf(fid,'%f',[8,inf])';
fclose(fid);
else
uv=[];
end

N = length(uv);
