FACT++  1.0
ldsun.c
Go to the documentation of this file.
1 #include "erfa.h"
2 
3 void eraLdsun(double p[3], double e[3], double em, double p1[3])
4 /*
5 ** - - - - - - - - -
6 ** e r a L d s u n
7 ** - - - - - - - - -
8 **
9 ** Deflection of starlight by the Sun.
10 **
11 ** Given:
12 ** p double[3] direction from observer to star (unit vector)
13 ** e double[3] direction from Sun to observer (unit vector)
14 ** em double distance from Sun to observer (au)
15 **
16 ** Returned:
17 ** p1 double[3] observer to deflected star (unit vector)
18 **
19 ** Notes:
20 **
21 ** 1) The source is presumed to be sufficiently distant that its
22 ** directions seen from the Sun and the observer are essentially
23 ** the same.
24 **
25 ** 2) The deflection is restrained when the angle between the star and
26 ** the center of the Sun is less than about 9 arcsec, falling to
27 ** zero for zero separation. (The chosen threshold is within the
28 ** solar limb for all solar-system applications.)
29 **
30 ** 3) The arguments p and p1 can be the same array.
31 **
32 ** Called:
33 ** eraLd light deflection by a solar-system body
34 **
35 ** Copyright (C) 2013-2015, NumFOCUS Foundation.
36 ** Derived, with permission, from the SOFA library. See notes at end of file.
37 */
38 {
39  eraLd(1.0, p, p, e, em, 1e-9, p1);
40 
41 /* Finished. */
42 
43 }
44 /*----------------------------------------------------------------------
45 **
46 **
47 ** Copyright (C) 2013-2015, NumFOCUS Foundation.
48 ** All rights reserved.
49 **
50 ** This library is derived, with permission, from the International
51 ** Astronomical Union's "Standards of Fundamental Astronomy" library,
52 ** available from http://www.iausofa.org.
53 **
54 ** The ERFA version is intended to retain identical functionality to
55 ** the SOFA library, but made distinct through different function and
56 ** file names, as set out in the SOFA license conditions. The SOFA
57 ** original has a role as a reference standard for the IAU and IERS,
58 ** and consequently redistribution is permitted only in its unaltered
59 ** state. The ERFA version is not subject to this restriction and
60 ** therefore can be included in distributions which do not support the
61 ** concept of "read only" software.
62 **
63 ** Although the intent is to replicate the SOFA API (other than
64 ** replacement of prefix names) and results (with the exception of
65 ** bugs; any that are discovered will be fixed), SOFA is not
66 ** responsible for any errors found in this version of the library.
67 **
68 ** If you wish to acknowledge the SOFA heritage, please acknowledge
69 ** that you are using a library derived from SOFA, rather than SOFA
70 ** itself.
71 **
72 **
73 ** TERMS AND CONDITIONS
74 **
75 ** Redistribution and use in source and binary forms, with or without
76 ** modification, are permitted provided that the following conditions
77 ** are met:
78 **
79 ** 1 Redistributions of source code must retain the above copyright
80 ** notice, this list of conditions and the following disclaimer.
81 **
82 ** 2 Redistributions in binary form must reproduce the above copyright
83 ** notice, this list of conditions and the following disclaimer in
84 ** the documentation and/or other materials provided with the
85 ** distribution.
86 **
87 ** 3 Neither the name of the Standards Of Fundamental Astronomy Board,
88 ** the International Astronomical Union nor the names of its
89 ** contributors may be used to endorse or promote products derived
90 ** from this software without specific prior written permission.
91 **
92 ** THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
93 ** "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
94 ** LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
95 ** FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
96 ** COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
97 ** INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
98 ** BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
99 ** LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
100 ** CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
101 ** LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
102 ** ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
103 ** POSSIBILITY OF SUCH DAMAGE.
104 **
105 */
eraLd
void eraLd(double bm, double p[3], double q[3], double e[3], double em, double dlim, double p1[3])
Definition: ld.c:3
eraLdsun
void eraLdsun(double p[3], double e[3], double em, double p1[3])
Definition: ldsun.c:3