use strict;

package Features::Distance;

sub new {
    my ($class) = @_;
    
    my $self = {};
    bless $self, $class;
    return $self;
}

sub Calc { }

sub Score {
    my $self = shift;
    
    my ($k, $i, $j) = @_;
    return abs($i - $j); 
}

1;