1 #include "sofa.h"
2
iauPpp(double a[3],double b[3],double apb[3])3 void iauPpp(double a[3], double b[3], double apb[3])
4 /*
5 ** - - - - - - -
6 ** i a u P p p
7 ** - - - - - - -
8 **
9 ** P-vector addition.
10 **
11 ** This function is part of the International Astronomical Union's
12 ** SOFA (Standards Of Fundamental Astronomy) software collection.
13 **
14 ** Status: vector/matrix support function.
15 **
16 ** Given:
17 ** a double[3] first p-vector
18 ** b double[3] second p-vector
19 **
20 ** Returned:
21 ** apb double[3] a + b
22 **
23 ** Note:
24 ** It is permissible to re-use the same array for any of the
25 ** arguments.
26 **
27 ** This revision: 2021 May 11
28 **
29 ** SOFA release 2021-05-12
30 **
31 ** Copyright (C) 2021 IAU SOFA Board. See notes at end.
32 */
33 {
34 apb[0] = a[0] + b[0];
35 apb[1] = a[1] + b[1];
36 apb[2] = a[2] + b[2];
37
38 /* Finished. */
39
40 /*----------------------------------------------------------------------
41 **
42 ** Copyright (C) 2021
43 ** Standards Of Fundamental Astronomy Board
44 ** of the International Astronomical Union.
45 **
46 ** =====================
47 ** SOFA Software License
48 ** =====================
49 **
50 ** NOTICE TO USER:
51 **
52 ** BY USING THIS SOFTWARE YOU ACCEPT THE FOLLOWING SIX TERMS AND
53 ** CONDITIONS WHICH APPLY TO ITS USE.
54 **
55 ** 1. The Software is owned by the IAU SOFA Board ("SOFA").
56 **
57 ** 2. Permission is granted to anyone to use the SOFA software for any
58 ** purpose, including commercial applications, free of charge and
59 ** without payment of royalties, subject to the conditions and
60 ** restrictions listed below.
61 **
62 ** 3. You (the user) may copy and distribute SOFA source code to others,
63 ** and use and adapt its code and algorithms in your own software,
64 ** on a world-wide, royalty-free basis. That portion of your
65 ** distribution that does not consist of intact and unchanged copies
66 ** of SOFA source code files is a "derived work" that must comply
67 ** with the following requirements:
68 **
69 ** a) Your work shall be marked or carry a statement that it
70 ** (i) uses routines and computations derived by you from
71 ** software provided by SOFA under license to you; and
72 ** (ii) does not itself constitute software provided by and/or
73 ** endorsed by SOFA.
74 **
75 ** b) The source code of your derived work must contain descriptions
76 ** of how the derived work is based upon, contains and/or differs
77 ** from the original SOFA software.
78 **
79 ** c) The names of all routines in your derived work shall not
80 ** include the prefix "iau" or "sofa" or trivial modifications
81 ** thereof such as changes of case.
82 **
83 ** d) The origin of the SOFA components of your derived work must
84 ** not be misrepresented; you must not claim that you wrote the
85 ** original software, nor file a patent application for SOFA
86 ** software or algorithms embedded in the SOFA software.
87 **
88 ** e) These requirements must be reproduced intact in any source
89 ** distribution and shall apply to anyone to whom you have
90 ** granted a further right to modify the source code of your
91 ** derived work.
92 **
93 ** Note that, as originally distributed, the SOFA software is
94 ** intended to be a definitive implementation of the IAU standards,
95 ** and consequently third-party modifications are discouraged. All
96 ** variations, no matter how minor, must be explicitly marked as
97 ** such, as explained above.
98 **
99 ** 4. You shall not cause the SOFA software to be brought into
100 ** disrepute, either by misuse, or use for inappropriate tasks, or
101 ** by inappropriate modification.
102 **
103 ** 5. The SOFA software is provided "as is" and SOFA makes no warranty
104 ** as to its use or performance. SOFA does not and cannot warrant
105 ** the performance or results which the user may obtain by using the
106 ** SOFA software. SOFA makes no warranties, express or implied, as
107 ** to non-infringement of third party rights, merchantability, or
108 ** fitness for any particular purpose. In no event will SOFA be
109 ** liable to the user for any consequential, incidental, or special
110 ** damages, including any lost profits or lost savings, even if a
111 ** SOFA representative has been advised of such damages, or for any
112 ** claim by any third party.
113 **
114 ** 6. The provision of any version of the SOFA software under the terms
115 ** and conditions specified herein does not imply that future
116 ** versions will also be made available under the same terms and
117 ** conditions.
118 *
119 ** In any published work or commercial product which uses the SOFA
120 ** software directly, acknowledgement (see www.iausofa.org) is
121 ** appreciated.
122 **
123 ** Correspondence concerning SOFA software should be addressed as
124 ** follows:
125 **
126 ** By email: sofa@ukho.gov.uk
127 ** By post: IAU SOFA Center
128 ** HM Nautical Almanac Office
129 ** UK Hydrographic Office
130 ** Admiralty Way, Taunton
131 ** Somerset, TA1 2DN
132 ** United Kingdom
133 **
134 **--------------------------------------------------------------------*/
135 }
136