Help for this page

Select Code to Download


  1. or download this
    for (0 .. $#mapping) {
        return 0 if $self->{Matrix}[$row_index][$_]
                 != $other->{Matrix}[$mapping->[$row_index]][$mapping->[$_
    +]];
    }
    return 1;
    
  2. or download this
    my $self_row  = $self->{Matrix}[$row_index];
    my $other_row = $other->{Matrix}[$mapping->[$row_index]];
    ...
        return 0 if $self_row->[$_] != $other_row->[$mapping->[$_]];
    }
    return 1;