:hasSugar(X,Y) :- :Chianti(X), nom:Dry(Y)
nom:Dry(:Dry)