sub subtract {
    my $self = $_[0];
    return bless [ \ $self ], "...";
}