ref: 8d51e7fa1a1dbcbde513c2b756d504c879598907
dir: /sys/src/cmd/scat/patch.c/
#include <u.h> #include <libc.h> #include <bio.h> #include "sky.h" /* * dec varies from -89 to 89, inclusive. * ra varies depending on dec; each patch is about 1 square degree. * * Northern hemisphere (0<=dec<=89): * from 0<=dec<=59, ra is every 4m, 360 values * from 60<=dec<=69, ra is every 8m, 180 values * from 70<=dec<=79, ra is every 12m, 120 values * from 80<=dec<=84, ra is every 24m, 60 values * at dec=85 and 86, ra is every 48m, 30 values * at dec=87, ra is every 60m, 24 values * at dec=88, ra is every 120m, 12 values * at dec=89, ra is 12h, 1 value * * Total number of patches in northern hemisphere is therefore: * 360*60+180*10+120*10+60*5+30*2+24*1+12*1+1 = 24997 * Total number of patches is therefore * 2*24997-360 = 49634 (dec=0 has been counted twice) * (cf. 41253 square degrees in the sky) */ void radec(int p, int *rah, int *ram, int *deg) { *deg = (p&255)-90; p >>= 8; *rah = p/15; *ram = (p%15)*4; if(*deg<0) (*deg)++; } long patcha(Angle ra, Angle dec) { ra = DEG(ra); dec = DEG(dec); if(dec >= 0) return patch(floor(ra/15), ((int)floor(ra*4))%60, floor(dec)); dec = -dec; return patch(floor(ra/15), ((int)floor(ra*4))%60, -floor(dec)); } char round[91]={ /* extra 0 is to offset the array */ /* 0 */ 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 10 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 20 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 30 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 40 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 50 */ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, /* 60 */ 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, /* 70 */ 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, /* 80 */ 6, 6, 6, 6, 6, 12, 12, 15, 30, -1, /* 90 */ }; long patch(int rah, int ram, int deg) { int ra, dec; /* * patches go from lower limit <= position < upper limit. * therefore dec ' " can be ignored; always inc. dec degrees. * the computed angle is then the upper limit (ignoring sign). * when done, +ve values are shifted down so 90 (0 degrees) is a value; */ if(rah<0 || rah>=24 || ram<0 || abs(deg)>=90){ fprint(2, "scat: patch: bad ra or dec %dh%dm %d\n", rah, ram, deg); abort(); } if(deg < 0) deg--; else if(deg < 90) deg++; dec = deg+90; deg = abs(deg); if(deg<1 || deg>90){ fprint(2, "scat: patch: panic %dh%dm %d\n", rah, ram, deg); abort(); } if(deg == 90) ra = 180; else{ ra = 15*rah+ram/4; ra -= ra%round[deg]; } /* close the hole at 0 */ if(dec > 90) --dec; if(ra >= 360) ra -= 360; return (ra<<8)|dec; }