sub Clone2 {
    my $self = shift @_;
    my $matrix = $self->Matrix;
    return Matrix->new(
        "Matrix" => [ map{ [ @$_ ] } @$matrix ]
    );
}