#include "astro.h" void output(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"); } int Rconv(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); } int Dconv(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); }