Advertisement
Guest User

Untitled

a guest
Jun 22nd, 2017
49
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.23 KB | None | 0 0
  1. ?- equalbutone(word(f,a,n,n,y), X).
  2. X = word(c, a, n, n, y) ;
  3. X = word(n, a, n, n, y) ;
  4. X = word(f, u, n, n, y) ;
  5. X = word(f, e, n, n, y) ;
  6. X = word(f, i, n, n, y) ;
  7. X = word(f, a, w, n, y) ;
  8. X = word(f, a, n, c, y) ;
  9. false.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement