pro make_all_expfac,tel,ps=ps,nosave=nosave
;
; generates all of the exposure factor files
;
; RAH  2/22/98
;
; @(#)make_all_expfac.pro	1.2 02/26/98 :LASCO IDL LIBRARY
;
tt = STRLOWCASE(tel)
IF (STRMID(tt,0,1) NE 'c')  THEN BEGIN
   PRINT,'ERROR, MAKE_ALL_EXPFAC:  Unrecognized telescope, Use c1, c2, c3'
   RETURN
ENDIF
d = FIX(STRMID(tt,1,1))
IF ((d NE 1) AND (d NE 2) AND (d NE 3)) THEN BEGIN
   PRINT,'ERROR, MAKE_ALL_EXPFAC:  Unrecognized telescope, Use c1, c2, c3'
   RETURN
ENDIF
;
;  first determine the endpoints
;
d0 = YYMMDD2UTC('960403')
mjd0 = d0.mjd
d1 = YYMMDD2UTC('970930')
mjd1 = d1.mjd
d=d0
;
;  Now loop over all the days first erasing the current files
;
IF NOT KEYWORD_SET(PS)  THEN ps=0
IF NOT KEYWORD_SET(nosave)  THEN nosave=0
FOR i=mjd0,mjd1,14 DO BEGIN
    IF (nosave EQ 0)    THEN DELETE_EXPFAC,tt,i,i+13
    COMPUTE_MONEXP_FACTORS,tt,i,i+13,ps=ps,nosave=nosave
ENDFOR
RETURN
END
