2008/6/21 Jaldhar H. Vyas <[EMAIL PROTECTED]>:
> Given a decimal value for solar longitude (such as from
> DateTime::Util::Astro::Sun::solar_longitude) how would I convert it to a
> DateTime.
>
> Specifically what I want to do is determine the first new moon after the
> vernal equinox (solar longitude = 0)

how about:

  use DateTime::Event::Lunar;
  use DateTime::Event::SolarTerm;
  my $new_moon = DateTime::Event::Lunar->new_moon();

  my $dt0  = DateTime->today;
  my $eq = DateTime::Event::SolarTerm->next_term_at(
    datetime  => $dt0,
    longitude => 0,
  );
  print $new_moon->next( $eq ), "\n";


Flávio S. Glock

Reply via email to