[Previous]
[Next]
NAME:
PCOEF
PURPOSE:
This procedure computes the multi-order pileup coefficients
CATEGORY:
HXRBS
CALLING SEQUENCE:
pcoef,r,tc,pc,norder
CALLS:
none
INPUTS:
r- rate in 1/seconds
tc- decay constant in seconds
norder- pileup term for coefficient
OPTIONAL INPUTS:
none
OUTPUTS:
pc - pileup coefficient
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
PILEUP
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
ras, 1987
Version 2, ras, June 1996, Documented
[Previous]
[Next]
NAME:
PILEUP
PURPOSE:
PILEUP procedure - calculates pulse-height distribution with
pileup accounted for. BONOMO computes distribution corrected for all
other interactions (backscattering, Compton scattering, K-escape,
crystal response, etc.), then writes file BONOMO2IDL.DAT with spectrum
and energy midpoints. PILEUP interpolates that spectrum to 1000 1 keV
bins. If counting rate is > 100000 counts/sec, it computes baseline
correction using a simulated pulses method. For all cases, it computes
leading edge pileup correction using Datlowe's technique.
CATEGORY:
HXRBS
CALLING SEQUENCE:
pileup,table
CALLS: ***
DOBASELINE, DREAD, DWRITE, INTERPOL, PCOEF
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
table
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
SDAC VMS need bonomo installed
PROCEDURE:
none
MODIFICATION HISTORY:
Richard Schwartz 11/87 (mod. by K. Tolbert)
[Previous]
[Next]
FUNCTION: pl_scale, d, xcorr = xcorr, ycorr=ycorr
scale distance in graphics output multiplot environment
INPUTS:
D -distance in normal units for full scale plot.
YCORR -Keyword indicating y axis scaling.
XCORR -Keyword indicating x axis scaling.
RAS
CALLS: ***
FCHECK, PL_SCALE
MODIFICATION HISTORY:
Modified 8/29/94 by AES. checks for existence of variable global
in scalecom. If it exists, output multiplied by global. Put in
to scale up graph labels in multiple plot.
[Previous]
[Next]
NAME:
plot_bda
PURPOSE:
plot lightcurves or spectra in BDA files
CALLING SEQUENCE:
plot_bda,t,y,w,z,/log,/ebar
OUTPUTS:
t = time axis (secs)
y = lightcurve array (counts/s)
w = bin (or wavelength) array
z = spectrum array (counts/bin/sec)
KEYWORDS:
/log : plot lightcurve on logarithmic scale
/ebar : overplot uncertainties
/wave : plot using wavelength axis
bin = value by which to bin data (2 for double binning)
CALLS: ***
ATIME [1], ATIME [2], MATCH [1], MATCH [2], MATCH [3], PLOTSPEC, RDBDA, REVERSE
SET_UTLABEL, UTIME [1], UTIME [2], plotltc [1], plotltc [2], set_hard
PROCEDURE:
RDBDA to read BDA files
MODIFICATION HISTORY:
Written by DMZ (ARC) May'92
[Previous]
[Next]
NAME:
plotbda
PURPOSE:
plot lightcurves or spectra in BDA files
CALLING SEQUENCE:
plotbda,t,y,w,z,/log,/ebar
OUTPUTS:
t = time axis (secs)
y = lightcurve array (counts/s)
w = bin (or wavelength) array
z = spectrum array (counts/bin/sec)
KEYWORDS:
/log : plot lightcurve on logarithmic scale
/ebar : overplot uncertainties
/wave : plot using wavelength axis
bin = value by which to bin data (2 for double binning)
PROCEDURE:
RDBDA to read BDA files
MODIFICATION HISTORY:
Written by DMZ (ARC) May'92
[Previous]
[Next]
NAME:
plotbrr
PURPOSE:
plot BRR lightcurves or spectra
CALLING SEQUENCE:
plotbrr,t,y,w,z,/log,/ebar
OUTPUTS:
t = time axis (secs)
y = lightcurve array (counts/s)
w = bin or wavelength array
z = spectrum (counts/bin/sec)
KEYWORDS:
/log : plot lightcurve on logarithmic scale
/ebar : overplot uncertainties
/wave : convert bins to wavelength
bin = value by which to bin data (2 for double binning)
CALLS: ***
GETBRR, PLOTSPEC, SET_UTLABEL, getbrr_ltc, getbrr_spec, plotltc [1], plotltc [2]
set_hard
PROCEDURE:
GETBRR used to read BCS spectra created by MKBRR
MODIFICATION HISTORY:
Written by DMZ (ARC) Jan'91
[Previous]
[Next]
NAME:
plotfda
PURPOSE:
plot spectra from FDA files
CALLING SEQUENCE:
plotfda,x,y,bin=bin
INPUTS:
none - prompts for FDA filename
OPTIONAL OUTPUTS:
x = wavelength array
y = spectrum array (counts per sec per address bin)
KEYWORDS:
/flux = flux calibrate count rate spectrum
bin = value by which to rebin image or spectrum
(e.g. bin=2 to double bin)
CALLS: ***
ATIME [1], ATIME [2], BSORT [1], BSORT [2], BSORT [3], BSORT [4], EMENU, PLOTSPEC, RDFDA
SETUTBASE [1], SETUTBASE [2], WLFCS, set_hard
MODIFICATION HISTORY:
DMZ (ARC) July'92
[Previous]
[Next]
NAME:
plotfis
PURPOSE:
plot images or spectra from FIS files
CALLING SEQUENCE:
plotfis,x,y,img=img,bin=bin,/nobkg,/cont,/flux
INPUTS:
none - prompts for FIS image filename
OPTIONAL OUTPUTS:
x = wavelength array
y = spectrum array (counts per sec per address bin)
KEYWORDS:
img = structure with image parameters
/flux = flux calibrate count rate spectrum
/nobkg = do not subtract background from data
/cont = plot image as contour
bin = value by which to rebin image or spectrum
(e.g. bin=2 to double bin)
CALLS: ***
GETFIS, PLOTMAP, PLOTSPEC, RDFIS, RDFIS_SPEC, rd_sdb, set_hard
MODIFICATION HISTORY:
DMZ (ARC) Mar'92
[Previous]
[Next]
NAME:
PLOTFIT
PURPOSE:
Plot FIT files from SPCFIT
CATEGORY:
BCS
CALLING SEQUENCE:
plotfit,x,y,e,w,z,yf,/log
INPUTS:
prompts for fit filename
OUTPUTS:
t = time array (secs since UTBASE)
y = fitted parameter array
e = error in y
w = wavelength array
z = observed spectrum array
yf= fitted spectrum
KEYWORDS:
/log = plot y axis on Log10 scale
CALLS: ***
ATIME [1], ATIME [2], FETCH, GETBRR, PLOTSPEC, RDFIT, SETUTBASE [1], SETUTBASE [2]
STREP [1], STREP [2], STREP [3], STREP [4], STREP [5], UTIME [1], UTIME [2]
getbrr_spec, plotltc [1], plotltc [2], rdspc, set_hard
MODIFICATION HISTORY:
DMZ (ARC) June'91
[Previous]
[Next]
NAME:
PLOTFTE
PURPOSE:
plot fluxes, temperature and column emission measure maps
saved ind IDL saveset files created by FTEMAP
CALLING SEQUENCE:
plotfte,temp,emiss,flux1,flux2
INPUTS:
prompted for FTE file name
OUTPUTS:
temp = raster array of electron temperatures (MK)
emiss = raster array of column emission measures (10^28 cm-5)
OPTIONAL OUTPUTS:
flux1,flux2 = ion flux arrays used in computing ratios
KEYWORDS:
color = color table number (e.g. 0 for B/W, 3 for Temperature red)
cont = 1 for contour plot; 0 for image
CALLS: ***
PLOTMAP, RDFTE
PROCEDURE:
uses RESTORE command
MODIFICATION HISTORY:
written June 1992 (DMZ, ARC).
[Previous]
[Next]
PROGRAM: plotgt
PURPOSE:
plot Mewe G(T) functions
CALLING SEQUENCE:
plotgt
INPUTS:
line = Mewe line number
OPTIONAL KEYWORDS:
trange = temperature range of plot [def = 2, 20 MK]
hard = 1 for hardcopy
OUTPUTS:
temp = electron temperature (10^6 K)
gft = log10 G(T) ph cm-2 s-1 EM-1
CALLS: ***
PSPLOT [1], PSPLOT [2], mewe
MODIFICATION HISTORY:
written by DMZ (ARC), May'94
[Previous]
[Next]
NAME:
PLOTMAP
PURPOSE:
plot contours or images
CATEGORY:
plotting
CALLING SEQUENCE:
plotmap,img
INPUTS:
IMG = image structure variable (see ST_IMG)
OUTPUTS:
terminal, workstation, and hardcopy plots
KEYWORDS:
cont = contour the image [def for TEKTRONIX device]
over = overlay input image onto an existing plot
smo = smooth data using spline or bilinear interpolation
fov = [fx,fy] = field of view to be plotted (arcmin; def= [6,6])
grid = grid spacing (deg) for latitude-longitude grid (def= 0, no grid)
label = label grid with coordinate values (def = 0, no labels)
color = colorize images (and contours)
center = [xc,yc] = center coordinates of FOV (def = center of image)
min,max = min, max data for plot [def = data min,max]
bord = draw border around image [def = no]
bin = factor to rebin image (e.g. bin=[2,2], will rebin by factor 2
in each dimension)
hard = hard copy image
plabels = plot labels
glabel = label grid coordinates
/draw = alerts PLOTMAP that window is a DRAW widget
/tail = allows user to tailor contours
/log = log_10 scale image
windex = window index to send plot to
CALLS: ***
CONGRID [1], CONGRID [2], CONGRID [3], DATATYPE [1], DATATYPE [2], DATATYPE [3]
GET_IJ, HELIOG, PSPLOT [1], PSPLOT [2], RUST, SOLRAD, TEST_OPEN, UTIME [1], UTIME [2]
XYTOLB, bust, get_wind, linecolors [1], linecolors [2]
CALLED BY:
FCS, FTEMAP, PLOTFTE, plotfis
RESTRICTIONS:
- do not set /GRID unless absolute coordinates of image are known
- do not set /OVER unless a plot exists on the current device
- do not set /COLOR unless a color output device exists
PROCEDURE:
- uses contour and TV procedures
- hardcopies of the image are plotted as Post Script greyscale images
(unless /COLOR is set)
- user can overlay as many images as system memory allows
- if IMG argument exists then IMG will be plotted without user being
asked to input a file name (e.g. for overlaying on existing plot)
MODIFICATION HISTORY:
DMZ (ARC) Dec'91
DMZ (ARC) Aug'93 - cleaned up
[Previous]
[Next]
PRO POINT,X,Y,[/DEVICE],[/NORMAL],[/DATA] [,npoints=npoints] [,/nocrossbar] $
[,newlabel=newlabel] [,/widget],[,/continue] [,/compile] $
[buttons=buttons, val_buttons=val_buttons, mess_wedg=mess_widg] $
[,xoffset=xoffset] [,yoffset=yoffset], $
[drawline=drawline, thick=thick, color=color, linestyle=linestyle]
/DATA is the default mode
Call up CURSOR. When operator presses a key, over plot a cross bar
and print x and y data values on the screen. User should hold down
cursor until they receive feedback using crossbar or draw options.
options:
npoints - return after selecting n points
/nocrossbar - don't plot the cross bar
newlabel - supply dialogue for the screen
/widget - throw up widget buttons to control x type and exit
/continue - with widget option only, don't show widget controls
until user moves cursor outside of graphics window
/drawline - draw lines from top to bottom of plot window on marked points
keywords supporting drawline:
thick, color, linestyle
xoffset - pixel offset for respond_widg base
yoffset -
/compile- code is compiled, but no action taken
/help - Helpful information sent to normal output.
mess_widg - message on control widget
buttons - button labels for widget controls
val_buttons - meaning attacted to buttons
'X' - print as x and continue
'T' - print as time and continue
'F' - done
must be the same number of val_buttons as buttons!
CALLS: ***
ARR2STR [1], ATIME [1], ATIME [2], Arr2Str [2], CHECKVAR [1], CRANGE, FCHECK
F_USE_WIDGET, GETUT [1], GETUT [2], GRAPHICS_PAGE, POINT_CONTINUE, RESPOND_WIDG
XDEVICE, checkvar [2]
CALLED BY:
BACKG_MARK, FLARE_MARK, FSPLOT, HXRBS, Intervals [1], Intervals [2], SETUP_DRM
pro set_bpow [1], pro set_bpow [2], pro set_vth_bpow [1], pro set_vth_bpow [2]
setup_spex [1], setup_spex [2], spex_intervals [1], spex_intervals [2]
restrictions:
if the return command is given before selecting any points,
then x and y are returned as the strings 'null'
widgets only enabled for x windows graphics
widget interface uses f_use_widget.pro and respond_widg.pro
modified by Richard Schwartz, March 21, 1991
modified by AKT 11/26/91 to handle X or Tektronix graphics.
mod, RAS, 3 Oct 1993, npoints, newlabel, and nocrossbar added.
allows return without any points selected, ras, 4 Oct. 93
ras, 8-jun-94, added widget controls
ras, 10-jul-94, improvements to widget controls
ras, 30-aug-94, made exit more reliable if only one point is needed
**********************************************************************
[Previous]
[Next]
NAME:
POISPROB
PURPOSE:
The purpose of this seems to be to return a Poisson distribution
but RAS isn't sure.
CATEGORY:
HXRBS
CALLING SEQUENCE:
poisprob,ncounts
CALLS: ***
SPECPROB
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
SETPULSETRAIN
COMMON BLOCKS:
probdist
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
PRINT_HEADER_RECORD
PURPOSE:
This procedure prints the header record to the screen in a
nice format.
CATEGORY:
HXRBS
CALLING SEQUENCE:
PRINT_HEADER_RECORD
INPUTS:
none explicit, only through commons;
OUTPUTS:
none explicit, only through commons;
CALLS: ***
RDFPLOT
CALLED BY:
RDFPLOT
COMMON BLOCKS:
HEADER_RECORD
MODIFICATION HISTORY:
Written by J.M. Repace, 03/31/89.
Mod. 05/07/96 by RCJ. Added documentation.
[Previous]
[Next]
NAME:
PRTHDR
PURPOSE:
Interprets data in array a as an IPD file label.
CALLING SEQUENCE:
prthdr, ARRAY
FUNCTIONS/PROCEDURES:
FORSUB,I4VAL
INPUTS:
ARRAY byte array
OUTPUTS:
Output to terminal screen only
CALLS: ***
ATIME [1], ATIME [2], I2VAL, I4VAL
CALLED BY:
RD_DMP, RD_EXB
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
PULSEPROFILE
PURPOSE:
CATEGORY:
HXRBS
CALLING SEQUENCE:
CALLS: ***
PULSESHAPE
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
DOBASELINE
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
PULSESHAPE
PURPOSE:
CATEGORY:
HXRBS
CALLING SEQUENCE:
CALLS:
none
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
PULSEPROFILE
COMMON BLOCKS:
none
SIDE EFFECTS:
none
RESTRICTIONS:
none
PROCEDURE:
none
MODIFICATION HISTORY:
[Previous]
[Next]
NAME:
PULSETRAIN4
PURPOSE:
Used in PILEUP.PRO (CALL: BONOMO:pileup:dobaseline:baselines:pulsetrain4)
generate number,energy and position of pulses
CATEGORY:
HXRBS
CALLING SEQUENCE:
pulsetrain4,tsteps,seed,spectrum,phites,wh,numpulse
CALLS:
none
INPUTS:
none explicit, only through commons;
OPTIONAL INPUTS:
none
OUTPUTS:
none explicit, only through commons;
OPTIONAL OUTPUTS:
none
KEYWORDS:
none
CALLED BY:
BASELINES
COMMON BLOCKS:
probdist
SIDE EFFECTS:
none
RESTRICTIONS:
VMS on SDAC, need BONOMO
PROCEDURE:
none
MODIFICATION HISTORY:
ras, 1987