ó L‘ÜKc@suddlTddlTd„Zd„Zd„Zd„Zd„Zd„Zd„Zd d „Z d „Z d „Z d S(iÿÿÿÿ(t*cCstt|ƒt|ƒƒS(N(tasintcostsin(tseasontgamma((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytsunlatscCsYt|ƒ t|ƒt|ƒt|ƒ}|dkr;tS|dkrKdSt|ƒSdS(Ngð¿gð?g(RRtpitacos(tphitdeltattemp((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pyths +  cCsTdtt||ƒƒt|ƒt|ƒdt||ƒt|ƒt|ƒdS(Ng@gn†ðù! @gn†ðù!@(RR R(R R ((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytflux s*cCst|t||ƒƒS(N(R R(R Rt obliquity((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytsolar&scCstd}d}dt|}xOgt|ƒD]}|d||^q*D]"}|t|t||ƒƒ7}qFW|dS(Ngi´g@g€f@(RtrangeR R(R RtavgtntdstiR((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytAnnMeanFluxCirc,s 2 cCsM|j}|j}|j}||dd|t|ƒdd|ddS(Nii(tetJtaR(tttkappatparamsRRR((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytkappadot;s   cCs"|d||d|t|ƒS(Ngð?(R(RRR((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytrBsgc Cstƒ}||_d|_d|_dtd}ttd||ƒ}|j|ƒg}g}g}|}xc|dt|krÑ|jƒ\} }|j | ƒ|j |ƒ|j t |j|j|ƒƒqoWt ƒ} | j |ddƒ| j |ddƒ| j |d d ƒ| S( Ngð?g@iXgRtTimeRs Season angleRsDistance from Sun( tDummyRRRRt integratorRt setParamstnexttappendRtCurvetaddCurve( Rt kappaStartRtdttmttListtrListt kappaListRRtc((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pytorbitIs*       # cCsVd|dd}g|dD]"}t|t|||ƒƒ^q}tj|ƒ|S(Ngð?RiR(R RtNumerictarray(tlattobltprecesstorbtLRtfluxes((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pyt orbitFluxgs3cCs˜t||||ƒ}d}xXtt|ƒdƒD]@}|d||d|||d|d|d|7}q2W||dd|dd}|S(Ngigà?Riÿÿÿÿi(R6Rtlen(R0R1R2R3R tsumR((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pyt AnnMeanFluxns >N( tClimateUtilitiestmathRR R RRRRR-R6R9(((s/Users/rtp1/Havsornen/PlanetaryClimateBook/ClimateWorkBook/CoursewareSandbox/PlanetaryClimateCourseware/ChapterScripts/Chapter7Scripts/solar.pyt s