/*  * This file is part of the UCB release of Plan 9. It is subject to the license * terms in the LICENSE file found in the top-level directory of this * distribution and at http://akaros.cs.berkeley.edu/files/Plan9License. No * part of the UCB release of Plan 9, including this file, may be copied, * modified, propagated, or distributed except according to the terms contained * in the LICENSE file. */ #include "astro.h" voidoutput(char *s, Obj1 *p){ 	if(s == 0)		print(" SAO %5ld", sao);	else		print("%10s", s);	print(" %R %D %9.4f %9.4f %9.4f",		p->ra, p->decl2, p->az, p->el, p->semi2);	if(s == osun.name || s == omoon.name)		print(" %7.4f", p->mag);	print("\n");} intRconv(Fmt *f){	double v;	int h, m, c; 	v = va_arg(f->args, double);	v = fmod(v*12/pi, 24);		/* now hours */	h = floor(v);	v = fmod((v-h)*60, 60);		/* now leftover minutes */	m = floor(v);	v = fmod((v-m)*60, 60);		/* now leftover seconds */	c = floor(v);	return fmtprint(f, "%2dh%.2dm%.2ds", h, m, c);} intDconv(Fmt *f1){	double v;	int h, m, c, f; 	v = va_arg(f1->args, double);	v = fmod(v/radian, 360);	/* now degrees */	f = 0;	if(v > 180) {		v = 360 - v;		f = 1;	}	h = floor(v);	v = fmod((v-h)*60, 60);		/* now leftover minutes */	m = floor(v);	v = fmod((v-m)*60, 60);		/* now leftover seconds */	c = floor(v);	return fmtprint(f1, "%c%.2d°%.2d'%.2d\"", "+-"[f], h, m, c);}