xref: /plan9/sys/src/cmd/astro/nutt.c (revision 7dd7cddf99dd7472612f1413b4da293630e6b1bc)
1 #include "astro.h"
2 
3 double	nutfp[] =
4 {
5 	  .2088,	0,
6 	-1.2730,	0,
7 	  .1258,	0,
8 	 -.0496,	0,
9 	  .0214,	0,
10 	  .0124,	0,
11 	      0,
12 
13 	 9.2109,	0,
14 	 -.0904,	0,
15 	  .5519,	0,
16 	  .0215,	0,
17 	 -.0093,	0,
18 	 -.0066,	0,
19 	      0,
20 
21 	 -.2037,	0,
22 	  .0675,	0,
23 	 -.0342,	0,
24 	 -.0261,	0,
25 	 -.0149,	0,
26 	  .0114,	0,
27 	  .0060,	0,
28 	  .0058,	0,
29 	 -.0057,	0,
30 	 -.0052,	0,
31 	      0,
32 
33 	  .0884,	0,
34 	  .0183,	0,
35 	  .0113,	0,
36 	 -.0050,	0,
37 	      0,
38 };
39 
40 char	nutcp[] =
41 {
42 	2,0,0,0,
43 	2,2,-2,0,
44 	0,0,0,1,
45 	2,2,-2,1,
46 	2,2,-2,-1,
47 	1,2,-2,0,
48 
49 	1,0,0,0,
50 	2,0,0,0,
51 	2,2,-2,0,
52 	2,2,-2,1,
53 	2,2,-2,-1,
54 	1,2,-2,0,
55 
56 	2,2,0,0,
57 	0,0,1,0,
58 	1,2,0,0,
59 	2,2,1,0,
60 	0,0,1,-2,
61 	2,2,-1,0,
62 	0,0,0,2,
63 	1,0,1,0,
64 	1,0,-1,0,
65 	2,2,-1,2,
66 
67 	2,2,0,
68 	1,2,0,
69 	2,2,1,
70 	2,2,-1,
71 };
72