1package My::Module::Sun;
2
3use 5.006002;
4
5use strict;
6use warnings;
7
8use base qw{ Astro::Coord::ECI::Sun };
9
10use Carp;
11
12our $VERSION = '0.122';
13
141;
15
16__END__
17
18=head1 NAME
19
20My::Module::Sun - Fake Sun to test ability to provide one
21
22=head1 SYNOPSIS
23
24 use lib qw{ inc };
25 use My::Module::Sun;
26 # And then, for example
27 my @rslt = Astro::Coord::ECI::TLE->parse(
28     { sun => 'My::Module::Sun },
29     $tle_text,
30 );
31
32=head1 DESCRIPTION
33
34This subclass of L<Astro::Coord::ECI::Sun|Astro::Coord::ECI::Sun> is
35used to test the ability to provide a C<sun> attribute other than the
36default.
37
38This module is private to this distribution, and can be modified or
39retracted without notice.
40
41=head1 METHODS
42
43This class adds no methods.
44
45=head1 ATTRIBUTES
46
47This class adds no attributes.
48
49=head1 SEE ALSO
50
51L<Astro::Coord::ECI::Sun|Astro::Coord::ECI::Sun>
52
53=head1 SUPPORT
54
55Support is by the author. Please file bug reports at
56L<https://rt.cpan.org/Public/Dist/Display.html?Name=Astro-satpass>,
57L<https://github.com/trwyant/perl-Astro-Coord-ECI/issues>, or in
58electronic mail to the author.
59
60=head1 AUTHOR
61
62Tom Wyant (wyant at cpan dot org)
63
64=head1 COPYRIGHT AND LICENSE
65
66Copyright (C) 2018-2021 by Thomas R. Wyant, III
67
68This program is free software; you can redistribute it and/or modify it
69under the same terms as Perl 5.10.0. For more details, see the full text
70of the licenses in the directory LICENSES.
71
72This program is distributed in the hope that it will be useful, but
73without any warranty; without even the implied warranty of
74merchantability or fitness for a particular purpose.
75
76=cut
77
78# ex: set textwidth=72 :
79