wt_anal_hdr

0001 function status = wt_anal_hdr(pfid,nfiles,obs_labels,Epoch,Window_Length,NEpoch,Nbad_chan,bad_chan,ref_flag,reference,NChan,Nfreq);
0002 
0003 fwrite(pfid,nfiles,'int16');
0004 fwrite(pfid,size(obs_labels,2),'int16');
0005 for i = 1:size(obs_labels,1)
0006     fwrite(pfid,obs_labels(i,:),'char');
0007 end;
0008 fwrite(pfid,Epoch,'int16');
0009 fwrite(pfid,Window_Length,'int16')
0010 fwrite(pfid,NEpoch,'int16');    
0011 fwrite(pfid,Nbad_chan,'int16');
0012 fwrite(pfid,bad_chan,'int16');
0013 fwrite(pfid,ref_flag,'int16');
0014 fwrite(pfid,reference,'char');        
0015 fwrite(pfid,NChan,'int16');
0016 fwrite(pfid,Nfreq,'int16');
0017 status = 1;