function?[Obs_types?ant_deltaifound_typeseof]?=?anheader（file）
%ANHEADER?Analyzes?the?header?of?a?RINEX?file?and?outputs
%	???????the?list?of?observation?types?and?antenna?offset.
%	???????End?of?file?is?flagged?1?else?0.?Likewise?for?the?types.
%	???????Typical?call:?anheader（‘pta.96o‘）

%Kai?Borre?09-12-96
%Copyright?（c）?by?Kai?Borre
%$Revision:?1.0?$???$Date:?1997/09/23??$

fid?=?fopen（file‘rt‘）;
eof?=?0;
ifound_types?=?0;
Obs_types?=?[];
ant_delta?=?[];

while?1			???%?Gobbling?the?header
???line?=?fgetl（fid）;
???answer?=?findstr（line‘END?OF?HEADER‘）;
???if??~isempty（answer）?break;?end;
???if?（line?==?-1）?eof?=?1;?break;?end;
???answer?=?findstr（line‘ANTENNA:?DELTA?H/E/N‘）;
???if?~isempty（answer）
??????for?k?=?1:3
?????????[delta?line]?=?strtok（line）;
?????????del?=?str2num（delta）;
?????????ant_delta?=?[ant_delta?del];
??????end;
???end
???answer?=?findstr（line‘#?/?TYPES?OF?OBSERV‘）;
???if?~isempty（answer）
??????[NObs?line]?=?strtok（line）;
??????NoObs?=?str2num（NObs）;
??????for?k?=?1:NoObs
?????????[ot?line]?=?strtok（line）;
?????????Obs_types?=?[Obs_types?ot];
??????end;
??????ifound_types?=?1;
???end;
end;

%fclose（fid）;
%%%%%%%%%?end?anheader.m?%%%%%%%%%

?屬性????????????大小?????日期????時(shí)間???名稱
-----------?---------??----------?-----??----

?????文件?????107469??2013-09-11?16:57??easy1-5\abpo0020.12n

?????文件????3017421??2013-09-11?15:56??easy1-5\albh0020.12o

?????文件???????1235??2001-03-02?15:37??easy1-5\anheader.m

?????文件???????1576??2002-11-25?04:47??easy1-5\baseline.m

?????文件??????76832??2000-12-31?03:31??easy1-5\bdata.dat

?????文件???????1953??2002-07-10?20:42??easy1-5\b_point.m

?????文件????????293??2002-02-21?15:59??easy1-5\check_t.m

?????文件???????3704??2000-04-27?14:35??easy1-5\chistart.m

?????文件???????3261??2013-05-22?01:24??easy1-5\decorrel.asv

?????文件???????3291??2001-10-20?23:20??easy1-5\decorrel.m

?????文件????????468??2002-07-28?00:32??easy1-5\easy1.m

?????文件???????1100??2012-06-08?04:53??easy1-5\easy2.m

?????文件???????9961??2013-05-15?14:48??easy1-5\easy3.eps

?????文件???????1772??2003-01-08?16:20??easy1-5\easy3.m

?????文件???????3714??2003-01-05?23:11??easy1-5\easy4.m

?????文件??????10397??2013-05-15?14:49??easy1-5\easy4_1.eps

?????文件???????9888??2013-05-15?14:49??easy1-5\easy4_2.eps

?????文件??????10033??2013-05-21?23:49??easy1-5\easy5.eps

?????文件??????10318??2005-01-20?22:20??easy1-5\easy5.m

?????文件??????10404??2013-05-17?19:48??easy1-5\easy6.eps

?????文件???????9981??2005-01-21?04:38??easy1-5\easy6.m

?????文件??????10013??2013-05-17?19:49??easy1-5\easy6e.eps

?????文件??????10398??2005-01-21?04:59??easy1-5\easy6e.m

?????文件???????1176??2013-06-02?00:39??easy1-5\eph.dat

?????文件????????538??1997-09-26?15:48??easy1-5\e_r_corr.m

?????文件???????2121??2001-10-08?02:39??easy1-5\fepoch_0.m

?????文件????????438??1997-09-23?02:08??easy1-5\findpiv.m

?????文件????????531??2004-02-10?02:48??easy1-5\find_eph.m

?????文件????????310??1997-04-24?02:17??easy1-5\fobs_typ.m

?????文件???????1129??1997-09-24?14:48??easy1-5\frgeod.m

............此處省略52個(gè)文件信息