NAME
Astro::Montenbruck::Ephemeris::Planet::Sun - Sun.
SYNOPSIS
use Astro::Montenbruck::Ephemeris::Planet::Sun;
Astro::Montenbruck::NutEqu qw/mean2true/;
my $sun = Astro::Montenbruck::Ephemeris::Planet::Sun->new();
my ($l, $b, $r) = $sun->sunpos($t); # true geocentric ecliptical coordinates
my $nut_func = mean2true($t);
# apparent geocentric ecliptical coordinates
my ($lambda, $beta, $delta) = $sun->apparent($t, [$l, $b, $r], $nut_func); DESCRIPTION
Child class of Astro::Montenbruck::Ephemeris::Planet, responsible for calculating Sun position.
METHODS
Astro::Montenbruck::Ephemeris::Planet::Sun->new
Constructor.
$self->sunpos($t)
Ecliptic coordinates L, B, R (in deg and AU) of the Sun referred to the mean equinox of date.
Arguments
Returns
Array of geocentric ecliptical coordinates.
x — geocentric longitude, arc-degrees
y — geocentric latitude, arc-degrees
z — distance from Earth, AU
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.