SURFLIB_DECODE_REMSKY_STRING

Calculate bolometer list from remsky input

Description:

Given an array of bolometer descriptions, return an array of bolometer numbers. Input array can contain a variety of forms for identifying bolometers or lists of bolometers. This string is generated by, for example, the REMSKY task.

Invocation

CALL SURFLIB_DECODE_REMSKY_STRING( SUB_INSTRUMENT, N_ELEMENTS, BOL_DESC, N_BOLS, BOL_ADC, BOL_CHAN, BOL_LIST, N_BOLS_OUT, STATUS )

Arguments

SUB_INSTRUMENT = CHARACTER (Given)
Sub instrument name. This governs the bolometers that are allowed to be returned.
N_ELEMENTS = INTEGER (Given)
Number of elements in the input array
BOL_DESC( N_ELEMENTS ) = CHARACTER() (Given)
Array of bolometer descriptions Can take the form of:
n bolometer number
id bolometer id (eg H7)
all all bolometers
rn Nth ring of bolometers

Can be prefixed with a minus sign to indicate that a bolometer should be removed from the final list. The calculation is sequential.

N_BOLS = INTEGER (Given)
Maximum allowed size for return array containing bolometer numbers An error is given if this number is exceeded. In effect this is equivalent to the actual number of bolometers on the array.
BOL_ADC( N_BOLS ) = INTEGER (Given)
ADC numbers for identifying bolometers
BOL_CHAN( N_BOLS ) = INTEGER (Given)
Channel number for identifying bolometers
BOL_LIST( N_BOLS ) = INTEGER (Returned)
List of bolometer numbers corresponding to the supplied strings.
N_BOLS_OUT = INTEGER (Returned)
Actual number of bolometers returned in BOL_LIST
STATUS = INTEGER (Given & Returned)
Global status

Syntax

[all] Whole array
[r0] Ring zero (central pixel)
[h7,r1] inner ring and h7
[r1,-h8] inner ring without h8
[r1,-18] inner ring without bolometer 18
[all,-r1,-h7] all pixels except the inner ring/h7
[all,-r3,g1] all pixels except ring 3 but with g1 (g1 is in r3)
[all,-r1,-r2,-r3,-r4,-r5] Selects the central pixel!!

Note that the sequence is evaluated in turn so that [all,-all,h7] will still end up with pixel h7.

Copyright

Copyright ©1995,1996,1997,1998,1999 Particle Physics and Astronomy Research Council. All Rights Reserved.