Skip to content

Commit 74f926f

Browse files
albireoxalbireox
committed
Update SOFA library to 2023-10-11
1 parent d72ddee commit 74f926f

File tree

252 files changed

+3472
-1924
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

252 files changed

+3472
-1924
lines changed

‎CHANGELOG.rst‎

Lines changed: 5 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4,6 +4,11 @@
44
Change Log
55
==========
66

7+
Next release
8+
------------
9+
* Update SOFA library to 2023-10-11.
10+
11+
712
1.15.0 (2025-08-04)
813
-------------------
914
* Update default scale settings for APO and LCO.

‎cextern/sofa/a2af.c‎

Lines changed: 8 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23

34
void iauA2af(int ndp, double angle, char *sign, int idmsf[4])
45
/*
@@ -9,7 +10,7 @@ void iauA2af(int ndp, double angle, char *sign, int idmsf[4])
910
** Decompose radians into degrees, arcminutes, arcseconds, fraction.
1011
**
1112
** This function is part of the International Astronomical Union's
12-
** SOFA (Standards Of Fundamental Astronomy) software collection.
13+
** SOFA (Standards of Fundamental Astronomy) software collection.
1314
**
1415
** Status: vector/matrix support function.
1516
**
@@ -56,11 +57,11 @@ void iauA2af(int ndp, double angle, char *sign, int idmsf[4])
5657
** Called:
5758
** iauD2tf decompose days to hms
5859
**
59-
** This revision: 2020 April 1
60+
** This revision: 2021 May 11
6061
**
61-
** SOFA release 2020-07-21
62+
** SOFA release 2023-10-11
6263
**
63-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
64+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
6465
*/
6566
{
6667
/* Hours to degrees * radians to turns */
@@ -70,12 +71,12 @@ void iauA2af(int ndp, double angle, char *sign, int idmsf[4])
7071
/* Scale then use days to h,m,s function. */
7172
iauD2tf(ndp, angle*F, sign, idmsf);
7273

73-
return;
74+
/* Finished. */
7475

7576
/*----------------------------------------------------------------------
7677
**
77-
** Copyright (C) 2020
78-
** Standards Of Fundamental Astronomy Board
78+
** Copyright (C) 2023
79+
** Standards of Fundamental Astronomy Board
7980
** of the International Astronomical Union.
8081
**
8182
** =====================

‎cextern/sofa/a2tf.c‎

Lines changed: 8 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23

34
void iauA2tf(int ndp, double angle, char *sign, int ihmsf[4])
45
/*
@@ -9,7 +10,7 @@ void iauA2tf(int ndp, double angle, char *sign, int ihmsf[4])
910
** Decompose radians into hours, minutes, seconds, fraction.
1011
**
1112
** This function is part of the International Astronomical Union's
12-
** SOFA (Standards Of Fundamental Astronomy) software collection.
13+
** SOFA (Standards of Fundamental Astronomy) software collection.
1314
**
1415
** Status: vector/matrix support function.
1516
**
@@ -56,22 +57,22 @@ void iauA2tf(int ndp, double angle, char *sign, int ihmsf[4])
5657
** Called:
5758
** iauD2tf decompose days to hms
5859
**
59-
** This revision: 2020 April 1
60+
** This revision: 2021 May 11
6061
**
61-
** SOFA release 2020-07-21
62+
** SOFA release 2023-10-11
6263
**
63-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
64+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
6465
*/
6566
{
6667
/* Scale then use days to h,m,s function. */
6768
iauD2tf(ndp, angle/D2PI, sign, ihmsf);
6869

69-
return;
70+
/* Finished. */
7071

7172
/*----------------------------------------------------------------------
7273
**
73-
** Copyright (C) 2020
74-
** Standards Of Fundamental Astronomy Board
74+
** Copyright (C) 2023
75+
** Standards of Fundamental Astronomy Board
7576
** of the International Astronomical Union.
7677
**
7778
** =====================

‎cextern/sofa/ab.c‎

Lines changed: 6 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23

34
void iauAb(double pnat[3], double v[3], double s, double bm1,
45
double ppr[3])
@@ -53,11 +54,11 @@ void iauAb(double pnat[3], double v[3], double s, double bm1,
5354
** Called:
5455
** iauPdp scalar product of two p-vectors
5556
**
56-
** This revision: 2013 October 9
57+
** This revision: 2021 February 24
5758
**
58-
** SOFA release 2020-07-21
59+
** SOFA release 2023-10-11
5960
**
60-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
61+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
6162
*/
6263
{
6364
int i;
@@ -82,8 +83,8 @@ void iauAb(double pnat[3], double v[3], double s, double bm1,
8283

8384
/*----------------------------------------------------------------------
8485
**
85-
** Copyright (C) 2020
86-
** Standards Of Fundamental Astronomy Board
86+
** Copyright (C) 2023
87+
** Standards of Fundamental Astronomy Board
8788
** of the International Astronomical Union.
8889
**
8990
** =====================

‎cextern/sofa/ae2hd.c‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -59,9 +59,9 @@ void iauAe2hd (double az, double el, double phi,
5959
**
6060
** Last revision: 2017 September 12
6161
**
62-
** SOFA release 2020-07-21
62+
** SOFA release 2023-10-11
6363
**
64-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
64+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
6565
*/
6666
{
6767
double sa, ca, se, ce, sp, cp, x, y, z, r;
@@ -89,8 +89,8 @@ void iauAe2hd (double az, double el, double phi,
8989

9090
/*----------------------------------------------------------------------
9191
**
92-
** Copyright (C) 2020
93-
** Standards Of Fundamental Astronomy Board
92+
** Copyright (C) 2023
93+
** Standards of Fundamental Astronomy Board
9494
** of the International Astronomical Union.
9595
**
9696
** =====================

‎cextern/sofa/af2a.c‎

Lines changed: 8 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23
#include <stdlib.h>
34

45
int iauAf2a(char s, int ideg, int iamin, double asec, double *rad)
@@ -39,11 +40,11 @@ int iauAf2a(char s, int ideg, int iamin, double asec, double *rad)
3940
** 3) If there are multiple errors, the status value reflects only the
4041
** first, the smallest taking precedence.
4142
**
42-
** This revision: 2013 June 18
43+
** This revision: 2021 May 11
4344
**
44-
** SOFA release 2020-07-21
45+
** SOFA release 2023-10-11
4546
**
46-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
47+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
4748
*/
4849
{
4950

@@ -59,10 +60,12 @@ int iauAf2a(char s, int ideg, int iamin, double asec, double *rad)
5960
if ( asec < 0.0 || asec >= 60.0 ) return 3;
6061
return 0;
6162

63+
/* Finished. */
64+
6265
/*----------------------------------------------------------------------
6366
**
64-
** Copyright (C) 2020
65-
** Standards Of Fundamental Astronomy Board
67+
** Copyright (C) 2023
68+
** Standards of Fundamental Astronomy Board
6669
** of the International Astronomical Union.
6770
**
6871
** =====================

‎cextern/sofa/anp.c‎

Lines changed: 9 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23

34
double iauAnp(double a)
45
/*
@@ -9,7 +10,7 @@ double iauAnp(double a)
910
** Normalize angle into the range 0 <= a < 2pi.
1011
**
1112
** This function is part of the International Astronomical Union's
12-
** SOFA (Standards Of Fundamental Astronomy) software collection.
13+
** SOFA (Standards of Fundamental Astronomy) software collection.
1314
**
1415
** Status: vector/matrix support function.
1516
**
@@ -19,11 +20,11 @@ double iauAnp(double a)
1920
** Returned (function value):
2021
** double angle in range 0-2pi
2122
**
22-
** This revision: 2013 June 18
23+
** This revision: 2021 May 11
2324
**
24-
** SOFA release 2020-07-21
25+
** SOFA release 2023-10-11
2526
**
26-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
27+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
2728
*/
2829
{
2930
double w;
@@ -34,10 +35,12 @@ double iauAnp(double a)
3435

3536
return w;
3637

38+
/* Finished. */
39+
3740
/*----------------------------------------------------------------------
3841
**
39-
** Copyright (C) 2020
40-
** Standards Of Fundamental Astronomy Board
42+
** Copyright (C) 2023
43+
** Standards of Fundamental Astronomy Board
4144
** of the International Astronomical Union.
4245
**
4346
** =====================

‎cextern/sofa/anpm.c‎

Lines changed: 9 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -1,4 +1,5 @@
11
#include "sofa.h"
2+
#include "sofam.h"
23

34
double iauAnpm(double a)
45
/*
@@ -9,7 +10,7 @@ double iauAnpm(double a)
910
** Normalize angle into the range -pi <= a < +pi.
1011
**
1112
** This function is part of the International Astronomical Union's
12-
** SOFA (Standards Of Fundamental Astronomy) software collection.
13+
** SOFA (Standards of Fundamental Astronomy) software collection.
1314
**
1415
** Status: vector/matrix support function.
1516
**
@@ -19,11 +20,11 @@ double iauAnpm(double a)
1920
** Returned (function value):
2021
** double angle in range +/-pi
2122
**
22-
** This revision: 2013 June 18
23+
** This revision: 2021 May 11
2324
**
24-
** SOFA release 2020-07-21
25+
** SOFA release 2023-10-11
2526
**
26-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
27+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
2728
*/
2829
{
2930
double w;
@@ -34,10 +35,12 @@ double iauAnpm(double a)
3435

3536
return w;
3637

38+
/* Finished. */
39+
3740
/*----------------------------------------------------------------------
3841
**
39-
** Copyright (C) 2020
40-
** Standards Of Fundamental Astronomy Board
42+
** Copyright (C) 2023
43+
** Standards of Fundamental Astronomy Board
4144
** of the International Astronomical Union.
4245
**
4346
** =====================

‎cextern/sofa/apcg.c‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -109,9 +109,9 @@ void iauApcg(double date1, double date2,
109109
**
110110
** This revision: 2013 October 9
111111
**
112-
** SOFA release 2020-07-21
112+
** SOFA release 2023-10-11
113113
**
114-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
114+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
115115
*/
116116
{
117117
/* Geocentric observer */
@@ -126,8 +126,8 @@ void iauApcg(double date1, double date2,
126126

127127
/*----------------------------------------------------------------------
128128
**
129-
** Copyright (C) 2020
130-
** Standards Of Fundamental Astronomy Board
129+
** Copyright (C) 2023
130+
** Standards of Fundamental Astronomy Board
131131
** of the International Astronomical Union.
132132
**
133133
** =====================

‎cextern/sofa/apcg13.c‎

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -111,9 +111,9 @@ void iauApcg13(double date1, double date2, iauASTROM *astrom)
111111
**
112112
** This revision: 2013 October 9
113113
**
114-
** SOFA release 2020-07-21
114+
** SOFA release 2023-10-11
115115
**
116-
** Copyright (C) 2020 IAU SOFA Board. See notes at end.
116+
** Copyright (C) 2023 IAU SOFA Board. See notes at end.
117117
*/
118118
{
119119
double ehpv[2][3], ebpv[2][3];
@@ -129,8 +129,8 @@ void iauApcg13(double date1, double date2, iauASTROM *astrom)
129129

130130
/*----------------------------------------------------------------------
131131
**
132-
** Copyright (C) 2020
133-
** Standards Of Fundamental Astronomy Board
132+
** Copyright (C) 2023
133+
** Standards of Fundamental Astronomy Board
134134
** of the International Astronomical Union.
135135
**
136136
** =====================

0 commit comments

Comments
 (0)