KPG1_ASSHR

Shrinks a Plot so that it covers an area which allows all annotation to fit within the specified area

Description:

This routine creates a new Plot covering the same window as the current PGPLOT window, but the window is shrunk in GRAPHICS space so that all the annotation produced by AST_GRID falls within the PGPLOT viewport which is current on entry. The sizes of annotations, gaps, etc. are shrunk if this is necessary in order to fit the annotations within the current PGPLOT viewport.

Invocation

CALL KPG1_ASSHR( ASP, F, X1, X2, Y1, Y2, JUST, RJUST, IPLOT, OK, STATUS )

Arguments

ASP = LOGICAL (Given)
The aspect ratio of the required plotting area (i.e. excluding annotation) after shrinking. If this is zero or negative, the largest possible area is used for the plotting area.
F = REAL (Given)
An amount by which to extend the margins left for annotation, expressed as a factor of the height or width of the plotting area. For instance, a value of 0.1 could be given to fit the annotation " comfortably" into the Plot. A value of 0.0 will result in the annotation being hard up against the edge of the plot.
X1 = REAL (Given)
The GRAPHICS X co-ordinate at the left edge of the area into which the annotation is to fit.
X2 = REAL (Given)
The GRAPHICS X co-ordinate at the right edge of the area into which the annotation is to fit.
Y1 = REAL (Given)
The GRAPHICS Y co-ordinate at the bottom edge of the area into which the annotation is to fit.
Y2 = REAL (Given)
The GRAPHICS Y co-ordinate at the top edge of the area into which the annotation is to fit.
JUST = CHARACTER2 (Given)
Indicates the justification of the new plot within the specified area. BL , BC , BR , CL , CC , CR , TL , TC or TR , where B is Bottom, C is Centre, T is Top, L is Left and R is Right. Only used if ASP > 0. Must be upper case. If either character is a space, then the corresponding value from RJUST is used instead. Other unrecognised values are treated as " C" .
RJUST( 2 ) = REAL (Given)
Each element is used only if the corresponding element in JUST is a apce. The first element gives the fractional vertical position of the new plot: 0.0 means put the new plot as low as possible, 1.0 means put it as high as possible. The second element gives the fractional horizontal position of the new plot: 0.0 means put the new plot as far to the left as possible, 1.0 means put it as far to the right as possible.
IPLOT = INTEGER (Given and Returned)
The Plot. The supplied Plot is annulled and a new one is returned in its place. The new Plot contains all the Frames of the supplied Plot, but its Plot attributes are all cleared. It may be necessary for the caller to re-instate these attributes.
OK = LOGICAL (Returned)
Returned .FALSE. if there was insufficient room for the required Plot. No error is reported in this case, and IPLOT os returned unchanged.
STATUS = INTEGER (Given and Returned)
The global status.