;++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
;
;*NAME:    
;
;       viewer
;
;*VERSION:
;
;       $Id$
;
;*CATEGORY:
;
;       Image Display
;
;*CALLING SEQUENCE:
;
;       viewer,array (,wave0,aperpix,mini=mini,maxi=maxi)
; 
;*INPUT:
;
;       array:       Input array to be inspected - must be 2-dim.
;
;*OUTPUT:
;
;*PARAMETERS:
;
;       wave0:       optional - wavelength at pixel x=0
;       aperpix:     optional - Angstrom per pixel

;*KEYWORDS:
;
;       mini:        set minimum value vor display range'
;       maxi:        set maximum value vor display rang
;       nodata:      set this flag if you want to start without input data
;
;*CALLED FUNCTIONS:
;
;*CALLED PROCEDURES:
;
;*PURPOSE:
;
;       Displays an image and plots columns or rows of the image.
;
;*MODIFICATION HISTORY:
;
;       TBE: 11/04/2001 - VERSION 1.0   initial programming   
;   
;          
;*AUTHORS:
;
;       TBE             Thomas Becker   Astrophysikalisches Institut Potsdam
;                                       An der Sternwarte 16
;                                       D-14481 Potsdam
;                                       email: tbecker@aip.de
;                                       Tel. (049) 331/7499 - 414
;
;----------------------------------------------------------------------------