blob: 6522e3983b2ad6a8ebe89ad0ced8e58245a20238 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
|
.help v2tp Jun99 "Slalib Package"
.nf
SUBROUTINE slV2TP (V, V0, XI, ETA, J)
- - - - -
V 2 T P
- - - - -
Given the direction cosines of a star and of the tangent point,
determine the star's tangent-plane coordinates.
(single precision)
Given:
V r(3) direction cosines of star
V0 r(3) direction cosines of tangent point
Returned:
XI,ETA r tangent plane coordinates of star
J i status: 0 = OK
1 = error, star too far from axis
2 = error, antistar on tangent plane
3 = error, antistar too far from axis
Notes:
1 If vector V0 is not of unit length, or if vector V is of zero
length, the results will be wrong.
2 If V0 points at a pole, the returned XI,ETA will be based on the
arbitrary assumption that the RA of the tangent point is zero.
3 This routine is the Cartesian equivalent of the routine slS2TP.
P.T.Wallace Starlink 27 November 1996
Copyright (C) 1996 Rutherford Appleton Laboratory
Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
.fi
.endhelp
|
