SURF_WRITE_MAP_INFO

Calculate FITS and WCS information for rebinned image

Description:

This routine writes Axis, FITS and WCS information to a rebinned map file. Note that this routine does not write WCS information to the FITS header - that is stored in the WCS information. Keywords CRVAL, CRPIX and CTYPE are used here to generate the WCS only.

Invocation

CALL SURF_WRITE_MAP_INFO( OUT_NDF, OUT_COORDS, OUT_TITLE, MJD_STANDARD, NFILE, FILENAME, OUT_LONG, OUT_LAT, OUT_PIXEL, I_CENTRE, J_CENTRE, NX_OUT, NY_OUT, WAVELENGTH FILTER, WRITE_CHOP, CHOP_PA, CHOP_THROW, WPLATE, ANGROT, STATUS )

Arguments

OUT_NDF = INTEGER (Given)
NDF identifier of output file
OUT_COORDS = CHAR (Given)
Output coordinate system
OUT_TITLE = CHAR (Given)
Title of map
OUT_UNITS = CHAR (Given)
Output units
MJD_STANDARD = DOUBLE (Given)
Modified Julian date of map
NFILE = INTEGER (Given)
Number of files in input map
FILENAME = CHAR(NFILE) (Given)
Names of input files
OUT_PIXEL = REAL (Given)
Size of pixel in output map (radians)
OUT_LONG = DOUBLE (Given)
Longitude of output map (radians)
OUT_LAT = DOUBLE (Given)
Latitude of output map (radians)
I_CENTRE = INTEGER (Given)
Position of X reference pixel in output map
J_CENTRE = INTEGER (Given)
Position of Y reference pixel in output map
NX_OUT = INTEGER (Given)
Size of output map in X direction
NY_OUT = INTEGER (Given)
Size of output map in Y direction
WAVELENGTH = REAL (Given)
Wavelength of the map (microns)
FILTER = CHARACTER (Given)
Name of filter
WRITE_CHOP = LOGICAL (Given)
Write the CHOP information to the header
CHOP_CRD = CHARACTER (Given)
Chop coordinate frame
CHOP_PA = REAL (Given)
Chop position angle in degrees east of north
CHOP_THROW = REAL (Given)
Chop throw in arcsec
WPLATE = REAL (Given)
Wave plate angle (ignored if bad value).
ANGROT = REAL (Given)
POLPACK rotation angle between waveplate and X pixel axis (ignored if bad value)
TELESCOPE = CHARACTER (Given)
Name of telescope to write to FITS header
INSTRUMENT = CHARACTER (Given)
Name of instrument to write to FITS header
STATUS = INTEGER (Given and Returned)
The global status

Copyright

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