function satdat=get_sat(file_loc)
%Reads in Satlantic data from compiled Oasis data

file_name=sprintf('%ssatlantic',file_loc);%what file
fid=fopen(file_name);%open file
Dat_Loc=rm_oasis_header(fid);%remove the header
fseek(fid,(Dat_Loc),'bof');%start of the data
i=1;
while ~feof(fid) %read in the numbers
    X=fgetl(fid);
    satdat(:,i)=sscanf(X,'%f');
    i=i+1;
end;
fclose(fid);
satdat(1,:)=jul2date(satdat(1,:),satdat(12,:));%change to Matlab time
satdat(12,:)=[];%get rid of year column

%Both of these seem to return a smaller value than expected

%oc4v4 - may not work because using Lu instead of Lw or Rrs
satdat(12,:)=oc4v4(satdat(3,:),satdat(4,:),satdat(5,:),satdat(6,:));

%oc2v2 - uses Lu [an older calculation]
%satdat(12,:)=oc2v2(satdat(4,:),satdat(6,:));