Description:
This routine will overwrite the value of a specified FITS integer keyword held in the FITS
extension of an NDF file. The FITS extension must have been read into the input array FITS
before this routine is called and be written out again afterwards for the change to take
effect.
The routine assumes that each line in the FITS array will contain a string with format:-
"KEYWORD=VALUE / this is a comment"
It will search the input array for a line containing the required keyword and replace VALUE. If the
keyword is not found an error will be reported and bad status returned. If the keyword is found but
the line does not conform to the above format an error will be reported and bad status returned.
Invocation
CALL SCULIB_REWRITE_FITS_I (MAX_FITS, N_FITS, FITS, NAME, VALUE, STATUS)
Arguments
MAX_FITS = INTEGER (Given)
the maximum number of items in the FITS array
N_FITS = INTEGER (Given)
the actual number of items in the FITS array
FITS (MAX_FITS) =
CHARACTER()
(Given and returned)
array containing the FITS items
NAME =
CHARACTER()
(Given)
the name of the FITS keyword whose value is to be rewritten
VALUE = INTEGER (Given)
the value that the FITS keyword is to have
STATUS = INTEGER (Given and returned)
global status
Copyright
Copyright ©1995,1996,1997,1998,1999 Particle Physics and Astronomy Research Council.
All Rights Reserved.