my $cell = $Circ->[$i][$j];
... @$cell == 0 && $cell->[0] eq '.' ...