资源简介
JPL的一个DE405的数据,一个fortran的读取行星星历并计算相对位置的代码,一个C++使用fortran库的数据的,从而实现“C++”版本行星星历计算。
代码片段和文件信息
#include
using namespace std;
extern “C“
{
void pleph_(double*int*int*double*);
}
/** PLEPH ******** subroutine pleph( tdb npl nctr pv) **********
Input
-----
tdb [d.p.] : julian ephemeris date
npl [int.] : planet number
nctr [int.] : center number
identifications for “npl“ and “nctr“
------------------------------------
1 = mercury 8 = neptune
2 = venus 9 = pluto
3 = earth 10 = moon
4 = mars 11 = sun
5 = jupiter 12 = solar-system barycenter
6 = saturn 13 = earth-moon barycenter
7 = uranus 14 = nutations in longitude and obliquity
15 = librations (if they exist on the file)
(for nutations and librations nctr=0)
Output
------
pv(6) [d.p.] : xyzx-doty-dotz-dot [au au/day]
for nutations d(psi) d(eps) d(psi)-dot d(eps)-dot
[rads rads/day]
for librations (Euler angles and rates w.r.t. the ephemeris
reference frame) [rads rads/day]
*/
int main()
{
double ET = 2451536.50; // 2000年1月1日
int NTARG = 11; //sun
int NCENT = 3; //earth
double R[6];
pleph_(&ET&NTARG&NCENTR);
cout<<“Here is the R[6]“< cout< cout< return 0;
}
属性 大小 日期 时间 名称
----------- --------- ---------- ----- ----
-rw-rw-r-- 1243 2016-05-25 20:21 JPL合集\readme
-rwxr----- 6403298 2016-05-24 17:03 JPL合集\JPLdata-DE405\ascp2000.405
-rwxr----- 5963 2016-05-23 17:09 JPL合集\JPLdata-DE405\header.405
-rwxr----- 592040 2016-05-23 17:09 JPL合集\JPLdata-DE405\testpo.405
-rw-rw-r-- 417210 2016-05-25 19:11 JPL合集\JPL行星-月球星历-知网.pdf
-rwxr----- 33179 2016-05-23 17:33 JPL合集\fortran\testeph.f
-rwxr----- 14358 2016-05-23 17:33 JPL合集\fortran\userguide.txt
-rwxr----- 11936 2016-05-23 17:33 JPL合集\fortran\asc2eph.f
-rwxrwxr-x 24985 2016-05-24 15:59 JPL合集\TEST\bin\testeph
-rwxrwxr-x 46787 2016-05-24 18:07 JPL合集\TEST\bin\main
-rw-rw-r-- 28848 2016-05-24 17:54 JPL合集\TEST\obj\testeph.o
-rw-rw-r-- 33888 2016-05-24 18:07 JPL合集\TEST\obj\main.o
-rwxr----- 24541 2016-05-24 16:09 JPL合集\TEST\testeph.f
-rw-rw-r-- 5882 2016-05-24 17:16 JPL合集\TEST\JPLEPH.info
-rw-rw-r-- 1881264 2016-05-24 17:13 JPL合集\TEST\JPLEPH
-rw-rw-r-- 271 2016-05-24 17:13 JPL合集\TEST\getbindata\readme
-rwxr----- 6403298 2016-05-24 17:03 JPL合集\TEST\getbindata\ascp2000.405
-rwxr----- 11935 2016-05-23 18:22 JPL合集\TEST\getbindata\asc2eph.f
-rw-rw-r-- 1881264 2016-05-24 17:13 JPL合集\TEST\getbindata\JPLEPH
-rwxrwxr-x 22343 2016-05-24 17:06 JPL合集\TEST\getbindata\asc2eph
-rwxr----- 5963 2016-05-23 17:09 JPL合集\TEST\getbindata\header.405
-rwxr----- 592040 2016-05-23 17:09 JPL合集\TEST\getbindata\testpo.405
-rw-rw-r-- 1618 2016-05-24 18:32 JPL合集\TEST\main.cpp
-rwxrwx--- 619 2016-05-25 20:09 JPL合集\TEST\makefile
drwxrwxr-x 0 2016-05-24 18:07 JPL合集\TEST\bin
drwxrwxr-x 0 2016-05-24 18:07 JPL合集\TEST\obj
drwxrwxr-x 0 2016-05-24 17:13 JPL合集\TEST\getbindata
drwxrwxr-x 0 2016-05-24 18:02 JPL合集\TEST\data
drwxrwxr-x 0 2016-05-25 19:56 JPL合集\JPLdata-DE405
drwxrwxr-x 0 2016-05-25 20:21 JPL合集\fortran
............此处省略5个文件信息
- 上一篇:回合制游戏c++源代码
- 下一篇:vc++2008Redist安装包
评论
共有 条评论