KPG1_LUTK2

Sets up the pixel colour indices which form a LUT key

Description:

This routine fills the COLS array with integer colour indices so that the array can be used as a colour table key. It can produce histogram or ramp keys.

Invocation

CALL KPG1_LUTK2( FORM, CAXIS, LBND1, UBND1, LBND2, UBND2, HSTDAT, MAXPOP, LOG, COLS, STATUS )

Arguments

FORM = INTEGER (Given)
Indicates the form of key required: 0 - ramp, 1 - histogram.
CAXIS = INTEGER (Given)
The index of the array axis corresponding to colour index (1 or 2).
LBND1 = INTEGER (Given)
The lower bound on Axis 1.
UBND1 = INTEGER (Given)
The upper bound on Axis 1.
LBND2 = INTEGER (Given)
The lower bound on Axis 2.
UBND2 = INTEGER (Given)
The upper bound on Axis 2.
HSTDAT( ) = INTEGER (Given)
A histogram of colour index counts. The length of this vector should be equal to the length of axis CAXIS.
MAXPOP = INTEGER (Given)
The maximum population in any cell of the histogram.
LOG = LOGICAL (Given)
If TRUE the histogram displays Log(count).
COLS( LBND1:UBND1, LBND2:UBND2 ) = INTEGER (Returned)
The returned array of colour indices.
STATUS = INTEGER (Given and Returned)
The global status.