NAME:
    cw_pfile
 PURPOSE: (one line)
    Widget application for plots and profiles of an image.
 DESCRIPTION:

 CATEGORY:
    Compound Widgets
 CALLING SEQUENCE:
    result = cw_pfile( parent )

 INPUTS:
    parent : Widget id of parent.

 OPTIONAL INPUT PARAMETERS:

 KEYWORD PARAMETERS:
    HCTITLE    = Title of Hard Copy.
    PLATESCALE : Plate Scale in arcseconds per pixel (used at display time).
                 If supplied and non-zero, display the bottom axis in
                 arcseconds and the top axis in pixels, else display the
                 bottom axis in pixels.
    UVALUE     = Optional user value.

 OUTPUTS:

 COMMON BLOCKS:

 SIDE EFFECTS:

 RESTRICTIONS:

 PROCEDURE:
    After placing this compound widget on a base, that base must then be
 realized. After realization, the image array and set-point coordinates are
 supplied via the WIDGET_CONTROL procedure and the SET_VALUE keyword.
    The 'value' of cw_pfile is a structure having three tags: image, xset,
 and yset.

    The following illustrates the procedure:

    array      = some portion of a larger 2-D array.
    xset, yset = set-point of the lower portion of the extracted array.

    result = cw_pfile( parent )
    Realize the hierarchy of parent.
    WIDGET_CONTROL, result, SET_VALUE={image:array, xset:xset, yset:yset}

 MODIFICATION HISTORY:
    Written by Doug Loucks, Lowell Observatory, April, 1994.
    June, 1994, DWL, Converted to Compound Widget.
    March 1996, MWB, added print support for DOS