function listrcvs(cat,dirs)
rcvs=prm_gpsrcvs;
rcvs=rcvs(strcmp(rcvs(:,2),cat),:);
t=caltomjd([2004,10,1]);
f=fopen(['listrcvs_',cat,'.txt'],'wt');
for n=1:size(rcvs,1)
    [z,iz,rpos,adel,atype,rtype]=readobs(t,0,{},rcvs(n,1),dirs);
    fprintf(f,'%-6s %-12.12s : %-22s %-22s %7.4f %7.4f %7.4f\n',...
            rcvs{n,[1,3]},atype{1},rtype{1},adel);
end
fclose(f);
