Fixed pattern matching fail reason

This will show how matching fails because of guard, not because there's no `area(square, A, B)` clause.
Merge pull request #2 from develop7/patch-2

Fixed pattern matching fail reason