source: trunk/MagicSoft/slalib/caf2r.c@ 1981

Last change on this file since 1981 was 731, checked in by tbretz, 23 years ago
*** empty log message ***
  • Property svn:executable set to *
File size: 1.1 KB
Line 
1#include "slalib.h"
2#include "slamac.h"
3void slaCaf2r ( int ideg, int iamin, float asec, float *rad, int *j )
4/*
5** - - - - - - - - -
6** s l a C a f 2 r
7** - - - - - - - - -
8**
9** Convert degrees, arcminutes, arcseconds to radians.
10**
11** (single precision)
12**
13** Given:
14** ideg int degrees
15** iamin int arcminutes
16** asec float arcseconds
17**
18** Returned:
19** *rad float angle in radians
20** *j int status: 0 = ok
21** 1 = ideg outside range 0-359
22** 2 = iamin outside range 0-59
23** 3 = asec outside range 0-59.999...
24**
25** Notes:
26** 1) The result is computed even if any of the range checks fail.
27**
28** 2) The sign must be dealt with outside this routine.
29**
30** Called: slaDaf2r
31**
32** Last revision: 31 October 1993
33**
34** Copyright P.T.Wallace. All rights reserved.
35*/
36{
37 double w;
38
39/* Call double precision version */
40 slaDaf2r ( ideg, iamin, (double) asec, &w, j );
41 *rad = (float) w;
42}
Note: See TracBrowser for help on using the repository browser.