Решить кувшин с поиском в глубину

Question

У меня есть проблема с кувшином для воды, и я должен сделать это по алгоритму глубины. У меня есть два кувшина с водой, 4 галлона и 3 галлона, ни один из них не отмечен. Как вы можете получить ровно 2 галлона воды в 4-галлонный кувшин? Изначально оба кувшина пусты.

Правила таковы:

capacity(C,JC), for C equal j1 or j2; 
jugs(C1,C2), where C1 and C2 give the current contents of the jugs

исходный факт: кувшины (0,0) цель: кувшины (2,0) или кувшины (0,2)

initial_state(jugs,jugs(0,0)). 

final_state(jugs(2,C2)). 
final_state(jugs(C1,2)).  

transition(jugs(C1,C2),fill(j1)). 
transition(jugs(C1,C2),fill(j2)). 
transition(jugs(C1,C2),empty(j1)) :-  
    C1 > 0. 
transition(jugs(C1,C2),empty(j2)) :-  
    C2 > 0. 
transition(jugs(C1,C2),transfer(j2,j1)). 
transition(jugs(C1,C2),transfer(j1,j2)).  


update(jugs(C1,C2),empty(j1),jugs(0,C2)). 
update(jugs(C1,C2),empty(j2),jugs(C1,0)). 
update(jugs(C1,C2),fill(j1),jugs(Capacity,C2)) :-  
    capacity(j1,Capacity). 
update(jugs(C1,C2),fill(j2),jugs(C1,Capacity)) :-  
    capacity(j2,Capacity). 
update(jugs(C1,C2),transfer(j2,j1),jugs(W1,W2)) :-  
    capacity(j1,Capacity), 
    Water is C1 + C2, 
    Overhang is Water - Capacity , 
    adapt(Water,Overhang,W1,W2). 
update(jugs(C1,C2),transfer(j1,j2),jugs(W1,W2)) :-  
    capacity(j2,Capacity), 
    Water is C1 + C2, 
    Overhang is Water - Capacity , 
    adapt(Water,Overhang,W2,W1).  

adapt(Water,Overhang,Water,0) :- Overhang =< 0. 
adapt(Water,Overhang,C,Overhang) :- 
    Overhang > 0, 
    C is Water - Overhang. 




legal(jugs(C1,C2)).  

capacity(j1,4). 
capacity(j2,3).

Заранее спасибо!