---
# System prepended metadata

title: Prolog programs

---

# Prolog programs
```prolog
word(astante,a,s,t,a,n,t,e).
word(astoria,a,s,t,o,r,i,a).
word(baratto,b,a,r,a,t,t,o).
word(cobalto,c,o,b,a,l,t,o).
word(pistola,p,i,s,t,o,l,a).
word(statale,s,t,a,t,a,l,e). 

crossword(A,B,C,D,E,F) :- 
    word(A,_,G,_,J,_,M,_),
    word(B,_,H,_,K,_,N,_),
    word(C,_,I,_10,L,_,O,_),
    word(D,_,G,_,H,_,I,_),
    word(E,_,J,_,K,_,L,_),
    word(F,_,M,_,N,_,O,_).