function i = reportmain(F, cv, mnames, chrid, fid)
%report signifcant hits from a genome scan
% cv - is the critical value for report
% mnames is a cell array of marker names
% chrid is a vector of chromosome numbers
% fid is a filepointer to the output file name

i = find(F>cv);
if length(i) > 0
   for s = 1:length(i)
      fprintf(fid,'%d\t%d\t%s\t%6.2f\r\n',...
         i(s), chrid(i(s)), mnames{i(s)},	F(i(s)));
   end
end
fprintf(fid,'\r\n');