Description:
This routine finds the start and end indices of the specified switch in a SCUBA
observation. The array DEMOD_POINTER contains the start indices, so this part is easy. However, the
end index will be 1 less than the start index of the next, or the index of the last position measured if
the specified switch is the last in the observation. This makes things a little complicated
because consecutive switches within an exposure need not have been taken and stored
consecutively, though exposures, integrations and measurements are ordered as one would expect.
Invocation
CALL SCULIB_FIND_SWITCH (DEMOD_POINTER, N_SWITCHES, N_EXPOSURES,
N_INTEGRATIONS, N_MEASUREMENTS, N_POS, SWITCH, EXP, INT, MEAS, S_START, S_END, STATUS)
Arguments
DEMOD_POINTER (N_SWITCHES, N_EXPOSURES, N_INTEGRATIONS,
N_MEASUREMENTS) = INTEGER (Given)
an array of pointers to the start of each switch
N_SWITCHES = INTEGER (Given)
the number of switches per exposure
N_EXPOSURES =
INTEGER (Given)
the number of exposures per integration
N_INTEGRATIONS = INTEGER
(Given)
the number of integrations per measurement
N_MEASUREMENTS = INTEGER
(Given)
the number of measurements in the observation
N_POS = INTEGER (Given)
the
total number of positions measured in the observation
SWITCH = INTEGER (Given)
the index of the switch
EXP = INTEGER (Given)
the exposure number of the switch
INT = INTEGER (Given)
the integration number of the switch
MEAS = INTEGER
(Given)
the measurement number of the switch
S_START = INTEGER (Returned)
pointer to the start of the switch
S_END = INTEGER (Returned)
pointer to the end of the
switch
STATUS = INTEGER (Given and returned)
global status
Copyright
Copyright
©1995,1996,1997,1998,1999 Particle Physics and Astronomy Research Council. All Rights Reserved.