++ed by:
1 non-PAUSE user
Author image Sergey Krushinsky
and 1 contributors

NAME

Astro::Montenbruck::Lunation - Lunar quarters.

SYNOPSIS

  use Astro::Montenbruck::Lunation qw/:all/;

  # find instant of New Moon closest to 2019 Aug, 12
  $jd = search_event([2019, 8, 12], $NEW_MOON)

DESCRIPTION

Searches lunar quarters. Algorithms are based on "Astronomical Algorithms" by Jean Meeus, Second Edition, Willmann-Bell, Inc., 1998.

EXPORT

CONSTANTS

QUARTERS

  • $NEW_MOON

  • $FIRST_QUARTER

  • $FULL_MOON

  • $LAST_QUARTER

MONTH

  • @MONTH

Array of QUARTERS in proper order.

SUBROUTINES

search_event(date => $arr, quarter => $scalar)

Calculate instant of apparent lunar phase closest to the given date.

Named Arguments

  • date — array of year (astronomical, zero-based), month [1..12] and day, [1..31].

  • quarter — which quarter, one of: $NEW_MOON, $FIRST_QUARTER, $FULL_MOON or $LAST_QUARTER see "QUARTERS".

Returns

In scalar context returns Standard Julian day of the event, dynamic time.

In list context:

  • Standard Julian day of the event, dynamic time.

  • Argument of latitude, arc-degrees. This value is required for detecting elipses.

AUTHOR

Sergey Krushinsky, <krushi at cpan.org>

COPYRIGHT AND LICENSE

Copyright (C) 2009-2021 by Sergey Krushinsky

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.