image thumbnail

read_teqc_compact

by

 

17 Apr 2011 (Updated )

Reads teqc's QC compact files more rapidly -- without for loops.

read_teqc_compact_out
function varargout = read_teqc_compact_out (varargin)
    %if (nargout ~= 1)
    if (nargout > 1)  % (nargout ~= 1) || (nargout ~= 0)
        varargout = varargin;
        return;
    end
    varargout = {cell2struct(varargin(1:4), {'obs', 'epoch', 'prn', 'sys'}, 2)};
    if (nargin < 5),  return;  end
    varargout{1}.azim = varargin{5};
    varargout{1}.azi = varargout{1}.azim;
    if (nargin < 6),  return;  end
    varargout{1}.elev = varargin{6};
    varargout{1}.ele = varargout{1}.elev;
    % some might prefer teqc's name, ele/azi (these are only pointers).
end

Contact us