; NAME:
;    TERM_DISPLAY
; PURPOSE:
;    Show the data and SFC pointing locations since rupture #3
; CATEGORY:
; CALLING SEQUENCE:
;    term_display
;    term_display, qstop=qstop
; INPUTS:
; OPTIONAL (KEYWORD) INPUT PARAMETERS:
;    qstop
; ROUTINES CALLED
;    FINDFILE, GT_FILTA, GT_FILTB, LINECOLORS
; OUTPUTS:
; COMMON BLOCKS:
; SIDE EFFECTS:
; RESTRICTIONS:
; MODIFICATION HISTORY:
;    HSH, written 1-mar-97
;-

pro term_display, upto = upto, qstop = qstop, rm_sfc=rm_sfc
linecolors
term_review,/quiet,rm_sfc=rm_sfc
ss_sfc = where(gt_filtb(rm_sfc) eq 2 and gt_filta(rm_sfc) eq 1)
if n_elements(upto) eq 0 then $
  upto = '/0p/sxt_co/terminator/analysis/sxtf_upto_970225.genx'
restgen,file=upto, struct=all
all = all.savegen0
ss_all = where(all.filtb eq 2 and all.filta eq 1)
plot,all.coords(0),all.coords(1),psym=3,xr=[500,600],yr=[550,650]
if keyword_set(qstop) then stop
end