NAME:
	pr_gsn
PURPOSE:
	To display the information in the SOON observing log files
SAMPLE CALLING SEQUENCE:
	pr_gsn,'/ydb/gsn/sth940517.cat', /summary
	pr_gsn,'/ydb/gsn/sth940517.cat', array, /summary
INPUT:
	infil	- the input file
OPTIONAL OUTPUT:
	array	- Instead of printing the listing information, return it
		  as an array
 CALLS: ***
	BREAK_FILE [1], BREAK_FILE [2], BREAK_FILE [3], CONCAT_DIR [1], CONCAT_DIR [2]
	CONCAT_DIR [3], CONV_A2H [1], CONV_A2H [2], DPRINT, anytim2ints [1]
	anytim2ints [2], break_file [4], concat_dir [4], data_type [1], data_type [2]
	fmt_tim [1], fmt_tim [2], rd_gsn
 CALLED BY:
	soon_search [1], soon_search [3]
OPTIONAL KEYWORD INPUT:
	outfil	- If defined, save results to this file
	summary	- If set, display a summary line for each tape file
	hc	- If set, send the output to the printer
	tapefile - If set, then do the per image listing only on the
		   tapefile passed in.
		   Optionally, tapefile can be a string array of the sort:
				' sth940517        7 ' 
		   which is from the PR_GSN array output
HISTORY:
	Written Dec-93 by M.Morrison
	28-Jul-94 (MDM) - Modified summary output to include the image types
	 3-Aug-94 (MDM) - Added TAPEFILE option
	 5-Aug-94 (MDM) - Added GSN_HEAD option
			- Added COMMENTS option
	 8-Aug-94 (MDM) - Modified to display deviation from reference location
			  in arcminutes instead of arcsec
	23-Sep-94 (MDM) - Added ARRAY output option
			- Expanded the TAPEFILE option to be able to pass a
			  string which has the tape name and file number in
			  a string
			- Changed RD_GSN call to not read obs if doing
			  summary listing
	 2-Aug-95 (MDM) - Corrected how image listing works for multiple
			  file inputs
	26-Aug-98 (GLS) - Corrected indexing errors: imap
       23-Feb-99 (SLF) - at least partially vectorized this ugly @#$%!@#$ code!