parameter (NSMAX=60*96000) !Samples per 60 s file
real*4 dd !92 MB: raw data from Linrad timf2
character*80 fname80
common/datcom/dd(4,NSMAX,2),nutc,newdat2,kbuf,kxp,kk,kkdone,nlost, &
nlen,fname80