_______________________________________________________________________________

				XC

     EXPAND_CONTRACT is a module which can expand or contract a file
 in the X and/or Y direction by either a linear interpolation or a 
 tapered sinc interpolation.  Either a part of a map or the entire map 
 can be operated on.  The output file can be the same size as the input 
 file or different.  If the maps written to exist prior to using this 
 program, only the operated area is  overwritten.  

_______________________________________________________________________________

 Enter an option:                              20-AUG-2000 02:16:36.44
 OPTION=XC
 EXPAND_CONTRACT, Version 1
 Open the file to be expanded or contracted
 Enter the filename:  (<CR> for default)
 FILE_IN=STAR
 There is one map in the file
 Reading from the file
  100 rows of  100 pixels in R4 format
 Open the output file
 Enter the filename:  (<CR> for default)
 FILE_OUT= STAR2
 Writing to an existing file
 There is one map in the file
  300 rows of  300 pixels in R4 format
 Enter the output map number:  (default = 1 after last map)
 MAPS_OUT=1
 Enter the input area to be operated on
 Enter start-column end-column start-row end-row:  (default = entire map)
 BOUNDARIES=
          1
        100
          1
        100
 If the input area is to be fitted into the output map, then
      X scale factor =    3.0000
      Y scale factor =    3.0000
 Enter the desired X and Y scale factors:  (default = above values)
 SCALE_FACTORS=2.5 2.5
 Enter a command:     L = Linear interpolation
                      T = Tapered sinc interpolation (default)

 COMMAND=
 T
 Enter the number of pixels to use in each dimension:  (default = 5)
 NUMBER=
          5
 Enter the taper:
 (default = 1.33)

 TAPER=
   1.33000
 Enter the scale factor for the pixel intensity values:  (default = 1.0)
 SCALE=
   1.00000

 Enter an option:                              20-AUG-2000 02:17:44.41
 OPTION=
_______________________________________________________________________________