#if !defined( SLAMAP_INCLUDED ) /* Include this file only once */
#define SLAMAP_INCLUDED
/*
*+
* Name:
* slamap.h
* Type:
* C include file.
* Purpose:
* Define the interface to the SlaMap class.
* Invocation:
* #include "slamap.h"
* Description:
* This include file defines the interface to the SlaMap class and
* provides the type definitions, function prototypes and macros,
* etc. needed to use this class.
*
* The SlaMap class encapsulates the conversions provided by the
* SLALIB library (SUN/67) for converting between different sky
* coordinate systems. Since, typically, a sequence of these
* SLALIB conversions is required, an SlaMap can be used to
* accumulate a series of conversions which it then applies in
* sequence.
* Inheritance:
* The SlaMap class inherits from the Mapping class.
* Attributes Over-Ridden:
* None.
* New Attributes Defined:
* None.
* Methods Over-Ridden:
* Public:
* astTransform
* Use an SlaMap to transform a set of points.
* Protected:
* astMapMerge
* Simplify a sequence of Mappings containing an SlaMap.
* New Methods Defined:
* Public:
* astSlaAdd
* Add a coordinate conversion step to an SlaMap.
* Private:
* None.
* Other Class Functions:
* Public:
* astIsASlaMap
* Test class membership.
* astSlaMap
* Create an SlaMap.
* Protected:
* astCheckSlaMap
* Validate class membership.
* astInitSlaMap
* Initialise an SlaMap.
* astLoadSlaMap
* Load an SlaMap.
* Macros:
* None.
* Type Definitions:
* Public:
* AstSlaMap
* SlaMap object type.
* Protected:
* AstSlaMapVtab
* SlaMap virtual function table type.
* Feature Test Macros:
* astCLASS
* If the astCLASS macro is undefined, only public symbols are
* made available, otherwise protected symbols (for use in other
* class implementations) are defined. This macro also affects
* the reporting of error context information, which is only
* provided for external calls to the AST library.
* Copyright:
* Copyright (C) 1997-2006 Council for the Central Laboratory of the
* Research Councils
* Licence:
* This program is free software: you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation, either
* version 3 of the License, or (at your option) any later
* version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General
* License along with this program. If not, see
* .
* Authors:
* RFWS: R.F. Warren-Smith (Starlink)
* DSB: David S. Berry (Starlink)
* History:
* 26-APR-1996 (RFWS):
* Original version.
* 26-SEP-1996 (RFWS):
* Added external interface and I/O facilities.
* 23-MAY-1997 (RFWS):
* Over-ride the astMapMerge method.
* 15-OCT-2002 (DSB):
* Added astSTPConv, astSTPConv1, and STP coordinate system macros.
* 8-JAN-2003 (DSB):
* Added protected astInitSlaMapVtab method.
* 22-FEB-2006 (DSB):
* Added cvtextra to the AstSlaMap structure.
*-
*/
/* Include files. */
/* ============== */
/* Interface definitions. */
/* ---------------------- */
#include "mapping.h" /* Coordinate mappings (parent class) */
#if defined(astCLASS) /* Protected */
#include "pointset.h" /* Sets of points/coordinates */
#include "channel.h" /* I/O channels */
#endif
/* C header files. */
/* --------------- */
#if defined(astCLASS) /* Protected */
#include
#endif
/* Macros */
/* ====== */
#if defined(astCLASS) /* Protected */
#define AST__NOSTP -1 /* An invalid value for an STP coordinate system */
#define AST__HAE 0 /* Heliocentric-aries-ecliptic spherical coordinates */
#define AST__HAEC 1 /* Heliocentric-aries-ecliptic cartesian coordinates */
#define AST__HAQ 2 /* Heliocentric-aries-equatorial spherical coordinates */
#define AST__HAQC 3 /* Heliocentric-aries-equatorial cartesian coordinates */
#define AST__HG 4 /* Heliographic spherical coordinates */
#define AST__HGC 5 /* Heliographic cartesian coordinates */
#define AST__HPC 6 /* Helioprojective-cartesian spherical coordinates */
#define AST__HPCC 7 /* Helioprojective-cartesian cartesian coordinates */
#define AST__HPR 8 /* Helioprojective-radial spherical coordinates */
#define AST__HPRC 9 /* Helioprojective-radial cartesian coordinates */
#define AST__GSE 10 /* Geocentric-solar-ecliptic spherical coordinates */
#define AST__GSEC 11 /* Geocentric-solar-ecliptic cartesian coordinates */
#endif
/* One IAU astronomical unit, in metres. */
#define AST__AU 1.49597870E11
/* One solar radius (top of photosphere?), in metres (from "The Explanatory
Supplement to the Astronomical Almanac"). */
#define AST__SOLRAD 6.96E8
/* Define a dummy __attribute__ macro for use on non-GNU compilers. */
#ifndef __GNUC__
# define __attribute__(x) /*NOTHING*/
#endif
/* SlaMap structure. */
/* ----------------- */
/* This structure contains all information that is unique to each
object in the class (e.g. its instance variables). */
typedef struct AstSlaMap {
/* Attributes inherited from the parent class. */
AstMapping mapping; /* Parent class structure */
/* Attributes specific to objects in this class. */
int *cvttype; /* Pointer to array of conversion types */
double **cvtargs; /* Pointer to argument list pointer array */
double **cvtextra; /* Pointer to intermediate values pointer array */
int ncvt; /* Number of conversions to perform */
} AstSlaMap;
/* Virtual function table. */
/* ----------------------- */
/* This table contains all information that is the same for all
objects in the class (e.g. pointers to its virtual functions). */
#if defined(astCLASS) /* Protected */
typedef struct AstSlaMapVtab {
/* Properties (e.g. methods) inherited from the parent class. */
AstMappingVtab mapping_vtab; /* Parent class virtual function table */
/* A Unique identifier to determine class membership. */
AstClassIdentifier id;
/* Properties (e.g. methods) specific to this class. */
void (* SlaAdd)( AstSlaMap *, const char *, int, const double[], int * );
int (* SlaIsEmpty)( AstSlaMap *, int * );
} AstSlaMapVtab;
#if defined(THREAD_SAFE)
/* Define a structure holding all data items that are global within this
class. */
typedef struct AstSlaMapGlobals {
AstSlaMapVtab Class_Vtab;
int Class_Init;
double Eq_Cache;
double Ep_Cache;
double Amprms_Cache[ 21 ];
} AstSlaMapGlobals;
#endif
#endif
/* Function prototypes. */
/* ==================== */
/* Prototypes for standard class functions. */
/* ---------------------------------------- */
astPROTO_CHECK(SlaMap) /* Check class membership */
astPROTO_ISA(SlaMap) /* Test class membership */
/* Constructor. */
#if defined(astCLASS) /* Protected. */
AstSlaMap *astSlaMap_( int, const char *, int *, ...);
#else
AstSlaMap *astSlaMapId_( int, const char *, ... )__attribute__((format(printf,2,3)));
#endif
#if defined(astCLASS) /* Protected */
/* Initialiser. */
AstSlaMap *astInitSlaMap_( void *, size_t, int, AstSlaMapVtab *,
const char *, int, int * );
/* Vtab initialiser. */
void astInitSlaMapVtab_( AstSlaMapVtab *, const char *, int * );
/* Loader. */
AstSlaMap *astLoadSlaMap_( void *, size_t, AstSlaMapVtab *,
const char *, AstChannel *, int * );
/* Thread-safe initialiser for all global data used by this module. */
#if defined(THREAD_SAFE)
void astInitSlaMapGlobals_( AstSlaMapGlobals * );
#endif
/* Other functions. */
void astSTPConv1_( double, int, double[3], double[3], int, double[3], double[3], int * );
void astSTPConv_( double, int, int, double[3], double *[3], int, double[3], double *[3], int * );
#endif
/* Prototypes for member functions. */
/* -------------------------------- */
void astSlaAdd_( AstSlaMap *, const char *, int, const double[], int * );
int astSlaIsEmpty_( AstSlaMap *, int * );
/* Function interfaces. */
/* ==================== */
/* These macros are wrap-ups for the functions defined by this class
to make them easier to invoke (e.g. to avoid type mis-matches when
passing pointers to objects from derived classes). */
/* Interfaces to standard class functions. */
/* --------------------------------------- */
/* Some of these functions provide validation, so we cannot use them
to validate their own arguments. We must use a cast when passing
object pointers (so that they can accept objects from derived
classes). */
/* Check class membership. */
#define astCheckSlaMap(this) astINVOKE_CHECK(SlaMap,this,0)
#define astVerifySlaMap(this) astINVOKE_CHECK(SlaMap,this,1)
/* Test class membership. */
#define astIsASlaMap(this) astINVOKE_ISA(SlaMap,this)
/* Constructor. */
#if defined(astCLASS) /* Protected. */
#define astSlaMap astINVOKE(F,astSlaMap_)
#else
#define astSlaMap astINVOKE(F,astSlaMapId_)
#endif
#if defined(astCLASS) /* Protected */
/* Initialiser. */
#define astInitSlaMap(mem,size,init,vtab,name,flags) \
astINVOKE(O,astInitSlaMap_(mem,size,init,vtab,name,flags,STATUS_PTR))
/* Vtab Initialiser. */
#define astInitSlaMapVtab(vtab,name) astINVOKE(V,astInitSlaMapVtab_(vtab,name,STATUS_PTR))
/* Loader. */
#define astLoadSlaMap(mem,size,vtab,name,channel) \
astINVOKE(O,astLoadSlaMap_(mem,size,vtab,name,astCheckChannel(channel),STATUS_PTR))
#endif
/* Interfaces to public member functions. */
/* -------------------------------------- */
/* Here we make use of astCheckSlaMap to validate SlaMap pointers
before use. This provides a contextual error report if a pointer
to the wrong sort of Object is supplied. */
#define astSlaAdd(this,cvt,narg,args) \
astINVOKE(V,astSlaAdd_(astCheckSlaMap(this),cvt,narg,args,STATUS_PTR))
#if defined(astCLASS) /* Protected */
#define astSTPConv astSTPConv_
#define astSTPConv1 astSTPConv1_
#define astSlaIsEmpty(this) astINVOKE(V,astSlaIsEmpty_(astCheckSlaMap(this),STATUS_PTR))
#endif
#endif