sub la_obs_handler {
    my ($t,$elt) = @_;
    my $la = $elt->text;
    
    my $isNow = 0;
    if (
        ($prev && $prev->text =~ m/[nN]ow $/)
        || $elt->parent->text =~ m/[nN]ow .* and rare/
        || $elt->parent->text =~ m/rare after/
        || $elt->parent->text =~ m/rare before/
        ) {
        $isNow = 1;
    }
 if (
         $la eq "rare"
         && ! $isNow 
         ) {
        $is_entry_rare = 1;
        }
}