FACT++  1.0
pal1sofa.h
Go to the documentation of this file.
1 /*
2 *+
3 * Name:
4 * pal1sofa.h
5 
6 * Purpose:
7 * Mappings of ERFA names to SOFA names
8 
9 * Language:
10 * Starlink ANSI C
11 
12 * Type of Module:
13 * Include file
14 
15 * Invocation:
16 * #include "pal1sofa.h"
17 
18 * Description:
19 * PAL will work with both SOFA and ERFA libraries and the
20 * difference is generally a change in prefix. This include
21 * file maps the ERFA form of functions to the SOFA form
22 * and includes the relevant sofa.h vs erfa.h file.
23 
24 * Authors:
25 * TIMJ: Tim Jenness (JAC, Hawaii)
26 * {enter_new_authors_here}
27 
28 * Notes:
29 * - PAL uses the ERFA form by default.
30 
31 * History:
32 * 2014-07-29 (TIMJ):
33 * Initial version
34 * {enter_further_changes_here}
35 
36 * Copyright:
37 * Copyright (C) 2014 Tim Jenness
38 * All Rights Reserved.
39 
40 * Licence:
41 * This program is free software: you can redistribute it and/or
42 * modify it under the terms of the GNU Lesser General Public
43 * License as published by the Free Software Foundation, either
44 * version 3 of the License, or (at your option) any later
45 * version.
46 *
47 * This program is distributed in the hope that it will be useful,
48 * but WITHOUT ANY WARRANTY; without even the implied warranty of
49 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
50 * GNU Lesser General Public License for more details.
51 *
52 * You should have received a copy of the GNU Lesser General
53 * License along with this program. If not, see
54 * <http://www.gnu.org/licenses/>.
55 
56 * Bugs:
57 * {note_any_bugs_here}
58 *-
59 */
60 
61 #ifndef PAL1SOFAHDEF
62 #define PAL1SOFAHDEF
63 
64 #if HAVE_CONFIG_H
65 # include <config.h>
66 #endif
67 
68 # if HAVE_SOFA_H
69 
70 # include "sofa.h"
71 # include "sofam.h"
72 
73  /* Must replace ERFA with SOFA */
74 
75 # define eraA2af iauA2af
76 # define eraA2tf iauA2tf
77 # define eraAf2a iauAf2a
78 # define eraAnp iauAnp
79 # define eraAnpm iauAnpm
80 # define eraC2s iauC2s
81 # define eraCal2jd iauCal2jd
82 # define eraD2tf iauD2tf
83 # define eraDat iauDat
84 # define eraEe06a iauEe06a
85 # define eraEpb iauEpb
86 # define eraEpb2jd iauEpb2jd
87 # define eraEpj iauEpj
88 # define eraEpj2jd iauEpj2jd
89 # define eraEpv00 iauEpv00
90 # define eraFk5hz iauFk5hz
91 # define eraGd2gc iauGd2gc
92 # define eraGmst06 iauGmst06
93 # define eraHfk5z iauHfk5z
94 # define eraIr iauIr
95 # define eraJd2cal iauJd2cal
96 # define eraNut06a iauNut06a
97 # define eraObl06 iauObl06
98 # define eraP06e iauP06e
99 # define eraPap iauPap
100 # define eraPas iauPas
101 # define eraPdp iauPdp
102 # define eraPlan94 iauPlan94
103 # define eraPmat06 iauPmat06
104 # define eraPn iauPn
105 # define eraPnm06a iauPnm06a
106 # define eraPxp iauPxp
107 # define eraRefco iauRefco
108 # define eraRm2v iauRm2v
109 # define eraRv2m iauRv2m
110 # define eraRx iauRx
111 # define eraRxp iauRxp
112 # define eraRxpv iauRxpv
113 # define eraRxr iauRxr
114 # define eraRy iauRy
115 # define eraRz iauRz
116 # define eraS2c iauS2c
117 # define eraSepp iauSepp
118 # define eraSeps iauSeps
119 # define eraStarpm iauStarpm
120 # define eraTf2a iauTf2a
121 # define eraTf2d iauTf2d
122 # define eraTr iauTr
123 # define eraTrxp iauTrxp
124 
125 /* These are from sofam.h */
126 
127 # define ERFA_WGS84 WGS84
128 
129 # define ERFA_DJ00 DJ00
130 # define ERFA_DJY DJY
131 # define ERFA_DAU DAU
132 
133 # else
134 
135 # include "erfa.h"
136 # include "erfam.h"
137 
138 /* No further action required */
139 
140 # endif
141 
142 #endif