Visibility of Luna and Lunar Crescent

)
I(24299161.0) e=z; el$
{ alph<doublc(lon8((2-186nt6.25y3652425))):,
@-z+ L0+6lph-(doubl€ (lons (ddv4.oD);
I
cldouble (lons ((bbj22.1y365.25)Di
dd=(double (lo4 (355.25'@)));
e<double (lon8 (GMdY30.60{ l)));
md.rFbbnd-(doublc (lo!s (30.600 l'c))Fr:
i(a<14.0) !)modn+l.o: clsc mmodh+13.0;
i(montF2.o) my€f<4?16.0: els mlta-rc47l50i
nnrhor-{mdar€-double(!o4(md!tc)))r24.0i
uho@houtsd.liatlin(myedl620.0)l/3600.0;
min=(mhour-doubqlone(mhout))'60.01
ms6=(ubin.doublc(lons(minD)160 0i
unin=(unoudoubl(lons(uhou)))160 0:
Na=(uin-doubqlons(unin)))'60 0;
{
i(s@>600)
i(min=60.0)
{ mi"{ 0:
hou.H;
i(houP=24 0)
{ houFo 0i
dare+;
i(daenonthdaYslint(nonthl'0)l)
{ datFloi
mo.ll|++;
i(nonth>120)
{ nonth=1o;
v6rr:
lt )))
)
{ nin=00;
if(ho!P=24.0)
{ houFo-o]
220