Ñò êéJc@s;ddkTdZdZdZdZdZdZd„Zd S( iÿÿÿÿ(t*gHáz®Gá?g¸…ëQ¸î?gJ@g,@g$@gC@c Csed}d}tddƒ}|idtƒtddƒ}|idtƒtdd ƒ}|idtƒtd d ƒ}|idtƒtd d ƒ}|idtƒtd d ƒ}|idtƒd}xF|tjo8|i|ƒ|i|ƒjo |} Pn|d7}qÏWt}x=|| jo/|i|ƒtjo |} Pn|d8}qWtdd| | ƒ} tdd | | ƒ} td}x=|djo/|i|ƒt jo |} Pn|d7}q’Wtdd | tƒ}tdd | tƒ}| }d}x=|djo/|i|ƒt jo |}Pn|d7}qWtdd||ƒ}tdd||ƒ}t | tttƒ}t |t | t ƒ}t ttt|itƒƒ}t | t tt ƒ}t |t | t ƒ}t tt t|itƒ ƒ}|i |ƒ|i |ƒ| i |ƒ| i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ| i |ƒ| i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ|i |ƒ||| | ||||||||g S(Niitpzminposs[0]/xitpzminnegs-[0]/xtptminposssqrt(1-([0]/x)^2)tptminnegs-sqrt(1-([0]/x)^2)tptmaxpostptmaxnegg$@gš™™™™™¹?t ptminposcurvet ptminnegcurvegü©ñÒMbP?g€J@t ptmaxposcurvet ptmaxnegcurvet pzminposcurvet pzminnegcurve( tTFormulat SetParametertpzmintptmintptmaxtptotmaxtEvaltacmaxtTF1tacmintTLinet SetLineWidtht SetLineColor(t linecolort linewidthRRRRRRtdptott ptminstarttptminendRRt ptmaxstartR R t pzminstarttpzminendR R tcosthmaxposlinetcosthminposlinetptotmaxposlinetcosthmaxneglinetcosthminneglinetptotmaxnegline((sV/home/ant/Documents/Work/MyThesis/chapters/4/pic/Fiducial_source/robs_draw_fiducial.pytfiducial_lines s¦                                 N(tROOTRRRRRRR((((sV/home/ant/Documents/Work/MyThesis/chapters/4/pic/Fiducial_source/robs_draw_fiducial.pyts