blob: 7533ff94b44d47a6a2dde49c49a69b6e5daca8f3 (
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
|
.help caf2r Jun99 "Slalib Package"
.nf
SUBROUTINE slCAFR (IDEG, IAMIN, ASEC, RAD, J)
- - - - - -
C A F R
- - - - - -
Convert degrees, arcminutes, arcseconds to radians
(single precision)
Given:
IDEG int degrees
IAMIN int arcminutes
ASEC real arcseconds
Returned:
RAD real angle in radians
J int status: 0 = OK
1 = IDEG outside range 0-359
2 = IAMIN outside range 0-59
3 = ASEC outside range 0-59.999...
Notes:
1) The result is computed even if any of the range checks
fail.
2) The sign must be dealt with outside this routine.
P.T.Wallace Starlink 23 August 1996
Copyright (C) 1996 Rutherford Appleton Laboratory
Copyright (C) 1995 Association of Universities for Research in Astronomy Inc.
.fi
.endhelp
|