SCULIB_READ_JIGGLE
read a jiggle pattern
Description:
This routine reads in a jiggle pattern
and sets some variables associated with it; the number of jiggles in the pattern, the number of jiggles
to be measured in each exposure, the number of times the pattern will be repeated in each exposure,
the maximum offsets in the pattern.
After checking status on entry, SCULIB_READ_NUMBERS is called to read in the jiggle
offsets from the file named in JIGGLE_NAME, an error will be reported and bad status
returned if no offsets are read. The maximum and minimum x and y offsets in the pattern are
calculated.
Next, the variables governing the way the jiggle pattern will be divided among the exposures making
up each integration is worked out. An error will be reported and bad status returned if
JIGGLE_P_SWITCH is less than or equal to zero. Otherwise, the number of exposures required to
execute the whole jiggle pattern, each exposure containing JIGGLE_P_SWITCH jiggles (except
perhaps the last which will hold less), is calculated. If JIGGLE_P_SWITCH is larger than the number
of jiggles in the pattern then the jiggle pattern will be repeated an integer number of times
during each switch of the exposure and JIGGLE_P_SWITCH will be reset accordingly.
Invocation
CALL SCULIB_READ_JIGGLE (JIGGLE_NAME, MAX_JIGGLE, JIGGLE_P_SWITCH,
JIGGLE_REPEAT, EXP_PER_INT, JIGGLE_X, JIGGLE_Y, JIGGLE_COUNT, JIGGLE_X_MAX,
JIGGLE_X_MIN, JIGGLE_Y_MAX, JIGGLE_Y_MIN, STATUS)
Arguments
JIGGLE_NAME =
CHARACTER()
(Given)
the name of the file containing the jiggle pattern
MAX_JIGGLE = INTEGER (Given)
the
maximum number of jiggles that can be read
JIGGLE_P_SWITCH = INTEGER (Given and returned)
the requested (given) and actual (returned) number of jiggles that will be performed in each
exposure of the integration
JIGGLE_REPEAT = INTEGER (Returned)
the number of
times the jiggle pattern wil be repeated in each exposure
EXP_PER_INT = INTEGER
(Returned)
the number of exposures required per integration
JIGGLE_X (MAX_JIGGLE) =
REAL (Returned)
the x jiggle offsets
JIGGLE_Y (MAX_JIGGLE) = REAL (Returned)
the
y jiggle offsets
JIGGLE_COUNT = INTEGER (Returned)
the number of jiggles in the
pattern
JIGGLE_X_MAX = REAL (Returned)
the maximum jiggle offset in the x axis
JIGGLE_X_MIN
the minimum jiggle offset in the x axis
JIGGLE_Y_MAX = REAL (Returned)
the
maximum jiggle offset in the y axis
JIGGLE_Y_MIN
the minimum jiggle offset in the y
axis
STATUS = INTEGER (Given and returned)
global status
Copyright
Copyright
©1995,1996,1997,1998,1999 Particle Physics and Astronomy Research Council. All Rights Reserved.