IRQ_SETQM8

Assign a quality to pixels selected using a mask image, leaving unselected pixels unchanged

Description:

This routine is equivalent to IRQ_SETQM except that arguments SET and SIZE are stored in INTEGER∗8 variables instead of INTEGER.

The quality specified by QNAME is assigned to all NDF pixels which either do (or, if BAD is false, do not) correspond to ‘bad’ pixels in the input mask array. The quality of all other pixels is left unchanged. The quality name must be defined in the NDF specified by LOCS (LOCS should be obtained either by calling IRQ_FIND or IRQ_NEW). An error is reported if the quality name is undefined.

Note, write or update access must be available for the NDF (as set up by routine LPG_ASSOC for instance), and the QUALITY component of the NDF must not be mapped on entry to this routine.

Invocation

CALL IRQ_SETQM8( LOCS, BAD, QNAME, SIZE, MASK, SET, STATUS )

Arguments

LOCS(5) = CHARACTER ∗ ( ∗ ) (Given)
An array of five HDS locators. These locators identify the NDF and the associated quality name information. They should have been obtained using routine IRQ_FIND or routine IRQ_NEW.
BAD = LOGICAL (Given)
If true, then the quality is assigned to all NDF pixels corresponding to ‘bad’ pixels in the mask. If false, then the quality is assigned to all NDF pixels corresponding to pixels which are not ‘bad’ in the mask.
QNAME = CHARACTER ∗ ( ∗ ) (Given)
The quality name to assign to the selected pixels. This quality name must be defined in the NDF specified by LOC. Name definitions can be added to the NDF using routine IRQ_ADDQN.
SIZE = INTEGER∗8 (Given)
The total number of pixels in the MASK array.
MASK( SIZE ) = REAL (Given)
A vector which defines the pixels to which the quality specified by QNAME is to be assigned. It is assumed that this vector corresponds pixel-for-pixel with the vectorised NDF supplied to IRQ_NEW or IRQ_FIND.
SET = INTEGER∗8 (Returned)
The number of pixels in the NDF which hold the quality.
STATUS = INTEGER (Given and Returned)
The global status.
Copyright © 2009 Science and Technology Facilities Council.