move(state(X,W,X,C), state(Y,W,Y,C)):- opp(X,Y), not(unsafe(state(Y,W,Y,C))), writelist(['try farmer takes goat ', Y, W, Y, C]), nl. move(state(X,W,G,X), state(Y,W,G,Y)):- opp(X,Y), not(unsafe(state(Y,W,G,Y))), writelist(['try farmer takes cabbage ', Y, W, G, Y]), nl.
Category: