ICUR Library
The following is a listing of the entire contents of this library for IDL.
Click on an individual procedure name to view its header and
source code. This listing
is a shortened form of the much longer
entire library help file. This may be handy for
text searchs, be beware that some of these are huge and may take a long
time to load or even crash your browser.
Last modified: Thu Dec 21 21:21:38 2000.
List of Routines
- ADDHELIOCOR[1] To perform a median filter on an one-dimensional array. The type of the array is not converted to BYTE (as in the IDL MEDIAN), but is left the same as the input type.
- ADDHELIOCOR[2] To perform a median filter on an one-dimensional array. The type of the array is not converted to BYTE (as in the IDL MEDIAN), but is left the same as the input type.
- ADDHELIOCOR[2] procedure for getting final output from SDPS' MELO array (analogous to iuelo.pro)
- ADDHELIOCOR[3] To acquire spectral data for a given order from an IUE diskfile
- ADDHELIOCOR[4] To acquire and calibrate low dispersion spectral data from IUE with optional corrections for THDA sensitivity variation and LWR sensitivity variation.
- ADDHELIOCOR[5] PARCHECK (GENERAL IDL LIBRARY 01) 30-MAR-1987 Error checking *CATEGORY: To check that a procedure has been called with the minimum of allowed number of parameters. *CALLING SEQUENCE:
- ADDHELIOCOR[6] PCHECK *CATEGORY: This procedure is used to check the parameters of a procedure for correct type and dimensions *CALLING SEQUENCE: PCHECK,VARIABLE,POSITION,DIMENSION,TYPE
- ADDHELIOCOR[7] SWAP_BYTES (General IDL Library 01) 25-APR-80 Conversion *CATEGORY: To perform the byte reordering required for conversion of integer, longword, floating point, or double precision variables between various machine representations.
- ADDHELIOCOR[8] TRANS_BYTES To translate the byte representation of IDL variables to a format compatible with the host operating system as defined by the IDL system variable !version.arch. TRANS_BYTES currently supports SPARC (Sun-4s and SPARCStations), MIPSEL (DECstation 3100 and IBM 386 class PCs), and VAX (VAXstation and MicroVAX).
- ADDHELIOCOR[9] vmedian vector median filter routine CALLING SEQUENCE: vmedian,in,width,out in - input vector width - filter width (should be odd)
- ADDLINE ************************************************************* RO ADDLINE,WAVE,FLUX,lam,sig,tf,helpme=helpme ; ADD LINE TO FLUX VECTOR
- ADDRED ***************************************************************************** RO ADDRED,IM,WAVE,FLUX,EBMV,trans ; CORRECT FOR INTERSTELLAR EXTINCTION TAKEN FROM [210,021]NUNRED.PRO 4/5/83 IM=0,-1 FOR UNRED
- ADDSP ************************************************************************** ro addsp,file,h0,w,f0,e0,prlog=prlog,debug=debug
- ADDSPEC ************************************************************************** ro addspec,w,f,w1,f1,e0,w0,f0
- ADDSPWL **************************************************************** ro addspwl,h0,w0,lam1,lam2,dl,krange ;get wavelength limits
- AMOD ********************************************************* RO AMOD,A,ISHAPE *********************************************************
- APPENDICD **************************************************************************** ro appendicd,file1,file0
- AVBAD *********************************************************************** unction avbad,f1,e,kk,bad=bad ;expunge bad data points
- AVERAGESPEC ******************************************* unction AVerageSPEC,FILE,i1,i2,w,save=save,helpme=helpme,noweight=noweight
- AVSPT ********************************************************************** unction avspt,f,e,kk,bad=bad ;find single point zeros in IUEHI file and remove
- BARGRAPH **************************************** ro bargraph,x,y,ynz=ynz,stp=stp
- BBODY *********************************************************************** RO BBODY,W,F,EPS,temp=temp ; COMPUTE AND OVERPLOT BLACK BODY SPECTRUM
- BDATA ******************************************************** RO BDATA,h,X,W,F,E,BW,BF,BDF,V ; SET BAD DATA VECTOR
- BELL ************************************************************************** ro bell,number,nmax=nmax
- BIGPLOT *************************************************************************** ro bigplot,id,w,f,e,bw,bf ; PLOT MULTIPLE SPECTRAL REGIONS vax version
- BITS *********************************************************** ro bits,inp
- BLOWUP ***************************************************************** RO BLOWUP,I,prt=prt,readout=readout ; PROCEDURE TO EXPAND PLOT I=-1 FOR CURSOR CALL I=0 FOR COMPLETE BLOWUP I=1 FOR X ONLY I=2 FOR Y ONLY
- CENTRD ************************************************************* RO CENTRD,WAVE,FLUX,YD,I1,I2,XCEN,FD ;CENTROID input I1,I2 in bins output xcen in units of wave
- CHECKLIM ***************************************************************** ro checklim,f,lam1,lam2,e
- CHECK_STDFILE ************************************************************** ro check_stdfile
- CHISQ ************************************************************************* unction chisq,y,dy,model return chi-square value
- CHLO *************************************************** ro chlo,infile,outfile,r1,r2 ;change iue low dispersion format 0 to format 8
- CHTITLE ************************************************************************ ro chtitle,file,rec,title,helpme=helpme
- CLEANSPEC *********************************************** ro cleanspec,file,rec,helpme=helpme,stp=stp,autosave=autosave
- CLOSEALL ***************************************************************************** ro closeall,dum
- COADD ********************************************************************** RO COADD,W,F,E,nbin,error=error,wave=wave,helpme=helpme ;COADD DATA INTO COARSER BINS
- COMBINE **************************************************************************** ro combine,infile,inrec,outfile,outrec,average=average,noscale=noscale, $
- CONTFL ************************************************************************** RO CONTFL,file,RECS,wmin,wmax,fluxes,out=out,helpme=helpme,stp=stp,plt=plt, $
- CORRFLUX *********************************************************************** ro corrflux,file,rec,w0def=w0def,nosave=nosave,ffx=ffx,helpme=helpme, $
- CORRFLUX1 ****************************************************************** unction corrflux1,w,f called by CORRFLUX
- CORRFLUX2 ****************************************************************** unction corrflux2,w,f called by FUDGEFLUX
- CREATEFILE ************************************************************************* ro createfile,name
- CROSSCOR ************************************************************************** ro crosscor,w1,f10,w2,f20,dw,xc,logl,cut,a,debug=stp,excl=badlam, $
- CTIT ************************************************************************ ro ctit,h,nch,newt ;change title (words 100-159) in header
- CUTGAPS ********************************************************************* ro cutgaps,h,w,f,e,ngap,wgap1,wgap2
- CWHERE ????
- DAT_TO_ICD ****************************************************************************** ro dat_to_icd,in,recs,out=out,maxrec=maxrec,helpme=helpme,notitle=notitle
- DECONV_GHRS ********************************************************************** unction deconv_ghrs,w,f,grat,psf_file=psf_file
- DEGRADE ************************************************************************ RO DEGRADE,W,F,E,BW,BF ; DEGRADE IUE HI-RES DATA INTO LO-RES DATA W,F,E ARE OVERWRITTEN, AND IDAT IS SET TO 0 (LO-RES)
- DEGTODMS ************************************************************************* ro DEGtoDMS,d,dd,dm,ds,prt=prt,nsigfig=nsigfig
- DEGTOHMS ************************************************************************* ro DEGtoHMS,a,h,m,s,prt=prt,nsigfig=nsigfig
- DELTAMAG ******************************************************************* RO deltamag,file,recs,w0,dw1,dw2,prt=prt
- DMSTODEG ********************************************************************** unction dmstodeg,d,dm,ds
- DND *************************************************************** RO DND,H,WAVE,FLUX ; DIVIDE BY ND RESPONSE
- DQCHECK ************************************************************************ unction dqcheck,fin,eps,q ;check data quality and censor at level q
- DRLIN ***************************************************** ro drlin,w,ls=ls,COLOR=COLOR,vertical=vertical,helpme=helpme ; PROCEDURE DRLIN TO DRAW LINE AT LEVEL W
- EBYTE **************************************************************** unction ebyte,e
- EQWID ************************************************************************** unction eqwid,w,f,lamcen,dl,b1,b2,db1,db2,stp=stp ;estimate equivalent widths
- ERBAR ************************************************************************* RO ERBAR,IXY,a1,a2,a3,a4,a5,a6,color=color,helpme=helpme ixy=1 (X), 2 (Y), 3 (X+Y)
- ERRDIV ************************************************************************** unction ERRDIV,X0,DX0,Y0,DY0,print=print,unc=unc
- EULER[1] Transform between galactic, celestial, and ecliptic coordinates. Use the procedure ASTRO to use this routine interactively
- EULER[2] Transform between galactic, celestial, and ecliptic coordinates. Use the procedure ASTRO to use this routine interactively
- EUVESPEC **************************************************************************** ro euvespec,lam,d,icd=icd,helpme=helpme,stp=stp,sw=sw,mw=mw,lw=lw, $
- EWLIM ***************************************************************************** RO EWLIM,file,w1,w2,iprt=iprt,iint=iint
- EWS ********************************************************************** ro ews,file,r1,r2
- FACTORIAL ************************************************************************** unction factorial,nn
- FCHISQ ******************************************************************* UNCTION FCHISQ,nfree,y,yfit,weight called by FFIT2 returns chi-2 value
- FFCFIT ************************************************************************ ro ffCFIT,NTR,Mode,chisq,iflag,cii=cii called by ffit2 C** CFIT - FORMERLY FWCFIT C** CALLED BY FFIT; CALLS FFCURFIT C** INPUTS: N=NUMBER OF POINTS
- FFCURFIT ********************************************************************** ro FFCURFIT,Nfree,weight,FLAMDA,CHISQ1,IFLAG,cii=cii called by ffcfit in ffit2 C** CURFIT FROM BEVINGTON VIA FWCFIT C** TYPED IN 6/25/82 C** modified 7/2/84 to permit freezing of parameters, following
- FFFITSTAT *************************************************************************** ro fffitstat,chisq,iflag,bsca
- FFFIXLINES *********************************************************************** ro fffixlines,ncam
- FFILE ************************************************************************* unction ffile,disk,direc,mfile,ext,notify=notify
- FFINFLUX **************************************************************************** ro FFINFLUX,igo called by FFIT2 determines integrated fluxes
- FFIT2 **************************************************************************** ro ffit2,dtype,x1,y1,e1,A1,ifixt1,IB,NCAM,IMAGE,NSM,NIT,sigMODE,ihead, $
- FFLPFW ************************************************************************ ro FFLPFW,dtype,NCAM,IGAUS,SMTH,lwid=lwid called by FFIT2 lists line parameters for gaussian lines lwid permits passing of line width in bins
- FFSIGMA *************************************************************************** ro FFSIGMA,im1,IB called by FFIT2 C** ROUTINE TO ESTIMATE ERRORS IN DATA and return variance C** MODE 1: 1 SIGMA = 1 STANDARD DEVIATION OF DATA C** MODE 2: ERROR PROPORTIONAL TO ROOT N
- FFTSM ******************************************************************* RO FFTSM,FLUX,MODE,IFSM,helpme=helpme MODE=0 IS INTERACTIVE, MODE=1 IS AUTOMATIC, WITH GAUSSIAN FILTER AND DEFAULT HALF-POWER POINT AT THE NYQUIST FREQUENCY
- FIGSYM ************************************************************** ro figsym,i,fill,scale
- FILTSPEC ************************************************************************** unction filtspec,flux,eps,smlen
- FINDLIN ************************************************************************* RO FINDLIN,WAVE,disc,LEVEL=LEVEL,noid=noid,noquery=noquery,STP=STP PROCEDURE TO PRINT LINE LIST
- FINTER ******************************************************************* ro finter,w,w0,f0,e0 fast interpolation for w vectors with gaps w is vector w0 is interpolated to
- FITS_ICUR ****************************************************************************** ro fits_icur,files,out=out,examine=examine,helpme=helpme,stp=stp,bins=bins, $
- FIXBADPTS *********************************************************************** unction fixbadpts,vect,bad
- FLATFLUX *********************************************************************** ro fLATflux,file,rec,w0=w0,ffx=ffx,add=add,all=all,stp=stp,helpme=helpme, $
- FMEDIAN To perform a median filter on an one-dimensional array. The type of the array is not converted to BYTE (as in the IDL MEDIAN), but is left the same as the input type.
- FMEDN ************************************************************************** unction fmedn,vector
- FOLD ***************************************************************************** RO FOLD,IP,X,W,F,F1 ; FOLD DATA ON ITSELF, PMNT SMOOTHING
- FTOT *********************************************************************8 RO FTOT,IM,WAVE,FLUX,output,nonorm=nonorm ; SUM TOTAL FLUX IM=0 FOR TOTAL FLUX IM=1 FOR MEAN IM=2 FOR CENTROID, CURSOR POSITION IM=3,4 FOR LINEAR INTERPOLATION
- FUDGEFLUX *********************************************************************** ro fudgeflux,file,rec,w0=w0,ffx=ffx,add=add,all=all,stp=stp,helpme=helpme,dw=dw
- FUN1 ****************************************************************** RO FUN1,WAVE,FLUX,EPS,W1,F1,E1 ; ICUR LOOP 2 VAX Version 1.0 8/29/86 CURSOR COMMANDS: A: PLOT ALL DATA a: ADD A LINE TO THE DATA B: BLOWUP PLOT b: REDEFINE BAD DATA
- FUN2 ************************************************************************* RO FUN2,WAVE,FLUX,EPS,BADW,BADF,F1 ; ICUR LOOP 3 vax version 1.0 8/19/86 CURSOR COMMANDS: A: PLOT ALL DATA a: ADD A LINE TO THE DATA B: BLOWUP PLOT b: REDEFINE BAD DATA
- FUN3 ********************************************************************* RO FUN3,IM,IND,X1,INP,OUTP ; AXIS UNIT, TITLE CHANGES
- FUNGUS **************************************************************************** UNCTION FUNGUS,x,F,cii=cii returns UP TO 5 GAUSSIAN LINES + QUADRATIC BACKGROUND
- FWHM ************************************************************* ro FWHM,WAVE,FLUX,fw ; return full width at half max
- GAUSLIN ********************************************************************** UNCTION gauslin,X,a,nline returns shape of individual line nline runs 1 through 5
- GC ********************************************************************** ro gc,k,rr,gg,bb,helpme=helpme,full=full,stp=stp
- GDAT ************************************************************** RO GDAT,name,H,WAVE,FLUX,EPS,REC,linear=linear,zrec0=zrec0,stp=stp, $
- GDERIV *********************************************************************** unction GDERIV,x,a ;COMPUTES DERIVATIVE FOR FUNCTION IN FUNGUS
- GETDAT *************************************************************** RO GETDAT,IDT0,H1,W1,F1,E1,REC,NAME ;GET DATA FROM DISK
- GETFILELIST ******************************************************************** unction getfilelist,name,direc,noversion=noversion,noext=noext, $
- GETSUN **************************************************************************** ro getsun,w,f,lam=lam,bin=bin,stp=stp,plt=plt
- GETVAL ******************************************************************** unction getval,l0,zh0,missing, $
- GET_ARRVAL ***************************************************************************** unction get_arrval,arr
- GET_EXT **************************************************************************** unction get_ext,file
- GET_FFL ********************************************************************* unction get_ffl,name,stp=stp
- GET_FFX ********************************************************************* unction get_ffx,name,w0,stp=stp
- GET_IDAT ****************************************************************** unction get_idat,file
- GET_NSPEC ***************************************************************************** unction get_nspec,file,recs,helpme=helpme
- GET_SCRSIZE ****************************************************************** unction get_scrsize,prt=prt
- GET_SPT *************************************************************************** unction get_spt,title
- GET_TITLE ************************************************************************** unction get_title,h,inm
- GHRSICURHEAD ************************************************************************** unction ghrsicurhead,ihf,flux,log,t0,stp=stp ;make icur-style header ihf: GHRS header vector flux: GHRS flux vector log: FITS log t0: optional title
- GHRSTOICUR *************************************************************************** ro ghrstoicur,file,h,nw,f,sn,rec,outfil=outfil,type=type,ddlink=ddlink, $
- GMEDIAN To perform a median filter on an one-dimensional array. The type of the array is not converted to BYTE (as in the IDL MEDIAN), but is left the same as the input type.
- GND ************************************************************ ro gnd,h,wave,flux,eps,flag,recno,badw,badf,reset=reset
- GOICUR ******************************************************************* ro goicur,dum ; IDL version 2 version of ICUR
- HBIN ************************************************************************** RO HBIN,WAVE,FLUX,EPS,F1,E1,E ; SHIFT WAVELENGTH WITH HALF BINS
- HDLST ****************************************************************** RO HDLST,IAR ;HELP LISTING OF CURSOR COMMANDS VAX VERSION 1.0 8/15/86 IAR = 0,1 FOR ICUR (1 FOR KPNO DATA, 0 FOR IUE DATA) IAR = 2 FOR FUN1 IAR = 3 FOR FUN2
- HELIOCOR ********************************************************************* ro heliocor,mode,vhel,vlsr,tdel,x,obslat=obslat,ra=ra,dec=dec,utdat=utdat, $
- HXCOR ************************************************************************** ro hxcor,file,hv,records=records,template=template,wavelength=wavelength, $
- IAUCLIST *************************************************************************** ro iauclist,year,month,month2,stp=stp,out=out,mpec=mpec,helpme=helpme
- IBIT ************************************************************** RO IBIT,V,N,I ; insert/toggle INDIVIDUAL BITS V IS INPUT INTEGER N is bit to insert value I into I=0,1 to insert, other to toggle
- ICBCONV ****************************************************************************** unction icbconv,orig
- ICCOR ************************************************************************ RO iccor,im,w0,fa,wb,fb,hb,a,NP=NP,flat=flat,delay=delay,NOSMOOTH=NOSMOOTH, $
- ICDCTS ************************************* unction icdcts,file,stp=stp,helpme=helpme
- ICDFILE ******************************************************************** ro icdfile,file,nr,etype,nl,stp=stp
- ICDTITLE *********************************************************************** unction icdtitle,file,rec,helpme=helpme
- ICD_NREC **************************************************************************** unction icd_nrec,file
- ICD_TO_ASCII **************************************************************************** ro icd_to_ascii,file,rec,out=out,helpme=helpme
- ICD_TO_CAT *********************************************************************** ro icd_to_cat,file,catfile=catfile,stp=stp,helpme=helpme,epoch=epoch
- ICD_VTOU ****************************************************************************** ro icd_vtou,file,helpme=helpme,debug=debug,stp=stp
- ICFIT ************************************************************* RO ICFIT,WAVE,F0,EPS VAX version 2.0 7/17/87 INPUT PARAMETERS: H=HEADER RECORD WAVE=WAVELENGTH VECTOR
- ICFIT2 ************************************************************* RO ICFIT2,WAVE,F0,EPS,params,psdel=psdel,batch=batch,iplot=iplot,cii=cii, $
- ICFIT3 ************************************************************* RO ICFIT3,h,WAVE,F0,EPS,params,ihlp,hcpy=hcpy,batch=batch VAX version 2.0 7/17/87 version 3 - runs with IDL version of ffit2 version 3: generalized input; called by analxcor INPUT PARAMETERS:
- ICFIT4 ************************************************************* RO ICFIT4,h,WAVE,F0,EPS,params,ifx,debug=debug,helpme=helpme, $
- ICFITAUTO ************************************************************* RO ICFITauto,WAVE,F0,EPS,params,psdel=psdel,batch=batch,iplot=iplot, $
- ICSAVE ********************************************************************* ro icsave,id,file ;save/restore fit parameters
- ICUR ********************************************************************** RO ICUR,HH,WAVE,FLUX,EPS,helpme=helpme ; ICUR.PRO - VERSION ICUR_V2 VAX VERSION 1.0 8/19/86 version 2.0 8/17/87 COPIED FROM PDP VERSION 7.3 CURSOR COMMANDS:
- ICURJD ********************************************************************** unction icurjd,head
- ICURSETUP ******************************************************************* ro icursetup,goicur=goicur ;set up commons for ICUR icur_go.pro IDL version 2 version of ICUR
- ICURSPC ********************************************************************** ro icurspc,h,w,f,e read .SPC data file and create ICUR vectors
- ICURSPFILT ****************************************************************** ro icurspfilt,inp,recs,helpme=helpme,debug=debug
- ICURSTARTUP_V2 icurstartup_v2
- IDL_V2_STARTUP ************************************* GHRS IDL (VERSION 2) STARTUP FILE IDL_V2_STARTUP.PRO ************************************* Terminal interface
- IFEAT ******************************************************************** RO IFEAT,WAVE,FINP,eps0,ftot,fnet,noprint=noprint,nonorm=nonorm MEASURE THE EW, FLUX OF A FEATURE VERSION 1 BY SALLY HEAP 22 APR 1981 *** PARED DOWN BY FMW 9/17/82 FOR USE IN ICUR MODIFIED 6/18/86 TO REQUIRE ONLY 2 KEYSTROKES, BUT 3 WILL WORK
- IFEXT ********************************************************************* unction ifext,file
- IFHCPY ***************************************************************** ro ifhcpy,hcpy=hcpy,square=square
- IFSTRING ************************************************************* unction ifstring,var,stp=stp
- IMCOADD **************************************************************************** ro imcoadd,arr,ncoadd=ncoadd,stp=stp
- IMSMOOTH **************************************************************************** ro imsmooth,arr,xsmooth=xsmooth,ysmooth=ysmooth,stp=stp
- INITARR **************************************************************** RO INITARR,MODE,VAR initialize ICFIT arrays
- INITF1 ********************************************************************** RO INITF1,WAVE,FLUX,EPS,W1,F1,E1,F,E,RESET,BADW,BADF,noplot=noplot, $
- INTERPOL[1] Linear interpolation for vectors. Regular or irregular grid.
- INTERPOL[2] Linear interpolation for vectors. Regular or irregular grid.
- INTFLUX ******************************************************************* RO intflux,file,recs,wl,prt=prt
- IPRA ******************************************************************* RO IPRA,NSM,H,ZZ,SIZE=SIZE ; PRINT #S ON PLOT
- IPRM ***************************************************************** RO IPRM,H,WAVE,FLUX,EPS ; IPRM
- IRDEFPLT **************************************************************** ro irdefplt,wave,flux,xn,yn,flag,igo ;default plot if flag=0,-1
- IRINIT ********************************************************** ro irinit,wave,out
- IRPLOT **************************************************************** RO IRPLOT,WAVE,FLUX,XN,YN,FLAG,IGO,FRES,ebar,sr=sr,ieb=ieb ; PLOT LINE FITS
- ISM ********************************************************************* unction ISM,wave,nh,file,helpme=helpme,stp=stp,r=r
- ITCENT ***************************************************************************** ro itcent,x,y,z,c,w,tol,xcen,flag iterate centroid
- IUESPECMERGE ********************************************************************** ro iuespecmerge,w,f,e,r1,r2,f1,f2,wtype
- IXCOR ************************************************************************** ro ixcor,file,hv,records=records,template=template,wavelength=wavelength, $
- JD_TO_DATE ********************************************************************** unction jd_to_date,jd0,reduced=reduced
- JULIANDAY ********************************************************************** unction julianday,mo,da,year,helpme=helpme,mjd=mjd updated from JULDATE RESTRICTIONS: Will not work for years between 0 and 99 A.D. (since these are interpreted as years 1900 - 1999). Will not work for year 1582.
- JUMP ********************************************************************** ro jump,nang ; MOVE ALONG X AXIS A SPECIFIED NUMBER OF ANGSTROMS
- KDAT ************************************************************** RO KDAT,name,H0,WAVE0,FLUX0,EPS0,REC,nonlinear=nonlinear,linear=linear, $
- KGAP ************************************************************** ro kgap,h,w,wgap,ngap,e,eval
- KSPLICE **************************************************** ro ksplice,h,w,e,k1,k2 ;mark splice points as bad
- KWHERE ????
- LDAT ************************************************************** RO LDAT,name,rec1,rec2,out=out,print=print,zr0=zr0,helpme=helpme,sun=sun, $
- LDETECT ********************************************************************* ro ldetect,image,radius,annrad,x,y
- LFACTORIAL ************************************************************************** unction lfactorial,nn,nolog=nolog,helpme=helpme
- LINEARWAVE *********************************************************************** ro linearwave,h,w,flux,eps,wfact=wfact
- LINGAP ************************************************************************** ro lingap,h,w,f,e linearize file with gaps
- LINT *************************************************************** unction lint,vect,index ;linear interpolation routine
- LINTERPL ***************************************************************************** ro linterpl,vect,k1,k2,sz
- LKDAT ********************************************************************** RO LKDAT,IDAT0,n1,n2 ; LIST CONTENTS OF REDUCED DATA FILES
- LOCATE *********************************************************************** RO LOCATE,IN,WAVE,FLUX,nbins=nbins,draw=draw,LAMBDA=LAMBDA,HELPME=HELPME ; PLACE CURSOR AT GIVEN POSITION IN=0 MERELY MOVES CURSOR IN=1 ALSO REPLOTS +/- 100 BINS CENTERED UPON POSITION IN=2 USED BY RWAVE
- LOGLAM *************************************************************************** ro loglam,w,f,lw,lf,flag
- LPLT *********************************************************** ro lplt,dev,nodelete=nodelete,file=file,queue=queue,noplot=noplot, $
- LSCALE *************************************************************** ro lscale,wf ;apply logarithmic scaling to image wf
- LSQRD ****************************************************************** RO LSQRD,X1,Y1,dx1,dy1,type,hcpy=hcpy
- LSQRE ****************************************************************** RO LSQRE,X,Y,SLOPE,B,DS,DB,R,helpme=helpme,prt=prt,plt=plt,weights=weights, $
- LSQREP ****************************************************************** RO LSQREP,X,Y,LU
- M6495 ******************************************************************* RO M6495,file,recs,iprt
- M6495COR *********************************************************************** ro m6495cor,dum
- MAKEGKERNEL *************************************************************** unction makegkernel,s,nd ;gaussian kernel
- MAKEKERNEL *************************************************************** unction makekernel,s
- MAKE_HCPY ************************************************************************** ro make_hcpy,hcpy,dev,helpme=helpme,queue=queue,noprint=noprint, $
- MANIP ******************************************************************* RO MANIP,FLUX,F1,F,EPS,E1,badf,TIME=TIME ; ADD,SUBTRACT,MULTIPLY,DIVIDE
- MAXFILT ******************************************************************** unction maxfilt,f,kbad,nb kbad is index of bad data points nb is number of bins
- MDAT ************************************************************************ RO MDAT,INNAME,OUTNAME,r1,r2,helpme=helpme,maxrec=maxrec,ETYPE=ETYPE, $
- MEAN ************************************************************************ UNCTION MEAN,VECTOR ;COMPUTE MEAN OF VECTOR
- MINFILT ******************************************************************** unction minfilt,f,kbad,nb kbad vector contains indices of bad data points nb is number of bins
- MKMEAN **************************************************************************** ro mkmean,file,recs,mw,mf,me,data,helpme=helpme,stp=stp,xcor=xcor, $
- MP1 *********************************************************************** ro mp1,file0,recs,scale0=scale0,lambda=lambda,offset=offset,exact=exact, $
- MPLT *********************************************************************** RO MPLT,infile,fsm,helpme=helpme,stp=stp,nxtb=nxtb,nxtr=nxtr,ynzb=ynzb, $
- MULTSUM *********************************************************************** RO MULTSUM,W,F,EPS,BW,BF,r,zrec ; ADD OR CONCATENATE MULTIPLE DATA SETS
- NIUEG2 procedure for getting final output from SDPS' MELO array (analogous to iuelo.pro)
- NIUEGET To acquire spectral data for a given order from an IUE diskfile
- NIUELO To acquire and calibrate low dispersion spectral data from IUE with optional corrections for THDA sensitivity variation and LWR sensitivity variation.
- OCOMPS ********************************************************* ro ocomps,xn,yn
- OPDATE ******************************************************************* ro opdate,prog print todays date on plot at lower RH corner
- OPP ************************************************************* ro opp,x,y,ps,psize=psize,color=color,helpme=helpme,pixels=pixels,stp=stp
- OPSTAT *************************************************************************** ro opstat,status
- OPTFILT ******************************************************************** unction optfilt,f,e,w1,w2,w3,w4,w5,w1s=w1s,w2s=w2s,w3s=w3s,w4s=w4s,w5s=w5s, $
- OVERWRT ************************************************************** RO OVERWRT,IM,FLUX,EPS,WAVE,F,E,W,RESET ; OVERWRITE VECTORS
- PARCHECK PARCHECK (GENERAL IDL LIBRARY 01) 30-MAR-1987 Error checking *CATEGORY: To check that a procedure has been called with the minimum of allowed number of parameters. *CALLING SEQUENCE:
- PARTST ****************************************************************** RO PARTST,WAVE,NCAM,NFIT,X,noquery,cii=cii
- PCHECK PCHECK *CATEGORY: This procedure is used to check the parameters of a procedure for correct type and dimensions *CALLING SEQUENCE: PCHECK,VARIABLE,POSITION,DIMENSION,TYPE
- PCHISQ ********************************************************************** unction pchisq,chi2,dof
- PERCENTILE ******************************************************************** unction percentile,image,pcts,srt=srt,hist=hist,time=time,prt=prt, $
- PHPLOT ????
- PL7 ******************************************************************** ro pl7,i1,i2,i3,i4 plot mode 7 data
- PLDATA *************************************************************** RO PLDATA,I0,W,F,BW,BF,pcol=pcol,psdel=psdel,PSM=PSM,bdata=bdata ; PLOT DATA I=-2 : INITIAL PLOT (A) I=-1 : CLEAR SCREEN (I) I= 0 : NORMAL PLOT (R) I= 1 : OVERPLOT (O)
- PLIHD *********************************************************************** RO PLIHD,H ; PLOT HEADER INFORMATION IN ICUR MODIFIED 10/29/82 TO HANDLE DATA FROM FUN1 MODIFIED 11/11/82 AND 1/31/83 TO HANDLE KPNO HEADERS CHANGES 3/11/83 FOR NEG ISM LAST UPDATE 8/11/86
- PLOTERB *************************************************** ro ploterb,w,y,err,ierr,psym,type ierr=1 to oplot +/- 1 sigma errors ierr=2 to oplot SNR ierr=3 to do both
- PLOTSUN ************************************************************************** ro plotsun,x,y,size
- PLTX ***************************************************************** ro pltx,ilog,x,y,sy,legend,zero ilog=0,1,2,3 for plot,_io,_oi,_oo
- PLTX2 ***************************************************************** ro pltx2,ilog,xx,yy,sy,legend,zero ilog=0,1,2,3 for plot,_io,_oi,_oo
- POISS2 ************************************************************** unction POISS2,flux ;POISSON NOISE GENERATOR
- PRTA ********************************************************************** RO PRTA,I,J,Z
- PSIMAGE ****************************************************************** ro psimage,array,black=black,nbits=nbits,portrait=portrait,save=save, $
- PSOPEN ************************************************************************** By default IDL programs generate output in landscape mode, upside down. Anyone using IDL programs can rotate their figures to portrait mode using the program below and entering IDL psopen,'p' IDL make your plot
- PSTAT **************************************************************** RO PSTAT,ILOOP,WAVE ; PRINT CURRENT STATUS (ICUR)
- QMATCH *********************************************************************** ro qmatch,wf
- QPLT **************************************************** ro qplt,nrecs,file,smth,lambda=lambda,trunc=trunc,notitle=notitle,ieb=ieb, $
- RADVEL ************************************************************************** ro radvel,datfile,datrec,tmpfile,tmprec,rv,debug=stp,print=prt,ha=ha,excl=badlam
- RCLOSE ********************************************************************** ro rclose,dum retall and close all open files
- RCTS ********************************************************************** unction rcts,image,scale
- RDBIT ************************************************************* unction RDBIT,V,N ; READ INDIVIDUAL BITS V IS INPUT INTEGER N is bit to be read
- RD_IUEHI *********************************************************************** ro rd_iuehi,image,h,w,flux,sigma,eps,npts=np,icd=icd,do3=do3,ord=ord, $
- RD_IUELO *********************************************************************** ro rd_iuelo,image,h,w,flux,sigma,eps,raw,back,plt=plt,icdfile=icdfile, $
- READ_MARX_FILE from the MARX simulator
- RECALH *********************************************************************** RO REcalh,HU,WU,FU,EU ; FLUX HIGH RESOLUTION DATA HU,WU,FU,EU are the unfluxed input data FU will be overwritten with the fluxed data vector
- RELEXT *********************************************************************** unction relext,indx,w,ebmv
- RESIDUAL ********************************************************* RO RESIDUAL,IGO,WAVE,FLUX,XN,YN,out,sr=sr
- RESTGAP ********************************************************************** ro restgap,h,w ;restore gaps to hi dispersion data
- ROTSMOOTH ****************************************************************************** ro rotsmooth,vsini,w,f
- ROTVEL ******************************************************************* RO ROTVEL,MODE,WAVE,value ; SMOOTHING MODE=0 FOR STANDARD SMOOTHING MODE = 1 FOR ROTATIONAL BROADENING MODE = -1 FOR GAUSSIAN SMOOTHING MODE = 2 FOR TRIANGULAR KERNEL (TRIKER)
- RREBIN *********************************************************************** RO RREBIN,WAVE,W1,F1,E1,flag ; REBIN DATA IF DISPERSIONS DIFFER
- RW ******************************************************************************
- RWAVE ********************************************************************** RO RWAVE,W,F ; RESET WAVELENGTH SCALE
- SAV_FFL ************************************************************************ ro sav_ffl,fname,wl,stp=stp
- SAV_FFX ************************************************************************ ro sav_ffx,fname,h,fact,stp=stp
- SCALE ***************************************************************** RO SCALE,IM,WAVE,FLUX,F1 ; SCALE FLUX VECTORS
- SEARCHDIR ***************************************************************************** ro searchdir,inp,ext ;search directories for file INP
- SETLAM *************************************************************** ro setlam,wave ;specify lambda manually for IRPLOT
- SETPS ******************************************************************** ro setps,hcpy
- SETXY *************************************************************************** ro setxy,a,b,c,d,svp=svp,exact=exact ;mimic IDL V1 SET_XY procedure
- SHADD ************************************************************************ ro shadd,nw,good,wave,flux,fluxerr,f,ferr shift and add routine
- SHFTH2 ****************************************************************** unction shfth2,w0,f0,f1,lw,uw input=list of records
- SHLP ************************************************************************** ro shlp,dum
- SKYBAL *********************************************************************** RO SKYBAL,file,records,skyrec=skyrec,skyfile=skyfile, $
- SP **************************************************************************** ro sp,dev,x,y,square=square,yscale=yscale,helpme=helpme,color=color, $
- SPAWN_PRINT ****************************************************************************** ro spawn_print,file,delete=delete,queue=queue,form=form
- SPECARR ***************************************************************** ro specarr,arr,w0,files,recs,dl=dl,dw=dw,w00=w00
- SPECMERGE ********************************************************************** ro specmerge,w,f,e,r1,r2,f10,f20,wtype,stp=stp,weight=weight,head=head, $
- SPFILT ********************************************************************** ro spfilt,d,sn,nstd
- SPLINE[1] Cubic Spline Interpolation
- SPLINE[2] Cubic Spline Interpolation
- SPSHFT **************************************************************** unction spshft,f0,f1,e0,e1,nit,debug=debug f0 is reference spectrum; F1 is presumably shifted linear shifts only
- SPXCOR ************************************************************************ ro spxcor,f1,f2,xc,cut
- SQPLOT *********************************************************************** ro sqplot,image,helpme=helpme
- STACK ************************************************************************* ro stack,dfile
- STDDEV ************************************************************************* unction stddev,dist
- STKPLT ***************************************************************** ro stkplt,ilog,xx,yy,sy,legend,offset ilog=0,1,2,3 for plot,_io,_oi,_oo
- STRIP_TAB ****************************************************************************** ro strip_tab,z,verbose=verbose,ltab=ltab ;replace tab characters with spaces
- SVP *********************************************************** ro svp,fact
- SWAP_BYTES SWAP_BYTES (General IDL Library 01) 25-APR-80 Conversion *CATEGORY: To perform the byte reordering required for conversion of integer, longword, floating point, or double precision variables between various machine representations.
- SX *********************************************** resets plot scaling
- TABINV[1] To find the effective index of a function value in an ordered vector.
- TABINV[2] To find the effective index of a function value in an ordered vector.
- TDRADVEL ****************************************************************************** ro tdradvel,ws,fs,wt,ft written by Y. Gao Summer 1991 rdascsp,'oph13',ws,fs,h,s ; get the rotating star's spectrum rdascsp,'sky13',wt,ft,h,s ; get the non-rot template's spectrum
- TDXCOR ************************************************************************* ro tdxcor,wt,ft,ws,fs,wta,c,debug=debug
- TELAPSED ****************************************************************************** unction telapsed,starttime
- TIMEARRAY **************************************************************************** unction timearray,file,recs,wave,nozero=nozero,expand=expand,rectify=rectify, $
- TKP *********************************************************************** RO TKP,CH,X,Y,color=color ; UPDATED VERSION OF TEKPLOT
- TRANS_BYTES TRANS_BYTES To translate the byte representation of IDL variables to a format compatible with the host operating system as defined by the IDL system variable !version.arch. TRANS_BYTES currently supports SPARC (Sun-4s and SPARCStations), MIPSEL (DECstation 3100 and IBM 386 class PCs), and VAX (VAXstation and MicroVAX).
- TRISM *************************************************************** ro trism,v,f,helpme=helpme
- TWEAK_HXCOR ************************************************************** ro tweak_hxcor,file,record,xxc,x,arr,ids,flag,helpme=helpme,wave=wave, $
- TWOSTAR *************************************************************** ro twostar,sp1,sp2,w1,f,H1,dm=dm,av=av,outfile=outfile,blue=blue,helpme=helpme, $
- USERPRO ******************************************************************* RO USERPRO,W,F,E ; USER DEFINED PROCEDURE
- VECTSTAT *********************************************************************** ro vectstat,vect,mv,sdv
- VMEDIAN vmedian vector median filter routine CALLING SEQUENCE: vmedian,in,width,out in - input vector width - filter width (should be odd)
- VMERGE ************************************************************************* ro vmerge,h1,w1,f1,e1,h2,w2,f2,e2,head,w,f,e,etype=etype,weight=weight, $
- VSINITMPLT ***************************************************************************** unction vsinitmplt,vsini,ww
- WAVEL *************************************************************** RO wavel,wl,fl,noprint=noprint ;measure screen coordinates
- WHCUR ****************************************************************** ro whcur,x,y,z
- WHEREAMI ****************************************************************** ro whereami,z,all=all,verbose=verbose,stp=stp
- WHEREBAD ********************************************************* unction wherebad,e,ibad ;compute locations of good or bad points
- WIYN_ICUR ***************************************************************************** ro wiyn_icur,file,out=out,examine=examine,helpme=helpme,stp=stp, $
- WIYN_VEL_UPDATE ************************************************************************8 ro wiyn_vel_update,file,velfile,stp=stp,wave=wave,helpme=helpme,do2=do2, $
- WRECT ************************************************************************ ro wrect,file,r1,r2,dw=dw,mc1=mc1,mc2=mc2,save=save
- WSHIFT ************************************************************************* RO WSHIFT,IM,WAVE,FLUX,EPS,F1,E1,E,W1,ofb ; SHIFT WAVELENGTH SCALE
- XINDEX **************************************************************************** unction xindex,xarr,x modification of TABINV REVISION HISTORY: Adapted from the IUE RDAF January, 1988 More elegant code W. Landsman August, 1989
- YTIT ********************************************************************* unction ytit,i,helpme=helpme
- ZRECOVER ************************************************************************* ro zrecover,dum ; solve cursor timing problem