[Previous]
[Next]
NAME:
W2R()
EXPLANATION
Converts a dilution factor into a distance above a star.
INPUTS
W Radiation dilution factor.
OUTPUT
Distance from star -- a number greater than 1.
HISTORY
Ver.1, 7-Dec-2001, Peter Young
CONTACT
Peter Young, CfA, pyoung@cfa.harvard.edu
[Previous]
[Next]
PROJECT:
YOHKOH
NAME:
PURPOSE:
This procedure reads the GRS response functions in SUGA format.
CATEGORY:
YOHKOH, WBS, RESPONSE
CALLING SEQUENCE:
CALLS: ***
LOC_FILE [1], LOC_FILE [2], LOC_FILE [3], curdir [1], curdir [2], restgen [1]
restgen [2]
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
wbs_response [1], wbs_response [2]
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
Version 1, richard.schwartz@gsfc.nasa.gov
[Previous]
[Next]
PROJECT:
YOHKOH
NAME:
PURPOSE:
This procedure reads the GRS response functions in SUGA format.
CATEGORY:
YOHKOH, WBS, RESPONSE
CALLING SEQUENCE:
CALLS: ***
LOC_FILE [1], LOC_FILE [2], LOC_FILE [3], curdir [1], curdir [2], restgen [1]
restgen [2]
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
wbs_response [1], wbs_response [2]
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
Version 1, richard.schwartz@gsfc.nasa.gov
[Previous]
[Next]
NAME:
wbs_response
PURPOSE:
read Yohkoh WBS response functions for HXS and GRS1, GRS2 as well as nominal energy
calibration files
CATEGORY:
spectral analysis
CALLING SEQUENCE:
Responses,infile,ncm,nsc,esc,rsc0,rsc1,e1,e2,ebar
CALLED BY:
spex.pro, rd_drm_4_spex
INPUTS:
experiment - string, either 'hxs', 'grs1', 'grs2'
OPTIONAL INPUTS:
date=date - any time format accepted by ANYTIM, defaults to current utbase
OUTPUT:
drm = response function in units of cnts/keV/cm2 per unit photon input
area = nominal geometric area of detector
edges_out= channel edges in keV for output detector bins in drm
edges_in = channel edges in keV for incident photon bins in drm
CALLS: ***
ARR2STR [1], Arr2Str [2], CHECKVAR [1], CHKLOG [1], CHKLOG [2], CONCAT_DIR [1]
CONCAT_DIR [2], CONCAT_DIR [3], FCHECK, GETUTBASE [1], GETUTBASE [2]
Responses [1], Responses [2], Responses [3], UTIME [1], UTIME [2], anytim [1]
anytim [2], anytim [3], anytim [4], anytim [5], checkvar [2], concat_dir [4]
edge_products, printx [1], printx [2], wbs_grs_response [1]
wbs_grs_response [2]
CALLED BY:
read_yohkoh_4_spex [1], read_yohkoh_4_spex [2]
COMMON BLOCKS:
common wbs_response, exp_com, date_com, drm_com, area_com, e_out_com, e_in_com
used for program memory, not for communications
MODIFICATION HISTORY:
ras, 25-may-94
[Previous]
[Next]
NAME:
wbs_response
PURPOSE:
read Yohkoh WBS response functions for HXS and GRS1, GRS2 as well as nominal energy
calibration files
CATEGORY:
spectral analysis
CALLING SEQUENCE:
Responses,infile,ncm,nsc,esc,rsc0,rsc1,e1,e2,ebar
CALLED BY:
spex.pro, rd_drm_4_spex
INPUTS:
experiment - string, either 'hxs', 'grs1', 'grs2'
OPTIONAL INPUTS:
date=date - any time format accepted by ANYTIM, defaults to current utbase
OUTPUT:
drm = response function in units of cnts/keV/cm2 per unit photon input
area = nominal geometric area of detector
edges_out= channel edges in keV for output detector bins in drm
edges_in = channel edges in keV for incident photon bins in drm
CALLS: ***
ARR2STR [1], Arr2Str [2], CHECKVAR [1], CHKLOG [1], CHKLOG [2], CONCAT_DIR [1]
CONCAT_DIR [2], CONCAT_DIR [3], FCHECK, GETUTBASE [1], GETUTBASE [2]
Responses [1], Responses [2], Responses [3], UTIME [1], UTIME [2], anytim [1]
anytim [2], anytim [3], anytim [4], anytim [5], checkvar [2], concat_dir [4]
edge_products, printx [1], printx [2], wbs_grs_response [1]
wbs_grs_response [2]
CALLED BY:
read_yohkoh_4_spex [1], read_yohkoh_4_spex [2]
COMMON BLOCKS:
common wbs_response, exp_com, date_com, drm_com, area_com, e_out_com, e_in_com
used for program memory, not for communications
MODIFICATION HISTORY:
ras, 25-may-94
[Previous]
[Next]
NAME: where_are
PURPOSE: to find strings with matching substrings
CATEGORY: string processing
CALLING SEQUENCE: lines = where_are( text_array, string_array, casechk=casechk)
INPUTS:
text_array - a text array
string_array - a set of strings to be searched for in lines of text_array
OPTIONAL INPUTS:
casechk - if set search is casechk sensitive
exclude - an array of substrings not found in the result
OUTPUTS:
lines - indices in text_arrray for matches, -1 if none
count - number of elements found
CALLS: ***
ATIME [1], ATIME [2], CHECKVAR [1], FCHECK, FXBCLOSE [1], FXBCLOSE [2], FXBFIND [1]
FXBFIND [2], FXBOPEN [1], FXBOPEN [2], FXBOPEN [3], FXBREAD [1], FXBREAD [2]
FXBREAD [3], FXPAR [1], FXPAR [2], Fits_spectra [1], Fits_spectra [2]
HEADFITS [1], HEADFITS [2], HEADFITS [3], LIMITS, TJD2YMD, anytim [1], anytim [2]
anytim [3], anytim [4], anytim [5], checkvar [2], edge_products
CALLED BY:
Fits_spectra [1], Fits_spectra [2]
PROCEDURE:
none
MODIFICATION HISTORY:
ras, 30-sep-94
[Previous]
[Next]
NAME: where_are
PURPOSE: to find strings with matching substrings
CATEGORY: string processing
CALLING SEQUENCE: lines = where_are( text_array, string_array, casechk=casechk)
INPUTS:
text_array - a text array
string_array - a set of strings to be searched for in lines of text_array
OPTIONAL INPUTS:
casechk - if set search is casechk sensitive
exclude - an array of substrings not found in the result
OUTPUTS:
lines - indices in text_arrray for matches, -1 if none
count - number of elements found
CALLS: ***
ATIME [1], ATIME [2], CHECKVAR [1], FCHECK, FXBCLOSE [1], FXBCLOSE [2], FXBFIND [1]
FXBFIND [2], FXBOPEN [1], FXBOPEN [2], FXBOPEN [3], FXBREAD [1], FXBREAD [2]
FXBREAD [3], FXPAR [1], FXPAR [2], Fits_spectra [1], Fits_spectra [2]
HEADFITS [1], HEADFITS [2], HEADFITS [3], LIMITS, TJD2YMD, anytim [1], anytim [2]
anytim [3], anytim [4], anytim [5], checkvar [2], edge_products
CALLED BY:
Fits_spectra [1], Fits_spectra [2]
PROCEDURE:
none
MODIFICATION HISTORY:
ras, 30-sep-94
[Previous]
[Next]
NAME:
WHICH_LINE
PROJECT
CHIANTI
PURPOSE:
Upon given an ion name and wavelength, this routine prints out a list
of possible line IDs for the wavelength. Wavelengths within 1% of the
input wavelength are searched for.
INPUTS
IONNAME Name of an ion in the CHIANTI format. E.g., 'fe_13' for Fe XIII.
WVL A wavelength in angstroms.
OUTPUTS (to screen)
Prints a list of atomic transitions and wavelengths for lines close to
the input wavelength. A '*' is placed next to the closest wavelength
match.
KEYWORDS
NARROW Narrows the search range to 0.02% of the specified wavelength.
EXAMPLE
IDL> which_line,'o_6',1032
Wavelength i j Lower level Upper level A-value
1037.615 1 2 1s2.2s 2S1/2 - 1s2.2p 2P1/2 4.21e+008
1031.914 1 3 1s2.2s 2S1/2 - 1s2.2p 2P3/2 4.28e+008
CALLS
CONVERTNAME, ZION2FILENAME, READ_WGFA2, READ_ELVLC
HISTORY
Ver.1, 22-Jun-2004, Peter Young
CALLS:
CALLED BY
XSPECT
[Previous]
[Next]
wmatch - Make a window big enough for the given array
to be displayed in it.
CALLS:
CALLED BY
zpick_origin, zunwrap
[Previous]
[Next]
NAME: wsetshow
PURPOSE: Make the desired window active when switching from
spectral and temporal plotting domains. Also,
loads in the correct sysvariables for those windows.
Used in SPEX for flipping between windows
CALLING SEQUENCE: wsetshow, i
INPUTS: iout - window index to bring up, novalue if just putting plotting
values in common
INPUT KEYWORDS:
/noshow - set the window, but don't raise it
time_win_id - set during initialization of SPEX. Window
number of time history window.
spec_win_id - set during initialization of SPEX. Window
number of spectral window.
/initialize - set during initialization of SPEX. Set
time_id and spec_id to values to corresponding
win keywords. Exit after setting these
values.
/timehistory, /spectral - sets iout to number of appropriate window.
CALLED BY:
CAL_SHER, SPEX_COMMONS [2], SPEX_COMMONS [4], SPEX_FLASH [1], SPEX_FLASH [2]
SPEX_PROC [1], SPEX_PROC [2], countsmod_plot [1], countsmod_plot [2]
setup_spex [1], setup_spex [2], spex_customplot [1], spex_customplot [2]
MODIFICATION HISTORY:
ras, 22-apr-94, include sysvariables
ras, 19-may-94, protect against current window not being 0 or 1
ras, 8-april-1996, always use old ! variables, even if redundant
richard.schwartz@gsfc.nasa.gov, 18-mar-1998, use xdevice() for
'X'
Paul Bilodeau, 20-March-2002, added time_win_id, spec_win_id,
initialize, and win_name keywords. Added time_id and spec_id
parameters to wsetshow_common block.
Paul BIlodeau, 17-September-2002, added checks for definition
of window id numbers with and without /init, fix crash for
running in /cmode with the 'Z' device. Documentation updates.
[Previous]
[Next]
NAME: wsetshow
PURPOSE: Make the desired window active when switching from
spectral and temporal plotting domains. Also,
loads in the correct sysvariables for those windows.
Used in SPEX for flipping between windows
CALLING SEQUENCE: wsetshow, i
INPUTS: iout - window index to bring up, novalue if just putting plotting
values in common
INPUT KEYWORDS:
/noshow - set the window, but don't raise it
time_win_id - set during initialization of SPEX. Window
number of time history window.
spec_win_id - set during initialization of SPEX. Window
number of spectral window.
/initialize - set during initialization of SPEX. Set
time_id and spec_id to values to corresponding
win keywords. Exit after setting these
values.
/timehistory, /spectral - sets iout to number of appropriate window.
CALLED BY:
CAL_SHER, SPEX_COMMONS [2], SPEX_COMMONS [4], SPEX_FLASH [1], SPEX_FLASH [2]
SPEX_PROC [1], SPEX_PROC [2], countsmod_plot [1], countsmod_plot [2]
setup_spex [1], setup_spex [2], spex_customplot [1], spex_customplot [2]
MODIFICATION HISTORY:
ras, 22-apr-94, include sysvariables
ras, 19-may-94, protect against current window not being 0 or 1
ras, 8-april-1996, always use old ! variables, even if redundant
richard.schwartz@gsfc.nasa.gov, 18-mar-1998, use xdevice() for
'X'
Paul Bilodeau, 20-March-2002, added time_win_id, spec_win_id,
initialize, and win_name keywords. Added time_id and spec_id
parameters to wsetshow_common block.
Paul BIlodeau, 17-September-2002, added checks for definition
of window id numbers with and without /init, fix crash for
running in /cmode with the 'Z' device. Documentation updates.