Visibility of Luna and Lunar Crescent

fem-Doq(IO0,(o I5'telomorv400)|'62'pov]l100 ?O'/po$rlelomor20l:
I80 0) 2 oi)i
ii'-i..-po*tro.o.s xr, r
'oo+Po$kos(felomon'Pv
m@nFrou4lo 0,(_0 4'(Fmal-noscnlrl4r z/ r"i ..
doonb=;oonb 1l O pova 10 0'( '0 4+[shtr I'stpos'r I ))i
';j,f"nn",li.ilk##ir#niti#rr'niffi ;".r"''
,fouF owlI0 0,t0 4'k$h[i]rsnpo*n):
f.s=6 i r mw( 10 0,7 0)/po*1|.loNu Z 0)
lcs+=rov'( I O 0.(6.Itf.lodu 400)rl
ili=,J"-'oi" rid 6.i:e"
' ' oe' pow;cosf'ro^nqun'Pv
da\bno$( |0 0,( 0 4'(mshtrl_o6(nlrl*) zr,n
davb=<t vb'( I G pow( 10 0 { 4rk$blil'slpo*r) rl
d.;b=lr;s.ctoud440000.011.0-crourl)'davbi
,r,aout.t*itul b$hlil=nighlb+dalb,
cle' b*hl'l=nielb+Nilb:
ifihalPoo) b(hL'l=bshlil+m@nb:
bllrlil=bschlilipo*(10 0.12 0)i
I 80 0 r'2 0)
L'=o*n,ruo.oo,,rr',*oo,, t',
;il"fi;iil;i" -jili.TrJ,,gf*,,'; :l:::SXll3:::i:l l
;il=on;.po*( l .o+;oa{cr*o'ber.0 5r) 20'r
!cn=-16 57-2 5'log(khy'log( 10 0)4nscnlzl'
2i0