load_hdr

[fhdr,chdr,...,coff]=load_hdr(fname)

This function opens an EGIS file, reads its header,
returns the values from rd_egis_hdr_v, then closes
then file.

See also: rd_egis_hdr_v.

0001 function [fhdr,chdr,ename,czeros,cgains,cnames,fcom,ftext,coff]=load_hdr(fname)
0002 %[fhdr,chdr,...,coff]=load_hdr(fname)
0003 %
0004 %This function opens an EGIS file, reads its header,
0005 %returns the values from rd_egis_hdr_v, then closes
0006 %then file.
0007 %
0008 %See also: rd_egis_hdr_v.
0009 
0010 fid=fopen(fname);
0011 if fid == -1, error('Fuck up opening input file.'), end
0012 [fhdr,chdr,ename,czeros,cgains,cnames,fcom,ftext,coff]=rd_egis_hdr_v(fid);
0013 status=fclose(fid);
0014