Prolog Eight Queens Step 3