initial creation of SearchProcess class

[scpubgit/DX.git] / lib / DX / SearchState.pm

diff --git a/lib/DX/SearchState.pm b/lib/DX/SearchState.pm
index 8ed1d87..d29dc09 100644 (file)
--- a/lib/DX/SearchState.pm
+++ b/lib/DX/SearchState.pm
@@ -64,15 +64,6 @@ sub with_one_step {
   );
 }
 
-sub find_solution {
-  my $state = $_[0];
-  while ($state and $state->next_proposition) {
-    $state = $state->with_one_step;
-  }
-  trace 'search.solution.hyp' => $state->current_hypothesis if $state;
-  return $state;
-}
-
 sub force_backtrack {
   my ($self) = @_;
   my ($first_alt, @rest_alt) = @{$self->alternatives};
@@ -86,10 +77,4 @@ sub force_backtrack {
   );
 }
 
-sub find_next_solution {
-  my ($self) = @_;
-  return undef unless my $bt = $self->force_backtrack;
-  return $bt->find_solution;
-}
-
 1;