anchor.diff:          (result nil))
       
       (labels ((ildsProbe (estado maxDiscrepancia rProfundidade)
  -                (let* ((sucessores (problema-gera-sucessores problema estado))
  +                (let* ((sucessores-nao-ordenados (problema-gera-sucessores problema estado))
  +		       (sucessores (funcall (ilds-sorter (problema-heuristica problema)) sucessores-nao-ordenados))
                          (num-elem (list-length sucessores)))
                        (cond 	((funcall objectivo? estado) (list estado))
                        		((= 0 num-elem) nil)
  
positive.code: ;Ref para ilds pseudo-codigo
  ;http://delivery.acm.org/10.1145/2020000/2019581/a1_6-prosser.pdf?ip=194.210.231.19&id=2019581&acc=ACTIVE%20SERVICE&key=2E5699D25B4FE09E%2EF7A57B2C5B227641%2E4D4702B0C3E38B35%2E4D4702B0C3E38B35&CFID=675816888&CFTOKEN=37766688&__acm__=1432052157_b9aa95a702e113482df3bdaed4e3b506
  ;FIXME - ordenar sucessores por f = g + h
  (defun ilds (problema maxDepth) 
    (let ((*nos-gerados* 0)
  		(*nos-expandidos* 0)
  
negative.code: 
  (defun is-better-solution (heur)
        #'(lambda (best-solution-so-far new-solution)
  	    (< (funcall heur (first new-solution)) (funcall heur (first best-solution-so-far)))))
  	    
  (defun beam-search (problema beam-width max-beam-width) 
    (let* ((*nos-gerados* 0)
  