--- symmetry.pl 2007/08/26 14:45:26 7 +++ symmetry.pl 2007/08/26 16:31:23 8 @@ -135,8 +135,8 @@ $trace[ $turn_pos ] = $old; if ( $board[ $turn_pos ] =~ $ok_path ) { - my $xy = x_y($turn_pos); - warn "OK can_turn $try_step $step_name[$try_step] turn_pos = $turn_pos b($board[$turn_pos]) t($trace[$turn_pos]) to $xy\n"; + my $xy = x_y($pos); + warn "OK can_turn $try_step $step_name[$try_step] turn_pos = $turn_pos b($board[$turn_pos]) t($trace[$turn_pos]) from $xy\n"; $step = $try_step; push @corners, $xy; return 1;