This routine will get the value of a specified FITS character 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.

The routine assumes that each line in the FITS array will contain a string with format:-

"KEYWORD= ’VALUE’ / this is a comment"

The string is extracted from between the quotes and the ’/’ is not required.

It will search the input array for a line containing the required keyword and return VALUE. If the keyword is not found and 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.

CALL SCULIB_GET_FITS_C (MAX_FITS, N_FITS, FITS, NAME, VALUE, STATUS)

MAX_FITS = INTEGER (Given)

N_FITS = INTEGER (Given)

FITS (MAX_FITS) = CHARACTER$\ast$($\ast$) (Given)

NAME = CHARACTER$\ast$($\ast$) (Given)

VALUE = CHARACTER$\ast$($\ast$) (Returned)

STATUS = INTEGER (Given and returned)

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