#
# Postscript Previewer (on SXT6)
#	dxpsview iguide.ps -geometry 1000x900+10+10
#
setenv ys_batch 1
setenv YS_GUIDE 1
#
echo -n "Do you wish to re-generate Summary Appendix programs? (y/n) "	;set ans_long = $<
echo -n "Do you wish to re-generate Prefix/Dir/GT tables? (y/n) "	;set ans_gen  = $<
echo -n "Do you wish to re-generate plot files? (y/n) "			;set ans_plot = $<
echo -n "Do you wish to print out the results? (y/n) "			;set ans_pr   = $<
#
if ($ans_long == "y") then
    echo "************************************************************"
    echo "Running long time programs FIND_GAPS, PR_DATES_WARM, PROGRESS_SUMMARY, WEEK_TOTALS
    echo "************************************************************"
    setenv IDL_BATCH_RUN go_once_an_update	; idl /ys/gen/script/idl_batch_run.pro
    setenv IDL_BATCH_RUN progress_summary	; idl /ys/gen/script/idl_batch_run.pro
    setenv IDL_BATCH_RUN week_totals		; idl /ys/gen/script/idl_batch_run.pro
endif
#
if ($ans_gen == "y") then
    echo "************************************************************"
    echo "Running MK_PREFIX_TABLE and MK_TABLE_LIST"
    echo "************************************************************"
    setenv IDL_BATCH_RUN mk_prefix_table	; idl /ys/gen/script/idl_batch_run.pro
    setenv IDL_BATCH_RUN mk_table_list		; idl /ys/gen/script/idl_batch_run.pro
endif
#
if ($ans_plot == "y") then
    echo "************************************************************"
    echo "Running GO_MK_DEMOPLOTS, GO_MK_PLOTFIGS, GO_MK_TIMING"
    echo "************************************************************"
    setenv IDL_BATCH_RUN go_mk_demoplots	; idl /ys/gen/script/idl_batch_run.pro
    setenv IDL_BATCH_RUN go_mk_plotfigs		; idl /ys/gen/script/idl_batch_run.pro
    setenv IDL_BATCH_RUN go_mk_timing		; idl /ys/gen/script/idl_batch_run.pro
endif
#
##echo "************************************************************"
##echo "                Running MK_TOC"
##echo "************************************************************"
#
##setenv IDL_BATCH_RUN mk_toc		; idl /ys/gen/script/idl_batch_run.pro
#
echo "************************************************************"
echo "             FIRST PASS THROUGH LATEX"
echo "************************************************************"
#
latex uguide
latex rguide
latex iguide
#
echo "************************************************************"
echo "             SECOND PASS THROUGH LATEX"
echo "************************************************************"
#
latex uguide
latex rguide
latex iguide
#
echo "************************************************************"
echo "             MAKING THE INDEX"
echo "************************************************************"
#
setenv IDL_BATCH_RUN mk_index		; idl /ys/gen/script/idl_batch_run.pro
latex guide_index
latex guide_tabs
#
echo "************************************************************"
echo "             MAKING PS FILES"
echo "************************************************************"
#
dvips uguide -o uguide.ps
dvips rguide -o rguide.ps
dvips iguide -o iguide.ps
dvips guide_index -o guide_index.ps
dvips guide_tabs  -o guide_tabs.ps
#
if ($ans_pr == "y") then
    echo "************************************************************"
    echo "             SENDING OUTPUT TO THE PRINTER"
    echo "************************************************************"
    #
    cat guide_tabs.ps  | rsh sxt2 lpr -Plp1 -K2
    cat guide_index.ps | rsh sxt2 lpr -Plp1 -K2
    cat iguide.ps | rsh sxt2 lpr -Plp1 -K2
    cat uguide.ps | rsh sxt2 lpr -Plp1 -K2
    cat rguide.ps | rsh sxt2 lpr -Plp1 -K2
endif