- Main Page
- Related Pages
- Data Structures
- Files

# wcshdr.h

Go to the documentation of this file.

    00001 /*============================================================================
    00002
    00003   WCSLIB 4.15 - an implementation of the FITS WCS standard.
    00004   Copyright (C) 1995-2012, Mark Calabretta
    00005
    00006   This file is part of WCSLIB.
    00007
    00008   WCSLIB is free software: you can redistribute it and/or modify it under the
    00009   terms of the GNU Lesser General Public License as published by the Free
    00010   Software Foundation, either version 3 of the License, or (at your option)
    00011   any later version.
    00012
    00013   WCSLIB is distributed in the hope that it will be useful, but WITHOUT ANY
    00014   WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
    00015   FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for
    00016   more details.
    00017
    00018   You should have received a copy of the GNU Lesser General Public License
    00019   along with WCSLIB.  If not, see http://www.gnu.org/licenses.
    00020
    00021   Direct correspondence concerning WCSLIB to mark@calabretta.id.au
    00022
    00023   Author: Mark Calabretta, Australia Telescope National Facility, CSIRO.
    00024   http://www.atnf.csiro.au/people/Mark.Calabretta
    00025   $Id: wcshdr.h,v 4.15 2012/09/26 14:26:05 cal103 Exp $
    00026 *=============================================================================
    00027 *
    00028 * WCSLIB 4.15 - C routines that implement the FITS World Coordinate System
    00029 * (WCS) standard.  Refer to
    00030 *
    00031 *   "Representations of world coordinates in FITS",
    00032 *   Greisen, E.W., & Calabretta, M.R. 2002, A&A, 395, 1061 (Paper I)
    00033 *
    00034 *   "Representations of celestial coordinates in FITS",
    00035 *   Calabretta, M.R., & Greisen, E.W. 2002, A&A, 395, 1077 (Paper II)
    00036 *
    00037 *   "Representations of spectral coordinates in FITS",
    00038 *   Greisen, E.W., Calabretta, M.R., Valdes, F.G., & Allen, S.L.
    00039 *   2006, A&A, 446, 747 (Paper III)
    00040 *
    00041 * Refer to the README file provided with WCSLIB for an overview of the
    00042 * library.
    00043 *
    00044 *
    00045 * Summary of the wcshdr routines
    00046 * ------------------------------
    00047 * Routines in this suite are aimed at extracting WCS information from a FITS
    00048 * file.  They provide the high-level interface between the FITS file and the
    00049 * WCS coordinate transformation routines.
    00050 *
    00051 * Additionally, function wcshdo() is provided to write out the contents of a
    00052 * wcsprm struct as a FITS header.
    00053 *
    00054 * Briefly, the anticipated sequence of operations is as follows:
    00055 *
    00056 *   - 1: Open the FITS file and read the image or binary table header, e.g.
    00057 *        using CFITSIO routine fits_hdr2str().
    00058 *
    00059 *   - 2: Parse the header using wcspih() or wcsbth(); they will automatically
    00060 *        interpret 'TAB' header keywords using wcstab().
    00061 *
    00062 *   - 3: Allocate memory for, and read 'TAB' arrays from the binary table
    00063 *        extension, e.g. using CFITSIO routine fits_read_wcstab() - refer to
    00064 *        the prologue of getwcstab.h.  wcsset() will automatically take
    00065 *        control of this allocated memory, in particular causing it to be
    00066 *        free'd by wcsfree().
    00067 *
    00068 *   - 4: Translate non-standard WCS usage using wcsfix(), see wcsfix.h.
    00069 *
    00070 *   - 5: Initialize wcsprm struct(s) using wcsset() and calculate coordinates
    00071 *        using wcsp2s() and/or wcss2p().  Refer to the prologue of wcs.h for a
    00072 *        description of these and other high-level WCS coordinate
    00073 *        transformation routines.
    00074 *
    00075 *   - 6: Clean up by freeing memory with wcsvfree().
    00076 *
    00077 * In detail:
    00078 *
    00079 * - wcspih() is a high-level FITS WCS routine that parses an image header.  It
    00080 *   returns an array of up to 27 wcsprm structs on each of which it invokes
    00081 *   wcstab().
    00082 *
    00083 * - wcsbth() is the analogue of wcspih() for use with binary tables; it
    00084 *   handles image array and pixel list keywords.  As an extension of the FITS
    00085 *   WCS standard, it also recognizes image header keywords which may be used
    00086 *   to provide default values via an inheritance mechanism.
    00087 *
    00088 * - wcstab() assists in filling in members of the wcsprm struct associated
    00089 *   with coordinate lookup tables ('TAB').  These are based on arrays stored
    00090 *   in a FITS binary table extension (BINTABLE) that are located by PVi_ma
    00091 *   keywords in the image header.
    00092 *
    00093 * - wcsidx() and wcsbdx() are utility routines that return the index for a
    00094 *   specified alternate coordinate descriptor in the array of wcsprm structs
    00095 *   returned by wcspih() or wcsbth().
    00096 *
    00097 * - wcsvfree() deallocates memory for an array of wcsprm structs, such as
    00098 *   returned by wcspih() or wcsbth().
    00099 *
    00100 * - wcshdo() writes out a wcsprm struct as a FITS header.
    00101 *
    00102 *
    00103 * wcspih() - FITS WCS parser routine for image headers
    00104 * ----------------------------------------------------
    00105 * wcspih() is a high-level FITS WCS routine that parses an image header,
    00106 * either that of a primary HDU or of an image extension.  All WCS keywords
    00107 * defined in Papers I, II, and III are recognized, and also those used by the
    00108 * AIPS convention and certain other keywords that existed in early drafts of
    00109 * the WCS papers as explained in wcsbth() note 5.
    00110 *
    00111 * Given a character array containing a FITS image header, wcspih() identifies
    00112 * and reads all WCS keywords for the primary coordinate representation and up
    00113 * to 26 alternate representations.  It returns this information as an array of
    00114 * wcsprm structs.
    00115 *
    00116 * wcspih() invokes wcstab() on each of the wcsprm structs that it returns.
    00117 *
    00118 * Use wcsbth() in preference to wcspih() for FITS headers of unknown type;
    00119 * wcsbth() can parse image headers as well as binary table and pixel list
    00120 * headers.
    00121 *
    00122 * Given and returned:
    00123 *   header    char[]    Character array containing the (entire) FITS image
    00124 *                       header from which to identify and construct the
    00125 *                       coordinate representations, for example, as might be
    00126 *                       obtained conveniently via the CFITSIO routine
    00127 *                       fits_hdr2str().
    00128 *
    00129 *                       Each header "keyrecord" (formerly "card image")
    00130 *                       consists of exactly 80 7-bit ASCII printing characters
    00131 *                       in the range 0x20 to 0x7e (which excludes NUL, BS,
    00132 *                       TAB, LF, FF and CR) especially noting that the
    00133 *                       keyrecords are NOT null-terminated.
    00134 *
    00135 *                       For negative values of ctrl (see below), header[] is
    00136 *                       modified so that WCS keyrecords processed by wcspih()
    00137 *                       are removed from it.
    00138 *
    00139 * Given:
    00140 *   nkeyrec   int       Number of keyrecords in header[].
    00141 *
    00142 *   relax     int       Degree of permissiveness:
    00143 *                         0: Recognize only FITS keywords defined by the
    00144 *                            published WCS standard.
    00145 *                         WCSHDR_all: Admit all recognized informal
    00146 *                            extensions of the WCS standard.
    00147 *                       Fine-grained control of the degree of permissiveness
    00148 *                       is also possible as explained in wcsbth() note 5.
    00149 *
    00150 *   ctrl      int       Error reporting and other control options for invalid
    00151 *                       WCS and other header keyrecords:
    00152 *                           0: Do not report any rejected header keyrecords.
    00153 *                           1: Produce a one-line message stating the number
    00154 *                              of WCS keyrecords rejected (nreject).
    00155 *                           2: Report each rejected keyrecord and the reason
    00156 *                              why it was rejected.
    00157 *                           3: As above, but also report all non-WCS
    00158 *                              keyrecords that were discarded, and the number
    00159 *                              of coordinate representations (nwcs) found.
    00160 *                       The report is written to stderr.
    00161 *
    00162 *                       For ctrl < 0, WCS keyrecords processed by wcspih()
    00163 *                       are removed from header[]:
    00164 *                          -1: Remove only valid WCS keyrecords whose values
    00165 *                              were successfully extracted, nothing is
    00166 *                              reported.
    00167 *                          -2: Also remove WCS keyrecords that were rejected,
    00168 *                              reporting each one and the reason that it was
    00169 *                              rejected.
    00170 *                          -3: As above, and also report the number of
    00171 *                              coordinate representations (nwcs) found.
    00172 *                         -11: Same as -1 but preserving the basic keywords
    00173 *                              '{DATE,MJD}-{OBS,AVG}' and 'OBSGEO-{X,Y,Z}'.
    00174 *                       If any keyrecords are removed from header[] it will
    00175 *                       be null-terminated (NUL not being a legal FITS header
    00176 *                       character), otherwise it will contain its original
    00177 *                       complement of nkeyrec keyrecords and possibly not be
    00178 *                       null-terminated.
    00179 *
    00180 * Returned:
    00181 *   nreject   int*      Number of WCS keywords rejected for syntax errors,
    00182 *                       illegal values, etc.  Keywords not recognized as WCS
    00183 *                       keywords are simply ignored.  Refer also to wcsbth()
    00184 *                       note 5.
    00185 *
    00186 *   nwcs      int*      Number of coordinate representations found.
    00187 *
    00188 *   wcs       struct wcsprm**
    00189 *                       Pointer to an array of wcsprm structs containing up to
    00190 *                       27 coordinate representations.
    00191 *
    00192 *                       Memory for the array is allocated by wcspih() which
    00193 *                       also invokes wcsini() for each struct to allocate
    00194 *                       memory for internal arrays and initialize their
    00195 *                       members to default values.  Refer also to wcsbth()
    00196 *                       note 8.  Note that wcsset() is not invoked on these
    00197 *                       structs.
    00198 *
    00199 *                       This allocated memory must be freed by the user, first
    00200 *                       by invoking wcsfree() for each struct, and then by
    00201 *                       freeing the array itself.  A routine, wcsvfree(), is
    00202 *                       provided to do this (see below).
    00203 *
    00204 * Function return value:
    00205 *             int       Status return value:
    00206 *                         0: Success.
    00207 *                         1: Null wcsprm pointer passed.
    00208 *                         2: Memory allocation failed.
    00209 *                         4: Fatal error returned by Flex parser.
    00210 *
    00211 * Notes:
    00212 *   Refer to wcsbth() notes 1, 2, 3, 5, 7, and 8.
    00213 *
    00214 *
    00215 * wcsbth() - FITS WCS parser routine for binary table and image headers
    00216 * ---------------------------------------------------------------------
    00217 * wcsbth() is a high-level FITS WCS routine that parses a binary table header.
    00218 * It handles image array and pixel list WCS keywords which may be present
    00219 * together in one header.
    00220 *
    00221 * As an extension of the FITS WCS standard, wcsbth() also recognizes image
    00222 * header keywords in a binary table header.  These may be used to provide
    00223 * default values via an inheritance mechanism discussed in note 5 (c.f.
    00224 * WCSHDR_AUXIMG and WCSHDR_ALLIMG), or may instead result in wcsprm structs
    00225 * that are not associated with any particular column.  Thus wcsbth() can
    00226 * handle primary image and image extension headers in addition to binary table
    00227 * headers (it ignores NAXIS and does not rely on the presence of the TFIELDS
    00228 * keyword).
    00229 *
    00230 * All WCS keywords defined in Papers I, II, and III are recognized, and also
    00231 * those used by the AIPS convention and certain other keywords that existed in
    00232 * early drafts of the WCS papers as explained in note 5 below.
    00233 *
    00234 * wcsbth() sets the colnum or colax[] members of the wcsprm structs that it
    00235 * returns with the column number of an image array or the column numbers
    00236 * associated with each pixel coordinate element in a pixel list.  wcsprm
    00237 * structs that are not associated with any particular column, as may be
    00238 * derived from image header keywords, have colnum == 0.
    00239 *
    00240 * Note 6 below discusses the number of wcsprm structs returned by wcsbth(),
    00241 * and the circumstances in which image header keywords cause a struct to be
    00242 * created.  See also note 9 concerning the number of separate images that may
    00243 * be stored in a pixel list.
    00244 *
    00245 * The API to wcsbth() is similar to that of wcspih() except for the addition
    00246 * of extra arguments that may be used to restrict its operation.  Like
    00247 * wcspih(), wcsbth() invokes wcstab() on each of the wcsprm structs that it
    00248 * returns.
    00249 *
    00250 * Given and returned:
    00251 *   header    char[]    Character array containing the (entire) FITS binary
    00252 *                       table, primary image, or image extension header from
    00253 *                       which to identify and construct the coordinate
    00254 *                       representations, for example, as might be obtained
    00255 *                       conveniently via the CFITSIO routine fits_hdr2str().
    00256 *
    00257 *                       Each header "keyrecord" (formerly "card image")
    00258 *                       consists of exactly 80 7-bit ASCII printing
    00259 *                       characters in the range 0x20 to 0x7e (which excludes
    00260 *                       NUL, BS, TAB, LF, FF and CR) especially noting that
    00261 *                       the keyrecords are NOT null-terminated.
    00262 *
    00263 *                       For negative values of ctrl (see below), header[] is
    00264 *                       modified so that WCS keyrecords processed by wcsbth()
    00265 *                       are removed from it.
    00266 *
    00267 * Given:
    00268 *   nkeyrec   int       Number of keyrecords in header[].
    00269 *
    00270 *   relax     int       Degree of permissiveness:
    00271 *                         0: Recognize only FITS keywords defined by the
    00272 *                            published WCS standard.
    00273 *                         WCSHDR_all: Admit all recognized informal
    00274 *                            extensions of the WCS standard.
    00275 *                       Fine-grained control of the degree of permissiveness
    00276 *                       is also possible, as explained in note 5 below.
    00277 *
    00278 *   ctrl      int       Error reporting and other control options for invalid
    00279 *                       WCS and other header keyrecords:
    00280 *                           0: Do not report any rejected header keyrecords.
    00281 *                           1: Produce a one-line message stating the number
    00282 *                              of WCS keyrecords rejected (nreject).
    00283 *                           2: Report each rejected keyrecord and the reason
    00284 *                              why it was rejected.
    00285 *                           3: As above, but also report all non-WCS
    00286 *                              keyrecords that were discarded, and the number
    00287 *                              of coordinate representations (nwcs) found.
    00288 *                       The report is written to stderr.
    00289 *
    00290 *                       For ctrl < 0, WCS keyrecords processed by wcsbth()
    00291 *                       are removed from header[]:
    00292 *                          -1: Remove only valid WCS keyrecords whose values
    00293 *                              were successfully extracted, nothing is
    00294 *                              reported.
    00295 *                          -2: Also remove WCS keyrecords that were rejected,
    00296 *                              reporting each one and the reason that it was
    00297 *                              rejected.
    00298 *                          -3: As above, and also report the number of
    00299 *                              coordinate representations (nwcs) found.
    00300 *                         -11: Same as -1 but preserving the basic keywords
    00301 *                              '{DATE,MJD}-{OBS,AVG}' and 'OBSGEO-{X,Y,Z}'.
    00302 *                       If any keyrecords are removed from header[] it will
    00303 *                       be null-terminated (NUL not being a legal FITS header
    00304 *                       character), otherwise it will contain its original
    00305 *                       complement of nkeyrec keyrecords and possibly not be
    00306 *                       null-terminated.
    00307 *
    00308 *   keysel    int       Vector of flag bits that may be used to restrict the
    00309 *                       keyword types considered:
    00310 *                         WCSHDR_IMGHEAD: Image header keywords.
    00311 *                         WCSHDR_BIMGARR: Binary table image array.
    00312 *                         WCSHDR_PIXLIST: Pixel list keywords.
    00313 *                       If zero, there is no restriction.
    00314 *
    00315 *                       Keywords such as EQUIna or RFRQna that are common to
    00316 *                       binary table image arrays and pixel lists (including
    00317 *                       WCSNna and TWCSna, as explained in note 4 below) are
    00318 *                       selected by both WCSHDR_BIMGARR and WCSHDR_PIXLIST.
    00319 *                       Thus if inheritance via WCSHDR_ALLIMG is enabled as
    00320 *                       discussed in note 5 and one of these shared keywords
    00321 *                       is present, then WCSHDR_IMGHEAD and WCSHDR_PIXLIST
    00322 *                       alone may be sufficient to cause the construction of
    00323 *                       coordinate descriptions for binary table image arrays.
    00324 *
    00325 *   colsel    int*      Pointer to an array of table column numbers used to
    00326 *                       restrict the keywords considered by wcsbth().
    00327 *
    00328 *                       A null pointer may be specified to indicate that there
    00329 *                       is no restriction.  Otherwise, the magnitude of
    00330 *                       cols[0] specifies the length of the array:
    00331 *                         cols[0] > 0: the columns are included,
    00332 *                         cols[0] < 0: the columns are excluded.
    00333 *
    00334 *                       For the pixel list keywords TPn_ka and TCn_ka (and
    00335 *                       TPCn_ka and TCDn_ka if WCSHDR_LONGKEY is enabled), it
    00336 *                       is an error for one column to be selected but not the
    00337 *                       other.  This is unlike the situation with invalid
    00338 *                       keyrecords, which are simply rejected, because the
    00339 *                       error is not intrinsic to the header itself but
    00340 *                       arises in the way that it is processed.
    00341 *
    00342 * Returned:
    00343 *   nreject   int*      Number of WCS keywords rejected for syntax errors,
    00344 *                       illegal values, etc.  Keywords not recognized as WCS
    00345 *                       keywords are simply ignored, refer also to note 5
    00346 *                       below.
    00347 *
    00348 *   nwcs      int*      Number of coordinate representations found.
    00349 *
    00350 *   wcs       struct wcsprm**
    00351 *                       Pointer to an array of wcsprm structs containing up
    00352 *                       to 27027 coordinate representations, refer to note 6
    00353 *                       below.
    00354 *
    00355 *                       Memory for the array is allocated by wcsbth() which
    00356 *                       also invokes wcsini() for each struct to allocate
    00357 *                       memory for internal arrays and initialize their
    00358 *                       members to default values.  Refer also to note 8
    00359 *                       below.  Note that wcsset() is not invoked on these
    00360 *                       structs.
    00361 *
    00362 *                       This allocated memory must be freed by the user, first
    00363 *                       by invoking wcsfree() for each struct, and then by
    00364 *                       freeing the array itself.  A routine, wcsvfree(), is
    00365 *                       provided to do this (see below).
    00366 *
    00367 * Function return value:
    00368 *             int       Status return value:
    00369 *                         0: Success.
    00370 *                         1: Null wcsprm pointer passed.
    00371 *                         2: Memory allocation failed.
    00372 *                         3: Invalid column selection.
    00373 *                         4: Fatal error returned by Flex parser.
    00374 *
    00375 * Notes:
    00376 *   1: wcspih() determines the number of coordinate axes independently for
    00377 *      each alternate coordinate representation (denoted by the "a" value in
    00378 *      keywords like CTYPEia) from the higher of
    00379 *
    00380 *        a: NAXIS,
    00381 *        b: WCSAXESa,
    00382 *        c: The highest axis number in any parameterized WCS keyword.  The
    00383 *           keyvalue, as well as the keyword, must be syntactically valid
    00384 *           otherwise it will not be considered.
    00385 *
    00386 *      If none of these keyword types is present, i.e. if the header only
    00387 *      contains auxiliary WCS keywords for a particular coordinate
    00388 *      representation, then no coordinate description is constructed for it.
    00389 *
    00390 *      wcsbth() is similar except that it ignores the NAXIS keyword if given
    00391 *      an image header to process.
    00392 *
    00393 *      The number of axes, which is returned as a member of the wcsprm
    00394 *      struct, may differ for different coordinate representations of the
    00395 *      same image.
    00396 *
    00397 *   2: wcspih() and wcsbth() enforce correct FITS "keyword = value" syntax
    00398 *      with regard to "= " occurring in columns 9 and 10.
    00399 *
    00400 *      However, they do recognize free-format character (NOST 100-2.0,
    00401 *      Sect. 5.2.1), integer (Sect. 5.2.3), and floating-point values
    00402 *      (Sect. 5.2.4) for all keywords.
    00403 *
    00404 *   3: Where CROTAn, CDi_ja, and PCi_ja occur together in one header wcspih()
    00405 *      and wcsbth() treat them as described in the prologue to wcs.h.
    00406 *
    00407 *   4: WCS Paper I mistakenly defined the pixel list form of WCSNAMEa as
    00408 *      TWCSna instead of WCSNna; the 'T' is meant to substitute for the axis
    00409 *      number in the binary table form of the keyword - note that keywords
    00410 *      defined in WCS Papers II and III that are not parameterised by axis
    00411 *      number have identical forms for binary tables and pixel lists.
    00412 *      Consequently wcsbth() always treats WCSNna and TWCSna as equivalent.
    00413 *
    00414 *   5: wcspih() and wcsbth() interpret the "relax" argument as a vector of
    00415 *      flag bits to provide fine-grained control over what non-standard WCS
    00416 *      keywords to accept.  The flag bits are subject to change in future and
    00417 *      should be set by using the preprocessor macros (see below) for the
    00418 *      purpose.
    00419 *
    00420 *      - WCSHDR_none: Don't accept any extensions (not even those in the
    00421 *              errata).  Treat non-conformant keywords in the same way as
    00422 *              non-WCS keywords in the header, i.e. simply ignore them.
    00423 *
    00424 *      - WCSHDR_all: Accept all extensions recognized by the parser.
    00425 *
    00426 *      - WCSHDR_reject: Reject non-standard keywords (that are not otherwise
    00427 *              accepted).  A message will optionally be printed on stderr, as
    00428 *              determined by the ctrl argument, and nreject will be
    00429 *              incremented.
    00430 *
    00431 *              This flag may be used to signal the presence of non-standard
    00432 *              keywords, otherwise they are simply passed over as though they
    00433 *              did not exist in the header.
    00434 *
    00435 *              Useful for testing conformance of a FITS header to the WCS
    00436 *              standard.
    00437 *
    00438 *      - WCSHDR_CROTAia: Accept CROTAia (wcspih()),
    00439 *                               iCROTna (wcsbth()),
    00440 *                               TCROTna (wcsbth()).
    00441 *      - WCSHDR_EPOCHa:  Accept EPOCHa.
    00442 *      - WCSHDR_VELREFa: Accept VELREFa.
    00443 *              wcspih() always recognizes the AIPS-convention keywords,
    00444 *              CROTAn, EPOCH, and VELREF for the primary representation
    00445 *              (a = ' ') but alternates are non-standard.
    00446 *
    00447 *              wcsbth() accepts EPOCHa and VELREFa only if WCSHDR_AUXIMG is
    00448 *              also enabled.
    00449 *
    00450 *      - WCSHDR_CD00i00j: Accept CD00i00j (wcspih()).
    00451 *      - WCSHDR_PC00i00j: Accept PC00i00j (wcspih()).
    00452 *      - WCSHDR_PROJPn:   Accept PROJPn   (wcspih()).
    00453 *              These appeared in early drafts of WCS Paper I+II (before they
    00454 *              were split) and are equivalent to CDi_ja, PCi_ja, and PVi_ma
    00455 *              for the primary representation (a = ' ').  PROJPn is
    00456 *              equivalent to PVi_ma with m = n <= 9, and is associated
    00457 *              exclusively with the latitude axis.
    00458 *
    00459 *      - WCSHDR_RADECSYS: Accept RADECSYS.  This appeared in early drafts of
    00460 *              WCS Paper I+II and was subsequently replaced by RADESYSa.
    00461 *
    00462 *              wcsbth() accepts RADECSYS only if WCSHDR_AUXIMG is also
    00463 *              enabled.
    00464 *
    00465 *      - WCSHDR_VSOURCE: Accept VSOURCEa or VSOUna (wcsbth()).  This appeared
    00466 *              in early drafts of WCS Paper III and was subsequently dropped
    00467 *              in favour of ZSOURCEa and ZSOUna.
    00468 *
    00469 *              wcsbth() accepts VSOURCEa only if WCSHDR_AUXIMG is also
    00470 *              enabled.
    00471 *
    00472 *      - WCSHDR_DOBSn (wcsbth() only): Allow DOBSn, the column-specific analogue
    00473 *              of DATE-OBS.  By an oversight this was never formally defined
    00474 *              in the standard.
    00475 *
    00476 *      - WCSHDR_LONGKEY (wcsbth() only): Accept long forms of the alternate
    00477 *              binary table and pixel list WCS keywords, i.e. with "a" non-
    00478 *              blank.  Specifically
    00479 *
    00480 #                jCRPXna  TCRPXna  :  jCRPXn  jCRPna  TCRPXn  TCRPna  CRPIXja
    00481 #                   -     TPCn_ka  :    -     ijPCna    -     TPn_ka  PCi_ja
    00482 #                   -     TCDn_ka  :    -     ijCDna    -     TCn_ka  CDi_ja
    00483 #                iCDLTna  TCDLTna  :  iCDLTn  iCDEna  TCDLTn  TCDEna  CDELTia
    00484 #                iCUNIna  TCUNIna  :  iCUNIn  iCUNna  TCUNIn  TCUNna  CUNITia
    00485 #                iCTYPna  TCTYPna  :  iCTYPn  iCTYna  TCTYPn  TCTYna  CTYPEia
    00486 #                iCRVLna  TCRVLna  :  iCRVLn  iCRVna  TCRVLn  TCRVna  CRVALia
    00487 #                iPVn_ma  TPVn_ma  :    -     iVn_ma    -     TVn_ma  PVi_ma
    00488 #                iPSn_ma  TPSn_ma  :    -     iSn_ma    -     TSn_ma  PSi_ma
    00489 *
    00490 *              where the primary and standard alternate forms together with
    00491 *              the image-header equivalent are shown rightwards of the colon.
    00492 *
    00493 *              The long form of these keywords could be described as quasi-
    00494 *              standard.  TPCn_ka, iPVn_ma, and TPVn_ma appeared by mistake
    00495 *              in the examples in WCS Paper II and subsequently these and
    00496 *              also TCDn_ka, iPSn_ma and TPSn_ma were legitimized by the
    00497 *              errata to the WCS papers.
    00498 *
    00499 *              Strictly speaking, the other long forms are non-standard and
    00500 *              in fact have never appeared in any draft of the WCS papers nor
    00501 *              in the errata.  However, as natural extensions of the primary
    00502 *              form they are unlikely to be written with any other intention.
    00503 *              Thus it should be safe to accept them provided, of course,
    00504 *              that the resulting keyword does not exceed the 8-character
    00505 *              limit.
    00506 *
    00507 *              If WCSHDR_CNAMn is enabled then also accept
    00508 *
    00509 #                iCNAMna  TCNAMna  :   ---   iCNAna    ---   TCNAna  CNAMEia
    00510 #                iCRDEna  TCRDEna  :   ---   iCRDna    ---   TCRDna  CRDERia
    00511 #                iCSYEna  TCSYEna  :   ---   iCSYna    ---   TCSYna  CSYERia
    00512 *
    00513 *              Note that CNAMEia, CRDERia, CSYERia, and their variants are
    00514 *              not used by WCSLIB but are stored in the wcsprm struct as
    00515 *              auxiliary information.
    00516 *
    00517 *      - WCSHDR_CNAMn (wcsbth() only): Accept iCNAMn, iCRDEn, iCSYEn, TCNAMn,
    00518 *              TCRDEn, and TCSYEn, i.e. with "a" blank.  While non-standard,
    00519 *              these are the obvious analogues of iCTYPn, TCTYPn, etc.
    00520 *
    00521 *      - WCSHDR_AUXIMG (wcsbth() only): Allow the image-header form of an
    00522 *              auxiliary WCS keyword with representation-wide scope to
    00523 *              provide a default value for all images.  This default may be
    00524 *              overridden by the column-specific form of the keyword.
    00525 *
    00526 *              For example, a keyword like EQUINOXa would apply to all image
    00527 *              arrays in a binary table, or all pixel list columns with
    00528 *              alternate representation "a" unless overridden by EQUIna.
    00529 *
    00530 *              Specifically the keywords are:
    00531 *
    00532 #                LATPOLEa  for LATPna
    00533 #                LONPOLEa  for LONPna
    00534 #                RESTFREQ  for RFRQna
    00535 #                RESTFRQa  for RFRQna
    00536 #                RESTWAVa  for RWAVna
    00537 *
    00538 *              whose keyvalues are actually used by WCSLIB, and also keywords
    00539 *              that provide auxiliary information that is simply stored in
    00540 *              the wcsprm struct:
    00541 *
    00542 #                EPOCH         -       ... (No column-specific form.)
    00543 #                EPOCHa        -       ... Only if WCSHDR_EPOCHa is set.
    00544 #                EQUINOXa  for EQUIna
    00545 #                RADESYSa  for RADEna
    00546 #                RADECSYS  for RADEna  ... Only if WCSHDR_RADECSYS is set.
    00547 #                SPECSYSa  for SPECna
    00548 #                SSYSOBSa  for SOBSna
    00549 #                SSYSSRCa  for SSRCna
    00550 #                VELOSYSa  for VSYSna
    00551 #                VELANGLa  for VANGna
    00552 #                VELREF        -       ... (No column-specific form.)
    00553 #                VELREFa       -       ... Only if WCSHDR_VELREFa is set.
    00554 #                VSOURCEa  for VSOUna  ... Only if WCSHDR_VSOURCE is set.
    00555 #                WCSNAMEa  for WCSNna  ... Or TWCSna (see below).
    00556 #                ZSOURCEa  for ZSOUna
    00557 *
    00558 #                DATE-AVG  for DAVGn
    00559 #                DATE-OBS  for DOBSn
    00560 #                MJD-AVG   for MJDAn
    00561 #                MJD-OBS   for MJDOBn
    00562 #                OBSGEO-X  for OBSGXn
    00563 #                OBSGEO-Y  for OBSGYn
    00564 #                OBSGEO-Z  for OBSGZn
    00565 *
    00566 *              where the image-header keywords on the left provide default
    00567 *              values for the column specific keywords on the right.
    00568 *
    00569 *              Keywords in the last group, such as MJD-OBS, apply to all
    00570 *              alternate representations, so MJD-OBS would provide a default
    00571 *              value for all images in the header.
    00572 *
    00573 *              This auxiliary inheritance mechanism applies to binary table
    00574 *              image arrays and pixel lists alike.  Most of these keywords
    00575 *              have no default value, the exceptions being LONPOLEa and
    00576 *              LATPOLEa, and also RADESYSa and EQUINOXa which provide
    00577 *              defaults for each other.  Thus the only potential difficulty
    00578 *              in using WCSHDR_AUXIMG is that of erroneously inheriting one
    00579 *              of these four keywords.
    00580 *
    00581 *              Unlike WCSHDR_ALLIMG, the existence of one (or all) of these
    00582 *              auxiliary WCS image header keywords will not by itself cause a
    00583 *              wcsprm struct to be created for alternate representation "a".
    00584 *              This is because they do not provide sufficient information to
    00585 *              create a non-trivial coordinate representation when used in
    00586 *              conjunction with the default values of those keywords, such as
    00587 *              CTYPEia, that are parameterized by axis number.
    00588 *
    00589 *      - WCSHDR_ALLIMG (wcsbth() only): Allow the image-header form of *all*
    00590 *              image header WCS keywords to provide a default value for all
    00591 *              image arrays in a binary table (n.b. not pixel list).  This
    00592 *              default may be overridden by the column-specific form of the
    00593 *              keyword.
    00594 *
    00595 *              For example, a keyword like CRPIXja would apply to all image
    00596 *              arrays in a binary table with alternate representation "a"
    00597 *              unless overridden by jCRPna.
    00598 *
    00599 *              Specifically the keywords are those listed above for
    00600 *              WCSHDR_AUXIMG plus
    00601 *
    00602 #                WCSAXESa  for WCAXna
    00603 *
    00604 *              which defines the coordinate dimensionality, and the following
    00605 *              keywords which are parameterized by axis number:
    00606 *
    00607 #                CRPIXja   for jCRPna
    00608 #                PCi_ja    for ijPCna
    00609 #                CDi_ja    for ijCDna
    00610 #                CDELTia   for iCDEna
    00611 #                CROTAi    for iCROTn
    00612 #                CROTAia        -      ... Only if WCSHDR_CROTAia is set.
    00613 #                CUNITia   for iCUNna
    00614 #                CTYPEia   for iCTYna
    00615 #                CRVALia   for iCRVna
    00616 #                PVi_ma    for iVn_ma
    00617 #                PSi_ma    for iSn_ma
    00618 *
    00619 #                CNAMEia   for iCNAna
    00620 #                CRDERia   for iCRDna
    00621 #                CSYERia   for iCSYna
    00622 *
    00623 *              where the image-header keywords on the left provide default
    00624 *              values for the column specific keywords on the right.
    00625 *
    00626 *              This full inheritance mechanism only applies to binary table
    00627 *              image arrays, not pixel lists, because in the latter case
    00628 *              there is no well-defined association between coordinate axis
    00629 *              number and column number.
    00630 *
    00631 *              Note that CNAMEia, CRDERia, CSYERia, and their variants are
    00632 *              not used by WCSLIB but are stored in the wcsprm struct as
    00633 *              auxiliary information.
    00634 *
    00635 *              Note especially that at least one wcsprm struct will be
    00636 *              returned for each "a" found in one of the image header
    00637 *              keywords listed above:
    00638 *
    00639 *              - If the image header keywords for "a" ARE NOT inherited by a
    00640 *                binary table, then the struct will not be associated with
    00641 *                any particular table column number and it is up to the user
    00642 *                to provide an association.
    00643 *
    00644 *              - If the image header keywords for "a" ARE inherited by a
    00645 *                binary table image array, then those keywords are considered
    00646 *                to be "exhausted" and do not result in a separate wcsprm
    00647 *                struct.
    00648 *
    00649 *      For example, to accept CD00i00j and PC00i00j and reject all other
    00650 *      extensions, use
    00651 *
    00652 =        relax = WCSHDR_reject | WCSHDR_CD00i00j | WCSHDR_PC00i00j;
    00653 *
    00654 *      The parser always treats EPOCH as subordinate to EQUINOXa if both are
    00655 *      present, and VSOURCEa is always subordinate to ZSOURCEa.
    00656 *
    00657 *      Likewise, VELREF is subordinate to the formalism of WCS Paper III, see
    00658 *      spcaips().
    00659 *
    00660 *      Neither wcspih() nor wcsbth() currently recognize the AIPS-convention
    00661 *      keywords ALTRPIX or ALTRVAL which effectively define an alternative
    00662 *      representation for a spectral axis.
    00663 *
    00664 *   6: Depending on what flags have been set in its "relax" argument,
    00665 *      wcsbth() could return as many as 27027 wcsprm structs:
    00666 *
    00667 *      - Up to 27 unattached representations derived from image header
    00668 *        keywords.
    00669 *
    00670 *      - Up to 27 structs for each of up to 999 columns containing an image
    00671 *        arrays.
    00672 *
    00673 *      - Up to 27 structs for a pixel list.
    00674 *
    00675 *      Note that it is considered legitimate for a column to contain an image
    00676 *      array and also form part of a pixel list, and in particular that
    00677 *      wcsbth() does not check the TFORM keyword for a pixel list column to
    00678 *      check that it is scalar.
    00679 *
    00680 *      In practice, of course, a realistic binary table header is unlikely to
    00681 *      contain more than a handful of images.
    00682 *
    00683 *      In order for wcsbth() to create a wcsprm struct for a particular
    00684 *      coordinate representation, at least one WCS keyword that defines an
    00685 *      axis number must be present, either directly or by inheritance if
    00686 *      WCSHDR_ALLIMG is set.
    00687 *
    00688 *      When the image header keywords for an alternate representation are
    00689 *      inherited by a binary table image array via WCSHDR_ALLIMG, those
    00690 *      keywords are considered to be "exhausted" and do not result in a
    00691 *      separate wcsprm struct.  Otherwise they do.
    00692 *
    00693 *   7: Neither wcspih() nor wcsbth() check for duplicated keywords, in most
    00694 *      cases they accept the last encountered.
    00695 *
    00696 *   8: wcspih() and wcsbth() use wcsnpv() and wcsnps() (refer to the prologue
    00697 *      of wcs.h) to match the size of the pv[] and ps[] arrays in the wcsprm
    00698 *      structs to the number in the header.  Consequently there are no unused
    00699 *      elements in the pv[] and ps[] arrays, indeed they will often be of
    00700 *      zero length.
    00701 *
    00702 *   9: The FITS WCS standard for pixel lists assumes that a pixel list
    00703 *      defines one and only one image, i.e. that each row of the binary table
    00704 *      refers to just one event, e.g. the detection of a single photon or
    00705 *      neutrino.
    00706 *
    00707 *      In the absence of a formal mechanism for identifying the columns
    00708 *      containing pixel coordinates (as opposed to pixel values or ancillary
    00709 *      data recorded at the time the photon or neutrino was detected),
    00710 *      Paper I discusses how the WCS keywords themselves may be used to
    00711 *      identify them.
    00712 *
    00713 *      In practice, however, pixel lists have been used to store multiple
    00714 *      images.  Besides not specifying how to identify columns, the pixel
    00715 *      list convention is also silent on the method to be used to associate
    00716 *      table columns with image axes.
    00717 *
    00718 *      wcsbth() simply collects all WCS keywords for a particular coordinate
    00719 *      representation (i.e. the "a" value in TCTYna) into one wcsprm struct.
    00720 *      However, these alternates need not be associated with the same table
    00721 *      columns and this allows a pixel list to contain up to 27 separate
    00722 *      images.  As usual, if one of these representations happened to contain
    00723 *      more than two celestial axes, for example, then an error would result
    00724 *      when wcsset() is invoked on it.  In this case the "colsel" argument
    00725 *      could be used to restrict the columns used to construct the
    00726 *      representation so that it only contained one pair of celestial axes.
    00727 *
    00728 *
    00729 * wcstab() - Tabular construction routine
    00730 * ---------------------------------------
    00731 * wcstab() assists in filling in the information in the wcsprm struct relating
    00732 * to coordinate lookup tables.
    00733 *
    00734 * Tabular coordinates ('TAB') present certain difficulties in that the main
    00735 * components of the lookup table - the multidimensional coordinate array plus
    00736 * an index vector for each dimension - are stored in a FITS binary table
    00737 * extension (BINTABLE).  Information required to locate these arrays is stored
    00738 * in PVi_ma and PSi_ma keywords in the image header.
    00739 *
    00740 * wcstab() parses the PVi_ma and PSi_ma keywords associated with each 'TAB'
    00741 * axis and allocates memory in the wcsprm struct for the required number of
    00742 * tabprm structs.  It sets as much of the tabprm struct as can be gleaned from
    00743 * the image header, and also sets up an array of wtbarr structs (described in
    00744 * the prologue of wcs.h) to assist in extracting the required arrays from the
    00745 * BINTABLE extension(s).
    00746 *
    00747 * It is then up to the user to allocate memory for, and copy arrays from the
    00748 * BINTABLE extension(s) into the tabprm structs.  A CFITSIO routine,
    00749 * fits_read_wcstab(), has been provided for this purpose, see getwcstab.h.
    00750 * wcsset() will automatically take control of this allocated memory, in
    00751 * particular causing it to be free'd by wcsfree(); the user must not attempt
    00752 * to free it after wcsset() has been called.
    00753 *
    00754 * Note that wcspih() and wcsbth() automatically invoke wcstab() on each of the
    00755 * wcsprm structs that they return.
    00756 *
    00757 * Given and returned:
    00758 *   wcs       struct wcsprm*
    00759 *                       Coordinate transformation parameters (see below).
    00760 *
    00761 *                       wcstab() sets ntab, tab, nwtb and wtb, allocating
    00762 *                       memory for the tab and wtb arrays.  This allocated
    00763 *                       memory will be free'd automatically by wcsfree().
    00764 *
    00765 * Function return value:
    00766 *             int       Status return value:
    00767 *                         0: Success.
    00768 *                         1: Null wcsprm pointer passed.
    00769 *                         2: Memory allocation failed.
    00770 *                         3: Invalid tabular parameters.
    00771 *
    00772 *                       For returns > 1, a detailed error message is set in
    00773 *                       wcsprm::err if enabled, see wcserr_enable().
    00774 *
    00775 *
    00776 * wcsidx() - Index alternate coordinate representations
    00777 * -----------------------------------------------------
    00778 * wcsidx() returns an array of 27 indices for the alternate coordinate
    00779 * representations in the array of wcsprm structs returned by wcspih().  For
    00780 * the array returned by wcsbth() it returns indices for the unattached
    00781 * (colnum == 0) representations derived from image header keywords - use
    00782 * wcsbdx() for those derived from binary table image arrays or pixel lists
    00783 * keywords.
    00784 *
    00785 * Given:
    00786 *   nwcs      int       Number of coordinate representations in the array.
    00787 *
    00788 *   wcs       const struct wcsprm**
    00789 *                       Pointer to an array of wcsprm structs returned by
    00790 *                       wcspih() or wcsbth().
    00791 *
    00792 * Returned:
    00793 *   alts      int[27]   Index of each alternate coordinate representation in
    00794 *                       the array: alts[0] for the primary, alts[1] for 'A',
    00795 *                       etc., set to -1 if not present.
    00796 *
    00797 *                       For example, if there was no 'P' representation then
    00798 *
    00799 =                         alts['P'-'A'+1] == -1;
    00800 *
    00801 *                       Otherwise, the address of its wcsprm struct would be
    00802 *
    00803 =                         wcs + alts['P'-'A'+1];
    00804 *
    00805 * Function return value:
    00806 *             int       Status return value:
    00807 *                         0: Success.
    00808 *                         1: Null wcsprm pointer passed.
    00809 *
    00810 *
    00811 * wcsbdx() - Index alternate coordinate representions
    00812 * ---------------------------------------------------
    00813 * wcsbdx() returns an array of 999 x 27 indices for the alternate coordinate
    00814 * representions for binary table image arrays xor pixel lists in the array of
    00815 * wcsprm structs returned by wcsbth().  Use wcsidx() for the unattached
    00816 * representations derived from image header keywords.
    00817 *
    00818 * Given:
    00819 *   nwcs      int       Number of coordinate representations in the array.
    00820 *
    00821 *   wcs       const struct wcsprm**
    00822 *                       Pointer to an array of wcsprm structs returned by
    00823 *                       wcsbth().
    00824 *
    00825 *   type      int       Select the type of coordinate representation:
    00826 *                         0: binary table image arrays,
    00827 *                         1: pixel lists.
    00828 *
    00829 * Returned:
    00830 *   alts      short[1000][28]
    00831 *                       Index of each alternate coordinate represention in the
    00832 *                       array: alts[col][0] for the primary, alts[col][1] for
    00833 *                       'A', to alts[col][26] for 'Z', where col is the
    00834 *                       1-relative column number, and col == 0 is used for
    00835 *                       unattached image headers.  Set to -1 if not present.
    00836 *
    00837 *                       alts[col][27] counts the number of coordinate
    00838 *                       representations of the chosen type for each column.
    00839 *
    00840 *                       For example, if there was no 'P' represention for
    00841 *                       column 13 then
    00842 *
    00843 =                         alts[13]['P'-'A'+1] == -1;
    00844 *
    00845 *                       Otherwise, the address of its wcsprm struct would be
    00846 *
    00847 =                         wcs + alts[13]['P'-'A'+1];
    00848 *
    00849 * Function return value:
    00850 *             int       Status return value:
    00851 *                         0: Success.
    00852 *                         1: Null wcsprm pointer passed.
    00853 *
    00854 *
    00855 * wcsvfree() - Free the array of wcsprm structs
    00856 * ---------------------------------------------
    00857 * wcsvfree() frees the memory allocated by wcspih() or wcsbth() for the array
    00858 * of wcsprm structs, first invoking wcsfree() on each of the array members.
    00859 *
    00860 * Given and returned:
    00861 *   nwcs      int*      Number of coordinate representations found; set to 0
    00862 *                       on return.
    00863 *
    00864 *   wcs       struct wcsprm**
    00865 *                       Pointer to the array of wcsprm structs; set to 0 on
    00866 *                       return.
    00867 *
    00868 * Function return value:
    00869 *             int       Status return value:
    00870 *                         0: Success.
    00871 *                         1: Null wcsprm pointer passed.
    00872 *
    00873 *
    00874 * wcshdo() - Write out a wcsprm struct as a FITS header
    00875 * -----------------------------------------------------
    00876 * wcshdo() translates a wcsprm struct into a FITS header.  If the colnum
    00877 * member of the struct is non-zero then a binary table image array header will
    00878 * be produced.  Otherwise, if the colax[] member of the struct is set non-zero
    00879 * then a pixel list header will be produced.  Otherwise, a primary image or
    00880 * image extension header will be produced.
    00881 *
    00882 * If the struct was originally constructed from a header, e.g. by wcspih(),
    00883 * the output header will almost certainly differ in a number of respects:
    00884 *
    00885 *   - The output header only contains WCS-related keywords.  In particular, it
    00886 *     does not contain syntactically-required keywords such as SIMPLE, NAXIS,
    00887 *     BITPIX, or END.
    00888 *
    00889 *   - Deprecated (e.g. CROTAn) or non-standard usage will be translated to
    00890 *     standard (this is partially dependent on whether wcsfix() was applied).
    00891 *
    00892 *   - Quantities will be converted to the units used internally, basically SI
    00893 *     with the addition of degrees.
    00894 *
    00895 *   - Floating-point quantities may be given to a different decimal precision.
    00896 *
    00897 *   - Elements of the PCi_ja matrix will be written if and only if they differ
    00898 *     from the unit matrix.  Thus, if the matrix is unity then no elements
    00899 *     will be written.
    00900 *
    00901 *   - Additional keywords such as WCSAXESa, CUNITia, LONPOLEa and LATPOLEa may
    00902 *     appear.
    00903 *
    00904 *   - The original keycomments will be lost, although wcshdo() tries hard to
    00905 *     write meaningful comments.
    00906 *
    00907 *   - Keyword order may be changed.
    00908 *
    00909 * Keywords can be translated between the image array, binary table, and pixel
    00910 * lists forms by manipulating the colnum or colax[] members of the wcsprm
    00911 * struct.
    00912 *
    00913 * Given:
    00914 *   relax     int       Degree of permissiveness:
    00915 *                          0: Recognize only FITS keywords defined by the
    00916 *                             published WCS standard.
    00917 *                         -1: Admit all informal extensions of the WCS
    00918 *                             standard.
    00919 *                       Fine-grained control of the degree of permissiveness
    00920 *                       is also possible as explained in the notes below.
    00921 *
    00922 * Given and returned:
    00923 *   wcs       struct wcsprm*
    00924 *                       Pointer to a wcsprm struct containing coordinate
    00925 *                       transformation parameters.  Will be initialized if
    00926 *                       necessary.
    00927 *
    00928 * Returned:
    00929 *   nkeyrec   int*      Number of FITS header keyrecords returned in the
    00930 *                       "header" array.
    00931 *
    00932 *   header    char**    Pointer to an array of char holding the header.
    00933 *                       Storage for the array is allocated by wcshdo() in
    00934 *                       blocks of 2880 bytes (32 x 80-character keyrecords)
    00935 *                       and must be free'd by the user to avoid memory leaks.
    00936 *
    00937 *                       Each keyrecord is 80 characters long and is *NOT*
    00938 *                       null-terminated, so the first keyrecord starts at
    00939 *                       (*header)[0], the second at (*header)[80], etc.
    00940 *
    00941 * Function return value:
    00942 *             int       Status return value (associated with wcs_errmsg[]):
    00943 *                         0: Success.
    00944 *                         1: Null wcsprm pointer passed.
    00945 *                         2: Memory allocation failed.
    00946 *                         3: Linear transformation matrix is singular.
    00947 *                         4: Inconsistent or unrecognized coordinate axis
    00948 *                            types.
    00949 *                         5: Invalid parameter value.
    00950 *                         6: Invalid coordinate transformation parameters.
    00951 *                         7: Ill-conditioned coordinate transformation
    00952 *                            parameters.
    00953 *
    00954 *                       For returns > 1, a detailed error message is set in
    00955 *                       wcsprm::err if enabled, see wcserr_enable().
    00956 *
    00957 * Notes:
    00958 *   wcshdo() interprets the "relax" argument as a vector of flag bits to
    00959 *   provide fine-grained control over what non-standard WCS keywords to write.
    00960 *   The flag bits are subject to change in future and should be set by using
    00961 *   the preprocessor macros (see below) for the purpose.
    00962 *
    00963 *   - WCSHDO_none: Don't use any extensions.
    00964 *
    00965 *   - WCSHDO_all: Write all recognized extensions, equivalent to setting each
    00966 *           flag bit.
    00967 *
    00968 *   - WCSHDO_safe: Write all extensions that are considered to be safe and
    00969 *           recommended.
    00970 *
    00971 *   - WCSHDO_DOBSn: Write DOBSn, the column-specific analogue of DATE-OBS for
    00972 *           use in binary tables and pixel lists.  WCS Paper III introduced
    00973 *           DATE-AVG and DAVGn but by an oversight DOBSn (the obvious analogy)
    00974 *           was never formally defined by the standard.  The alternative to
    00975 *           using DOBSn is to write DATE-OBS which applies to the whole table.
    00976 *           This usage is considered to be safe and is recommended.
    00977 *
    00978 *   - WCSHDO_TPCn_ka: WCS Paper I defined
    00979 *
    00980 *           - TPn_ka and TCn_ka for pixel lists
    00981 *
    00982 *           but WCS Paper II uses TPCn_ka in one example and subsequently the
    00983 *           errata for the WCS papers legitimized the use of
    00984 *
    00985 *           - TPCn_ka and TCDn_ka for pixel lists
    00986 *
    00987 *           provided that the keyword does not exceed eight characters.  This
    00988 *           usage is considered to be safe and is recommended because of the
    00989 *           non-mnemonic terseness of the shorter forms.
    00990 *
    00991 *   - WCSHDO_PVn_ma: WCS Paper I defined
    00992 *
    00993 *           - iVn_ma and iSn_ma for bintables and
    00994 *           - TVn_ma and TSn_ma for pixel lists
    00995 *
    00996 *           but WCS Paper II uses iPVn_ma and TPVn_ma in the examples and
    00997 *           subsequently the errata for the WCS papers legitimized the use of
    00998 *
    00999 *           - iPVn_ma and iPSn_ma for bintables and
    01000 *           - TPVn_ma and TPSn_ma for pixel lists
    01001 *
    01002 *           provided that the keyword does not exceed eight characters.  This
    01003 *           usage is considered to be safe and is recommended because of the
    01004 *           non-mnemonic terseness of the shorter forms.
    01005 *
    01006 *   - WCSHDO_CRPXna: For historical reasons WCS Paper I defined
    01007 *
    01008 *           - jCRPXn, iCDLTn, iCUNIn, iCTYPn, and iCRVLn for bintables and
    01009 *           - TCRPXn, TCDLTn, TCUNIn, TCTYPn, and TCRVLn for pixel lists
    01010 *
    01011 *           for use without an alternate version specifier.  However, because
    01012 *           of the eight-character keyword constraint, in order to accommodate
    01013 *           column numbers greater than 99 WCS Paper I also defined
    01014 *
    01015 *           - jCRPna, iCDEna, iCUNna, iCTYna and iCRVna for bintables and
    01016 *           - TCRPna, TCDEna, TCUNna, TCTYna and TCRVna for pixel lists
    01017 *
    01018 *           for use with an alternate version specifier (the "a").  Like the
    01019 *           PC, CD, PV, and PS keywords there is an obvious tendency to
    01020 *           confuse these two forms for column numbers up to 99.  It is very
    01021 *           unlikely that any parser would reject keywords in the first set
    01022 *           with a non-blank alternate version specifier so this usage is
    01023 *           considered to be safe and is recommended.
    01024 *
    01025 *   - WCSHDO_CNAMna: WCS Papers I and III defined
    01026 *
    01027 *           - iCNAna,  iCRDna,  and iCSYna  for bintables and
    01028 *           - TCNAna,  TCRDna,  and TCSYna  for pixel lists
    01029 *
    01030 *           By analogy with the above, the long forms would be
    01031 *
    01032 *           - iCNAMna, iCRDEna, and iCSYEna for bintables and
    01033 *           - TCNAMna, TCRDEna, and TCSYEna for pixel lists
    01034 *
    01035 *           Note that these keywords provide auxiliary information only, none
    01036 *           of them are needed to compute world coordinates.  This usage is
    01037 *           potentially unsafe and is not recommended at this time.
    01038 *
    01039 *   - WCSHDO_WCSNna: In light of wcsbth() note 4, write WCSNna instead of
    01040 *           TWCSna for pixel lists.  While wcsbth() treats WCSNna and TWCSna
    01041 *           as equivalent, other parsers may not.  Consequently, this usage
    01042 *           is potentially unsafe and is not recommended at this time.
    01043 *
    01044 *
    01045 * Global variable: const char *wcshdr_errmsg[] - Status return messages
    01046 * ---------------------------------------------------------------------
    01047 * Error messages to match the status value returned from each function.
    01048 * Use wcs_errmsg[] for status returns from wcshdo().
    01049 *
    01050 *===========================================================================*/
    01051
    01052 #ifndef WCSLIB_WCSHDR
    01053 #define WCSLIB_WCSHDR
    01054
    01055 #include "wcs.h"
    01056
    01057 #ifdef __cplusplus
    01058 extern "C" {
    01059 #endif
    01060
    01061 #define WCSHDR_none     0x00000000
    01062 #define WCSHDR_all      0x000FFFFF
    01063 #define WCSHDR_reject   0x10000000
    01064
    01065 #define WCSHDR_CROTAia  0x00000001
    01066 #define WCSHDR_EPOCHa   0x00000002
    01067 #define WCSHDR_VELREFa  0x00000004
    01068 #define WCSHDR_CD00i00j 0x00000008
    01069 #define WCSHDR_PC00i00j 0x00000010
    01070 #define WCSHDR_PROJPn   0x00000020
    01071 #define WCSHDR_RADECSYS 0x00000040
    01072 #define WCSHDR_VSOURCE  0x00000080
    01073 #define WCSHDR_DOBSn    0x00000100
    01074 #define WCSHDR_LONGKEY  0x00000200
    01075 #define WCSHDR_CNAMn    0x00000400
    01076 #define WCSHDR_AUXIMG   0x00000800
    01077 #define WCSHDR_ALLIMG   0x00001000
    01078
    01079 #define WCSHDR_IMGHEAD  0x00010000
    01080 #define WCSHDR_BIMGARR  0x00020000
    01081 #define WCSHDR_PIXLIST  0x00040000
    01082
    01083 #define WCSHDO_none     0x00
    01084 #define WCSHDO_all      0xFF
    01085 #define WCSHDO_safe     0x0F
    01086 #define WCSHDO_DOBSn    0x01
    01087 #define WCSHDO_TPCn_ka  0x02
    01088 #define WCSHDO_PVn_ma   0x04
    01089 #define WCSHDO_CRPXna   0x08
    01090 #define WCSHDO_CNAMna   0x10
    01091 #define WCSHDO_WCSNna   0x20
    01092
    01093
    01094 extern const char *wcshdr_errmsg[];
    01095
    01096 enum wcshdr_errmsg_enum {
    01097   WCSHDRERR_SUCCESS            = 0,     /* Success. */
    01098   WCSHDRERR_NULL_POINTER       = 1,     /* Null wcsprm pointer passed. */
    01099   WCSHDRERR_MEMORY             = 2,     /* Memory allocation failed. */
    01100   WCSHDRERR_BAD_COLUMN         = 3,     /* Invalid column selection. */
    01101   WCSHDRERR_PARSER             = 4,     /* Fatal error returned by Flex
    01102                                            parser. */
    01103   WCSHDRERR_BAD_TABULAR_PARAMS = 5      /* Invalid tabular parameters. */
    01104 };
    01105
    01106 int wcspih(char *header, int nkeyrec, int relax, int ctrl, int *nreject,
    01107            int *nwcs, struct wcsprm **wcs);
    01108
    01109 int wcsbth(char *header, int nkeyrec, int relax, int ctrl, int keysel,
    01110            int *colsel, int *nreject, int *nwcs, struct wcsprm **wcs);
    01111
    01112 int wcstab(struct wcsprm *wcs);
    01113
    01114 int wcsidx(int nwcs, struct wcsprm **wcs, int alts[27]);
    01115
    01116 int wcsbdx(int nwcs, struct wcsprm **wcs, int type, short alts[1000][28]);
    01117
    01118 int wcsvfree(int *nwcs, struct wcsprm **wcs);
    01119
    01120 int wcshdo(int relax, struct wcsprm *wcs, int *nkeyrec, char **header);
    01121
    01122
    01123 #ifdef __cplusplus
    01124 }
    01125 #endif
    01126
    01127 #endif /* WCSLIB_WCSHDR */