;+
; PROJECT
;           SolarB EIS
;
; NAME
;           EIS_STUDY_DURATION
;
; PURPOSE    
;           Function to calculate the duration of an eis_study (ms)
;
; CATEGORY
;           EIS technical planning
;
; MODIFICATION HISTORY:
;           Written, Feb 2005 - Chunkey Lepine, RAL
;       
;-
;************************************************************************
FUNCTION eis_study_duration , study ;nRasters , studyRasters

t = LONG64(0)

FOR i = 0, study.nRasters-1 DO BEGIN

    sra    = study.studyRasters[i]
    ra_dur = sra.ra_duration * sra.ra_repeats
    t      = t + ra_dur

ENDFOR

t = t + LONG64(21.e3)                   ; slit-slot movement
t = t + LONG64(1.5e3 * study.nRasters)  ; per raster - movement to MIP


RETURN , LONG64(t)

END