; IMWEDGE
;---------------------------------------------------------------
;! load step wedge of full range of image values to TV
;# Verb TV
;-----------------------------------------------------------------------
;;  Copyright (C) 1995, 2017
;;  Associated Universities, Inc. Washington DC, USA.
;;
;;  This program is free software; you can redistribute it and/or
;;  modify it under the terms of the GNU General Public License as
;;  published by the Free Software Foundation; either version 2 of
;;  the License, or (at your option) any later version.
;;
;;  This program is distributed in the hope that it will be useful,
;;  but WITHOUT ANY WARRANTY; without even the implied warranty of
;;  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
;;  GNU General Public License for more details.
;;
;;  You should have received a copy of the GNU General Public
;;  License along with this program; if not, write to the Free
;;  Software Foundation, Inc., 675 Massachusetts Ave, Cambridge,
;;  MA 02139, USA.
;;
;;  Correspondence concerning AIPS should be addressed as follows:
;;         Internet email: aipsmail@nrao.edu.
;;         Postal address: AIPS Project Office
;;                         National Radio Astronomy Observatory
;;                         520 Edgemont Road
;;                         Charlottesville, VA 22903-2475 USA
;-----------------------------------------------------------------------
;---------------------------------------------------------------
IMWEDGE   LLLLLLLLLLLLUUUUUUUUUUUU CCCCCCCCCCCCCCCCCCCCCCCCCCCCC
IMWEDGE:  Verb to load a step wedge of image intensities as
          previously loaded (shows full range of map values.)
              No inputs
              Optional immediate argument gives width of wedge
                 in pixels (default 16).  If argument < 0,
                 program uses TV cursor to determine where to
                 put wedge (default below bottom or above top
                 of image).
              Uses TV cursor to select the image with which
                 the wedge is associated (if needed).
----------------------------------------------------------------
IMWEDGE
Type:  Verb
Use:   To load a linear wedge into a TV memory plane using the same
       transfer function and clipping used in loading the associated
       image.  IMWEDGE constructs the wedge with intensities from map
       min to map max.  If there is more than one image on the TV, the
       routine asks the user to point out the image with which the
       wedge is to be associated.  There is an optional imediate
       argument:
               IMWEDGE (n)
       If n is missing, use n=16, where n is the width of the wedge in
       pixels.  If n<0 use abs(n) as the width of wedge and ask the
       user to indicate where to draw the wedge.  The default
       locations of the wedge are: (a) If there is only one image
       visible, far enough below or above the image to allow for
       complete labeling, (b) just below the image (if it will fit),
       (c) above the image (if it will fit), and (d) overlaying the
       bottom rows of the image.

       Note that, if IMWEDGE is used in a FOR or WHILE loop or in an
       IF-THEN-ELSE construct, then the immediate argument is
       required.  Otherwise, some item necessary to the loop/construct
       will be taken as the immediate argument.

Adverbs:     None
----------------------------------------------------------------
