Project     : SOHO - LASCO

 Name        : 

 Purpose     : 

 Category    : 

 Explanation : 

 Syntax      : 

 Examples    : 

 Inputs      : None

 Opt. Inputs : None

 Outputs     : None

 Opt. Outputs: None

 Keywords    : None

 CALLS: ***
	RSTRPOS
 Common      : 

 Restrictions:                                  

 Side effects: Not known

 History     : Version 1, 02-Sep-1995, B Podlipnik. Written

 Contact     : BP, borut@lasco1.mpae.gwdg.de

 PROJECT:
       SOHO - SUMER

 NAME:
       H_STATUS()

 PURPOSE: 
       Return Status (Header Byte 22)

 CATEGORY:
       
 
 EXPLANATION:
       
 SYNTAX: 
       Result = h_status()

 EXAMPLES:
       
 INPUTS:
       header - BYTARR(92) Image Header

 OPTIONAL INPUTS: 
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS: 
       None.

 COMMON:
       None.

 RESTRICTIONS: 
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, October 7, 1996, Dietmar Germerott, MAPE Lindau. Written

 CONTACT:
       Dietmar Germerott, MAPE Lindau (germerott@linax1.mpae.gwdg.de)

NAME:
	hardcopy
PURPOSE:
	Dump an 'X' window screen display to the hardcopy laser
	printer.  The default is to use black and white.   PPRINT
	is used to determine the print queues.
CALLING SEQUENCE:
 	hardcopy		; Default is black/white printer
	hardcopy,/black		; Send to black/white printer
	hardcopy,/color		; Send to color printer
	hardcopy,/landscape	; Rotate to landscape on output
	hardcopy,xsize=xsize	; Specify x size in inches (def=7. inches)

	hardcopy,image		; Image must be a 2-d array
	hardcopy,image,r,g,b,/color
