source: trunk/MagicSoft/slalib/cr2tf.c@ 765

Last change on this file since 765 was 731, checked in by tbretz, 23 years ago
*** empty log message ***
  • Property svn:executable set to *
File size: 762 bytes
Line 
1#include "slalib.h"
2#include "slamac.h"
3void slaCr2tf ( int ndp, float angle, char *sign, int ihmsf[4] )
4/*
5** - - - - - - - - -
6** s l a C r 2 t f
7** - - - - - - - - -
8**
9** Convert an angle in radians into hours, minutes, seconds.
10**
11** (single precision)
12**
13** Given:
14** ndp int number of decimal places of seconds
15** angle float angle in radians
16**
17** Returned:
18** sign char* '+' or '-'
19** ihmsf int(4) hours, minutes, seconds, fraction
20**
21** Called:
22** slaDd2tf
23**
24** Defined in slamac.h: D2PI
25**
26** Last revision: 18 November 1993
27**
28** Copyright P.T.Wallace. All rights reserved.
29*/
30{
31/* Scale then use days to h,m,s routine */
32 slaDd2tf ( ndp, (double) angle / D2PI, sign, ihmsf );
33}
Note: See TracBrowser for help on using the repository browser.