# NOTE: Derived from web_diary_dir/lib/DateTime/Time.pm.
# Changes made here will be lost when autosplit again.
# See AutoSplit.pm.
package DateTime::Time;

#line 148 "web_diary_dir/lib/DateTime/Time.pm (autosplit into web_diary_dir/lib/auto/DateTime/Time/part.al)"
sub part($)
{
    my $self = shift;
    my @tmp = qw(a b c c);
    return $tmp[int($self->day/10)];
}

# end of DateTime::Time::part
1;
