Changeset 18921 for trunk/FACT++/erfa
- Timestamp:
- 10/18/17 14:07:51 (7 years ago)
- Location:
- trunk/FACT++/erfa
- Files:
-
- 228 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/FACT++/erfa/README.rst
r18711 r18921 34 34 ERFA includes smaller changes that may or may not eventually make it into SOFA, 35 35 addressing localized bugs or similar smaller issues: 36 37 * ERFA 1.4.0 and SOFA "20170420" 38 39 + ERFA 1.4.0 adds the ``eraVersion`` and ``eraSofaVersion`` functions to 40 determine the installed version of ERFA (and the SOFA version it is derived 41 from). 42 43 + ERFA 1.4.0 includes some bug fixes contributed to ERFA after 1.3.0 but 44 before 1.4.0. These were incorporated (with modification) into 45 SOFA "20170420" (without attribution) and hence these are not differences 46 between ERFA and SOFA. (See https://github.com/liberfa/erfa/issues/40 and 47 https://github.com/liberfa/erfa/issues/41) 36 48 37 49 * ERFA 1.3.0 and SOFA "20160503_a" -
trunk/FACT++/erfa/RELEASE.rst
r18711 r18921 5 5 and change to the ERFA directory. 6 6 7 * Make sure you are on the "master" branch from the "liberfa" github 7 * Make sure you are on the "master" branch from the "liberfa" github 8 8 repository and have the latest version (if you have a fresh clone, this 9 9 should already be the case). … … 11 11 * If a new version of SOFA exists, run `sofa_deriver.py` from the `erfa-fetch 12 12 repository`_ in its own directory. That will create a directory called `erfa` 13 inside the `erfa-fetch` directory, and you should copy its contents to the 14 `src` directory of `erfa`. Add any new C files or header files added by SOFA 15 to ``src/Makefile.am``, as appropriate. Use ``git diff`` in `erfa` to inspect 13 inside the `erfa-fetch` directory, and you should copy its contents to the 14 `src` directory of `erfa`. Add any new C files or header files added by SOFA 15 to ``src/Makefile.am``, as appropriate. Use ``git diff`` in `erfa` to inspect 16 16 the changes, and then commit and push them to github. 17 17 18 18 * Update the version number in the `AC_INIT` macro of `configure.ac` to 19 the version number you are about to release, and also update the version 20 mentioned in `README.rst`. Follow the instructions in 19 the version number you are about to release, and also update the version 20 mentioned in `README.rst`. Follow the instructions in 21 21 `Version numbering` below. 22 22 23 * Update the version info of the shared library in the `ERFA_LIB_VERSION_INFO` 23 * Update the version info of the shared library in the `ERFA_LIB_VERSION_INFO` 24 24 macro of `configure.ac`. Follow the instructions in `Version numbering` below. 25 Also be sure to the ``OFA_VERSION` macro in the `configure.ac`. 25 26 26 * Commit these changes using ``git commit``, with a commit message like 27 * Commit these changes using ``git commit``, with a commit message like 27 28 ``Preparing release v0.0.1``. 28 29 29 * Run `./bootstrap.sh`: you need `automake`, `autoconf` and `libtool` 30 * Run `./bootstrap.sh`: you need `automake`, `autoconf` and `libtool` 30 31 installed. If no errors appear, this will create a new `./configure` 31 32 file. 32 33 33 * Run ``./configure``, which should create a `Makefile` in the top level 34 * Run ``./configure``, which should create a `Makefile` in the top level 34 35 directory and in ./src 35 36 … … 37 38 make sure they pass before proceeding. 38 39 39 * Run ``make distcheck``: this creates the distribution tarball, 40 * Run ``make distcheck``: this creates the distribution tarball, 40 41 unpackages it and runs the check inside the untarred directory. 41 42 The resulting tarball will be named e.g., `erfa-0.0.1.tar.gz` and 42 43 will be placed in the working directory. 43 44 44 * Tag the current commit with the version number. A signed tag is preferred if 45 you have an a signing key (e.g., do ``git tag -s v0.0.1``). 45 * Tag the current commit with the version number. A signed tag is preferred if 46 you have an a signing key (e.g., do ``git tag -s v0.0.1``). 46 47 47 * Push up your changes and the new tag to github: 48 * Push up your changes and the new tag to github: 48 49 ``git push --tags origin master``. (The command here assumes the git remote 49 50 "origin" points to the "liberfa/erfa" repository. If not, substitute the … … 51 52 52 53 * Go to the "liberfa/erfa" repository for the github page, and click on the 53 "releases" button, and then the release corresponding to the tag you just 54 made. 54 "releases" button, and then the release corresponding to the tag you just 55 made. 55 56 56 * Click on the "Draft release notes or downloads" button (or it might be 57 "Edit release"). Put the version number as the title (e.g., ``v0.0.1``)and 57 * Click on the "Draft release notes or downloads" button (or it might be 58 "Edit release"). Put the version number as the title (e.g., ``v0.0.1``)and 58 59 for the description put ``See `README.rst` for release notes.`` 59 60 60 61 * Upload the tarball you created (e.g., `erfa-0.0.1.tar.gz`) by dropping it 61 in the area that says "Attach binaries for this release by dropping them 62 here." 62 in the area that says "Attach binaries for this release by dropping them 63 here." 63 64 64 65 * Click the "Publish release" button. … … 73 74 74 75 ERFA needs to provide two different version numbers. You need to update both. 75 The first is the 76 **package version number** or **version number** proper. ERFA uses 76 The first is the 77 **package version number** or **version number** proper. ERFA uses 77 78 `semantic versioning <http://semver.org/>`_ to create this number. 78 For more on this choice, see 79 For more on this choice, see 79 80 `liberfa/erfa#6 <https://github.com/liberfa/erfa/issues/6>`_. 80 81 81 The second number is `shared library version info`. When a program has been 82 The second number is `shared library version info`. When a program has been 82 83 linked with the ERFA shared library, the dynamic linker checks the version 83 info of the library requested by the program with those of the libraries 84 info of the library requested by the program with those of the libraries 84 85 present if the system. This version info is important to binary distributions 85 86 (such as Linux distributions). ERFA uses `libtool versioning <http://www.gnu.org/software/libtool/manual/html_node/Libtool-versioning.html>`_. … … 104 105 105 106 * if there is a backwards incompatible change (function removed, types of 106 arguments altered, macros renamed...) then increase MAJOR by one and set 107 arguments altered, macros renamed...) then increase MAJOR by one and set 107 108 the others to zero. 108 * else if there is backwards compatible change (new function added or 109 new macro added) then do not change MAJOR, increase MINOR by one and 109 * else if there is backwards compatible change (new function added or 110 new macro added) then do not change MAJOR, increase MINOR by one and 110 111 set PATCH to zero. 111 112 * else … … 119 120 120 121 For the shared library version info, we are only interested in a subset of 121 the API, the **interfaces of the shared library**. As the C macros are 122 interpolated away at compile time, the interfaces in the ERFA 122 the API, the **interfaces of the shared library**. As the C macros are 123 interpolated away at compile time, the interfaces in the ERFA 123 124 shared library are: 124 125 125 * The names, return types, number of arguments and types of the functions 126 126 * The names, return types, number of arguments and types of the functions 127 127 128 Again, the release manager has to review the relevant information: 128 129 … … 130 131 * relevant bug reports in the github project page 131 132 132 The shared library version info is stored in three numbers called *current*, 133 *revision* and *age*. These numbers appear in the macro `ERFA_LIB_VERSION_INFO` 133 The shared library version info is stored in three numbers called *current*, 134 *revision* and *age*. These numbers appear in the macro `ERFA_LIB_VERSION_INFO` 134 135 in the mentioned order. 135 136 … … 137 138 138 139 * if there is a backwards incompatible change (function removed, types of 139 arguments altered...) then increase CURRENT by one and set 140 arguments altered...) then increase CURRENT by one and set 140 141 the others to zero (c,r,a -> c+1,0,0). 141 142 * else if there is backwards compatible change (new function added) 142 then increase both CURRENT and AGE by one, set REVISON to zero 143 then increase both CURRENT and AGE by one, set REVISON to zero 143 144 (c,r,a -> c+1,0,a+1). 144 145 * else if the library code has been modified at all … … 165 166 and age are incremented). 166 167 167 * SOFA makes a new relase fixing some bugs in the code without changing the 168 * SOFA makes a new relase fixing some bugs in the code without changing the 168 169 API. New package version is 2.1.1. The shared library version is 2,1,1 169 170 … … 174 175 The new package version is 2.2.0. The shared library version is 3,0,2 175 176 176 * SOFA makes a new release removing functions. This is a backawars 177 * SOFA makes a new release removing functions. This is a backawars 177 178 incompatible change, so the new package will 178 179 have version 3.0.0 and the shared library version info will be 4,0,0 -
trunk/FACT++/erfa/configure.ac
r18711 r18921 3 3 AC_PREREQ([2.68]) 4 4 ## Follow the instructions in RELEASE.rst to change package version 5 AC_INIT([erfa],[1. 3.0])5 AC_INIT([erfa],[1.4.0]) 6 6 AC_CONFIG_SRCDIR([src/erfa.h]) 7 7 AC_CONFIG_HEADER([config.h]) … … 18 18 ## Revision is the version of the current interface 19 19 ## Follow the instructions in RELEASE.rst to change the version info 20 ERFA_LIB_VERSION_INFO(4, 0, 3) 20 ERFA_LIB_VERSION_INFO(5, 0, 4) 21 22 ## SOFA version, update if needed in new relases 23 AC_DEFINE([SOFA_VERSION], ["20170420"], [Define to the version of SOFA]) 21 24 22 25 # Checks for libraries. -
trunk/FACT++/erfa/src/Makefile.am
r18711 r18921 27 27 tcgtt.c tdbtcb.c tdbtt.c tf2a.c tf2d.c tr.c trxp.c trxpv.c tttai.c \ 28 28 tttcg.c tttdb.c ttut1.c ut1tai.c ut1tt.c ut1utc.c utctai.c utcut1.c \ 29 xy06.c xys00a.c xys00b.c xys06a.c zp.c zpv.c zr.c 29 xy06.c xys00a.c xys00b.c xys06a.c zp.c zpv.c zr.c \ 30 erfaversion.c 30 31 31 include_HEADERS = erfa.h erfam.h 32 include_HEADERS = erfa.h erfam.h erfaextra.h 32 33 33 34 ## Version info is in current : revision : age form -
trunk/FACT++/erfa/src/a2af.c
r18711 r18921 52 52 ** by testing for idmsf[0]=360 and setting idmsf[0-3] to zero. 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 69 69 ** 70 70 ** 71 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.71 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 72 72 ** All rights reserved. 73 73 ** -
trunk/FACT++/erfa/src/a2tf.c
r18711 r18921 52 52 ** by testing for ihmsf[0]=24 and setting ihmsf[0-3] to zero. 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 65 65 ** 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** All rights reserved. 69 69 ** -
trunk/FACT++/erfa/src/ab.c
r18711 r18921 49 49 ** eraPdp scalar product of two p-vectors 50 50 ** 51 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.51 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 52 52 ** Derived, with permission, from the SOFA library. See notes at end of file. 53 53 */ … … 77 77 ** 78 78 ** 79 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.79 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 80 80 ** All rights reserved. 81 81 ** -
trunk/FACT++/erfa/src/af2a.c
r18711 r18921 35 35 ** first, the smallest taking precedence. 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 56 56 ** 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** All rights reserved. 60 60 ** -
trunk/FACT++/erfa/src/anp.c
r18711 r18921 15 15 ** double angle in range 0-2pi 16 16 ** 17 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.17 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 18 18 ** Derived, with permission, from the SOFA library. See notes at end of file. 19 19 */ … … 31 31 ** 32 32 ** 33 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.33 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 34 34 ** All rights reserved. 35 35 ** -
trunk/FACT++/erfa/src/anpm.c
r18711 r18921 15 15 ** double angle in range +/-pi 16 16 ** 17 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.17 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 18 18 ** Derived, with permission, from the SOFA library. See notes at end of file. 19 19 */ … … 31 31 ** 32 32 ** 33 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.33 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 34 34 ** All rights reserved. 35 35 ** -
trunk/FACT++/erfa/src/apcg.c
r18711 r18921 103 103 ** eraApcs astrometry parameters, ICRS-GCRS, space observer 104 104 ** 105 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.105 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 106 106 ** Derived, with permission, from the SOFA library. See notes at end of file. 107 107 */ … … 121 121 ** 122 122 ** 123 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.123 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 124 124 ** All rights reserved. 125 125 ** -
trunk/FACT++/erfa/src/apcg13.c
r18711 r18921 105 105 ** eraApcg astrometry parameters, ICRS-GCRS, geocenter 106 106 ** 107 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.107 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 108 108 ** Derived, with permission, from the SOFA library. See notes at end of file. 109 109 */ … … 124 124 ** 125 125 ** 126 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.126 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 127 127 ** All rights reserved. 128 128 ** -
trunk/FACT++/erfa/src/apci.c
r18711 r18921 113 113 ** eraC2ixys celestial-to-intermediate matrix, given X,Y and s 114 114 ** 115 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.115 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 116 116 ** Derived, with permission, from the SOFA library. See notes at end of file. 117 117 */ … … 130 130 ** 131 131 ** 132 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.132 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 133 133 ** All rights reserved. 134 134 ** -
trunk/FACT++/erfa/src/apci13.c
r18711 r18921 111 111 ** eraEors equation of the origins, given NPB matrix and s 112 112 ** 113 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.113 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 114 114 ** Derived, with permission, from the SOFA library. See notes at end of file. 115 115 */ … … 142 142 ** 143 143 ** 144 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.144 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 145 145 ** All rights reserved. 146 146 ** -
trunk/FACT++/erfa/src/apco.c
r18711 r18921 153 153 ** eraCr copy r-matrix 154 154 ** 155 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.155 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 156 156 ** Derived, with permission, from the SOFA library. See notes at end of file. 157 157 */ … … 204 204 ** 205 205 ** 206 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.206 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 207 207 ** All rights reserved. 208 208 ** -
trunk/FACT++/erfa/src/apco13.c
r18711 r18921 174 174 ** eraEors equation of the origins, given NPB matrix and s 175 175 ** 176 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.176 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 177 177 ** Derived, with permission, from the SOFA library. See notes at end of file. 178 178 */ … … 227 227 ** 228 228 ** 229 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.229 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 230 230 ** All rights reserved. 231 231 ** -
trunk/FACT++/erfa/src/apcs.c
r18711 r18921 123 123 ** eraIr initialize r-matrix to identity 124 124 ** 125 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.125 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 126 126 ** Derived, with permission, from the SOFA library. See notes at end of file. 127 127 */ … … 130 130 const double AUDMS = ERFA_DAU/ERFA_DAYSEC; 131 131 132 /* Light time for 1 AU(day) */132 /* Light time for 1 au (day) */ 133 133 const double CR = ERFA_AULT/ERFA_DAYSEC; 134 134 … … 173 173 ** 174 174 ** 175 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.175 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 176 176 ** All rights reserved. 177 177 ** -
trunk/FACT++/erfa/src/apcs13.c
r18711 r18921 112 112 ** eraApcs astrometry parameters, ICRS-GCRS, space observer 113 113 ** 114 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.114 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 115 115 ** Derived, with permission, from the SOFA library. See notes at end of file. 116 116 */ … … 131 131 ** 132 132 ** 133 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.133 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 134 134 ** All rights reserved. 135 135 ** -
trunk/FACT++/erfa/src/aper.c
r18711 r18921 90 90 ** transformation), and atmospheric refraction. 91 91 ** 92 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.92 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 93 93 ** Derived, with permission, from the SOFA library. See notes at end of file. 94 94 */ … … 102 102 ** 103 103 ** 104 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.104 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 105 105 ** All rights reserved. 106 106 ** -
trunk/FACT++/erfa/src/aper13.c
r18711 r18921 109 109 ** eraEra00 Earth rotation angle, IAU 2000 110 110 ** 111 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.111 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 112 112 ** Derived, with permission, from the SOFA library. See notes at end of file. 113 113 */ … … 121 121 ** 122 122 ** 123 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.123 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 124 124 ** All rights reserved. 125 125 ** -
trunk/FACT++/erfa/src/apio.c
r18711 r18921 114 114 ** eraAper astrometry parameters: update ERA 115 115 ** 116 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.116 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 117 117 ** Derived, with permission, from the SOFA library. See notes at end of file. 118 118 */ … … 153 153 ** 154 154 ** 155 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.155 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 156 156 ** All rights reserved. 157 157 ** -
trunk/FACT++/erfa/src/apio13.c
r18711 r18921 163 163 ** eraApio astrometry parameters, CIRS-observed 164 164 ** 165 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.165 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 166 166 ** Derived, with permission, from the SOFA library. See notes at end of file. 167 167 */ … … 199 199 ** 200 200 ** 201 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.201 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 202 202 ** All rights reserved. 203 203 ** -
trunk/FACT++/erfa/src/atci13.c
r18711 r18921 36 36 ** 3) The TDB date date1+date2 is a Julian Date, apportioned in any 37 37 ** convenient way between the two arguments. For example, 38 ** JD(TDB)=2450123. 8gcould be expressed in any of these ways, among38 ** JD(TDB)=2450123.7 could be expressed in any of these ways, among 39 39 ** others: 40 40 ** 41 41 ** date1 date2 42 42 ** 43 ** 2450123. 8g0.0 (JD method)43 ** 2450123.7 0.0 (JD method) 44 44 ** 2451545.0 -1421.3 (J2000 method) 45 45 ** 2400000.5 50123.2 (MJD method) … … 79 79 ** eraAtciq quick ICRS to CIRS 80 80 ** 81 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.81 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 82 82 ** Derived, with permission, from the SOFA library. See notes at end of file. 83 83 */ … … 99 99 ** 100 100 ** 101 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.101 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 102 102 ** All rights reserved. 103 103 ** -
trunk/FACT++/erfa/src/atciq.c
r18711 r18921 65 65 ** eraAnp normalize angle into range 0 to 2pi 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** Derived, with permission, from the SOFA library. See notes at end of file. 69 69 */ … … 94 94 ** 95 95 ** 96 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.96 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 97 97 ** All rights reserved. 98 98 ** -
trunk/FACT++/erfa/src/atciqn.c
r18711 r18921 102 102 ** eraAnp normalize angle into range 0 to 2pi 103 103 ** 104 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.104 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 105 105 ** Derived, with permission, from the SOFA library. See notes at end of file. 106 106 */ … … 131 131 ** 132 132 ** 133 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.133 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 134 134 ** All rights reserved. 135 135 ** -
trunk/FACT++/erfa/src/atciqz.c
r18711 r18921 64 64 ** eraAnp normalize angle into range +/- pi 65 65 ** 66 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.66 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 67 67 ** Derived, with permission, from the SOFA library. See notes at end of file. 68 68 */ … … 93 93 ** 94 94 ** 95 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.95 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 96 96 ** All rights reserved. 97 97 ** -
trunk/FACT++/erfa/src/atco13.c
r18711 r18921 152 152 ** eraAtioq quick CIRS to observed 153 153 ** 154 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.154 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 155 155 ** Derived, with permission, from the SOFA library. See notes at end of file. 156 156 */ … … 183 183 ** 184 184 ** 185 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.185 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 186 186 ** All rights reserved. 187 187 ** -
trunk/FACT++/erfa/src/atic13.c
r18711 r18921 72 72 ** eraAticq quick CIRS to ICRS astrometric 73 73 ** 74 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.74 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 75 75 ** Derived, with permission, from the SOFA library. See notes at end of file. 76 76 */ … … 92 92 ** 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** All rights reserved. 96 96 ** -
trunk/FACT++/erfa/src/aticq.c
r18711 r18921 60 60 ** eraAnp normalize angle into range +/- pi 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** Derived, with permission, from the SOFA library. See notes at end of file. 64 64 */ … … 139 139 ** 140 140 ** 141 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.141 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 142 142 ** All rights reserved. 143 143 ** -
trunk/FACT++/erfa/src/aticqn.c
r18711 r18921 98 98 ** eraAnp normalize angle into range +/- pi 99 99 ** 100 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.100 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 101 101 ** Derived, with permission, from the SOFA library. See notes at end of file. 102 102 */ … … 177 177 ** 178 178 ** 179 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.179 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 180 180 ** All rights reserved. 181 181 ** -
trunk/FACT++/erfa/src/atio13.c
r18711 r18921 135 135 ** eraAtioq quick CIRS to observed 136 136 ** 137 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.137 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 138 138 ** Derived, with permission, from the SOFA library. See notes at end of file. 139 139 */ … … 162 162 ** 163 163 ** 164 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.164 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 165 165 ** All rights reserved. 166 166 ** -
trunk/FACT++/erfa/src/atioq.c
r18711 r18921 96 96 ** eraAnp normalize angle into range 0 to 2pi 97 97 ** 98 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.98 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 99 99 ** Derived, with permission, from the SOFA library. See notes at end of file. 100 100 */ … … 183 183 ** 184 184 ** 185 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.185 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 186 186 ** All rights reserved. 187 187 ** -
trunk/FACT++/erfa/src/atoc13.c
r18711 r18921 142 142 ** eraAticq quick CIRS to ICRS 143 143 ** 144 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.144 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 145 145 ** Derived, with permission, from the SOFA library. See notes at end of file. 146 146 */ … … 173 173 ** 174 174 ** 175 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.175 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 176 176 ** All rights reserved. 177 177 ** -
trunk/FACT++/erfa/src/atoi13.c
r18711 r18921 141 141 ** eraAtoiq quick observed to CIRS 142 142 ** 143 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.143 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 144 144 ** Derived, with permission, from the SOFA library. See notes at end of file. 145 145 */ … … 168 168 ** 169 169 ** 170 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.170 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 171 171 ** All rights reserved. 172 172 ** -
trunk/FACT++/erfa/src/atoiq.c
r18711 r18921 89 89 ** eraAnp normalize angle into range 0 to 2pi 90 90 ** 91 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.91 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 92 92 ** Derived, with permission, from the SOFA library. See notes at end of file. 93 93 */ … … 200 200 ** 201 201 ** 202 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.202 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 203 203 ** All rights reserved. 204 204 ** -
trunk/FACT++/erfa/src/bi00.c
r18711 r18921 42 42 ** from ftp://maia.usno.navy.mil/conv2000/chapter5/IAU2000A. 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** Derived, with permission, from the SOFA library. See notes at end of file. 46 46 */ … … 65 65 ** 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** All rights reserved. 69 69 ** -
trunk/FACT++/erfa/src/bp00.c
r18711 r18921 71 71 ** intermediate origin" (CIO) by IAU 2006 Resolution 2. 72 72 ** 73 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.73 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 74 74 ** Derived, with permission, from the SOFA library. See notes at end of file. 75 75 */ … … 121 121 ** 122 122 ** 123 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.123 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 124 124 ** All rights reserved. 125 125 ** -
trunk/FACT++/erfa/src/bp06.c
r18711 r18921 65 65 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** Derived, with permission, from the SOFA library. See notes at end of file. 69 69 */ … … 92 92 ** 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** All rights reserved. 96 96 ** -
trunk/FACT++/erfa/src/bpn2xy.c
r18711 r18921 35 35 ** intermediate origin" (CIO) by IAU 2006 Resolution 2. 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 49 49 ** 50 50 ** 51 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.51 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 52 52 ** All rights reserved. 53 53 ** -
trunk/FACT++/erfa/src/c2i00a.c
r18711 r18921 69 69 ** IERS Technical Note No. 32, BKG (2004) 70 70 ** 71 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.71 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 72 72 ** Derived, with permission, from the SOFA library. See notes at end of file. 73 73 */ … … 88 88 ** 89 89 ** 90 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.90 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 91 91 ** All rights reserved. 92 92 ** -
trunk/FACT++/erfa/src/c2i00b.c
r18711 r18921 69 69 ** IERS Technical Note No. 32, BKG (2004) 70 70 ** 71 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.71 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 72 72 ** Derived, with permission, from the SOFA library. See notes at end of file. 73 73 */ … … 88 88 ** 89 89 ** 90 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.90 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 91 91 ** All rights reserved. 92 92 ** -
trunk/FACT++/erfa/src/c2i06a.c
r18711 r18921 60 60 ** IERS Technical Note No. 32, BKG 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** Derived, with permission, from the SOFA library. See notes at end of file. 64 64 */ … … 85 85 ** 86 86 ** 87 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.87 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 88 88 ** All rights reserved. 89 89 ** -
trunk/FACT++/erfa/src/c2ibpn.c
r18711 r18921 72 72 ** IERS Technical Note No. 32, BKG (2004) 73 73 ** 74 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.74 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 75 75 ** Derived, with permission, from the SOFA library. See notes at end of file. 76 76 */ … … 91 91 ** 92 92 ** 93 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.93 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 94 94 ** All rights reserved. 95 95 ** -
trunk/FACT++/erfa/src/c2ixy.c
r18711 r18921 66 66 ** IERS Technical Note No. 32, BKG (2004) 67 67 ** 68 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.68 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 69 69 ** Derived, with permission, from the SOFA library. See notes at end of file. 70 70 */ … … 80 80 ** 81 81 ** 82 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.82 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 83 83 ** All rights reserved. 84 84 ** -
trunk/FACT++/erfa/src/c2ixys.c
r18711 r18921 48 48 ** IERS Technical Note No. 32, BKG (2004) 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** Derived, with permission, from the SOFA library. See notes at end of file. 52 52 */ … … 72 72 ** 73 73 ** 74 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.74 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 75 75 ** All rights reserved. 76 76 ** -
trunk/FACT++/erfa/src/c2s.c
r18711 r18921 24 24 ** 3) At either pole, zero theta is returned. 25 25 ** 26 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.26 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 27 27 ** Derived, with permission, from the SOFA library. See notes at end of file. 28 28 */ … … 45 45 ** 46 46 ** 47 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.47 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 48 48 ** All rights reserved. 49 49 ** -
trunk/FACT++/erfa/src/c2t00a.c
r18711 r18921 75 75 ** IERS Technical Note No. 32, BKG (2004) 76 76 ** 77 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.77 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 78 78 ** Derived, with permission, from the SOFA library. See notes at end of file. 79 79 */ … … 103 103 ** 104 104 ** 105 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.105 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 106 106 ** All rights reserved. 107 107 ** -
trunk/FACT++/erfa/src/c2t00b.c
r18711 r18921 74 74 ** IERS Technical Note No. 32, BKG (2004) 75 75 ** 76 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.76 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 77 77 ** Derived, with permission, from the SOFA library. See notes at end of file. 78 78 */ … … 99 99 ** 100 100 ** 101 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.101 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 102 102 ** All rights reserved. 103 103 ** -
trunk/FACT++/erfa/src/c2t06a.c
r18711 r18921 73 73 ** IERS Technical Note No. 32, BKG 74 74 ** 75 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.75 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 76 76 ** Derived, with permission, from the SOFA library. See notes at end of file. 77 77 */ … … 101 101 ** 102 102 ** 103 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.103 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 104 104 ** All rights reserved. 105 105 ** -
trunk/FACT++/erfa/src/c2tcio.c
r18711 r18921 53 53 ** IERS Technical Note No. 32, BKG 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** Derived, with permission, from the SOFA library. See notes at end of file. 57 57 */ … … 71 71 ** 72 72 ** 73 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.73 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 74 74 ** All rights reserved. 75 75 ** -
trunk/FACT++/erfa/src/c2teqx.c
r18711 r18921 53 53 ** IERS Technical Note No. 32, BKG (2004) 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** Derived, with permission, from the SOFA library. See notes at end of file. 57 57 */ … … 71 71 ** 72 72 ** 73 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.73 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 74 74 ** All rights reserved. 75 75 ** -
trunk/FACT++/erfa/src/c2tpe.c
r18711 r18921 84 84 ** IERS Technical Note No. 32, BKG (2004) 85 85 ** 86 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.86 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 87 87 ** Derived, with permission, from the SOFA library. See notes at end of file. 88 88 */ … … 116 116 ** 117 117 ** 118 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.118 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 119 119 ** All rights reserved. 120 120 ** -
trunk/FACT++/erfa/src/c2txy.c
r18711 r18921 80 80 ** IERS Technical Note No. 32, BKG (2004) 81 81 ** 82 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.82 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 83 83 ** Derived, with permission, from the SOFA library. See notes at end of file. 84 84 */ … … 108 108 ** 109 109 ** 110 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.110 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 111 111 ** All rights reserved. 112 112 ** -
trunk/FACT++/erfa/src/cal2jd.c
r18711 r18921 44 44 ** Section 12.92 (p604). 45 45 ** 46 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.46 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 47 47 ** Derived, with permission, from the SOFA library. See notes at end of file. 48 48 */ … … 88 88 ** 89 89 ** 90 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.90 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 91 91 ** All rights reserved. 92 92 ** -
trunk/FACT++/erfa/src/cp.c
r18711 r18921 15 15 ** c double[3] copy 16 16 ** 17 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.17 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 18 18 ** Derived, with permission, from the SOFA library. See notes at end of file. 19 19 */ … … 29 29 ** 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** All rights reserved. 33 33 ** -
trunk/FACT++/erfa/src/cpv.c
r18711 r18921 18 18 ** eraCp copy p-vector 19 19 ** 20 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.20 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 21 21 ** Derived, with permission, from the SOFA library. See notes at end of file. 22 22 */ … … 31 31 ** 32 32 ** 33 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.33 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 34 34 ** All rights reserved. 35 35 ** -
trunk/FACT++/erfa/src/cr.c
r18711 r18921 18 18 ** eraCp copy p-vector 19 19 ** 20 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.20 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 21 21 ** Derived, with permission, from the SOFA library. See notes at end of file. 22 22 */ … … 32 32 ** 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** All rights reserved. 36 36 ** -
trunk/FACT++/erfa/src/d2dtf.c
r18711 r18921 72 72 ** eraDat delta(AT) = TAI-UTC 73 73 ** 74 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.74 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 75 75 ** Derived, with permission, from the SOFA library. See notes at end of file. 76 76 */ … … 185 185 ** 186 186 ** 187 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.187 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 188 188 ** All rights reserved. 189 189 ** -
trunk/FACT++/erfa/src/d2tf.c
r18711 r18921 49 49 ** by testing for ihmsf[0]=24 and setting ihmsf[0-3] to zero. 50 50 ** 51 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.51 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 52 52 ** Derived, with permission, from the SOFA library. See notes at end of file. 53 53 */ … … 109 109 ** 110 110 ** 111 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.111 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 112 112 ** All rights reserved. 113 113 ** -
trunk/FACT++/erfa/src/dat.c
r18711 r18921 78 78 ** 79 79 ** 2) If the specified date is for a day which ends with a leap second, 80 ** the UTC-TAIvalue returned is for the period leading up to the80 ** the TAI-UTC value returned is for the period leading up to the 81 81 ** leap second. If the date is for a day which begins as a leap 82 ** second ends, the UTC-TAIreturned is for the period following the82 ** second ends, the TAI-UTC returned is for the period following the 83 83 ** leap second. 84 84 ** … … 116 116 ** eraCal2jd Gregorian calendar to JD 117 117 ** 118 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.118 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 119 119 ** Derived, with permission, from the SOFA library. See notes at end of file. 120 120 */ … … 246 246 ** 247 247 ** 248 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.248 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 249 249 ** All rights reserved. 250 250 ** -
trunk/FACT++/erfa/src/dtdb.c
r18711 r18921 158 158 ** Francou, G. & Laskar, J., Astron.Astrophys., 282, 663-683 (1994). 159 159 ** 160 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.160 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 161 161 ** Derived, with permission, from the SOFA library. See notes at end of file. 162 162 */ … … 1162 1162 ** 1163 1163 ** 1164 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.1164 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 1165 1165 ** All rights reserved. 1166 1166 ** -
trunk/FACT++/erfa/src/dtf2d.c
r18711 r18921 76 76 ** eraJd2cal JD to Gregorian calendar 77 77 ** 78 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.78 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 79 79 ** Derived, with permission, from the SOFA library. See notes at end of file. 80 80 */ … … 152 152 ** 153 153 ** 154 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.154 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 155 155 ** All rights reserved. 156 156 ** -
trunk/FACT++/erfa/src/ee00.c
r18711 r18921 61 61 ** IERS Technical Note No. 32, BKG (2004) 62 62 ** 63 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.63 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 64 64 ** Derived, with permission, from the SOFA library. See notes at end of file. 65 65 */ … … 77 77 ** 78 78 ** 79 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.79 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 80 80 ** All rights reserved. 81 81 ** -
trunk/FACT++/erfa/src/ee00a.c
r18711 r18921 59 59 ** IERS Technical Note No. 32, BKG (2004). 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** Derived, with permission, from the SOFA library. See notes at end of file. 63 63 */ … … 84 84 ** 85 85 ** 86 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.86 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 87 87 ** All rights reserved. 88 88 ** -
trunk/FACT++/erfa/src/ee00b.c
r18711 r18921 65 65 ** IERS Technical Note No. 32, BKG (2004) 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** Derived, with permission, from the SOFA library. See notes at end of file. 69 69 */ … … 90 90 ** 91 91 ** 92 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.92 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 93 93 ** All rights reserved. 94 94 ** -
trunk/FACT++/erfa/src/ee06a.c
r18711 r18921 51 51 ** IERS Technical Note No. 32, BKG 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** Derived, with permission, from the SOFA library. See notes at end of file. 55 55 */ … … 71 71 ** 72 72 ** 73 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.73 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 74 74 ** All rights reserved. 75 75 ** -
trunk/FACT++/erfa/src/eect00.c
r18711 r18921 92 92 ** IERS Technical Note No. 32, BKG (2004) 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** Derived, with permission, from the SOFA library. See notes at end of file. 96 96 */ … … 231 231 ** 232 232 ** 233 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.233 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 234 234 ** All rights reserved. 235 235 ** -
trunk/FACT++/erfa/src/eform.c
r18711 r18921 56 56 ** p220. 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** Derived, with permission, from the SOFA library. See notes at end of file. 60 60 */ … … 95 95 ** 96 96 ** 97 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.97 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 98 98 ** All rights reserved. 99 99 ** -
trunk/FACT++/erfa/src/eo06a.c
r18711 r18921 55 55 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 56 56 ** 57 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.57 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 58 58 ** Derived, with permission, from the SOFA library. See notes at end of file. 59 59 */ … … 80 80 ** 81 81 ** 82 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.82 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 83 83 ** All rights reserved. 84 84 ** -
trunk/FACT++/erfa/src/eors.c
r18711 r18921 34 34 ** Wallace, P. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** Derived, with permission, from the SOFA library. See notes at end of file. 38 38 */ … … 57 57 ** 58 58 ** 59 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.59 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 60 60 ** All rights reserved. 61 61 ** -
trunk/FACT++/erfa/src/epb.c
r18711 r18921 27 27 ** Lieske, J.H., 1979. Astron.Astrophys., 73, 282. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 40 40 ** 41 41 ** 42 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.42 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 43 43 ** All rights reserved. 44 44 ** -
trunk/FACT++/erfa/src/epb2jd.c
r18711 r18921 27 27 ** Lieske, J.H., 1979, Astron.Astrophys. 73, 282. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 40 40 ** 41 41 ** 42 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.42 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 43 43 ** All rights reserved. 44 44 ** -
trunk/FACT++/erfa/src/epj.c
r18711 r18921 27 27 ** Lieske, J.H., 1979, Astron.Astrophys. 73, 282. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/epj2jd.c
r18711 r18921 27 27 ** Lieske, J.H., 1979, Astron.Astrophys. 73, 282. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 40 40 ** 41 41 ** 42 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.42 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 43 43 ** All rights reserved. 44 44 ** -
trunk/FACT++/erfa/src/epv00.c
r18711 r18921 51 51 ** 52 52 ** pvh[0][0] x } 53 ** pvh[0][1] y } heliocentric position, AU53 ** pvh[0][1] y } heliocentric position, au 54 54 ** pvh[0][2] z } 55 55 ** 56 56 ** pvh[1][0] xdot } 57 ** pvh[1][1] ydot } heliocentric velocity, AU/d57 ** pvh[1][1] ydot } heliocentric velocity, au/d 58 58 ** pvh[1][2] zdot } 59 59 ** 60 60 ** pvb[0][0] x } 61 ** pvb[0][1] y } barycentric position, AU61 ** pvb[0][1] y } barycentric position, au 62 62 ** pvb[0][2] z } 63 63 ** 64 64 ** pvb[1][0] xdot } 65 ** pvb[1][1] ydot } barycentric velocity, AU/d65 ** pvb[1][1] ydot } barycentric velocity, au/d 66 66 ** pvb[1][2] zdot } 67 67 ** … … 95 95 ** will receive the barycentric values. 96 96 ** 97 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.97 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 98 98 ** Derived, with permission, from the SOFA library. See notes at end of file. 99 99 */ … … 2538 2538 ** 2539 2539 ** 2540 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.2540 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 2541 2541 ** All rights reserved. 2542 2542 ** -
trunk/FACT++/erfa/src/eqeq94.c
r18711 r18921 52 52 ** 645-650. 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 81 81 ** 82 82 ** 83 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.83 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 84 84 ** All rights reserved. 85 85 ** -
trunk/FACT++/erfa/src/era00.c
r18711 r18921 55 55 ** IERS Technical Note No. 32, BKG (2004) 56 56 ** 57 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.57 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 58 58 ** Derived, with permission, from the SOFA library. See notes at end of file. 59 59 */ … … 85 85 ** 86 86 ** 87 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.87 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 88 88 ** All rights reserved. 89 89 ** -
trunk/FACT++/erfa/src/erfa.h
r18711 r18921 9 9 ** Prototype function declarations for ERFA library. 10 10 ** 11 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.11 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 12 12 ** Derived, with permission, from the SOFA library. See notes at end of file. 13 13 */ … … 451 451 #endif 452 452 453 454 #include "erfaextra.h" 455 453 456 #endif 454 457 … … 457 460 ** 458 461 ** 459 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.462 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 460 463 ** All rights reserved. 461 464 ** -
trunk/FACT++/erfa/src/erfam.h
r18711 r18921 9 9 ** Macros used by ERFA library. 10 10 ** 11 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.11 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 12 12 ** Derived, with permission, from the SOFA library. See notes at end of file. 13 13 */ … … 99 99 #define ERFA_TTMTAI (32.184) 100 100 101 /* Astronomical unit (m ) */102 #define ERFA_DAU (149597870 e3)101 /* Astronomical unit (m, IAU 2012) */ 102 #define ERFA_DAU (149597870.7e3) 103 103 104 104 /* Speed of light (m/s) */ … … 106 106 107 107 /* Light time for 1 au (s) */ 108 #define ERFA_AULT 499.004782109 110 /* Speed of light ( AUper day) */111 #define ERFA_DC (ERFA_DAYSEC /ERFA_AULT)108 #define ERFA_AULT (ERFA_DAU/ERFA_CMPS) 109 110 /* Speed of light (au per day) */ 111 #define ERFA_DC (ERFA_DAYSEC/ERFA_AULT) 112 112 113 113 /* L_G = 1 - d(TT)/d(TCG) */ … … 148 148 ** 149 149 ** 150 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.150 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 151 151 ** All rights reserved. 152 152 ** -
trunk/FACT++/erfa/src/fad03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 52 52 ** 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** All rights reserved. 56 56 ** -
trunk/FACT++/erfa/src/fae03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/faf03.c
r18711 r18921 33 33 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 34 34 ** 35 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.35 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 36 36 ** Derived, with permission, from the SOFA library. See notes at end of file. 37 37 */ … … 55 55 ** 56 56 ** 57 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.57 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 58 58 ** All rights reserved. 59 59 ** -
trunk/FACT++/erfa/src/faju03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/fal03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 52 52 ** 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** All rights reserved. 56 56 ** -
trunk/FACT++/erfa/src/falp03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 52 52 ** 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** All rights reserved. 56 56 ** -
trunk/FACT++/erfa/src/fama03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/fame03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/fane03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 48 48 ** 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** All rights reserved. 52 52 ** -
trunk/FACT++/erfa/src/faom03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 53 53 ** 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** All rights reserved. 57 57 ** -
trunk/FACT++/erfa/src/fapa03.c
r18711 r18921 36 36 ** IERS Technical Note No. 32, BKG (2004) 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** Derived, with permission, from the SOFA library. See notes at end of file. 40 40 */ … … 52 52 ** 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** All rights reserved. 56 56 ** -
trunk/FACT++/erfa/src/fasa03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/faur03.c
r18711 r18921 32 32 ** Francou, G., Laskar, J. 1994, Astron.Astrophys. 282, 663-683 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** Derived, with permission, from the SOFA library. See notes at end of file. 36 36 */ … … 48 48 ** 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** All rights reserved. 52 52 ** -
trunk/FACT++/erfa/src/fave03.c
r18711 r18921 35 35 ** Astron.Astrophys.Supp.Ser. 135, 111 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/fk52h.c
r18711 r18921 54 54 ** F.Mignard & M.Froeschle, Astron. Astrophys. 354, 732-739 (2000). 55 55 ** 56 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.56 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 57 57 ** Derived, with permission, from the SOFA library. See notes at end of file. 58 58 */ … … 92 92 ** 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** All rights reserved. 96 96 ** -
trunk/FACT++/erfa/src/fk5hip.c
r18711 r18921 37 37 ** F.Mignard & M.Froeschle, Astron. Astrophys. 354, 732-739 (2000). 38 38 ** 39 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.39 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 40 40 ** Derived, with permission, from the SOFA library. See notes at end of file. 41 41 */ … … 75 75 ** 76 76 ** 77 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.77 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 78 78 ** All rights reserved. 79 79 ** -
trunk/FACT++/erfa/src/fk5hz.c
r18711 r18921 70 70 ** F.Mignard & M.Froeschle, 2000, Astron.Astrophys. 354, 732-739. 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** Derived, with permission, from the SOFA library. See notes at end of file. 74 74 */ … … 109 109 ** 110 110 ** 111 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.111 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 112 112 ** All rights reserved. 113 113 ** -
trunk/FACT++/erfa/src/fw2m.c
r18711 r18921 66 66 ** Hilton, J. et al., 2006, Celest.Mech.Dyn.Astron. 94, 351 67 67 ** 68 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.68 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 69 69 ** Derived, with permission, from the SOFA library. See notes at end of file. 70 70 */ … … 83 83 ** 84 84 ** 85 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.85 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 86 86 ** All rights reserved. 87 87 ** -
trunk/FACT++/erfa/src/fw2xy.c
r18711 r18921 51 51 ** Hilton, J. et al., 2006, Celest.Mech.Dyn.Astron. 94, 351 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** Derived, with permission, from the SOFA library. See notes at end of file. 55 55 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/g2icrs.c
r18711 r18921 62 62 ** Publications Division, Noordwijk, Netherlands. 63 63 ** 64 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.64 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 65 65 ** Derived, with permission, from the SOFA library. See notes at end of file. 66 66 */ … … 110 110 ** 111 111 ** 112 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.112 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 113 113 ** All rights reserved. 114 114 ** -
trunk/FACT++/erfa/src/gc2gd.c
r18711 r18921 52 52 ** eraGc2gde geocentric to geodetic transformation, general 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 83 83 ** 84 84 ** 85 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.85 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 86 86 ** All rights reserved. 87 87 ** -
trunk/FACT++/erfa/src/gc2gde.c
r18711 r18921 57 57 ** 79: 689-693 58 58 ** 59 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.59 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 60 60 ** Derived, with permission, from the SOFA library. See notes at end of file. 61 61 */ … … 148 148 ** 149 149 ** 150 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.150 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 151 151 ** All rights reserved. 152 152 ** -
trunk/FACT++/erfa/src/gd2gc.c
r18711 r18921 55 55 ** eraZp zero p-vector 56 56 ** 57 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.57 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 58 58 ** Derived, with permission, from the SOFA library. See notes at end of file. 59 59 */ … … 82 82 ** 83 83 ** 84 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.84 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 85 85 ** All rights reserved. 86 86 ** -
trunk/FACT++/erfa/src/gd2gce.c
r18711 r18921 56 56 ** Section 4.22, p202. 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** Derived, with permission, from the SOFA library. See notes at end of file. 60 60 */ … … 86 86 ** 87 87 ** 88 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.88 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 89 89 ** All rights reserved. 90 90 ** -
trunk/FACT++/erfa/src/gmst00.c
r18711 r18921 69 69 ** IERS Technical Note No. 32, BKG (2004) 70 70 ** 71 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.71 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 72 72 ** Derived, with permission, from the SOFA library. See notes at end of file. 73 73 */ … … 94 94 ** 95 95 ** 96 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.96 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 97 97 ** All rights reserved. 98 98 ** -
trunk/FACT++/erfa/src/gmst06.c
r18711 r18921 59 59 ** Astron.Astrophys. 432, 355 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** Derived, with permission, from the SOFA library. See notes at end of file. 63 63 */ … … 85 85 ** 86 86 ** 87 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.87 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 88 88 ** All rights reserved. 89 89 ** -
trunk/FACT++/erfa/src/gmst82.c
r18711 r18921 61 61 ** Aoki et al., Astron. Astrophys. 105, 359-361 (1982). 62 62 ** 63 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.63 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 64 64 ** Derived, with permission, from the SOFA library. See notes at end of file. 65 65 */ … … 100 100 ** 101 101 ** 102 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.102 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 103 103 ** All rights reserved. 104 104 ** -
trunk/FACT++/erfa/src/gst00a.c
r18711 r18921 70 70 ** IERS Technical Note No. 32, BKG (2004) 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** Derived, with permission, from the SOFA library. See notes at end of file. 74 74 */ … … 87 87 ** 88 88 ** 89 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.89 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 90 90 ** All rights reserved. 91 91 ** -
trunk/FACT++/erfa/src/gst00b.c
r18711 r18921 78 78 ** IERS Technical Note No. 32, BKG (2004) 79 79 ** 80 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.80 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 81 81 ** Derived, with permission, from the SOFA library. See notes at end of file. 82 82 */ … … 95 95 ** 96 96 ** 97 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.97 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 98 98 ** All rights reserved. 99 99 ** -
trunk/FACT++/erfa/src/gst06.c
r18711 r18921 65 65 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 66 66 ** 67 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.67 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 68 68 ** Derived, with permission, from the SOFA library. See notes at end of file. 69 69 */ … … 89 89 ** 90 90 ** 91 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.91 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 92 92 ** All rights reserved. 93 93 ** -
trunk/FACT++/erfa/src/gst06a.c
r18711 r18921 61 61 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 62 62 ** 63 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.63 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 64 64 ** Derived, with permission, from the SOFA library. See notes at end of file. 65 65 */ … … 80 80 ** 81 81 ** 82 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.82 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 83 83 ** All rights reserved. 84 84 ** -
trunk/FACT++/erfa/src/gst94.c
r18711 r18921 63 63 ** IAU Resolution C7, Recommendation 3 (1994) 64 64 ** 65 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.65 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 66 66 ** Derived, with permission, from the SOFA library. See notes at end of file. 67 67 */ … … 80 80 ** 81 81 ** 82 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.82 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 83 83 ** All rights reserved. 84 84 ** -
trunk/FACT++/erfa/src/h2fk5.c
r18711 r18921 56 56 ** F.Mignard & M.Froeschle, Astron. Astrophys. 354, 732-739 (2000). 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** Derived, with permission, from the SOFA library. See notes at end of file. 60 60 */ … … 97 97 ** 98 98 ** 99 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.99 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 100 100 ** All rights reserved. 101 101 ** -
trunk/FACT++/erfa/src/hfk5z.c
r18711 r18921 75 75 ** F.Mignard & M.Froeschle, 2000, Astron.Astrophys. 354, 732-739. 76 76 ** 77 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.77 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 78 78 ** Derived, with permission, from the SOFA library. See notes at end of file. 79 79 */ … … 124 124 ** 125 125 ** 126 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.126 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 127 127 ** All rights reserved. 128 128 ** -
trunk/FACT++/erfa/src/icrs2g.c
r18711 r18921 62 62 ** Publications Division, Noordwijk, Netherlands. 63 63 ** 64 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.64 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 65 65 ** Derived, with permission, from the SOFA library. See notes at end of file. 66 66 */ … … 110 110 ** 111 111 ** 112 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.112 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 113 113 ** All rights reserved. 114 114 ** -
trunk/FACT++/erfa/src/ir.c
r18711 r18921 12 12 ** r double[3][3] r-matrix 13 13 ** 14 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.14 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 15 15 ** Derived, with permission, from the SOFA library. See notes at end of file. 16 16 */ … … 32 32 ** 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** All rights reserved. 36 36 ** -
trunk/FACT++/erfa/src/jd2cal.c
r18711 r18921 22 22 ** int status: 23 23 ** 0 = OK 24 ** -1 = unacceptable date (Note 3)24 ** -1 = unacceptable date (Note 1) 25 25 ** 26 26 ** Notes: … … 51 51 ** Section 12.92 (p604). 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** Derived, with permission, from the SOFA library. See notes at end of file. 55 55 */ … … 82 82 f = fmod(f1 + f2, 1.0); 83 83 if (f < 0.0) f += 1.0; 84 d = floor(d1 - f1) + floor(d2 - f2) + floor(f1 + f2 -f);85 jd = (long) floor(d) + 1L;84 d = ERFA_DNINT(d1-f1) + ERFA_DNINT(d2-f2) + ERFA_DNINT(f1+f2-f); 85 jd = (long) ERFA_DNINT(d) + 1L; 86 86 87 87 /* Express day in Gregorian calendar. */ … … 104 104 ** 105 105 ** 106 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.106 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 107 107 ** All rights reserved. 108 108 ** -
trunk/FACT++/erfa/src/jdcalf.c
r18711 r18921 56 56 ** Section 12.92 (p604). 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** Derived, with permission, from the SOFA library. See notes at end of file. 60 60 */ … … 86 86 f1 = fmod(d1, 1.0); 87 87 f2 = fmod(d2, 1.0); 88 d1 = floor(d1 -f1);89 d2 = floor(d2 -f2);88 d1 = ERFA_DNINT(d1-f1); 89 d2 = ERFA_DNINT(d2-f2); 90 90 91 91 /* Round the total fraction to the specified number of places. */ 92 f = floor((f1+f2)*denom + 0.5) / denom;92 f = ERFA_DNINT((f1+f2)*denom) / denom; 93 93 94 94 /* Re-assemble the rounded date and re-align to noon. */ … … 110 110 ** 111 111 ** 112 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.112 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 113 113 ** All rights reserved. 114 114 ** -
trunk/FACT++/erfa/src/ld.c
r18711 r18921 69 69 ** eraPxp vector product of two p-vectors 70 70 ** 71 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.71 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 72 72 ** Derived, with permission, from the SOFA library. See notes at end of file. 73 73 */ … … 101 101 ** 102 102 ** 103 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.103 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 104 104 ** All rights reserved. 105 105 ** -
trunk/FACT++/erfa/src/ldn.c
r18711 r18921 79 79 ** eraLd light deflection by a solar-system body 80 80 ** 81 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.81 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 82 82 ** Derived, with permission, from the SOFA library. See notes at end of file. 83 83 */ 84 84 { 85 /* Light time for 1 AU(days) */85 /* Light time for 1 au (days) */ 86 86 const double CR = ERFA_AULT/ERFA_DAYSEC; 87 87 … … 123 123 ** 124 124 ** 125 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.125 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 126 126 ** All rights reserved. 127 127 ** -
trunk/FACT++/erfa/src/ldsun.c
r18711 r18921 34 34 ** eraLd light deflection by a solar-system body 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** Derived, with permission, from the SOFA library. See notes at end of file. 38 38 */ … … 55 55 ** 56 56 ** 57 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.57 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 58 58 ** All rights reserved. 59 59 ** -
trunk/FACT++/erfa/src/num00a.c
r18711 r18921 53 53 ** Section 3.222-3 (p114). 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** Derived, with permission, from the SOFA library. See notes at end of file. 57 57 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/num00b.c
r18711 r18921 53 53 ** Section 3.222-3 (p114). 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** Derived, with permission, from the SOFA library. See notes at end of file. 57 57 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/num06a.c
r18711 r18921 52 52 ** Section 3.222-3 (p114). 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 74 74 ** 75 75 ** 76 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.76 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 77 77 ** All rights reserved. 78 78 ** -
trunk/FACT++/erfa/src/numat.c
r18711 r18921 42 42 ** Section 3.222-3 (p114). 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** Derived, with permission, from the SOFA library. See notes at end of file. 46 46 */ … … 58 58 ** 59 59 ** 60 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.60 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 61 61 ** All rights reserved. 62 62 ** -
trunk/FACT++/erfa/src/nut00a.c
r18711 r18921 149 149 ** Resolutions", in IERS Workshop 5.1 (2002) 150 150 ** 151 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.151 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 152 152 ** Derived, with permission, from the SOFA library. See notes at end of file. 153 153 */ … … 1996 1996 ** 1997 1997 ** 1998 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.1998 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 1999 1999 ** All rights reserved. 2000 2000 ** -
trunk/FACT++/erfa/src/nut00b.c
r18711 r18921 117 117 ** Francou, G., Laskar, J., Astron.Astrophys. 282, 663-683 (1994) 118 118 ** 119 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.119 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 120 120 ** Derived, with permission, from the SOFA library. See notes at end of file. 121 121 */ … … 321 321 ** 322 322 ** 323 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.323 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 324 324 ** All rights reserved. 325 325 ** -
trunk/FACT++/erfa/src/nut06a.c
r18711 r18921 76 76 ** Resolutions", in IERS Workshop 5.1 (2002) 77 77 ** 78 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.78 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 79 79 ** Derived, with permission, from the SOFA library. See notes at end of file. 80 80 */ … … 102 102 ** 103 103 ** 104 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.104 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 105 105 ** All rights reserved. 106 106 ** -
trunk/FACT++/erfa/src/nut80.c
r18711 r18921 49 49 ** Section 3.222 (p111). 50 50 ** 51 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.51 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 52 52 ** Derived, with permission, from the SOFA library. See notes at end of file. 53 53 */ … … 274 274 ** 275 275 ** 276 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.276 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 277 277 ** All rights reserved. 278 278 ** -
trunk/FACT++/erfa/src/nutm80.c
r18711 r18921 46 46 ** eraNumat form nutation matrix 47 47 ** 48 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.48 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 49 49 ** Derived, with permission, from the SOFA library. See notes at end of file. 50 50 */ … … 66 66 ** 67 67 ** 68 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.68 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 69 69 ** All rights reserved. 70 70 ** -
trunk/FACT++/erfa/src/obl06.c
r18711 r18921 43 43 ** Hilton, J. et al., 2006, Celest.Mech.Dyn.Astron. 94, 351 44 44 ** 45 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.45 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 46 46 ** Derived, with permission, from the SOFA library. See notes at end of file. 47 47 */ … … 67 67 ** 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** All rights reserved. 71 71 ** -
trunk/FACT++/erfa/src/obl80.c
r18711 r18921 45 45 ** Expression 3.222-1 (p114). 46 46 ** 47 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.47 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 48 48 ** Derived, with permission, from the SOFA library. See notes at end of file. 49 49 */ … … 67 67 ** 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** All rights reserved. 71 71 ** -
trunk/FACT++/erfa/src/p06e.c
r18711 r18921 121 121 ** eraObl06 mean obliquity, IAU 2006 122 122 ** 123 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.123 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 124 124 ** Derived, with permission, from the SOFA library. See notes at end of file. 125 125 */ … … 270 270 ** 271 271 ** 272 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.272 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 273 273 ** All rights reserved. 274 274 ** -
trunk/FACT++/erfa/src/p2pv.c
r18711 r18921 19 19 ** eraZp zero p-vector 20 20 ** 21 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.21 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 22 22 ** Derived, with permission, from the SOFA library. See notes at end of file. 23 23 */ … … 32 32 ** 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** All rights reserved. 36 36 ** -
trunk/FACT++/erfa/src/p2s.c
r18711 r18921 27 27 ** eraPm modulus of p-vector 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 40 40 ** 41 41 ** 42 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.42 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 43 43 ** All rights reserved. 44 44 ** -
trunk/FACT++/erfa/src/pap.c
r18711 r18921 38 38 ** eraPdp scalar product of two p-vectors 39 39 ** 40 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.40 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 41 41 ** Derived, with permission, from the SOFA library. See notes at end of file. 42 42 */ … … 88 88 ** 89 89 ** 90 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.90 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 91 91 ** All rights reserved. 92 92 ** -
trunk/FACT++/erfa/src/pas.c
r18711 r18921 27 27 ** 2) Zero is returned if the two points are coincident. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 45 45 ** 46 46 ** 47 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.47 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 48 48 ** All rights reserved. 49 49 ** -
trunk/FACT++/erfa/src/pb06.c
r18711 r18921 64 64 ** eraRz rotate around Z-axis 65 65 ** 66 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.66 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 67 67 ** Derived, with permission, from the SOFA library. See notes at end of file. 68 68 */ … … 93 93 ** 94 94 ** 95 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.95 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 96 96 ** All rights reserved. 97 97 ** -
trunk/FACT++/erfa/src/pdp.c
r18711 r18921 16 16 ** double a . b 17 17 ** 18 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.18 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 19 19 ** Derived, with permission, from the SOFA library. See notes at end of file. 20 20 */ … … 33 33 ** 34 34 ** 35 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.35 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 36 36 ** All rights reserved. 37 37 ** -
trunk/FACT++/erfa/src/pfw06.c
r18711 r18921 74 74 ** eraObl06 mean obliquity, IAU 2006 75 75 ** 76 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.76 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 77 77 ** Derived, with permission, from the SOFA library. See notes at end of file. 78 78 */ … … 114 114 ** 115 115 ** 116 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.116 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 117 117 ** All rights reserved. 118 118 ** -
trunk/FACT++/erfa/src/plan94.c
r18711 r18921 18 18 ** 19 19 ** Returned (argument): 20 ** pv double[2][3] planet p,v (heliocentric, J2000.0, AU,AU/d)20 ** pv double[2][3] planet p,v (heliocentric, J2000.0, au,au/d) 21 21 ** 22 22 ** Returned (function value): … … 59 59 ** 60 60 ** pv[0][0] x } 61 ** pv[0][1] y } heliocentric position, AU61 ** pv[0][1] y } heliocentric position, au 62 62 ** pv[0][2] z } 63 63 ** 64 64 ** pv[1][0] xdot } 65 ** pv[1][1] ydot } heliocentric velocity, AU/d65 ** pv[1][1] ydot } heliocentric velocity, au/d 66 66 ** pv[1][2] zdot } 67 67 ** … … 158 158 ** Astron. Astrophys. 282, 663 (1994). 159 159 ** 160 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.160 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 161 161 ** Derived, with permission, from the SOFA library. See notes at end of file. 162 162 */ … … 190 190 ** Tables giving the mean Keplerian elements, limited to t^2 terms: 191 191 ** 192 ** a semi-major axis ( AU)192 ** a semi-major axis (au) 193 193 ** dlm mean longitude (degree and arcsecond) 194 194 ** e eccentricity … … 417 417 cos(ae2)); 418 418 419 /* Distance ( AU) and speed (radians per day). */419 /* Distance (au) and speed (radians per day). */ 420 420 r = da * (1.0 - de * cos(ae)); 421 421 v = GK * sqrt((1.0 + 1.0 / amas[np]) / (da * da * da)); … … 434 434 xpxq2 = 2 * xp * xq; 435 435 436 /* Position (J2000.0 ecliptic x,y,z in AU). */436 /* Position (J2000.0 ecliptic x,y,z in au). */ 437 437 x = r * (xcw - xm2 * xp); 438 438 y = r * (xsw + xm2 * xq); … … 444 444 pv[0][2] = y * SINEPS + z * COSEPS; 445 445 446 /* Velocity (J2000.0 ecliptic xdot,ydot,zdot in AU/d). */446 /* Velocity (J2000.0 ecliptic xdot,ydot,zdot in au/d). */ 447 447 x = v * (( -1.0 + 2.0 * xp * xp) * xms + xpxq2 * xmc); 448 448 y = v * (( 1.0 - 2.0 * xq * xq) * xmc - xpxq2 * xms); … … 463 463 ** 464 464 ** 465 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.465 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 466 466 ** All rights reserved. 467 467 ** -
trunk/FACT++/erfa/src/pm.c
r18711 r18921 15 15 ** double modulus 16 16 ** 17 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.17 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 18 18 ** Derived, with permission, from the SOFA library. See notes at end of file. 19 19 */ … … 25 25 ** 26 26 ** 27 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.27 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 28 28 ** All rights reserved. 29 29 ** -
trunk/FACT++/erfa/src/pmat00.c
r18711 r18921 51 51 ** (2000) 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** Derived, with permission, from the SOFA library. See notes at end of file. 55 55 */ … … 67 67 ** 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** All rights reserved. 71 71 ** -
trunk/FACT++/erfa/src/pmat06.c
r18711 r18921 52 52 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** Derived, with permission, from the SOFA library. See notes at end of file. 56 56 */ … … 71 71 ** 72 72 ** 73 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.73 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 74 74 ** All rights reserved. 75 75 ** -
trunk/FACT++/erfa/src/pmat76.c
r18711 r18921 67 67 ** Kaplan,G.H., 1981. USNO circular no. 163, pA2. 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** Derived, with permission, from the SOFA library. See notes at end of file. 71 71 */ … … 90 90 ** 91 91 ** 92 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.92 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 93 93 ** All rights reserved. 94 94 ** -
trunk/FACT++/erfa/src/pmp.c
r18711 r18921 20 20 ** arguments. 21 21 ** 22 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.22 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 23 23 ** Derived, with permission, from the SOFA library. See notes at end of file. 24 24 */ … … 34 34 ** 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** All rights reserved. 38 38 ** -
trunk/FACT++/erfa/src/pmpx.c
r18711 r18921 47 47 ** eraPn decompose p-vector into modulus and direction 48 48 ** 49 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.49 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 50 50 ** Derived, with permission, from the SOFA library. See notes at end of file. 51 51 */ … … 93 93 ** 94 94 ** 95 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.95 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 96 96 ** All rights reserved. 97 97 ** -
trunk/FACT++/erfa/src/pmsafe.c
r18711 r18921 106 106 ** eraStarpm update star catalog data for space motion 107 107 ** 108 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.108 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 109 109 ** Derived, with permission, from the SOFA library. See notes at end of file. 110 110 */ … … 146 146 ** 147 147 ** 148 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.148 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 149 149 ** All rights reserved. 150 150 ** -
trunk/FACT++/erfa/src/pn.c
r18711 r18921 29 29 ** eraSxp multiply p-vector by scalar 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** Derived, with permission, from the SOFA library. See notes at end of file. 33 33 */ … … 58 58 ** 59 59 ** 60 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.60 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 61 61 ** All rights reserved. 62 62 ** -
trunk/FACT++/erfa/src/pn00.c
r18711 r18921 96 96 ** intermediate origin" (CIO) by IAU 2006 Resolution 2. 97 97 ** 98 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.98 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 99 99 ** Derived, with permission, from the SOFA library. See notes at end of file. 100 100 */ … … 126 126 ** 127 127 ** 128 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.128 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 129 129 ** All rights reserved. 130 130 ** -
trunk/FACT++/erfa/src/pn00a.c
r18711 r18921 96 96 ** intermediate origin" (CIO) by IAU 2006 Resolution 2. 97 97 ** 98 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.98 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 99 99 ** Derived, with permission, from the SOFA library. See notes at end of file. 100 100 */ … … 112 112 ** 113 113 ** 114 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.114 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 115 115 ** All rights reserved. 116 116 ** -
trunk/FACT++/erfa/src/pn00b.c
r18711 r18921 96 96 ** intermediate origin" (CIO) by IAU 2006 Resolution 2. 97 97 ** 98 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.98 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 99 99 ** Derived, with permission, from the SOFA library. See notes at end of file. 100 100 */ … … 112 112 ** 113 113 ** 114 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.114 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 115 115 ** All rights reserved. 116 116 ** -
trunk/FACT++/erfa/src/pn06.c
r18711 r18921 94 94 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 95 95 ** 96 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.96 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 97 97 ** Derived, with permission, from the SOFA library. See notes at end of file. 98 98 */ … … 136 136 ** 137 137 ** 138 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.138 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 139 139 ** All rights reserved. 140 140 ** -
trunk/FACT++/erfa/src/pn06a.c
r18711 r18921 86 86 ** Capitaine, N. & Wallace, P.T., 2006, Astron.Astrophys. 450, 855 87 87 ** 88 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.88 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 89 89 ** Derived, with permission, from the SOFA library. See notes at end of file. 90 90 */ … … 102 102 ** 103 103 ** 104 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.104 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 105 105 ** All rights reserved. 106 106 ** -
trunk/FACT++/erfa/src/pnm00a.c
r18711 r18921 54 54 ** (2000) 55 55 ** 56 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.56 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 57 57 ** Derived, with permission, from the SOFA library. See notes at end of file. 58 58 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/pnm00b.c
r18711 r18921 54 54 ** (2000) 55 55 ** 56 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.56 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 57 57 ** Derived, with permission, from the SOFA library. See notes at end of file. 58 58 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/pnm06a.c
r18711 r18921 51 51 ** Capitaine, N. & Wallace, P.T., 2006, Astron.Astrophys. 450, 855. 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** Derived, with permission, from the SOFA library. See notes at end of file. 55 55 */ … … 73 73 ** 74 74 ** 75 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.75 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 76 76 ** All rights reserved. 77 77 ** -
trunk/FACT++/erfa/src/pnm80.c
r18711 r18921 53 53 ** Section 3.3 (p145). 54 54 ** 55 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.55 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 56 56 ** Derived, with permission, from the SOFA library. See notes at end of file. 57 57 */ … … 75 75 ** 76 76 ** 77 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.77 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 78 78 ** All rights reserved. 79 79 ** -
trunk/FACT++/erfa/src/pom00.c
r18711 r18921 47 47 ** IERS Technical Note No. 32, BKG (2004) 48 48 ** 49 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.49 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 50 50 ** Derived, with permission, from the SOFA library. See notes at end of file. 51 51 */ … … 64 64 ** 65 65 ** 66 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.66 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 67 67 ** All rights reserved. 68 68 ** -
trunk/FACT++/erfa/src/ppp.c
r18711 r18921 20 20 ** arguments. 21 21 ** 22 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.22 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 23 23 ** Derived, with permission, from the SOFA library. See notes at end of file. 24 24 */ … … 34 34 ** 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** All rights reserved. 38 38 ** -
trunk/FACT++/erfa/src/ppsp.c
r18711 r18921 24 24 ** eraPpp p-vector plus p-vector 25 25 ** 26 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.26 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 27 27 ** Derived, with permission, from the SOFA library. See notes at end of file. 28 28 */ … … 43 43 ** 44 44 ** 45 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.45 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 46 46 ** All rights reserved. 47 47 ** -
trunk/FACT++/erfa/src/pr00.c
r18711 r18921 67 67 ** Resolutions", in IERS Workshop 5.1 (2002). 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** Derived, with permission, from the SOFA library. See notes at end of file. 71 71 */ … … 91 91 ** 92 92 ** 93 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.93 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 94 94 ** All rights reserved. 95 95 ** -
trunk/FACT++/erfa/src/prec76.c
r18711 r18921 67 67 ** (6) & (7), p283. 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** Derived, with permission, from the SOFA library. See notes at end of file. 71 71 */ … … 97 97 ** 98 98 ** 99 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.99 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 100 100 ** All rights reserved. 101 101 ** -
trunk/FACT++/erfa/src/pv2p.c
r18711 r18921 18 18 ** eraCp copy p-vector 19 19 ** 20 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.20 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 21 21 ** Derived, with permission, from the SOFA library. See notes at end of file. 22 22 */ … … 30 30 ** 31 31 ** 32 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.32 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 33 33 ** All rights reserved. 34 34 ** -
trunk/FACT++/erfa/src/pv2s.c
r18711 r18921 35 35 ** In such cases zeroes are returned for all three. 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 93 93 ** 94 94 ** 95 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.95 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 96 96 ** All rights reserved. 97 97 ** -
trunk/FACT++/erfa/src/pvdpv.c
r18711 r18921 26 26 ** eraPdp scalar product of two p-vectors 27 27 ** 28 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.28 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 29 29 ** Derived, with permission, from the SOFA library. See notes at end of file. 30 30 */ … … 51 51 ** 52 52 ** 53 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.53 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 54 54 ** All rights reserved. 55 55 ** -
trunk/FACT++/erfa/src/pvm.c
r18711 r18921 19 19 ** eraPm modulus of p-vector 20 20 ** 21 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.21 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 22 22 ** Derived, with permission, from the SOFA library. See notes at end of file. 23 23 */ … … 35 35 ** 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** All rights reserved. 39 39 ** -
trunk/FACT++/erfa/src/pvmpv.c
r18711 r18921 23 23 ** eraPmp p-vector minus p-vector 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 36 36 ** 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** All rights reserved. 40 40 ** -
trunk/FACT++/erfa/src/pvppv.c
r18711 r18921 23 23 ** eraPpp p-vector plus p-vector 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 36 36 ** 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** All rights reserved. 40 40 ** -
trunk/FACT++/erfa/src/pvstar.c
r18711 r18921 11 11 ** 12 12 ** Given (Note 1): 13 ** pv double[2][3] pv-vector ( AU, AU/day)13 ** pv double[2][3] pv-vector (au, au/day) 14 14 ** 15 15 ** Returned (Note 2): … … 66 66 ** and the proper motions in radians per Julian year, but the 67 67 ** parallax is in arcseconds; the radial velocity is in km/s, but 68 ** the pv-vector result is in AU and AU/day.68 ** the pv-vector result is in au and au/day. 69 69 ** 70 70 ** 4) The proper motions are the rate of change of the right ascension … … 94 94 ** Stumpff, P., 1985, Astron.Astrophys. 144, 232-240. 95 95 ** 96 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.96 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 97 97 ** Derived, with permission, from the SOFA library. See notes at end of file. 98 98 */ … … 102 102 103 103 104 /* Isolate the radial component of the velocity ( AU/day, inertial). */104 /* Isolate the radial component of the velocity (au/day, inertial). */ 105 105 eraPn(pv[0], &r, x); 106 106 vr = eraPdp(x, pv[1]); 107 107 eraSxp(vr, x, ur); 108 108 109 /* Isolate the transverse component of the velocity ( AU/day, inertial). */109 /* Isolate the transverse component of the velocity (au/day, inertial). */ 110 110 eraPmp(pv[1], ur, ut); 111 111 vt = eraPm(ut); … … 117 117 /* The inertial-to-observed correction terms. */ 118 118 d = 1.0 + betr; 119 w = 1.0 - betr*betr -bett*bett;120 if (d == 0.0 || w <0) return -1;121 del = sqrt(w) - 1.0;119 w = betr*betr + bett*bett; 120 if (d == 0.0 || w > 1.0) return -1; 121 del = - w / (sqrt(1.0-w) + 1.0); 122 122 123 123 /* Apply relativistic correction factor to radial velocity component. */ … … 129 129 eraSxp(1.0/d, ut, ust); 130 130 131 /* Combine the two to obtain the observed velocity vector ( AU/day). */131 /* Combine the two to obtain the observed velocity vector (au/day). */ 132 132 eraPpp(usr, ust, pv[1]); 133 133 … … 156 156 ** 157 157 ** 158 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.158 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 159 159 ** All rights reserved. 160 160 ** -
trunk/FACT++/erfa/src/pvtob.c
r18711 r18921 62 62 ** eraTrxp product of transpose of r-matrix and p-vector 63 63 ** 64 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.64 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 65 65 ** Derived, with permission, from the SOFA library. See notes at end of file. 66 66 */ … … 102 102 ** 103 103 ** 104 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.104 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 105 105 ** All rights reserved. 106 106 ** -
trunk/FACT++/erfa/src/pvu.c
r18711 r18921 29 29 ** eraCp copy p-vector 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** Derived, with permission, from the SOFA library. See notes at end of file. 33 33 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/pvup.c
r18711 r18921 23 23 ** 2) The time units of dt must match those of the velocity. 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 37 37 ** 38 38 ** 39 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.39 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 40 40 ** All rights reserved. 41 41 ** -
trunk/FACT++/erfa/src/pvxpv.c
r18711 r18921 31 31 ** eraPpp p-vector plus p-vector 32 32 ** 33 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.33 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 34 34 ** Derived, with permission, from the SOFA library. See notes at end of file. 35 35 */ … … 56 56 ** 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** All rights reserved. 60 60 ** -
trunk/FACT++/erfa/src/pxp.c
r18711 r18921 20 20 ** arguments. 21 21 ** 22 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.22 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 23 23 ** Derived, with permission, from the SOFA library. See notes at end of file. 24 24 */ … … 43 43 ** 44 44 ** 45 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.45 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 46 46 ** All rights reserved. 47 47 ** -
trunk/FACT++/erfa/src/refco.c
r18711 r18921 146 146 ** Stone, Ronald C., P.A.S.P. 108, 1051-1058, 1996. 147 147 ** 148 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.148 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 149 149 ** Derived, with permission, from the SOFA library. See notes at end of file. 150 150 */ … … 202 202 ** 203 203 ** 204 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.204 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 205 205 ** All rights reserved. 206 206 ** -
trunk/FACT++/erfa/src/rm2v.c
r18711 r18921 30 30 ** the rotation vector from the origin. 31 31 ** 32 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.32 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 33 33 ** Derived, with permission, from the SOFA library. See notes at end of file. 34 34 */ … … 60 60 ** 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** All rights reserved. 64 64 ** -
trunk/FACT++/erfa/src/rv2m.c
r18711 r18921 27 27 ** rotation vector from the origin. 28 28 ** 29 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.29 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 30 30 ** Derived, with permission, from the SOFA library. See notes at end of file. 31 31 */ … … 67 67 ** 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** All rights reserved. 71 71 ** -
trunk/FACT++/erfa/src/rx.c
r18711 r18921 29 29 ** ( 0 - sin(phi) + cos(phi) ) 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** Derived, with permission, from the SOFA library. See notes at end of file. 33 33 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/rxp.c
r18711 r18921 22 22 ** eraCp copy p-vector 23 23 ** 24 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.24 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 25 25 ** Derived, with permission, from the SOFA library. See notes at end of file. 26 26 */ … … 48 48 ** 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** All rights reserved. 52 52 ** -
trunk/FACT++/erfa/src/rxpv.c
r18711 r18921 22 22 ** eraRxp product of r-matrix and p-vector 23 23 ** 24 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.24 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 25 25 ** Derived, with permission, from the SOFA library. See notes at end of file. 26 26 */ … … 35 35 ** 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** All rights reserved. 39 39 ** -
trunk/FACT++/erfa/src/rxr.c
r18711 r18921 23 23 ** eraCr copy r-matrix 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 48 48 ** 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** All rights reserved. 52 52 ** -
trunk/FACT++/erfa/src/ry.c
r18711 r18921 29 29 ** ( + sin(theta) 0 + cos(theta) ) 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** Derived, with permission, from the SOFA library. See notes at end of file. 33 33 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/rz.c
r18711 r18921 29 29 ** ( 0 0 1 ) 30 30 ** 31 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.31 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 32 32 ** Derived, with permission, from the SOFA library. See notes at end of file. 33 33 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/s00.c
r18711 r18921 77 77 ** IERS Technical Note No. 32, BKG (2004) 78 78 ** 79 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.79 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 80 80 ** Derived, with permission, from the SOFA library. See notes at end of file. 81 81 */ … … 320 320 ** 321 321 ** 322 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.322 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 323 323 ** All rights reserved. 324 324 ** -
trunk/FACT++/erfa/src/s00a.c
r18711 r18921 70 70 ** IERS Technical Note No. 32, BKG (2004) 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** Derived, with permission, from the SOFA library. See notes at end of file. 74 74 */ … … 92 92 ** 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** All rights reserved. 96 96 ** -
trunk/FACT++/erfa/src/s00b.c
r18711 r18921 70 70 ** IERS Technical Note No. 32, BKG (2004) 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** Derived, with permission, from the SOFA library. See notes at end of file. 74 74 */ … … 92 92 ** 93 93 ** 94 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.94 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 95 95 ** All rights reserved. 96 96 ** -
trunk/FACT++/erfa/src/s06.c
r18711 r18921 74 74 ** IERS Technical Note No. 32, BKG 75 75 ** 76 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.76 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 77 77 ** Derived, with permission, from the SOFA library. See notes at end of file. 78 78 */ … … 317 317 ** 318 318 ** 319 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.319 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 320 320 ** All rights reserved. 321 321 ** -
trunk/FACT++/erfa/src/s06a.c
r18711 r18921 72 72 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 73 73 ** 74 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.74 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 75 75 ** Derived, with permission, from the SOFA library. See notes at end of file. 76 76 */ … … 94 94 ** 95 95 ** 96 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.96 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 97 97 ** All rights reserved. 98 98 ** -
trunk/FACT++/erfa/src/s2c.c
r18711 r18921 16 16 ** c double[3] direction cosines 17 17 ** 18 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.18 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 19 19 ** Derived, with permission, from the SOFA library. See notes at end of file. 20 20 */ … … 34 34 ** 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** All rights reserved. 38 38 ** -
trunk/FACT++/erfa/src/s2p.c
r18711 r18921 21 21 ** eraSxp multiply p-vector by scalar 22 22 ** 23 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.23 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 24 24 ** Derived, with permission, from the SOFA library. See notes at end of file. 25 25 */ … … 37 37 ** 38 38 ** 39 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.39 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 40 40 ** All rights reserved. 41 41 ** -
trunk/FACT++/erfa/src/s2pv.c
r18711 r18921 22 22 ** pv double[2][3] pv-vector 23 23 ** 24 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.24 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 25 25 ** Derived, with permission, from the SOFA library. See notes at end of file. 26 26 */ … … 52 52 ** 53 53 ** 54 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.54 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 55 55 ** All rights reserved. 56 56 ** -
trunk/FACT++/erfa/src/s2xpv.c
r18711 r18921 23 23 ** eraSxp multiply p-vector by scalar 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 36 36 ** 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** All rights reserved. 40 40 ** -
trunk/FACT++/erfa/src/sepp.c
r18711 r18921 31 31 ** eraPdp scalar product of two p-vectors 32 32 ** 33 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.33 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 34 34 ** Derived, with permission, from the SOFA library. See notes at end of file. 35 35 */ … … 54 54 ** 55 55 ** 56 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.56 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 57 57 ** All rights reserved. 58 58 ** -
trunk/FACT++/erfa/src/seps.c
r18711 r18921 22 22 ** eraSepp angular separation between two p-vectors 23 23 ** 24 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.24 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 25 25 ** Derived, with permission, from the SOFA library. See notes at end of file. 26 26 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/sp00.c
r18711 r18921 48 48 ** IERS Technical Note No. 32, BKG (2004) 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** Derived, with permission, from the SOFA library. See notes at end of file. 52 52 */ … … 67 67 ** 68 68 ** 69 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.69 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 70 70 ** All rights reserved. 71 71 ** -
trunk/FACT++/erfa/src/starpm.c
r18711 r18921 107 107 ** eraPvstar space motion pv-vector to star catalog data 108 108 ** 109 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.109 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 110 110 ** Derived, with permission, from the SOFA library. See notes at end of file. 111 111 */ … … 154 154 ** 155 155 ** 156 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.156 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 157 157 ** All rights reserved. 158 158 ** -
trunk/FACT++/erfa/src/starpv.c
r18711 r18921 20 20 ** 21 21 ** Returned (Note 2): 22 ** pv double[2][3] pv-vector ( AU, AU/day)22 ** pv double[2][3] pv-vector (au, au/day) 23 23 ** 24 24 ** Returned (function value): … … 54 54 ** required, it may be obtained by calculating the magnitude of the 55 55 ** position vector pv[0][0-2] dividing by the speed of light in 56 ** AU/day to give the light-time, and then multiplying the space56 ** au/day to give the light-time, and then multiplying the space 57 57 ** velocity pv[1][0-2] by this light-time and adding the result to 58 58 ** pv[0][0-2]. … … 73 73 ** and the proper motions in radians per Julian year, but the 74 74 ** parallax is in arcseconds; the radial velocity is in km/s, but 75 ** the pv-vector result is in AU and AU/day.75 ** the pv-vector result is in au and au/day. 76 76 ** 77 77 ** 4) The RA proper motion is in terms of coordinate angle, not true … … 114 114 ** Stumpff, P., 1985, Astron.Astrophys. 144, 232-240. 115 115 ** 116 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.116 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 117 117 ** Derived, with permission, from the SOFA library. See notes at end of file. 118 118 */ … … 136 136 137 137 138 /* Distance ( AU). */138 /* Distance (au). */ 139 139 if (px >= PXMIN) { 140 140 w = px; … … 146 146 r = ERFA_DR2AS / w; 147 147 148 /* Radial velocity ( AU/day). */148 /* Radial velocity (au/day). */ 149 149 rd = ERFA_DAYSEC * rv * 1e3 / ERFA_DAU; 150 150 … … 153 153 decd = pmd / ERFA_DJY; 154 154 155 /* To pv-vector ( AU,AU/day). */155 /* To pv-vector (au,au/day). */ 156 156 eraS2pv(ra, dec, r, rad, decd, rd, pv); 157 157 … … 163 163 } 164 164 165 /* Isolate the radial component of the velocity ( AU/day). */165 /* Isolate the radial component of the velocity (au/day). */ 166 166 eraPn(pv[0], &w, x); 167 167 vsr = eraPdp(x, pv[1]); 168 168 eraSxp(vsr, x, usr); 169 169 170 /* Isolate the transverse component of the velocity ( AU/day). */170 /* Isolate the transverse component of the velocity (au/day). */ 171 171 eraPmp(pv[1], usr, ust); 172 172 vst = eraPm(ust); … … 181 181 for (i = 0; i < IMAX; i++) { 182 182 d = 1.0 + betr; 183 del = sqrt(1.0 - betr*betr - bett*bett) - 1.0; 183 w = betr*betr + bett*bett; 184 del = - w / (sqrt(1.0 - w) + 1.0); 184 185 betr = d * betsr + del; 185 186 bett = d * betst; … … 213 214 ** 214 215 ** 215 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.216 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 216 217 ** All rights reserved. 217 218 ** -
trunk/FACT++/erfa/src/sxp.c
r18711 r18921 19 19 ** It is permissible for p and sp to be the same array. 20 20 ** 21 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.21 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 22 22 ** Derived, with permission, from the SOFA library. See notes at end of file. 23 23 */ … … 33 33 ** 34 34 ** 35 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.35 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 36 36 ** All rights reserved. 37 37 ** -
trunk/FACT++/erfa/src/sxpv.c
r18711 r18921 22 22 ** eraS2xpv multiply pv-vector by two scalars 23 23 ** 24 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.24 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 25 25 ** Derived, with permission, from the SOFA library. See notes at end of file. 26 26 */ … … 34 34 ** 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** All rights reserved. 38 38 ** -
trunk/FACT++/erfa/src/t_erfa_c.c
r18711 r18921 18 18 ** All messages go to stdout. 19 19 ** 20 ** This revision: 201 6 July 1120 ** This revision: 2017 March 15 21 21 ** 22 22 */ … … 272 272 ** Called: eraApcg, vvd 273 273 ** 274 ** This revision: 201 3 October 3274 ** This revision: 2017 March 15 275 275 */ 276 276 { … … 309 309 vvd(astrom.em, 1.010465295811013146, 1e-12, 310 310 "eraApcg", "em", status); 311 vvd(astrom.v[0], 0.4289638 897813379954e-4, 1e-16,312 "eraApcg", "v(1 _", status);313 vvd(astrom.v[1], 0.81150340 21720941898e-4, 1e-16,311 vvd(astrom.v[0], 0.4289638913597693554e-4, 1e-16, 312 "eraApcg", "v(1)", status); 313 vvd(astrom.v[1], 0.8115034051581320575e-4, 1e-16, 314 314 "eraApcg", "v(2)", status); 315 vvd(astrom.v[2], 0.35175551 23437237778e-4, 1e-16,315 vvd(astrom.v[2], 0.3517555136380563427e-4, 1e-16, 316 316 "eraApcg", "v(3)", status); 317 vvd(astrom.bm1, 0.999999995168601 3336, 1e-12,317 vvd(astrom.bm1, 0.9999999951686012981, 1e-12, 318 318 "eraApcg", "bm1", status); 319 319 vvd(astrom.bpn[0][0], 1.0, 0.0, … … 351 351 ** Called: eraApcg13, vvd 352 352 ** 353 ** This revision: 201 3 October 3353 ** This revision: 2017 March 15 354 354 */ 355 355 { … … 379 379 vvd(astrom.em, 1.010465295964664178, 1e-12, 380 380 "eraApcg13", "em", status); 381 vvd(astrom.v[0], 0.4289638 897157027528e-4, 1e-16,381 vvd(astrom.v[0], 0.4289638912941341125e-4, 1e-16, 382 382 "eraApcg13", "v(1)", status); 383 vvd(astrom.v[1], 0.81150340 02544663526e-4, 1e-16,383 vvd(astrom.v[1], 0.8115034032405042132e-4, 1e-16, 384 384 "eraApcg13", "v(2)", status); 385 vvd(astrom.v[2], 0.35175551 22593144633e-4, 1e-16,385 vvd(astrom.v[2], 0.3517555135536470279e-4, 1e-16, 386 386 "eraApcg13", "v(3)", status); 387 vvd(astrom.bm1, 0.9999999951686013 498, 1e-12,387 vvd(astrom.bm1, 0.9999999951686013142, 1e-12, 388 388 "eraApcg13", "bm1", status); 389 389 vvd(astrom.bpn[0][0], 1.0, 0.0, … … 421 421 ** Called: eraApci, vvd 422 422 ** 423 ** This revision: 201 3 October 3423 ** This revision: 2017 March 15 424 424 */ 425 425 { … … 461 461 vvd(astrom.em, 1.010465295811013146, 1e-12, 462 462 "eraApci", "em", status); 463 vvd(astrom.v[0], 0.4289638 897813379954e-4, 1e-16,463 vvd(astrom.v[0], 0.4289638913597693554e-4, 1e-16, 464 464 "eraApci", "v(1)", status); 465 vvd(astrom.v[1], 0.81150340 21720941898e-4, 1e-16,465 vvd(astrom.v[1], 0.8115034051581320575e-4, 1e-16, 466 466 "eraApci", "v(2)", status); 467 vvd(astrom.v[2], 0.35175551 23437237778e-4, 1e-16,467 vvd(astrom.v[2], 0.3517555136380563427e-4, 1e-16, 468 468 "eraApci", "v(3)", status); 469 vvd(astrom.bm1, 0.999999995168601 3336, 1e-12,469 vvd(astrom.bm1, 0.9999999951686012981, 1e-12, 470 470 "eraApci", "bm1", status); 471 471 vvd(astrom.bpn[0][0], 0.9999991390295159156, 1e-12, … … 503 503 ** Called: eraApci13, vvd 504 504 ** 505 ** This revision: 201 3 October 3505 ** This revision: 2017 March 15 506 506 */ 507 507 { … … 531 531 vvd(astrom.em, 1.010465295964664178, 1e-12, 532 532 "eraApci13", "em", status); 533 vvd(astrom.v[0], 0.4289638 897157027528e-4, 1e-16,533 vvd(astrom.v[0], 0.4289638912941341125e-4, 1e-16, 534 534 "eraApci13", "v(1)", status); 535 vvd(astrom.v[1], 0.81150340 02544663526e-4, 1e-16,535 vvd(astrom.v[1], 0.8115034032405042132e-4, 1e-16, 536 536 "eraApci13", "v(2)", status); 537 vvd(astrom.v[2], 0.35175551 22593144633e-4, 1e-16,537 vvd(astrom.v[2], 0.3517555135536470279e-4, 1e-16, 538 538 "eraApci13", "v(3)", status); 539 vvd(astrom.bm1, 0.9999999951686013 498, 1e-12,539 vvd(astrom.bm1, 0.9999999951686013142, 1e-12, 540 540 "eraApci13", "bm1", status); 541 541 vvd(astrom.bpn[0][0], 0.9999992060376761710, 1e-12, … … 575 575 ** Called: eraApco, vvd 576 576 ** 577 ** This revision: 201 3 October 3577 ** This revision: 2017 March 15 578 578 */ 579 579 { … … 613 613 vvd(astrom.pmt, 13.25248468622587269, 1e-11, 614 614 "eraApco", "pmt", status); 615 vvd(astrom.eb[0], -0.9741827110630 897003, 1e-12,615 vvd(astrom.eb[0], -0.9741827110630322720, 1e-12, 616 616 "eraApco", "eb(1)", status); 617 vvd(astrom.eb[1], -0.2115130190135 014340, 1e-12,617 vvd(astrom.eb[1], -0.2115130190135344832, 1e-12, 618 618 "eraApco", "eb(2)", status); 619 vvd(astrom.eb[2], -0.091798401869 68295686, 1e-12,619 vvd(astrom.eb[2], -0.09179840186949532298, 1e-12, 620 620 "eraApco", "eb(3)", status); 621 vvd(astrom.eh[0], -0.9736425571689 670428, 1e-12,621 vvd(astrom.eh[0], -0.9736425571689739035, 1e-12, 622 622 "eraApco", "eh(1)", status); 623 vvd(astrom.eh[1], -0.209245212584 8862201, 1e-12,623 vvd(astrom.eh[1], -0.2092452125849330936, 1e-12, 624 624 "eraApco", "eh(2)", status); 625 vvd(astrom.eh[2], -0.090755781522 61439954, 1e-12,625 vvd(astrom.eh[2], -0.09075578152243272599, 1e-12, 626 626 "eraApco", "eh(3)", status); 627 vvd(astrom.em, 0.99982332417 10617934, 1e-12,627 vvd(astrom.em, 0.9998233241709957653, 1e-12, 628 628 "eraApco", "em", status); 629 vvd(astrom.v[0], 0.20787049 85147609823e-4, 1e-16,629 vvd(astrom.v[0], 0.2078704992916728762e-4, 1e-16, 630 630 "eraApco", "v(1)", status); 631 vvd(astrom.v[1], -0.8955360 074407552709e-4, 1e-16,631 vvd(astrom.v[1], -0.8955360107151952319e-4, 1e-16, 632 632 "eraApco", "v(2)", status); 633 vvd(astrom.v[2], -0.38633389 80073114703e-4, 1e-16,633 vvd(astrom.v[2], -0.3863338994288951082e-4, 1e-16, 634 634 "eraApco", "v(3)", status); 635 vvd(astrom.bm1, 0.9999999950277561 600, 1e-12,635 vvd(astrom.bm1, 0.9999999950277561236, 1e-12, 636 636 "eraApco", "bm1", status); 637 637 vvd(astrom.bpn[0][0], 0.9999991390295159156, 1e-12, … … 687 687 ** Called: eraApco13, vvd, viv 688 688 ** 689 ** This revision: 201 3 October 4689 ** This revision: 2017 March 15 690 690 */ 691 691 { … … 714 714 vvd(astrom.pmt, 13.25248468622475727, 1e-11, 715 715 "eraApco13", "pmt", status); 716 vvd(astrom.eb[0], -0.974182710732 1449445, 1e-12,716 vvd(astrom.eb[0], -0.9741827107320875162, 1e-12, 717 717 "eraApco13", "eb(1)", status); 718 vvd(astrom.eb[1], -0.2115130190489 386190, 1e-12,718 vvd(astrom.eb[1], -0.2115130190489716682, 1e-12, 719 719 "eraApco13", "eb(2)", status); 720 vvd(astrom.eb[2], -0.09179840189 515518726, 1e-12,720 vvd(astrom.eb[2], -0.09179840189496755339, 1e-12, 721 721 "eraApco13", "eb(3)", status); 722 vvd(astrom.eh[0], -0.9736425572586 866640, 1e-12,722 vvd(astrom.eh[0], -0.9736425572586935247, 1e-12, 723 723 "eraApco13", "eh(1)", status); 724 vvd(astrom.eh[1], -0.209245212160 2867431, 1e-12,724 vvd(astrom.eh[1], -0.2092452121603336166, 1e-12, 725 725 "eraApco13", "eh(2)", status); 726 vvd(astrom.eh[2], -0.09075578153 903832650, 1e-12,726 vvd(astrom.eh[2], -0.09075578153885665295, 1e-12, 727 727 "eraApco13", "eh(3)", status); 728 vvd(astrom.em, 0.999823324091 4558422, 1e-12,728 vvd(astrom.em, 0.9998233240913898141, 1e-12, 729 729 "eraApco13", "em", status); 730 vvd(astrom.v[0], 0.20787049 86751370303e-4, 1e-16,730 vvd(astrom.v[0], 0.2078704994520489246e-4, 1e-16, 731 731 "eraApco13", "v(1)", status); 732 vvd(astrom.v[1], -0.89553601 00494469232e-4, 1e-16,732 vvd(astrom.v[1], -0.8955360133238868938e-4, 1e-16, 733 733 "eraApco13", "v(2)", status); 734 vvd(astrom.v[2], -0.38633389 78840051024e-4, 1e-16,734 vvd(astrom.v[2], -0.3863338993055887398e-4, 1e-16, 735 735 "eraApco13", "v(3)", status); 736 vvd(astrom.bm1, 0.9999999950277561 368, 1e-12,736 vvd(astrom.bm1, 0.9999999950277561004, 1e-12, 737 737 "eraApco13", "bm1", status); 738 738 vvd(astrom.bpn[0][0], 0.9999991390295147999, 1e-12, … … 791 791 ** Called: eraApcs, vvd 792 792 ** 793 ** This revision: 201 3 October 3793 ** This revision: 2017 March 15 794 794 */ 795 795 { … … 820 820 vvd(astrom.pmt, 13.25248468622587269, 1e-11, 821 821 "eraApcs", "pmt", status); 822 vvd(astrom.eb[0], -0.97418271106 30456169, 1e-12,822 vvd(astrom.eb[0], -0.9741827110629881886, 1e-12, 823 823 "eraApcs", "eb(1)", status); 824 vvd(astrom.eb[1], -0.2115130190136 085494, 1e-12,824 vvd(astrom.eb[1], -0.2115130190136415986, 1e-12, 825 825 "eraApcs", "eb(2)", status); 826 vvd(astrom.eb[2], -0.091798401869 73175487, 1e-12,826 vvd(astrom.eb[2], -0.09179840186954412099, 1e-12, 827 827 "eraApcs", "eb(3)", status); 828 vvd(astrom.eh[0], -0.9736425571689 386099, 1e-12,828 vvd(astrom.eh[0], -0.9736425571689454706, 1e-12, 829 829 "eraApcs", "eh(1)", status); 830 vvd(astrom.eh[1], -0.20924521258 49967195, 1e-12,830 vvd(astrom.eh[1], -0.2092452125850435930, 1e-12, 831 831 "eraApcs", "eh(2)", status); 832 vvd(astrom.eh[2], -0.090755781522 66466572, 1e-12,832 vvd(astrom.eh[2], -0.09075578152248299218, 1e-12, 833 833 "eraApcs", "eh(3)", status); 834 vvd(astrom.em, 0.99982332417 10457140, 1e-12,834 vvd(astrom.em, 0.9998233241709796859, 1e-12, 835 835 "eraApcs", "em", status); 836 vvd(astrom.v[0], 0.20787049 85513566571e-4, 1e-16,836 vvd(astrom.v[0], 0.2078704993282685510e-4, 1e-16, 837 837 "eraApcs", "v(1)", status); 838 vvd(astrom.v[1], -0.8955360 074245006073e-4, 1e-16,838 vvd(astrom.v[1], -0.8955360106989405683e-4, 1e-16, 839 839 "eraApcs", "v(2)", status); 840 vvd(astrom.v[2], -0.38633389 80073572719e-4, 1e-16,840 vvd(astrom.v[2], -0.3863338994289409097e-4, 1e-16, 841 841 "eraApcs", "v(3)", status); 842 vvd(astrom.bm1, 0.9999999950277561 601, 1e-12,842 vvd(astrom.bm1, 0.9999999950277561237, 1e-12, 843 843 "eraApcs", "bm1", status); 844 844 vvd(astrom.bpn[0][0], 1, 0, … … 876 876 ** Called: eraApcs13, vvd 877 877 ** 878 ** This revision: 201 3 October 3878 ** This revision: 2017 March 15 879 879 */ 880 880 { … … 896 896 vvd(astrom.pmt, 12.65133794027378508, 1e-11, 897 897 "eraApcs13", "pmt", status); 898 vvd(astrom.eb[0], 0.901269152902 3298391, 1e-12,898 vvd(astrom.eb[0], 0.9012691529025250644, 1e-12, 899 899 "eraApcs13", "eb(1)", status); 900 vvd(astrom.eb[1], -0.4173999812023 068781, 1e-12,900 vvd(astrom.eb[1], -0.4173999812023194317, 1e-12, 901 901 "eraApcs13", "eb(2)", status); 902 vvd(astrom.eb[2], -0.1809906511146 821008, 1e-12,902 vvd(astrom.eb[2], -0.1809906511146429670, 1e-12, 903 903 "eraApcs13", "eb(3)", status); 904 vvd(astrom.eh[0], 0.89399391017 59726824, 1e-12,904 vvd(astrom.eh[0], 0.8939939101760130792, 1e-12, 905 905 "eraApcs13", "eh(1)", status); 906 vvd(astrom.eh[1], -0.4111053891734 599955, 1e-12,906 vvd(astrom.eh[1], -0.4111053891734021478, 1e-12, 907 907 "eraApcs13", "eh(2)", status); 908 vvd(astrom.eh[2], -0.178233688063 7689334, 1e-12,908 vvd(astrom.eh[2], -0.1782336880636997374, 1e-12, 909 909 "eraApcs13", "eh(3)", status); 910 vvd(astrom.em, 1.010428384373 318379, 1e-12,910 vvd(astrom.em, 1.010428384373491095, 1e-12, 911 911 "eraApcs13", "em", status); 912 vvd(astrom.v[0], 0.42798772 78327626511e-4, 1e-16,912 vvd(astrom.v[0], 0.4279877294121697570e-4, 1e-16, 913 913 "eraApcs13", "v(1)", status); 914 vvd(astrom.v[1], 0.79632550 57040027770e-4, 1e-16,914 vvd(astrom.v[1], 0.7963255087052120678e-4, 1e-16, 915 915 "eraApcs13", "v(2)", status); 916 vvd(astrom.v[2], 0.35175640 00441374759e-4, 1e-16,916 vvd(astrom.v[2], 0.3517564013384691531e-4, 1e-16, 917 917 "eraApcs13", "v(3)", status); 918 vvd(astrom.bm1, 0.999999995294798 1330, 1e-12,918 vvd(astrom.bm1, 0.9999999952947980978, 1e-12, 919 919 "eraApcs13", "bm1", status); 920 920 vvd(astrom.bpn[0][0], 1, 0, … … 1125 1125 ** Called: eraAtci13, vvd 1126 1126 ** 1127 ** This revision: 201 3 October 31127 ** This revision: 2017 March 15 1128 1128 */ 1129 1129 { … … 1142 1142 eraAtci13(rc, dc, pr, pd, px, rv, date1, date2, &ri, &di, &eo); 1143 1143 1144 vvd(ri, 2.71012157296 9038991, 1e-12,1144 vvd(ri, 2.710121572968696744, 1e-12, 1145 1145 "eraAtci13", "ri", status); 1146 vvd(di, 0.172937136721 8230438, 1e-12,1146 vvd(di, 0.1729371367219539137, 1e-12, 1147 1147 "eraAtci13", "di", status); 1148 1148 vvd(eo, -0.002900618712657375647, 1e-14, … … 1164 1164 ** Called: eraApci13, eraAtciq, vvd 1165 1165 ** 1166 ** This revision: 201 3 October 31166 ** This revision: 2017 March 15 1167 1167 */ 1168 1168 { … … 1182 1182 eraAtciq(rc, dc, pr, pd, px, rv, &astrom, &ri, &di); 1183 1183 1184 vvd(ri, 2.71012157296 9038991, 1e-12, "eraAtciq", "ri", status);1185 vvd(di, 0.172937136721 8230438, 1e-12, "eraAtciq", "di", status);1184 vvd(ri, 2.710121572968696744, 1e-12, "eraAtciq", "ri", status); 1185 vvd(di, 0.1729371367219539137, 1e-12, "eraAtciq", "di", status); 1186 1186 1187 1187 } … … 1200 1200 ** Called: eraApci13, eraAtciqn, vvd 1201 1201 ** 1202 ** This revision: 201 3 October 31202 ** This revision: 2017 March 15 1203 1203 */ 1204 1204 { … … 1243 1243 eraAtciqn ( rc, dc, pr, pd, px, rv, &astrom, 3, b, &ri, &di); 1244 1244 1245 vvd(ri, 2.71012200810 5325582, 1e-12, "eraAtciqn", "ri", status);1246 vvd(di, 0.172937191649 1459122, 1e-12, "eraAtciqn", "di", status);1245 vvd(ri, 2.710122008104983335, 1e-12, "eraAtciqn", "ri", status); 1246 vvd(di, 0.1729371916492767821, 1e-12, "eraAtciqn", "di", status); 1247 1247 1248 1248 } … … 1261 1261 ** Called: eraApci13, eraAtciqz, vvd 1262 1262 ** 1263 ** This revision: 201 3 October 31263 ** This revision: 2017 March 15 1264 1264 */ 1265 1265 { … … 1276 1276 eraAtciqz(rc, dc, &astrom, &ri, &di); 1277 1277 1278 vvd(ri, 2.709994899247 599271, 1e-12, "eraAtciqz", "ri", status);1279 vvd(di, 0.172874072098 3623469, 1e-12, "eraAtciqz", "di", status);1278 vvd(ri, 2.709994899247256984, 1e-12, "eraAtciqz", "ri", status); 1279 vvd(di, 0.1728740720984931891, 1e-12, "eraAtciqz", "di", status); 1280 1280 1281 1281 } … … 1294 1294 ** Called: eraAtco13, vvd, viv 1295 1295 ** 1296 ** This revision: 201 3 October 41296 ** This revision: 2017 March 15 1297 1297 */ 1298 1298 { … … 1327 1327 &aob, &zob, &hob, &dob, &rob, &eo); 1328 1328 1329 vvd(aob, 0.092517744853 58230653, 1e-12, "eraAtco13", "aob", status);1330 vvd(zob, 1.407661405256 767021, 1e-12, "eraAtco13", "zob", status);1331 vvd(hob, -0.092651544314 03157925, 1e-12, "eraAtco13", "hob", status);1332 vvd(dob, 0.171662656007 5591655, 1e-12, "eraAtco13", "dob", status);1333 vvd(rob, 2.710260453503 097719, 1e-12, "eraAtco13", "rob", status);1329 vvd(aob, 0.09251774485385390973, 1e-12, "eraAtco13", "aob", status); 1330 vvd(zob, 1.407661405256671703, 1e-12, "eraAtco13", "zob", status); 1331 vvd(hob, -0.09265154431430045141, 1e-12, "eraAtco13", "hob", status); 1332 vvd(dob, 0.1716626560074556029, 1e-12, "eraAtco13", "dob", status); 1333 vvd(rob, 2.710260453503366591, 1e-12, "eraAtco13", "rob", status); 1334 1334 vvd(eo, -0.003020548354802412839, 1e-14, "eraAtco13", "eo", status); 1335 1335 viv(j, 0, "eraAtco13", "j", status); … … 1350 1350 ** Called: eraAtic13, vvd 1351 1351 ** 1352 ** This revision: 201 3 October 31352 ** This revision: 2017 March 15 1353 1353 */ 1354 1354 { … … 1363 1363 eraAtic13(ri, di, date1, date2, &rc, &dc, &eo); 1364 1364 1365 vvd(rc, 2.710126504531 374930, 1e-12, "eraAtic13", "rc", status);1366 vvd(dc, 0.174063253762 8342320, 1e-12, "eraAtic13", "dc", status);1365 vvd(rc, 2.710126504531716819, 1e-12, "eraAtic13", "rc", status); 1366 vvd(dc, 0.1740632537627034482, 1e-12, "eraAtic13", "dc", status); 1367 1367 vvd(eo, -0.002900618712657375647, 1e-14, "eraAtic13", "eo", status); 1368 1368 … … 1382 1382 ** Called: eraApci13, eraAticq, vvd 1383 1383 ** 1384 ** This revision: 201 3 October 31384 ** This revision: 2017 March 15 1385 1385 */ 1386 1386 { … … 1397 1397 eraAticq(ri, di, &astrom, &rc, &dc); 1398 1398 1399 vvd(rc, 2.710126504531 374930, 1e-12, "eraAticq", "rc", status);1400 vvd(dc, 0.174063253762 8342320, 1e-12, "eraAticq", "dc", status);1399 vvd(rc, 2.710126504531716819, 1e-12, "eraAticq", "rc", status); 1400 vvd(dc, 0.1740632537627034482, 1e-12, "eraAticq", "dc", status); 1401 1401 1402 1402 } … … 1415 1415 ** Called: eraApci13, eraAticqn, vvd 1416 1416 ** 1417 ** This revision: 201 3 October 31417 ** This revision: 2017 March 15 1418 1418 */ 1419 1419 { … … 1455 1455 eraAticqn(ri, di, &astrom, 3, b, &rc, &dc); 1456 1456 1457 vvd(rc, 2.70999957503 2685412, 1e-12, "eraAtciqn", "rc", status);1458 vvd(dc, 0.173999965631 7778034, 1e-12, "eraAtciqn", "dc", status);1457 vvd(rc, 2.709999575033027333, 1e-12, "eraAtciqn", "rc", status); 1458 vvd(dc, 0.1739999656316469990, 1e-12, "eraAtciqn", "dc", status); 1459 1459 1460 1460 } … … 1570 1570 ** Called: eraAtoc13, vvd, viv 1571 1571 ** 1572 ** This revision: 201 3 October 31572 ** This revision: 2017 March 15 1573 1573 */ 1574 1574 { … … 1597 1597 elong, phi, hm, xp, yp, phpa, tc, rh, wl, 1598 1598 &rc, &dc); 1599 vvd(rc, 2.70995674466 1000609, 1e-12, "eraAtoc13", "R/rc", status);1600 vvd(dc, 0.174169650089 5398562, 1e-12, "eraAtoc13", "R/dc", status);1599 vvd(rc, 2.709956744660731630, 1e-12, "eraAtoc13", "R/rc", status); 1600 vvd(dc, 0.1741696500896438967, 1e-12, "eraAtoc13", "R/dc", status); 1601 1601 viv(j, 0, "eraAtoc13", "R/j", status); 1602 1602 … … 1606 1606 elong, phi, hm, xp, yp, phpa, tc, rh, wl, 1607 1607 &rc, &dc); 1608 vvd(rc, 2.70995674466 1000609, 1e-12, "eraAtoc13", "H/rc", status);1609 vvd(dc, 0.174169650089 5398562, 1e-12, "eraAtoc13", "H/dc", status);1608 vvd(rc, 2.709956744660731630, 1e-12, "eraAtoc13", "H/rc", status); 1609 vvd(dc, 0.1741696500896438967, 1e-12, "eraAtoc13", "H/dc", status); 1610 1610 viv(j, 0, "eraAtoc13", "H/j", status); 1611 1611 … … 1615 1615 elong, phi, hm, xp, yp, phpa, tc, rh, wl, 1616 1616 &rc, &dc); 1617 vvd(rc, 2.70995674466 1000609, 1e-12, "eraAtoc13", "A/rc", status);1618 vvd(dc, 0.174169650089 5398565, 1e-12, "eraAtoc13", "A/dc", status);1617 vvd(rc, 2.709956744660731630, 1e-12, "eraAtoc13", "A/rc", status); 1618 vvd(dc, 0.1741696500896438970, 1e-12, "eraAtoc13", "A/dc", status); 1619 1619 viv(j, 0, "eraAtoc13", "A/j", status); 1620 1620 … … 3825 3825 ** Called: eraFk52h, vvd 3826 3826 ** 3827 ** This revision: 201 3 August 73827 ** This revision: 2017 January 3 3828 3828 */ 3829 3829 { … … 4447 4447 ** Called: eraH2fk5, vvd 4448 4448 ** 4449 ** This revision: 201 3 August 74449 ** This revision: 2017 January 3 4450 4450 */ 4451 4451 { … … 4473 4473 vvd(px5, 0.37921, 1e-13, 4474 4474 "eraH2fk5", "px", status); 4475 vvd(rv5, -7.6000001309071126, 1e-1 0,4475 vvd(rv5, -7.6000001309071126, 1e-11, 4476 4476 "eraH2fk5", "rv", status); 4477 4477 … … 5982 5982 ** Called: eraPmpx, vvd 5983 5983 ** 5984 ** This revision: 201 3 October 25984 ** This revision: 2017 March 15 5985 5985 */ 5986 5986 { … … 6001 6001 eraPmpx(rc, dc, pr, pd, px, rv, pmt, pob, pco); 6002 6002 6003 vvd(pco[0], 0.23281376239603084 40, 1e-12,6003 vvd(pco[0], 0.2328137623960308438, 1e-12, 6004 6004 "eraPmpx", "1", status); 6005 vvd(pco[1], 0.66510970853978553 17, 1e-12,6005 vvd(pco[1], 0.6651097085397855328, 1e-12, 6006 6006 "eraPmpx", "2", status); 6007 vvd(pco[2], 0.70952577658963598 47, 1e-12,6007 vvd(pco[2], 0.7095257765896359837, 1e-12, 6008 6008 "eraPmpx", "3", status); 6009 6009 … … 6023 6023 ** Called: eraPmsafe, vvd, viv 6024 6024 ** 6025 ** This revision: 201 3 October 26025 ** This revision: 2017 March 15 6026 6026 */ 6027 6027 { … … 6048 6048 vvd(ra2, 1.234087484501017061, 1e-12, 6049 6049 "eraPmsafe", "ra2", status); 6050 vvd(dec2, 0.78882499824504685 74, 1e-12,6050 vvd(dec2, 0.7888249982450468567, 1e-12, 6051 6051 "eraPmsafe", "dec2", status); 6052 6052 vvd(pmr2, 0.9996457663586073988e-5, 1e-12, 6053 6053 "eraPmsafe", "pmr2", status); 6054 vvd(pmd2, -0.20000400851067 37816e-4, 1e-16,6054 vvd(pmd2, -0.2000040085106754565e-4, 1e-16, 6055 6055 "eraPmsafe", "pmd2", status); 6056 vvd(px2, 0.9999997295356 765185e-2, 1e-12,6056 vvd(px2, 0.9999997295356830666e-2, 1e-12, 6057 6057 "eraPmsafe", "px2", status); 6058 vvd(rv2, 10.38468380 113917014, 1e-10,6058 vvd(rv2, 10.38468380293920069, 1e-10, 6059 6059 "eraPmsafe", "rv2", status); 6060 6060 viv ( j, 0, "eraPmsafe", "j", status); … … 7387 7387 ** Called: eraPvstar, vvd, viv 7388 7388 ** 7389 ** This revision: 201 3 August 77389 ** This revision: 2017 March 15 7390 7390 */ 7391 7391 { … … 7406 7406 vvd(ra, 0.1686756e-1, 1e-12, "eraPvstar", "ra", status); 7407 7407 vvd(dec, -1.093989828, 1e-12, "eraPvstar", "dec", status); 7408 vvd(pmr, -0.178323516 e-4, 1e-16, "eraPvstar", "pmr", status);7409 vvd(pmd, 0.2336024047 e-5, 1e-16, "eraPvstar", "pmd", status);7408 vvd(pmr, -0.1783235160000472788e-4, 1e-16, "eraPvstar", "pmr", status); 7409 vvd(pmd, 0.2336024047000619347e-5, 1e-16, "eraPvstar", "pmd", status); 7410 7410 vvd(px, 0.74723, 1e-12, "eraPvstar", "px", status); 7411 vvd(rv, -21.6 , 1e-11, "eraPvstar", "rv", status);7411 vvd(rv, -21.60000010107306010, 1e-11, "eraPvstar", "rv", status); 7412 7412 7413 7413 viv(j, 0, "eraPvstar", "j", status); … … 8392 8392 ** Called: eraStarpm, vvd, viv 8393 8393 ** 8394 ** This revision: 201 3 August 78394 ** This revision: 2017 March 15 8395 8395 */ 8396 8396 { … … 8411 8411 &ra2, &dec2, &pmr2, &pmd2, &px2, &rv2); 8412 8412 8413 vvd(ra2, 0.016689190694142 42368, 1e-13,8413 vvd(ra2, 0.01668919069414256149, 1e-13, 8414 8414 "eraStarpm", "ra", status); 8415 vvd(dec2, -1.0939664542171278 79, 1e-13,8415 vvd(dec2, -1.093966454217127897, 1e-13, 8416 8416 "eraStarpm", "dec", status); 8417 vvd(pmr2, -0.178366268215 5932702e-4, 1e-17,8417 vvd(pmr2, -0.1783662682153176524e-4, 1e-17, 8418 8418 "eraStarpm", "pmr", status); 8419 vvd(pmd2, 0.233809291598 7603664e-5, 1e-17,8419 vvd(pmd2, 0.2338092915983989595e-5, 1e-17, 8420 8420 "eraStarpm", "pmd", status); 8421 vvd(px2, 0.74735338353 23493644, 1e-13,8421 vvd(px2, 0.7473533835317719243, 1e-13, 8422 8422 "eraStarpm", "px", status); 8423 vvd(rv2, -21.59905170476 860786, 1e-11,8423 vvd(rv2, -21.59905170476417175, 1e-11, 8424 8424 "eraStarpm", "rv", status); 8425 8425 … … 8441 8441 ** Called: eraStarpv, vvd, viv 8442 8442 ** 8443 ** This revision: 201 3 August 78443 ** This revision: 2017 March 15 8444 8444 */ 8445 8445 { … … 8464 8464 "eraStarpv", "13", status); 8465 8465 8466 vvd(pv[1][0], -0.40518540 35740712739e-2, 1e-13,8466 vvd(pv[1][0], -0.4051854008955659551e-2, 1e-13, 8467 8467 "eraStarpv", "21", status); 8468 vvd(pv[1][1], -0.6253919754 866173866e-2, 1e-15,8468 vvd(pv[1][1], -0.6253919754414777970e-2, 1e-15, 8469 8469 "eraStarpv", "22", status); 8470 vvd(pv[1][2], 0.118935371 9774107189e-1, 1e-13,8470 vvd(pv[1][2], 0.1189353714588109341e-1, 1e-13, 8471 8471 "eraStarpv", "23", status); 8472 8472 … … 9672 9672 9673 9673 /* Report, set up an appropriate exit status, and finish. */ 9674 printf("ERFA version: %s\n", eraVersion()); 9675 printf("SOFA version: %s\n", eraSofaVersion()); 9674 9676 if (status) { 9675 9677 printf("t_erfa_c validation failed!\n"); … … 9682 9684 ** 9683 9685 ** 9684 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.9686 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 9685 9687 ** All rights reserved. 9686 9688 ** -
trunk/FACT++/erfa/src/taitt.c
r18711 r18921 34 34 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** Derived, with permission, from the SOFA library. See notes at end of file. 38 38 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/taiut1.c
r18711 r18921 36 36 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** Derived, with permission, from the SOFA library. See notes at end of file. 40 40 */ … … 60 60 ** 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** All rights reserved. 64 64 ** -
trunk/FACT++/erfa/src/taiutc.c
r18711 r18921 57 57 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 58 58 ** 59 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.59 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 60 60 ** Derived, with permission, from the SOFA library. See notes at end of file. 61 61 */ … … 108 108 ** 109 109 ** 110 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.110 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 111 111 ** All rights reserved. 112 112 ** -
trunk/FACT++/erfa/src/tcbtdb.c
r18711 r18921 48 48 ** IAU 2006 Resolution B3 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** Derived, with permission, from the SOFA library. See notes at end of file. 52 52 */ … … 81 81 ** 82 82 ** 83 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.83 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 84 84 ** All rights reserved. 85 85 ** -
trunk/FACT++/erfa/src/tcgtt.c
r18711 r18921 33 33 ** IAU 2000 Resolution B1.9 34 34 ** 35 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.35 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 36 36 ** Derived, with permission, from the SOFA library. See notes at end of file. 37 37 */ … … 58 58 ** 59 59 ** 60 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.60 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 61 61 ** All rights reserved. 62 62 ** -
trunk/FACT++/erfa/src/tdbtcb.c
r18711 r18921 48 48 ** IAU 2006 Resolution B3 49 49 ** 50 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.50 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 51 51 ** Derived, with permission, from the SOFA library. See notes at end of file. 52 52 */ … … 86 86 ** 87 87 ** 88 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.88 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 89 89 ** All rights reserved. 90 90 ** -
trunk/FACT++/erfa/src/tdbtt.c
r18711 r18921 46 46 ** IAU 2006 Resolution 3 47 47 ** 48 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.48 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 49 49 ** Derived, with permission, from the SOFA library. See notes at end of file. 50 50 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/tf2a.c
r18711 r18921 35 35 ** first, the smallest taking precedence. 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 56 56 ** 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** All rights reserved. 60 60 ** -
trunk/FACT++/erfa/src/tf2d.c
r18711 r18921 35 35 ** first, the smallest taking precedence. 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 56 56 ** 57 57 ** 58 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.58 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 59 59 ** All rights reserved. 60 60 ** -
trunk/FACT++/erfa/src/tr.c
r18711 r18921 21 21 ** eraCr copy r-matrix 22 22 ** 23 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.23 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 24 24 ** Derived, with permission, from the SOFA library. See notes at end of file. 25 25 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/trxp.c
r18711 r18921 23 23 ** eraRxp product of r-matrix and p-vector 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/trxpv.c
r18711 r18921 23 23 ** eraRxpv product of r-matrix and pv-vector 24 24 ** 25 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.25 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 26 26 ** Derived, with permission, from the SOFA library. See notes at end of file. 27 27 */ … … 42 42 ** 43 43 ** 44 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.44 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 45 45 ** All rights reserved. 46 46 ** -
trunk/FACT++/erfa/src/tttai.c
r18711 r18921 34 34 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 35 35 ** 36 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.36 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 37 37 ** Derived, with permission, from the SOFA library. See notes at end of file. 38 38 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/tttcg.c
r18711 r18921 33 33 ** IAU 2000 Resolution B1.9 34 34 ** 35 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.35 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 36 36 ** Derived, with permission, from the SOFA library. See notes at end of file. 37 37 */ … … 61 61 ** 62 62 ** 63 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.63 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 64 64 ** All rights reserved. 65 65 ** -
trunk/FACT++/erfa/src/tttdb.c
r18711 r18921 46 46 ** IAU 2006 Resolution 3 47 47 ** 48 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.48 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 49 49 ** Derived, with permission, from the SOFA library. See notes at end of file. 50 50 */ … … 70 70 ** 71 71 ** 72 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.72 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 73 73 ** All rights reserved. 74 74 ** -
trunk/FACT++/erfa/src/ttut1.c
r18711 r18921 35 35 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/ut1tai.c
r18711 r18921 36 36 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 37 37 ** 38 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.38 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 39 39 ** Derived, with permission, from the SOFA library. See notes at end of file. 40 40 */ … … 60 60 ** 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** All rights reserved. 64 64 ** -
trunk/FACT++/erfa/src/ut1tt.c
r18711 r18921 35 35 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 36 36 ** 37 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.37 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 38 38 ** Derived, with permission, from the SOFA library. See notes at end of file. 39 39 */ … … 59 59 ** 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** All rights reserved. 63 63 ** -
trunk/FACT++/erfa/src/ut1utc.c
r18711 r18921 63 63 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 64 64 ** 65 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.65 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 66 66 ** Derived, with permission, from the SOFA library. See notes at end of file. 67 67 */ … … 142 142 ** 143 143 ** 144 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.144 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 145 145 ** All rights reserved. 146 146 ** -
trunk/FACT++/erfa/src/utctai.c
r18711 r18921 59 59 ** P. Kenneth Seidelmann (ed), University Science Books (1992) 60 60 ** 61 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.61 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 62 62 ** Derived, with permission, from the SOFA library. See notes at end of file. 63 63 */ … … 126 126 ** 127 127 ** 128 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.128 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 129 129 ** All rights reserved. 130 130 ** -
trunk/FACT++/erfa/src/utcut1.c
r18711 r18921 64 64 ** eraTaiut1 TAI to UT1 65 65 ** 66 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.66 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 67 67 ** Derived, with permission, from the SOFA library. See notes at end of file. 68 68 */ … … 96 96 ** 97 97 ** 98 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.98 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 99 99 ** All rights reserved. 100 100 ** -
trunk/FACT++/erfa/src/xy06.c
r18711 r18921 86 86 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 87 87 ** 88 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.88 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 89 89 ** Derived, with permission, from the SOFA library. See notes at end of file. 90 90 */ … … 2707 2707 ** 2708 2708 ** 2709 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.2709 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 2710 2710 ** All rights reserved. 2711 2711 ** -
trunk/FACT++/erfa/src/xys00a.c
r18711 r18921 60 60 ** IERS Technical Note No. 32, BKG (2004) 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** Derived, with permission, from the SOFA library. See notes at end of file. 64 64 */ … … 82 82 ** 83 83 ** 84 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.84 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 85 85 ** All rights reserved. 86 86 ** -
trunk/FACT++/erfa/src/xys00b.c
r18711 r18921 60 60 ** IERS Technical Note No. 32, BKG (2004) 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** Derived, with permission, from the SOFA library. See notes at end of file. 64 64 */ … … 82 82 ** 83 83 ** 84 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.84 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 85 85 ** All rights reserved. 86 86 ** -
trunk/FACT++/erfa/src/xys06a.c
r18711 r18921 60 60 ** Wallace, P.T. & Capitaine, N., 2006, Astron.Astrophys. 459, 981 61 61 ** 62 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.62 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 63 63 ** Derived, with permission, from the SOFA library. See notes at end of file. 64 64 */ … … 82 82 ** 83 83 ** 84 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.84 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 85 85 ** All rights reserved. 86 86 ** -
trunk/FACT++/erfa/src/zp.c
r18711 r18921 12 12 ** p double[3] p-vector 13 13 ** 14 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.14 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 15 15 ** Derived, with permission, from the SOFA library. See notes at end of file. 16 16 */ … … 26 26 ** 27 27 ** 28 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.28 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 29 29 ** All rights reserved. 30 30 ** -
trunk/FACT++/erfa/src/zpv.c
r18711 r18921 15 15 ** eraZp zero p-vector 16 16 ** 17 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.17 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 18 18 ** Derived, with permission, from the SOFA library. See notes at end of file. 19 19 */ … … 28 28 ** 29 29 ** 30 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.30 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 31 31 ** All rights reserved. 32 32 ** -
trunk/FACT++/erfa/src/zr.c
r18711 r18921 12 12 ** r double[3][3] r-matrix 13 13 ** 14 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.14 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 15 15 ** Derived, with permission, from the SOFA library. See notes at end of file. 16 16 */ … … 32 32 ** 33 33 ** 34 ** Copyright (C) 2013-201 6, NumFOCUS Foundation.34 ** Copyright (C) 2013-2017, NumFOCUS Foundation. 35 35 ** All rights reserved. 36 36 **
Note:
See TracChangeset
for help on using the changeset viewer.