;+
; Project
;           SolarB EIS
;
; Name
;           EIS_DR_PROCESS_REC_STUDY
;
; Purpose
;           Function
;
; Category
;           Timeline planning (timeline)
;
; Author
;           John Rainnie (JAR) 23-May-2008
;
; Version
;           V0.1
;
;-
;______________________________________________________________________________
FUNCTION eis_dr_process_rec_study , tl , next_ra_start

format    = '(A-3,A-20,A-20,F-7.4,A-1)'

; Calculate study data rate - sum up all raster durations and volumes
st_dur = eis_study_duration(tl.science_component)
st_vol = eis_study_volume(tl.science_component)
st_dr  = (st_vol/(1024.^2)) / (st_dur/1000.)

; Make string
line_out = STRING(format=format                                      ,     $
             ''                                                      ,     $
             eis_tai2op(tl.time_component.start_time)                ,     $
             eis_tai2op(next_ra_start - 0.1)                         ,     $
             st_dr + (0.05 * st_dr)                                  ,     $
             'S')

IF (tl.time_component.recursive   EQ 1) THEN line_out = line_out + 'R'
IF (tl.time_component.time_tagged EQ 1) THEN line_out = line_out + '*'

RETURN , line_out

END