;
;+
;  Name:
;       CONT_DEF
; Procedure:	
; Set default size for read buffer for BATSE CONTinuous and DISCSP data types
;
;  Category:
;	BATSE
;
;  Call:
;       Cont_def, ntimes
;
;  Inputs: 
;	ntimes- number of packets to allocate storage for.
;
; History:
;
; 93/01/20 ras
;
;-
pro cont_def, ntimes

@fs_savecont
maxindex_cont = 0
checkvar, ntimes, 5000 ;10,000 seconds
; don't need to define arrays if they already exist (takes a long time)
if (size(t_cont))(1) eq 0 then begin
   discsp = fltarr(4,8,ntimes)
   t_discsp = dblarr(ntimes)
   cont = fltarr (16,8,ntimes)
   t_cont = dblarr (ntimes)
   live_cont = fltarr (8,ntimes)
   live_discsp = fltarr(8,ntimes)
endif
;
return
end