;+
;
; NAME: 
;       CONVERT_FLARECAT
;
; PURPOSE:
;
;
; CATEGORY:
;       BATSE
;
; CALLING SEQUENCE:
;
;
; CALLS:
;	none
;
; INPUTS:
;       none explicit, only through commons;
;
; OPTIONAL INPUTS:
;	none
;
; OUTPUTS:
;       none explicit, only through commons;
;
; OPTIONAL OUTPUTS:
;	none
;
; KEYWORDS:
;	none
; COMMON BLOCKS:
;	none
;
; SIDE EFFECTS:
;	none
;
; RESTRICTIONS:
;	none
;
; PROCEDURE:
;	none
;
; MODIFICATION HISTORY:
;
;-
;This is a one time procedure to convert the flare catalog into a stream file
;to be readable on both SDAC (OVMS) and Umbra (OSF)

batse_read_cat
@flare_catalog
@log_hdr_struct
loghead.last_flare=n_elements(fldata)
;openw,/stream,1,'BATSE_DISK0:[BATSE]BATSE_FLARE.CAT
openw,/stream, 1,'BATSE_DISK1:[data.BATSE]BATSE_FLARE.CAT
writeu,1,loghead
writeu,1,fldata
close,1

end