OPTIONAL INPUTS:
	image	= 2-d Array to plot (doesn't read screen in this case)
	Red	= Red color vector
	Green	= Green color vector
	Blue	= Blue color vector

OPTIONAL INPUT KEYWORDS:
	bin	- If the display was made by expanding the raw
		  data using "REBIN", it is advised to pass that
		  binning factor to this routine.  It will reduce
		  the resolution by that fact before sending the
		  data to the printer which will speed it up
		  considerably.
	file	- The name of the IDL output postscript file.  If
		  absent, it will create the file on your root
		  directory with file name "idl.ps"
	black	- If present, print if black and white and send
		  output to "isass0 lp0"
  	landscape - Rotate the output into landscape mode
	xsize	- Specify the x size (of the plot - even in landscape mode)
		    in inches.  Default = 7 inch
	xpos,ypos - Origin of the plot.  Default = 0.5 inch
METHOD:
	The routine checks the size of the window and does a TVRD
	to get what is on the screen.  It is advisable to make the
	screen just the size of your output item.  If the data is
	over 256 pixels in either dimension, it asks if it can reduce
	the resolution of the image dump to speed up the printing
	to the laser printer.
 CALLS: ***
	CONGRID [1], CONGRID [2], CONGRID [3], get_logenv [1], get_logenv [2], input [1]
	input [2], pprint [1], pprint [2], tbeep [1], tbeep [2], tbeep [3], yesno [1]
	yesno [2]
 CALLED BY:
	STEPPER [3], STEPPER [4], XRASTER [1], XRASTER [2], hard_center
HISTORY:
	Written 20-Oct-91 by M.Morrison
	 9-Nov-92 (MDM) - Modified to use CONGRID instead of REBIN
			  to get rid of the integer multiple problem.
	18-nov-92 (JRL) - Fixed the a bug with setting xsiz and ysiz
	16-apr-93 (JRL) - Added the landscape option
	21-apr-93 (JRL) - Added the xsize, xpos, ypos keywords
	13-may-93 (JRL) - Force color=0 for /black option. Make /black the
			  default. 
	19-may-93 (JRL) - Fix x offset for color option.
	 6-Oct-93 (MDM) - Modified to use PPRINT instead of PR_PLASER
	 8-Oct-93 (MDM) - Incorporated GLS filename fix (it was only an
			  error in the PPRINT call)
	 5-Nov-93 (SLF) - add noprint keyword and ys_noprint env
       16-feb-95 (SLF) - andd NOPROMPT keyword non-interactive runs

 Project     : SOHO - CDS

 Name        : 
	HAVE_WIDGETS
 Purpose     : 
	Tests whether current graphics device supports widgets.
 Explanation : 
	The system variable !D.FLAGS is examined to see if the current graphics
	device supports widgets.
 Use         : 
	Result = HAVE_WIDGETS()

	IF HAVE_WIDGETS() THEN ...

 Inputs      : 
	None.
 Opt. Inputs : 
	None.
 Outputs     : 
	The result of the function is either 0 (false) or 1 (true) depending on
	whether or not the current graphics device supports widgets.
 Opt. Outputs: 
	None.
 Keywords    : 
	None.
 Calls       : 
	None.
 CALLED BY:
	ALLOW_WINDOWS, COUNTDOWN, CRS, GE_WINDOW_SIM, MK_CDS_PLAN, MK_PLAN_CUSTOM, MK_SOHO
	MK_SOHO_CUSTOM, MK_STUDY, SCANPATH, SHOW_SYNOP__DEFINE, TVVALUE, XCALENDAR, XCAMP
	XCAT, XCHOICE, XCLONE_PLAN, XCPT, XDOC, XIAP, XINPUT, XLIST, XMESSAGE, XPORT, XPROGRAM
	XPROGRAM_ADD, XREPORT, XREPORT_EDIT, XSHOW_RASTER, XSTRUCT, XSTUDY, XZOOM_PLAN
	ethz_XCHOICE
 Common      : 
	None.
 Restrictions: 
	In general, the SERTS graphics devices routines use the special system
	variables !BCOLOR and !ASPECT.  These system variables are defined in
	the procedure DEVICELIB.  It is suggested that the command DEVICELIB be
	placed in the user's IDL_STARTUP file.

 Side effects: 
	None.
 Category    : 
	Utilities, Devices.
 Prev. Hist. : 
	William Thompson, April 1992.
 Written     : 
	William Thompson, GSFC, April 1992.
 Modified    : 
	Version 1, William Thompson, GSFC, 27 April 1993.
		Incorporated into CDS library.
 Version     : 
	Version 1, 27 April 1993.

 Project     : SOHO - CDS

 Name        : 
	HAVE_WINDOWS
 Purpose     : 
	Tests whether current graphics device supports windows.
 Explanation : 
	The system variable !D.FLAGS is examined to see if the current graphics
	device supports windows.
 Use         : 
	Result = HAVE_WINDOWS()

	IF HAVE_WINDOWS() THEN ...

 Inputs      : 
	None.
 Opt. Inputs : 
	None.
 Outputs     : 
	The result of the function is either 0 (false) or 1 (true) depending on
	whether or not the current graphics device supports windows.
 Opt. Outputs: 
	None.
 Keywords    : 
	None.
 Calls       : 
	None.
 CALLED BY:
	ALLOW_WINDOWS, CFIT_APIXLIST, DOC_MENU, F_USE_WIDGET, HESSI, HSI_LOC_FILE, PLOTBATSE
	PLOTBATSE_QL, SCALE_TV, SELECT_BOX, SELECT_WINDOWS, SET_X [1], SET_X [2], SNU
	TVPROFILE, TVREAD [1], TVSCREEN, TVSELECT, TVUNSELECT, TWIDGET, WDISPLAY, X2GIF, X2JPEG
	print2d_plot, rd_wbs_pha [1], rd_wbs_pha [2], spex_preview [1], spex_preview [2]
	text_output
 Common      : 
	None.
 Restrictions: 
	In general, the SERTS graphics devices routines use the special system
	variables !BCOLOR and !ASPECT.  These system variables are defined in
	the procedure DEVICELIB.  It is suggested that the command DEVICELIB be
	placed in the user's IDL_STARTUP file.

 Side effects: 
	None.
 Category    : 
	Utilities, Devices.
 Prev. Hist. : 
	William Thompson, April 1992.
 Written     : 
	William Thompson, GSFC, April 1992.
 Modified    : 
	Version 1, William Thompson, GSFC, 27 April 1993.
		Incorporated into CDS library.
 Version     : 
	Version 1, 27 April 1993.

 Project     : SOHO - CDS     
                   
 Name        : HC_SINCE()
               
 Purpose     : Determine FITS file names within date range.
               
 Explanation : Uses the RAL header catalogue to determine the names
               of FITS data files within a data range.
               
 Use         : IDL> f = hc_since(date, duration)
    
 Inputs      : Date - start date for search
               
 Opt. Inputs : Duration - date window (in days) - default = 5
               
 Outputs     : Function returns list of filenames
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	ANYTIM2TAI, GET_UTC, HEADCAT, UTC2TAI
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : Catalogues
               
 Prev. Hist. : None

 Written     : C D Pike, RAL, 
               
 Modified    : Extend to 2004 and beyond, CDP.  05-Jan-2004

 Version     : Version 3, 05-jan-2004

       hcie_zone.pro  contains the following sub-routines :

       _ grad                  designs a image made with parallel lines, all
				of them perpendicular to a given direction
       _ multi_interp		perform a multiple 1D interpolation of an image
				along a set of parallel lines
       _ multi_smooth		perform a multiple 1D smoothing of an image
				along a set of parallel lines
       _ HCIE_ZONE             performs a H.C.I.E. (Hierarchical Compass
         (=main routine)       Interpolation/Extrapolation), i.e. a low-pass
                               recovery, on a set of missing block (defining
				a missing zone)
 CALLS:
 CALLED BY
	FUZZY_IMAGE, GRAD, MULTI_INTERP, MULTI_SMOOTH

 PROJET:
       SOHO - LASCO

 NAME:
	HCIE_ZONE

 PURPOSE:
       Performs the Hierarchical Compass Interpolation / Extrapolation
       (H.C.I.E.), which is a low-frequency recovery of a lost block

 CATEGORY:
	Missing Blocks

 CALLING SEQUENCE:
       zone = hcie_zone (image, list_miss_blocks)

 INPUTS:
       image           	the image containing the block to correct
       list_miss_blocks	the locations of the missing blocks defining
				the zone
 KEYWORD INPUT:
	rebindex : rebin index (see fuzzy_image.pro)

 OUTPUTS:
       The corrected zone (array of pixels) is returned

 REFERENCE:
       ( see fuzzy_image.pro )

 CALLS: ***
	GRAD, GRAD_ZONE, MULTI_INTERP, MULTI_SMOOTH, READ_ZONE, REVERSE, TRI_SURF
 CALLED BY:
	FUZZY_IMAGE, GRAD, MULTI_INTERP, MULTI_SMOOTH
 MODIFICATION HISTORY:
	from the wonderful Dr. M.BOUT (c) 1996
       Written by J. MORE, November 1996
	Add of rebindex keyword on 28/01/2000 by A.Thernisien
	Modif line 219 on 11/02/2000 by A.T. to avoid crash when there are not enough sample for interpolation

 Project     : SOHO - CDS     
                   
 Name        : HDRREAD()
               
 Purpose     : Read basic header information from CDS FITS level-1 file.
               
 Explanation : Straightforward. Returns IDL structure with fields for each of
               the keywords present in the general part of the header in the
               CDS FITS files.
               
 Use         : HDR = HDRREAD(HEADER)
    
 Inputs      : HEADER= The header (array of strings of a CDS FITS
                       level-1 file.
               
 Opt. Inputs : None.
               
 Outputs     : Return value, see above.
               
 Opt. Outputs: None.
               
 Keywords    : None.

 Calls       : ***
	FXPAR [1], FXPAR [2], TRIM
 CALLED BY:
	READCDSFITS, READSUM2CDS
 Common      : None.
               
 Restrictions: See HEADER above.
               
 Side effects: None.
               
 Category    : Data_Handling, I_O, CDS, FITS, QuickLook
               
 Prev. Hist. : None.

 Written     : Stein Vidar Hagfors Haugan, 27 September 1993
               
 Modified    : SVHH, Version 2, 8-June-94  Fixed types for all tags

               V 3 Changed exposure time to real (seconds).  CDP, 11-Jul-95

               SVHH, Version 4, 12-Sept-95. All tag names are identical to
               the keyword names. Added lots of tags, and sorted them to make
               comparison with new fits files easy.

               Version 5, SVHH, 15-January-1996. Removed tag LL_TITLE.

               Version 6, SVHH, 22-February-1996. Added tag GSET_ID
               Version 7, SVHH, 4 August 1997.
                       Renamed/added tags to match FITS headers

 Version     : Version 7, 4 August 1997

 Project     : SOHO - CDS     
                   
 Name        : HEADCAT
               
 Purpose     : Loads CDS header catalogue
               
 Explanation : 
               
 Use         : IDL> headcat,  cat
    
 Inputs      : None
               
 Opt. Inputs : None
               
 Outputs     : cat - returns the catalogue in a structure array. If the YEAR 
                     keyword is not used then the total catalogue is loaded.
               
 Opt. Outputs: None
               
 Keywords    : HELP   - only list available tags
               YEAR   - load only this year's data
               LATEST - load only catalogue of last 7 days

 Calls       : ***
	Bell, CONCAT_DIR [1], CONCAT_DIR [2], CONCAT_DIR [3], FILE_EXIST [2]
	concat_dir [4], file_exist [1], file_exist [3]
 CALLED BY:
	HC_SINCE, MK_HEAD_CAT
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : Help
               
 Prev. Hist. : None

 Written     : C D Pike,  RAL,  10-May-97
               
 Modified    : Include year 1999 option
               Include year 2000 option
               Include year 2001 option
               Include year 2002 option
               Include year 2003 option
               Include year 2004 and beyond option

 Version     : Version 7, 05-Jan-2004

 Project     :	SOHO - CDS

 Name        :	HEADFITS()

 Purpose     :	Read a FITS file header record      

 Category    :

 Explanation :	Reads a FITS file header record.

 Syntax      :	Result = headfits( filename ,[ EXTEN = ])

 CALLED BY:
	ATV, CAT_FITS, CENTER_NRH2, COMP_DATE, CREATE_NRH_PFILE, CW_HEADER, CW_POS
	CW_XTD_NRHF, EIT_DAILY, EIT_DISPLAY, EIT_IMAGE, EIT_PREP, EVAL_SHERB, FF_SUMMARY
	FITS CLASS DEFINITION, FITS_HDR__READ [1], FLUX_NRH2, FOPEN_NRH2, FOPEN_STD_GMRT
	FOPEN_STD_SOHO, FOPEN_YOHKOH, Fits_spectra [1], Fits_spectra [2]
	GET_SUN_CENTER [1], GT_FPOINT, HEAD_SEFRAM, INIT_NRH_CFILE, INTGCOMP_NRH2
	LASCO_READFITS [1], LIST_FITS, LIST_HDR_SUM, LIT_HEADER_NRH1, MAKE_DAILY_IMAGE
	MKFILEPOS, MKMOVIE_kpd, MK_DAILY_C1_MED, MK_DAILY_MIN, MK_EIT_L1, MK_IMG, MK_RESUME
	MK_SUMER_CAT, MOVIE_MAKER, NORH_RD_IMG [1], NORH_RD_IMG [2], NRHR, NRHRCAL
	NRHRCALIBRATION, NRH_FLUXASCI, NRH_FOPEN, NRH_HSI_FITS, NRH_IDFREQ, NRH_PLOTF
	NRH_PLOTI, NRH_SOURCEASCI, OPEN_NRH_CFILE, PLOT_MAXPOS, PLOT_SOURCES
	READ_COMPRESSED, READ_CONT_FITS, READ_DISCSC, READ_DISCSP_FITS, READ_MER
	READ_NRHPOS, READ_SHER, READ_SHERB, READ_STTE, READ_TTS_FITS, SELECTD, SFITSLIST
	SHOW_FITS_HDR, SUMER_FITS, SUMER_SEARCH_PD_EVENT, SUMER_SERIAL, TIME_IND_NRH
	UPD_NRH2DFITS, WCALCNEW, WLISTER, WLOAD, WLOADINFO1, WMESSAGE [1], WRITE_FLUXNRH
	WRITE_POSINRH, XSEL_PD_EVENT, ZCLIP, ZPICK, datify, eit_dump, eit_getlimb, eit_lzsort
	fits2spectrum, fitsgen, ft_sumread_fits, htmd_cat, mk_query [1], mk_query [2]
	mreadfits, mreadfits_header, qImage_cw_DrawEphem, rd_sumer [1], rd_sumer [2]
	read_ovsa_fits, slog_headinfo, smei_frm_read, smei_fts_read, smei_hdr_update
	smei_sky_read, smei_star_remove, smei_zodiac_remove, spartan_pb2fits
	spartan_roll2fits [1], where_are [1], where_are [2], xsm_fits2spectrum
 Example     :	Read the FITS header of a file 'test.fits' into a
		string variable, h

			IDL>  h = headfits( 'test.fits')

 Inputs      :	FILENAME = String containing the name of the FITS file to be
			   read.

 Opt. Inputs :	None.

 Outputs     :	Result of function = FITS header, string array

 Opt. Outputs:	None.

 Keywords    :	EXTEN  = integer scalar, specifying which FITS extension to
			 read.  For example, to read the header of the first
			 extension set EXTEN = 1.  Default is to read the
			 primary FITS header (EXTEN = 0).

 CALLS: ***
	HEADFITSL, SXPAR [1], SXPAR [2], SXPAR [3]
 Common      :	None.

 Restrictions:	None.

 Side effects:	None.

 History     :	
	adapted by Frank Varosi from READFITS by Jim Wofford, January, 24 1989
	Keyword EXTEN added, K.Venkatakrishna, May 1992
	Make sure first 8 characters are 'SIMPLE'  W. Landsman October 1993

       GSFC, 24 January 1989, Frank Varosi, Written

       Modified Version 1, Liyun Wang, GSFC/ARC, September 19, 1994
			Incorporated into CDS library
		Version 2, William Thompson, GSFC/ARC, 9 January 1995
			Incorporated following change:

	Check PCOUNT and GCOUNT   W. Landsman    December 1994

 Contact     :

 Project     : SOHO - CDS     
                   
 Name        : HEL2ARCMIN()
               
 Purpose     : Compute position relative to sun centre from heliographic.
               
 Explanation : Using the input heliographic coordinates of a feature,
               calculate the position in arcmin relative to the sun centre
               taking account of the sun's orientation (B0).  The current
               date is assumed unless specified.  West and  North are 
               considered positive.
               
 Use         : IDL> print, hel2armin(ns, ew, date = dat)
                eg  print,hel2arcmin('S34','E23')
                or  print,hel2arcmin(-34,-23)
    
 Inputs      : ns      -  the Heliographic latitude in degrees (can be a
                          string with N/S first character instead of sign).
               ew      -  the Heliographic longitude in degrees (can be a
                          string with E/W first character instead of sign).
               
 Opt. Inputs : None
               
 Outputs     : Function returns the (x,y) location in arcmins relative to
               sun disk centre.
               
 Opt. Outputs: None
               
 Keywords    : date    -  the date to use in the calculation of B0.

 Calls       : ***
	ANYTIM2UTC_KB, DATATYPE [1], DATATYPE [2], DATATYPE [3], GET_UTC, HEL2ARCMIN_KB
	PB0R
 CALLED BY:
	ALIGN_AR, CNVT_COORD [1], DROT_COORD, DROT_RASTER, EIT_SUB_MAN_INPUT
	EIT_SUB_UTIL_ROT, GET_FITS_CEN, GET_NAR, HEL2XY, ITOOL_SOLAR_GRID, LIST_GEV
	MK_IVM_MAP, PLOT_HELIO [1], PLOT_HELIO [2], RD_AR, ROT_XY, SEL_AR, SOHO_XY, SOLAR_GRID
	ssw_track_fov, todays_targets, zhelio2xy
 Restrictions: None
               
 Side effects: None
               
 Category    : Utilities, coordinates.
               
 Prev. Hist. : Yohkoh routine by Hudson/Wuelser.

 Written     : CDS version, C D Pike, RAL, 6 Sept 93
               
 Modified    : To use CDS time and pb0r routines, CDP, 17-May-94
		Version 2, William Thompson, GSFC, 14 November 1994
			Modified .DAY to .MJD

 Version     : Version 3, 14 November 1994

 Project     :	SOHO - CDS

 Name        :	HELP_CDS

 Purpose     :	Pocket help to CDS Planning software

 Explanation :	

 Use         :	HELP_CDS

 Inputs      :	None.

 Opt. Inputs :	None.

 Outputs     :	HELP = help text

 Opt. Outputs:	None.

 Keywords    :	None.

 Calls       :	None.
 Common      :	None.

 Restrictions:	None.

 Side effects:	None.

 Category    :	Planning, Database.

 Prev. Hist. :	None.

 Written     :	Dominic Zarro (ARC), 21 November 1994

NAME:
	his_dirs
PURPOSE:
	To return a list of the directories where .HIS files exist.
 CALLS: ***
	get_subdirs [1], get_subdirs [2]
HISTORY:
	Written 23-May-94
	18-Aug-94 (MDM) - added '/md60/archive/england/history.may94'
			  and '/md60/archive/england/history.jun94'
	 9-Jan-95 (MDM) - Added /big/mdi_europe/history
	11-Jan-95 (MDM) - Modified to use reorganized history directories

 Project     : SOHO - LASCO

 Name        : 

 Purpose     : 

 Category    : 

 Explanation : 

 Syntax      : 

 CALLED BY:
	WHIST
 Examples    : 

 Inputs      : None

 Opt. Inputs : None

 Outputs     : None

 Opt. Outputs: None

 Keywords    : None

 Common      : 

 Restrictions:                                  

 Side effects: Not known

 History     : Version 1, 02-Sep-1995, B Podlipnik. Written

 Contact     : BP, borut@lasco1.mpae.gwdg.de

   Name: histscale

   Purpose: use histogram to auto-scale (different from histogram equaliz...)

   Input Parameters:
      image - image to scale

   Output 
      function returns scaled image (byte)

   Keyword Parameters:
      lowcut - if set, ignore pixels < lowcut in histogram determination
      hicut  - if set, ignore pixels > hicut  in histogram determination

   Calling Sequence:
      scaled_image=histscale(image [,lowcut=lowcut, hicut=hicut]


 CALLS: ***
	TOTVEC, WDEF [1], WDEF [2], deriv_arr [1], deriv_arr [2]
 CALLED BY:
	fl_suntoday [1], fl_suntoday [2], fl_suntoday [3], sun_today [1], sun_today [2]
	sun_today [3]
   History:
      25-sep-1995 (S.L.Freeland) - 

NAME:
	hk_time_sort
PURPOSE:
	Resort the data which was read from the HK database files since
	some files are corrupted and the data is not in time order.
 CALLS: ***
	int2secarr [1], int2secarr [2]
 CALLED BY:
	cam_run_sum, seq_run_sum [1], seq_run_sum [2]
HISTORY:
	Written 5-Dec-95 by M.Morrison

NAME:
	hkplot_info
PURPOSE:
	To extract information out of the HK structure
SAMPLE CALLING SEQUENCE:
	out = hkplot_info(hk, /tit)
	out = hkplot_info(hk, /mnem, /nums)
INPUT:
	hk	- The HK structure returned by GET_HK_INFO
OPTIONAL KEYWORD INPUTS:
	tit	- If set, then return the titles for the mnemonics
	nums	- If set, then return the mnemonic number in front
		  of the title or mnemonic name
	times	- If set, get the discrete values for the list of
		  input times.  TODO: Right now it re-reads the 
		  database.  It would be nice to do it from the
		  structure in memory.
	mnemlist - If set, match the mnemonic name to the "code"
		  number in the structure.
OUTPUT:
	out	- Varies - see optional inputs.  Default is the
		  mnemonic names
 CALLS: ***
	ARR2STR [1], Arr2Str [2], anytim2ints [1], anytim2ints [2], data_type [1]
	data_type [2], fmt_tim [1], fmt_tim [2], sel_timrange [1], sel_timrange [2]
	tim2dset [1], tim2dset [2]
 CALLED BY:
	quick_hkplot [1], quick_hkplot [2], xhkplot
HISTORY:
	Written Jan-95 by M.Morrison
	 9-Feb-94 (MDM) - Modified how TIMES option worked
	26-Sep-97 (MDM) - Modified to not truncate at 8 character mnemonics

 NAME:
	HOST_TO_IEEE
 PURPOSE:
	To translate an IDL variable from IEEE-754 representation (as used, for
	example, in FITS data ), into the host machine architecture.

 CALLING SEQUENCE:
	HOST_TO_IEEE, data, [ IDLTYPE = , ]

 INPUT-OUTPUT PARAMETERS:
	data - any IDL variable, scalar or vector.   It will be modified by
		HOST_TO_IEEE to convert from host to IEEE representation.  Byte 
		and string variables are returned by HOST_TO_IEEE unchanged

 OPTIONAL KEYWORD INPUTS:
	IDLTYPE - scalar integer (1-7) specifying the IDL datatype according
		to the code given by the SIZE function.      This keyword
		will usually be used when suppying a byte array that needs
		to be interpreted as another data type (e.g. FLOAT).

 CALLS: ***
	CONV_UNIX_VAX, CONV_VAX_UNIX, SINCE_VERSION [1], SINCE_VERSION [2]
 CALLED BY:
	CHECKSUM32, CH_WRITE_FITS, DBCLOSE [1], DBCLOSE [2], DBCLOSE [3], DBCREATE [1]
	DBCREATE [2], DBCREATE [3], DBINDEX [1], DBINDEX [2], DBINDEX [3], DBWRT [1]
	DBWRT [2], DBWRT [3], DB_ENT2EXT [1], DB_ENT2EXT [2], DB_ENT2EXT [3], FXBWRITE [1]
	FXBWRITE [2], FXBWRITM, FXWRITE [1], FXWRITE [2], HSI_BUILD_MONITOR_PACKETS
	HSI_FILL_FASTRATE_PACKET, HSI_MK_FASTRATE_PACKET, HSI_MK_PACKETHEADER
	HSI_SIM_FILE, TAI2OBT, WRITE_MONTH_CAT, mxf_decomp_data
 EXAMPLE:
	Suppose FITARR is a 2880 element byte array to be converted to a FITS
	record and interpreted a FLOAT data.

	IDL> host_to_ieee, FITARR, IDLTYPE = 4

 METHOD:
	The BYTEORDER procedure is called with the appropiate keywords

 RESTRICTION:
	Will run *much* faster for floating or double precision if the IDL
	version is since 2.2.2 when the /FTOXDR keyword  became available to 
	BYTEORDER.
	However, HOST_TO_IEEE should still work in earlier versions of IDL
	Note that in V3.0.0 there is a bug in the /DTOXDR keyword for
	BYTEORDER on DecStations so HOST_TO_IEEE has a workaround.

 MODIFICATION HISTORY:
	Adapted from CONV_UNIX_VAX, W. Landsman   Hughes/STX    January, 1992
	Fixed Case statement for Float and Double      September, 1992
	Workaround for /DTOXDR on DecStations          January, 1993

 Project     : SOHO - CDS

 Name        : 
	HOST_TO_IEEE
 Purpose     : 
	Translate host variables to IEEE format.
 Explanation : 
	Translates an IDL variable in the host architecture into the IEEE-754
	standard (e.g. as used in FITS files).

	BYTEORDER is used to convert from the host format to network format for
	integer arrays or XDR format for floating point arrays.  These are
	equivalent to IEEE format.

 Use         : 
	HOST_TO_IEEE, DATA
 Inputs      : 
	DATA	 = Any IDL variable, scalar or vector.  DATA will be modified
		   by HOST_TO_IEEE to convert it to IEEE format.  Byte and
		   string variables are returned by HOST_TO_IEEE unchanged.
 Opt. Inputs : 
	None.
 Outputs     : 
	The output value of DATA is the variable converted to the format of the
	host architecture.
 Opt. Outputs: 
	None.
 Keywords    : 
	IDLTYPE - scalar integer (1-7) specifying the IDL datatype according
		to the code given by the SIZE function.      This keyword
		will usually be used when suppying a byte array that needs
		to be interpreted as another data type (e.g. FLOAT).
 Calls       : ***
	CONV_UNIX_VAX, CONV_VAX_UNIX, SINCE_VERSION [1], SINCE_VERSION [2]
 CALLED BY:
	CHECKSUM32, CH_WRITE_FITS, DBCLOSE [1], DBCLOSE [2], DBCLOSE [3], DBCREATE [1]
	DBCREATE [2], DBCREATE [3], DBINDEX [1], DBINDEX [2], DBINDEX [3], DBWRT [1]
	DBWRT [2], DBWRT [3], DB_ENT2EXT [1], DB_ENT2EXT [2], DB_ENT2EXT [3], FXBWRITE [1]
	FXBWRITE [2], FXBWRITM, FXWRITE [1], FXWRITE [2], HSI_BUILD_MONITOR_PACKETS
	HSI_FILL_FASTRATE_PACKET, HSI_MK_FASTRATE_PACKET, HSI_MK_PACKETHEADER
	HSI_SIM_FILE, TAI2OBT, WRITE_MONTH_CAT, mxf_decomp_data
 Common      : 
	None.
 Restrictions: 
	Assumes the IDL version is since 2.2.2 when the /XDRTOF keyword 
	became available to BYTEORDER.    There were two bad implementations
	in BYTEORDER for double precision: (1) in IDL V3.* for DecStations
	(!VERSION.ARCH = 'mipsel') and (2) on Dec Alpha OSF machines.
	IEEE_TO_HOST works around these cases by swapping the byte order
	directly.
 Side effects: 
	None.
 Category    : 
	Utilities, Operating_system
 Prev. Hist. : 
	Adapted from CONV_UNIX_VAX, W. Landsman   Hughes/STX    January, 1992
	Fixed Case statement for Float and Double      September, 1992
	Workaround for /DTOXDR on DecStations          January, 1993
	Workaround for /DTOXDR on Alpha OSF            July 1994
	Assume since Version 2.2.2, Ultrix problems persist   November 1994
 Written     : 
	Wayne Landsman, GSFC/UIT, January 1992.
 Modified    : 
	Version 4, William Thompson, GSFC, 27 February 1995
		Using version from IDL Astronomy User's Library for better
		compatibility.  See previous history above.  IDLTYPE keyword
		reinstated.
 Version     : 
	Version 4, 27 February 1995

 Project     : SOHO - CDS     
                   
 Name        : hrts_w
               
 Purpose     : Main procedure, makes widgets, calls all procedures
               
 Explanation : Main 'program'
               
 Use         : IDL> hrts_w 
    
 Inputs      : Follow instructions given in IDL window !
               
 Opt. Inputs : None
               
 Outputs     : Widget with parameters and fitted line profiles
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	AMOEBA_C, CURVEFIT, LSTSQR, SET_XY, XMANAGER, dl2vel, filter [1], filter [2], filter [3]
	funct_1, read_hrts_im, three_moment
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : ?
               
 Prev. Hist. : ?

 Written     : Nils Brynildsen, ITA, UiO 29-June-1993
               
 Modified    : Version 2 Nils Brynildsen, ITA, UiO, 13-Sep.-1993

		Changed x-array from x to x - w0 after suggestion
 		 by Bill Thompson

		Version 4, 10-Dec-1997, William Thompson, GSFC
			Use AMOEBA_C instead of AMOEBA, to avoid conflict with
			IDL/v5 routine of that name.
	
 Version     : Version 4, 10-Dec-1997

 Project     : SOHO - CDS     
                   
 Name        : hrts_w
               
 Purpose     : Main procedure, makes widgets, calls all procedures
               
 Explanation : Main 'program'
               
 Use         : IDL> hrts_w 
    
 Inputs      : Follow instructions given in IDL window !
               
 Opt. Inputs : None
               
 Outputs     : Widget with parameters and fitted line profiles
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : ***
	AMOEBA, CURVEFIT, HRTS_W_3_0, LSTSQR, SET_XY, XMANAGER, dl2vel, filter [1], filter [2]
	filter [3], funct_1, read_hrts_im, three_moment
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : ?
               
 Prev. Hist. : ?

 Written     : Nils Brynildsen, ITA, UiO 29-June-1993
               
 Modified    : Version 2 Nils Brynildsen, ITA, UiO, 13-Sep.-1993

	3	Changed x-array from x to x - w0 after suggestion
 		 by Bill Thompson
	
	4	This version is for IDL 3.0.0

 Version     : Version 4 16-Nov.-1993

 Project     : SOHO - CDS     
                   
 Name        : hrts_w_event
               
 Purpose     : Widget control
               
 Explanation : Controls the end of the widget window
               
 Use         : Not called ?
    
 Inputs      : None
               
 Opt. Inputs : None
               
 Outputs     : None
               
 Opt. Outputs: None
               
 Keywords    : None

 Calls       : Widget routines
 Common      : None
               
 Restrictions: None
               
 Side effects: None
               
 Category    : Widget control routine
               
 Prev. Hist. : ?

 Written     : Nils Brynildsen, ITA, UiO, 29-June-1993 
               
 Modified    : Version 1 Nils Brynildsen, ITA, UiO, 29-June-1993

 Version     : Version 1 29-June-1993 

 NAME:
	HT_HEADER

 PURPOSE:
	This procedure writes out the header information for a height-time
	file.  It is used by the movie program and is not intended to be
	used in a standalone fashion.

 CATEGORY:
	MOVIE

 CALLING SEQUENCE:
	HT_HEADER,Moviev

 INPUTS:
	Moviev:	Structure containing the movie header information

 SIDE EFFECTS:
	Creates a height-time file and prints out the preamble

 MODIFICATION HISTORY:
 	Written by:	Scott Hawley, NRL summer student, July 1996

	@(#)ht_header.pro	1.1 09/12/97 LASCO IDL LIBRARY

   Name: html_form_addtime

   Purpose: add times to an html form (template)

   Input Parameters:
      template - input text (html excluding time menus)
      start_sel - default start time to use
      stop_sel  - default stop time to use
   
   Keyword Parameters:
      timerange - time range for menus
      outfile   - if set, output .html document (default is <template>.html
      replace   - string to replace with time menus (in template)
                  default is <!** time_range **>

   Calling Sequence:
      html_form_addtime, template, start_sel [,stop_sel], timerange=timerange
 CALLS:

 PROJECT:
       SOHO

 NAME:
       HTML_SPLAN

 PURPOSE:
       Make SOHO plans for a give date range

 CATEGORY:
       Planning, Utility

 SYNTAX:
       html_splan, plan=plan

 INPUTS:
       None.

 OPTIONAL INPUTS:
       None.

 OUTPUTS:
       None.

 OPTIONAL OUTPUTS:
       None.

 KEYWORDS:
       PLAN_ITEMS - plan items to be plotted
       DTYPE      - set for SOHO-DETAILED plan
       FILE       - Name of output html file

 CALLS: ***
	ANYTIM2UTC [1], ANYTIM2UTC [2], DATATYPE [1], DATATYPE [2], DATATYPE [3], EXIST
	GET_PLAN_ITIME, GET_SOHO_INST, GET_UTC, GREP, HTML_TABLE_HEADER, SOHO_ITEMS_HTML
	UTC2TAI
 COMMON:
       MK_PLAN_SHARED

 RESTRICTIONS:
       None.

 SIDE EFFECTS:
       None.

 HISTORY:
       Version 1, March 25, 1996, Liyun Wang, GSFC/ARC. Written
       Version 2, April 25, 1996, Liyun Wang, GSFC/ARC
          Modified so that entries for CELIAS, SWAN, and ERNE appear
             as JOP, SOC, and CAMPAIGN, respectively
       Version 3, August 21, 1997, Liyun Wang, NASA/GSFC
          Modified from ASCII_SPLAN, just for show plans in HTML format

 CONTACT:
       Liyun Wang, GSFC/ARC (Liyun.Wang.1@gsfc.nasa.gov)

 Set atime outputs to HXRBS format yy/mm/dd, hh:mm:ss.xxx.
 
 Mod. 1/10/94 by AKT to return old format.
 CALLED BY
	BATSE_ONTIMES, DO_ARCHIVEPLOTS, DO_EVENTLISTS, DO_FDBFILES, DO_PSPLOTS, FLDISPLAY
	FLIST, FSPLOT, HXRBS, QLARCHIVE, QLDISPLAY, RAWDUMP, YOHKOH_FORMAT [1], batse_menu
	pro ratesdump, setup_spex [1], setup_spex [2]