Datetime :: Evenement :: Solarterm Datetime-extensie om zonne-termen te berekenen
Download nu

Datetime :: Evenement :: Solarterm Rangschikking & Samenvatting

Datetime :: Evenement :: Solarterm Tags

Perl-module evenement Datum Tijd Zonne DateTime verlenging Zonne-termen

Datetime :: Evenement :: Solarterm Beschrijving

Datetime-extensie om zonne-termen te berekenen Een Lunar-kalender heeft maanden op basis van de maancyclus, die ongeveer 29,5 dagen is. Deze cyclus komt niet overeen met de cyclus van de zon, die ongeveer 365 dagen is. U kunt de schrikkelmaanden gebruiken om de cyclus beter uit te lijnen zoals in de Chinese kalender, maar dat betekent dat nog steeds dat maanden kan worden uitgeschakeld door mogelijk één maanmaand. Dit was onaanvaardbaar voor landbouwdoeleinden die diep verband houden met het seizoen, dat op zijn beurt gekoppeld is aan de zonnecyclus. Dit is waar zonne-voorwaarden worden gebruikt. Ongeacht welke maanmaand het is, kun je het seizoen vertellen met behulp van de Solar-termen. Solaire voorwaarden worden nog steeds gebruikt in sommige delen van Azië, met name China, waar grote feestdagen moeten worden berekend op basis van deze zonne-termen. Synopsis Gebruik Datetime :: Evenement :: SolarterM; mijn $ major_term = datetime :: gebeurtenis :: SolarterM-> Major_term (); mijn $ DT0 = Datetime-> Nieuw (...); mijn $ next_major_term = $ major_term-> volgende ($ DT0); mijn $ prev_major_term = $ major_term-> vorige ($ DT0); mijn $ DT1 = Datetime-> Nieuw (...); mijn $ DT2 = Datetime-> Nieuw (...); My $ Span = DateTime :: Span-> Nieuw (start => $ DT1, einde => $ DT2); mijn $ set = $ major_term-> kruispunt ($ span); mijn $ iter = $ set-> iterator (); terwijl (mijn $ DT = $ ITER-> Volgende) {Print $ DT-> DateTime "," ";} mijn $ MINDER_TERM = DATETIME :: EVENTIME :: SolarterM-> Minor_TERM (); My $ DT0 = DateTime-> Nieuwe (...); mijn $ next_minor_term = $ MINDER_TERM-> VOLGENDE ($ DT0); MIJN $ prev_minor_term = $ MINDER_TERM-> Vorige ($ DT0); mijn $ DT1 = DATETIME-> NIEUW (...); mijn $ DT2 = DATETIME-> NIEUW (...); mijn $ span = DATETIME :: Span-> NIEUW (START => $ DT1, END => $ DT2); mijn $ SET = $ MINDER_TERM-> kruising ($ span); mijn $ iter = $ set-> iterator (); terwijl (mijn $ dt = $ iter- > Volgende) {Print $ DT-> DateTime, " ";} # Als u gewoon een enkele grote / kleine term evenement kunt berekenen Mijn $ DT = Datetime :: Evenement :: Lunar-> Major_Term_After (Datetime => $ DT0); My $ DT = DateTime :: Evenement :: Lunar -> Major_Term_Before (DateTime => $ DT0); My $ DT = DateTime :: Evenement :: Lunar-> Minor_Term_After (DateTime => $ DT0); My $ DT = DateTime :: Event :: Lunar-> Minor_Term_Before (DateTime = > $ DT0); mijn $ index = DateTime :: Evenement :: SolarterM-> Last_Major_Term_TEX (DateDime => $ DT); My $ Index = Datetime :: Evenement :: SolarterM-> Last_Minor_Term_Indx (DateDime => $ DT); My $ Boolean = DateTime :: Evenement :: SolarterM-> No_Major_Term_on (DateTime => $ DT); # om de volgende specifieke zonne-energeterm te krijgen DateDime :: Evenement :: Solarterm QW (Dongzhi); My $ Next = DateTime :: Evenement :: SolarterM-> Next_TERM_AT (DateTime => $ DT, Longitude => Dongzhi); mijn $ prev = DateTime :: Evenement :: SolarterM-> Prev_Term_at (DateTime => $ DT, Longitude => Dongzhi); Vereisten: · Perl

Datetime :: Evenement :: Solarterm Gerelateerde software