SUPASTE - paste existing SEGY headers on existing data   

 supaste <bare_data >segys  ns= head=headers ftn=0         

 Required parameter:                                 
      ns=the number of samples per trace             

 Optional parameters:                                
      head=headers      file with segy headers             
      ftn=0       Fortran flag                       
                  0 = unformatted data from C        
                  1 = ... from Fortran               
      verbose=0   1= echo number of traces pasted          
 Caution:                                      
      An incorrect ns field will munge subsequent processing.    

 Notes:                                        
 This program is used when the option head=headers is used in    
 sustrip. See:   sudoc sustrip    for more details         


 Credits:
      CWP: Jack K. Cohen