sub Clone3{
    my $self = shift;
    bless { "Matrix" => [ 
        map{ [ @$_ ] } @{ $self->{Matrix} } ] 
    }, 'Matrix';
}