[Previous]
[Next]
NAME:
UVPS_CATPARSE
PURPOSE:
Take a string, that is users input list of parameters, and manipulate
it until it is pretty.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
var = uvsp_catparse(new_param=new_param, exec=exec, $
cat_value=cat_value, rmin=rmin, rmax=rmax)
CALLED BY:
UVSP_CATPARAM
CALLS TO:
none
INPUTS:
NEW_PARAM : string that is the users form of a parameter input
CAT_VALUE : string or string array of the uvsp catalog field(s)
corresponding to the current parameter item
RMIN : a minimun value that is excepted for this parameter
both RMIN and RMAX must be set for either to be used
RMAX : a maximum value that is excepted for this parameter
both RMIN and RMAX must be set for either to be used
OPTIONAL INPUTS:
FLOAT: if set, then the values of NEW_PARAM are interpretted
as float-point, to 2 significate digits.
OUTPUTS:
NEW_PARAM : Returns a string that is the most condensed form of the
input parameter list.
EXEC : Returns a string that is the where expression to be used
to search the catalog.
RMIN : Returns the minimun value that was input and accepted.
RMAX : Returns the maximum value that was input and accepted.
The function returns the number of legal parameter groupings returned
OPTIONAL OUTPUTS:
none
CALLS: ***
UVSP_CATPARSE
COMMON BLOCKS:
COMMON AEROCASE,
FLAGAERO, ; flag if !AERO was used at all.
AERORANGE ; 2xN array containing the start and
; end values for ranges when !AERO
SIDE EFFECTS:
Since ranges are expanded to arrays, equal in size to the number
of elements in the range, it is possible to run out of memory with
large ranges.
RESTRICTIONS:
If RMIN and RMAX are supplied, it is assumed that -999 will be outside
this range.
PROCEDURE:
Ranges are indicated by "-", the order can be backwards (ex: 4-2)
Parameter sets are separated by blanks or commas or equals.
Expand ranges to one number for each value in the range,
merge this with any single value inputs,
sort and get rid of duplicate number,
stick any consecutive number ranges together (separated by "-")
and return a string that is the parameter list.
MODIFICATION HISTORY:
OCT 93 - Elaine Einfalt (HSTX)
oct 93 - added !AERO stuff.
[Previous]
[Next]
file UVSP.PRO - displays UVSP data
UVSP$DATA (ULTRIX: UVSP_DATA) can be define as data disk location
UVSP$CATALOG (ULTRIX: UVSP_CATLOG) can be defined a location and
name of UVSP catalog
A "->" means first program calls the second
Upon entering the program control is given to the event handler
UVSP -> EVAL_EVENT (will process events as user clicks) ->
When an experiment is selected (list or manual):
UVSPREAD (->uvspdevck) - UVSPRECLAIM - UVSPSET - UVSPDEFAULTS -> UVSPPROCESS -> ***
When "RESET" is clicked:
UVSPREAD (->uvspdevck) - UVSPDEFAULTS -> UVSPPROCESS -> ***
When "DISPLAY" is clicked:
UVSPPROCESS -> ***
Then follows the UVSPPLOT path or the UVSPIMAGE path.
-> UVPSPLOT
/
/
*** -> UVSPPROCESS-> -> UVSPSEPER
\ /
\ /
-> UVSPIMAGE->
\
\
-> UVSPAVER (-> uvsprollit, uvspcondur)
Modified: 1995 March 15 to lower-case file names for unix/nfs
access. D.M. fecit.
CALLS:
CALLED BY
SDAC
[Previous]
[Next]
file UVSP_CAT.PRO -
(UVSP_CAT) provides an input platform to accept parameters
either terminal (UVSP_SCREEN)
or widget (UVSP_CATWIDGET) based.
checks it for validity (UVSP_CATPARAM->UVSP_CATPARSE),
displays a condensed version of any valid user input,
either terminal (UVSP_SHOW)
or widget (UVSP_CATWIDGET)
searches the catalog using input parameters (UVSP_CATREAD) and
proceeds to output qualifing experiments (UVSP_CATPRINT
[->UVSP_CATDISPLAY for widgets])
(UVSP_CATRESET) allow user to go back to default values
(UVSP_CATHELP) provides help for terminal version, widget version
provides continuous help (UVSP_CATWIDGET subroutine WIDGET_INPUT)
NAME:
UVSP_CAT.PRO
PURPOSE:
Sets up initial conditions for the catalog search program, an directs
program control to the appropriate interface.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
result = uvsp_cat( screen=screen, font=font, nofull=nofull, $
reset=reset, widget_handler=widget_handler, $
widget_group=widget_group, widget_modal=widget_modal)
CALLED BY:
none
CALLS TO:
UVSP_CATRESET, UVSP_CATWIDGET, UVSP_CATSCREEN, CHECKFONT
INPUTS:
none
OPTIONAL INPUTS:
SCREEN : If set, then the interface is in screen, not widget, mode.
By default, if widgets are available then widgets will be
used.
FONT : The hardware font to be used by the program's widgets,
when executing in widget mode. May be selected during
program execution, for any future widgets created.
Wildcards are allowed. Ignored in screen mode.
ALPHAFONT : When set select a small font. Alpha IDL placed big gaps
between lines, therfore the widget goes off the bottom.
This keyword selects a font size about 12. This keyword
is ignored if the FONT keyword is set and by screen mode.
NOFULL : By default the entire catalog is read into memory.
If this keyword is set then only the maximum extent of
the experiment range is placed in memory. If you select
the experiments 1 and 99771, then the entire catalog is
placed in memory in order to access just those two
experiments. Once the whole catalog is in memory,
subsequent program calls ingore the keyword /NOFULL.
NORESET : By default the default parameters are reset to all possible
values. If set, then your last parameter values are
retained as the current settings. Note that "SPEC" means
spectra only, so that is set to NO.
The following only apply to widget mode, and are ignored in screen mode.
These are meaningful only when this program is called by another widget
routine.
WIDGET_HANDLER : The name of the event handler to be used to handle
the events produced by the "Array" or "Screen"
output selections. If not present, the only event
handled from these widgets is the CANCEL button.
WIDGET_GROUP : The widget ID of a group leader, which, when killed,
kills the catalog program's widgets.
WIDGET_MODAL : The MODAL condition to be set for the final output
widget listing the qualifing experiments.
OUTPUTS:
Returns the result (CAT_TEXT).
CAT_TEXT is null when no experiment qualify to meet the parameter.
CAT_TEXT is a long array of numbers when "NUMBERS" is selected in
screen mode or nothing is select in widget mode.
CAT_TEXT is the calalog output when, output condition "ARRAY"
is selected.
CAT_TEXT is null for any other cases.
OPTIONAL OUTPUTS:
none
CALLS: ***
CHECKFONT, CONV_VAX_UNIX, UVSP_ANGSDET, UVSP_CATCAL, UVSP_CATDISPLAY, UVSP_CATDMO
UVSP_CATEXPAND, UVSP_CATHELP, UVSP_CATPARAM, UVSP_CATPARSE, UVSP_CATPRINT
UVSP_CATRADTHT, UVSP_CATREAD, UVSP_CATRESET, UVSP_CATSCREEN, UVSP_CATSHOW
UVSP_CATWIDGET, UVSP_CAT_PTIME
CALLED BY:
uvsp
COMMON BLOCKS:
COMMON UVCATTEXT, CAT_TEXT ; The string array of entries,
; returned from the event handler.
COMMON UVCATSTRUC, STR, OUT ; Current parameter settings (STR),
; and parameter flags (OUT).
COMMON MYFONT, MYFONT ; Saves for next time.
COMMON UVCAT, CAT ; The part of catalog in memory.
SIDE EFFECTS:
If /NOFULL is not set, which is the case when you want the full catalog
to reside in memory at one time, then a great deal of memory is used.
This memory is not returned until you exit IDL or type
COMMON UVCAT, CAT and then DELVAR, CAT.
RESTRICTIONS:
If this program is executing in widget mode then IDL must be version
3.0.0 or better. The widget keyword font is used. If the program is
executing in screen mode then this restriction is meaningless.
If /NOFULL is not set, which is the case when you want the full catalog
to reside in memory at one time, then you must have a enough for the
whole UVSP catalog.
PROCEDURE:
none
MODIFICATION HISTORY:
oct 93 - elaine einfalt (HSTX)
oct 93 - added /ALPHAFONT keyword and call to CHECKFONT
[Previous]
[Next]
NAME:
UVSP_CAT_PTIME.PRO
PURPOSE:
Convert user's time input into experiment number ranges
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
result = UVSP_CAT_PTIME(NEW_PARAM=NEW_PARAM)
CALLED BY:
UVSP_CATPARAM
CALLS TO:
UVCAT_PARSE_TIME, UVSP_CATTIME
INPUTS:
NEW_PARAM : the time string the user entered (string compressed)
OPTIONAL INPUTS:
none
OUTPUTS:
NEW_PARAM : the input times are prettied up returned
Returns a string that is the list of experiments that corresspond
to the input times.
OPTIONAL OUTPUTS:
none
CALLS: ***
UVCAT_PARSE_TIME, UVSP_CATTIME
CALLED BY:
UVSP_CAT, UVSP_CATPARAM
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
MODIFICATION HISTORY:
Sep 93 - elaine einfalt (HSTX)
[Previous]
[Next]
NAME:
UVSP_CATHELP
PURPOSE:
Display HELP message for the requested topic.
CATEGORY:
UVSP catalog
CALLING SEQUENCE:
UVSP_CATHELP, input=input, message=message
CALLED BY:
UVSPCATREAD
CALLS TO:
none
INPUTS:
INPUT : Topic for help.
OPTIONAL INPUTS:
none
OUTPUTS:
none
OPTIONAL OUTPUTS:
MESSAGE : Return the help message to caller, don't print now.
CALLED BY:
UVSP_CAT, UVSP_CATSCREEN, UVSP_CATSHOW
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
Calls to this routine display the hard coded help messages listed
below.
MODIFICATION HISTORY:
July 1993 - Elaine Einfalt (HSTX)
[Previous]
[Next]
NAME:
UVSP_CATPARAM
PURPOSE:
Assign the user's choice of parameter inputs to the structure, "STR".
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
UVSP_CATPARAM, str=str, out=out
CALLED BY:
UVSP_CATSCREEN, UVSP_CATWIDGET
CALLS TO:
none
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none
OPTIONAL OUTPUTS:
none
CALLS: ***
UVSP_CATPARSE, UVSP_CAT_PTIME
CALLED BY:
UVSP_CAT, UVSP_CATSCREEN, UVSP_CATSHOW
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
UVSP_CATPRINT
PURPOSE:
Output the catalog entries.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
result = uvsp_catprint, w_cat=w_cat, [radtht=radtht, yield=yield,
gaps=gaps, s_page=s_page, p_page=p_page,
filename=filename]
CALLED BY:
UVSP_CATREAD
CALLS TO:
UVSP_CATDMO, UVSP_CATRADTHT
INPUTS:
W_CAT array of experiment numbers
OPTIONAL INPUTS:
RADTHT (2 x n) fltarr containing Rsun and Theta for each W_CAT,
if not present calls to UVSP_CATRADTHT.PRO made for each W_CAT
OFFSET is the difference between the experiment number in W_CAT
and the entry index in the catalog array CAT. Defaults
ot 1 (assumes full catalog in CAT).
YIELD the bits of this number indicate then processing code(s)
if BIT 0 is 1 then return the catalog text in a array
if BIT 1 is 1 then output is sent to the terminal screen
if BIT 2 is 1 then output is sent to the printer
if BIT 3 is 1 then output is sent to a disk file,
named by default UVSPCAT.hhmmss (extension is time)
Default is screen only (bit 1)
WIDGET if SCREEN is set then, WIDGET determine the type of screen
output used. if 0 then output is to terminal screen (default)
if 1 then output to a text widget
if 2 then output to a list widget
GAPS if set, then print blank lines between entries with time
separations of greater than 6 minutes.
Default is for no blank lines.
S_PAGE if present, the number of entries to process before
reprinting the titles to the screen.
Ignored of BIT 1 is not set. Default is 24.
P_PAGE if present, the number of entries to process before issuing
a form feed and reprinting the titles for printer output.
Ignored of BIT 2 is not set. Default is 58.
FILENAME if present and BIT , a sting to be used as the
OUTPUTS:
If BIT 0 is set, (in variable YIELD) then a string array containing
the catalog entry text for each experiment in W_CAT is returned.
Otherwise, a null string is returned.
OPTIONAL OUTPUTS:
If BIT 1 is set, (in variable YIELD) then the catalog entry text is
sent to the terminal screen
If BIT 2 is set, (in variable YIELD) then the catalog entry text is
sent to a temporary file, printed and deleted.
If BIT 3 is set, (in variable YIELD) then the catalog entry text is
sent to a disk file (titles only present at beginning of file).
CALLS: ***
CONV_VAX_UNIX, UVSP_CATCAL, UVSP_CATDISPLAY, UVSP_CATDMO, UVSP_CATRADTHT
CALLED BY:
UVSP_CAT, UVSP_CATREAD
COMMON BLOCKS:
Common UVCAT has variable CAT a 64x99771 integer array containing the
64 fields in the UVSP Catalog for 99771 experiment entries.
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
Open any requested output devices, and output the catalog text
for each experiment in the W_CAT array. If the screen mode is
legally terminated, prior to the last experiment, then printer
and disk modes terminate at that experiment as well.
MODIFICATION HISTORY:
August 1993 - Elaine Einfalt (HSTX)
[Previous]
[Next]
NAME:
UVSP_CATREAD
PURPOSE:
CATEGORY:
CALLING SEQUENCE:
From the SCREEN interface: result = UVSP_CATREAD(OUT=OUT)
From the WIDGET interface: result = UVSP_CATREAD(OUT=OUT, $
INHIB=INHIB,
YIELD=YIELD)
CALLED BY:
CALLS TO:
none
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
CALLS: ***
UVSP_ANGSDET, UVSP_CATEXPAND, UVSP_CATPRINT, UVSP_CATRADTHT
CALLED BY:
UVSP_CAT, UVSP_CATSCREEN, UVSP_CATSHOW
COMMON BLOCKS:
COMMON AEROCASE,
FLAGAERO, ; flag if !AERO was used at all.
AERORANGE ; 2xN array containing the start and
; end values for ranges when !AERO
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
UVSP_CATRESET
PURPOSE:
Define a structure containing the default search parameters.
Define a structure to contain the string of where expressions.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
UVSP_CATRESET, str=str, out=out
CALLED BY:
UVSP_CATSCREEN
CALLS TO:
none
INPUTS:
none
OPTIONAL INPUTS:
none
OUTPUTS:
STR : a structure of strings, containing the default parameters
OPTIONAL OUTPUTS:
none
CALLED BY:
UVSP_CAT, UVSP_CATSCREEN, UVSP_CATSHOW
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
Assigns values to the structure "STR" and returns this structure.
MODIFICATION HISTORY:
July 1993 - Elaine Einfalt (HSTX)
[Previous]
[Next]
NAME:
UVSP_CATSCREEN
PURPOSE:
Process the command line inputs from the screen version of the
UVSP catalog search program.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
UVSP_CATSCREEN
CALLED BY:
UVSPCAT
CALLS TO:
UVSP_CATRESET, UVSP_CATSHOW, UVSP_CATHELP, UVSP_CATREAD
INPUTS:
none
OPTIONAL INPUTS:
none
OUTPUTS:
none
OPTIONAL OUTPUTS:
none
CALLS: ***
UVSP_CATHELP, UVSP_CATPARAM, UVSP_CATREAD, UVSP_CATRESET, UVSP_CATSHOW
CALLED BY:
UVSP_CAT, UVSP_CATSHOW
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
Display screen version menu and process commands that the user enters.
MODIFICATION HISTORY:
July 1993 - Elaine Einfalt (HSTX)
[Previous]
[Next]
NAME:
UVSP_CATSHOW
PURPOSE:
Prints the catalog menu to the screen, displaying the commands and
current parameter settings.
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
UVSP_CATSHOW, STR=STR
CALLED BY:
UVSPSCREEN
CALLS TO:
none
INPUTS:
STR : structure of strings containing the current values of the
search parameters
OPTIONAL INPUTS:
none
OUTPUTS:
none
OPTIONAL OUTPUTS:
none
CALLS: ***
UVSP_CATHELP, UVSP_CATPARAM, UVSP_CATREAD, UVSP_CATRESET, UVSP_CATSCREEN
CALLED BY:
UVSP_CAT, UVSP_CATSCREEN
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
Print each line of the screen version of the UVSP catalog search menu.
MODIFICATION HISTORY:
July 1993 - Elaine Einfalt (HSTX)
[Previous]
[Next]
file UVSP_CATWIDHELP.PRO - includes CATWIDHELP_EV, UVSP_CATWIDHELP
CALLS:
CALLED BY
CATWIDHELP_EV
[Previous]
[Next]
NAME:
UVSP_CATWIDHELP
PURPOSE:
Provide help for the meaning of the buttons, in widget mode
CATEGORY:
UVSP Catalog
CALLING SEQUENCE:
UVSP_CATWIDHELP, GROUP=GROUP
CALLED BY:
UVSP_CATWIDGET
CALLS TO:
CATWIDHELP_EV throught the XMANAGER
INPUTS:
none
OPTIONAL INPUTS:
GROUP is the widget ID of the parent widget
OUTPUTS:
none
OPTIONAL OUTPUTS:
none
CALLS: ***
CATWIDHELP_EV, XMANAGER, XREGISTERED
CALLED BY:
CATWIDHELP_EV
COMMON BLOCKS:
none
SIDE EFFECTS:
Creates a helpful widget
RESTRICTIONS:
Needs widget ability
PROCEDURE:
Create a widget, part list widget (for the help items) and part
text widget (to display the help information).
MODIFICATION HISTORY:
OCT 93 - Elaine Einfalt (HSTX)
[Previous]
[Next]
magcase : 0 is a raster zoom and will reassign the data array
DATA to be the new smaller size (until a RESET)
1 is a plot zoom and will define a new x-axis range (XLOHI)
CALLS:
CALLED BY
uvsp
[Previous]
[Next]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
UVSPPLOT.PRO - plotting output routine
STRUC : structure will all kinds of thing in it
A : the data array
TIM : the X-axis array, it's timing data if available,
else an array equal to n_elements(A)
HD : the experiment header
HARD : 0 if not hardcopy; 1 if hardcopy
P_SCAL : 0=linear, 1=log.
PLOTOVER : 0=not overplotted, 1=overplotted
ONE_DET : is set to 1 if only 1 of multiple detectors is choosen
C_DET : with overplotting c_det is the detector w/ the max. value
else c_det is the detector choosen to be plotted
obsolete PTI : array containing xtitle info.
obsolete MTI : array containing main title info.
obsolete YTI : string containing y-axis title
YLOHI : vector of minimum and maximum value of y-axis
XLOHI : vector of minimum and maximum value of x-axis
NSOME : averaging value for plotting data points
Det 1:green, Det 2:cyan, Det 3:red, Det 4:magenta, Det 5:yellow
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CALLS:
[Previous]
[Next]
NAME:
UVSPRD_LINKIMAGE_PRO
PURPOSE:
Sets up the LINKIMAGE interface for UVSPRD
CATEGORY:
SMM, UVSP
CALLING SEQUENCE:
UVSPRD_LINKIMAGE_PRO
CALLS:
none
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
Changed UVSPRD_LINKIMAGE from an include to a procedure, ras, 7/96
[Previous]
[Next]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
file UVSPRECLAIM.PRO
UVSPRECLAIM.PRO - Depending of status of savexp, this routing will
delete current experiment's windows or not
struc : structure of structures (see UVSPSTRUC.PRO)
savexp : 0 = don't save the window create by current experiment
1 = do save this experiment's windows
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CALLED BY
uvsp
[Previous]
[Next]
FILE UVSPSAVRES.PRO
CALLED BY
uvsp
[Previous]
[Next]
PRO UVSPSAVRES, func
FUNC : 0 if saving a window
1 if restoring a window
CALLED BY
uvsp
[Previous]
[Next]
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
file UVSPWIN.PRO
UVSPWIN.PRO -- Check to reuse same type window else create new window
struc : a structure of structures (see UVSPSTRUC.PRO)
typwin : the state of the type of window requested
window types are imagewin, areawin, plotwin, etc.
window states are :
A -2 means that type of window is not in use.
Any positive number indicates the window number for the operation.
xwin : size to make X dimension of window
ywin : size to make Y dimension of window
banner : string at top of window
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
CALLS:
CALLED BY
uvsp, uvspplot