) + $_;
#   next if $_ == $n;
    @$arr[$_,$n] = @$arr[$n,$_];
}