summaryrefslogtreecommitdiff
path: root/prolog/problems/family_relations/aunt_2
diff options
context:
space:
mode:
Diffstat (limited to 'prolog/problems/family_relations/aunt_2')
-rw-r--r--prolog/problems/family_relations/aunt_2/common.py17
-rw-r--r--prolog/problems/family_relations/aunt_2/en.py13
2 files changed, 30 insertions, 0 deletions
diff --git a/prolog/problems/family_relations/aunt_2/common.py b/prolog/problems/family_relations/aunt_2/common.py
new file mode 100644
index 0000000..78e98c5
--- /dev/null
+++ b/prolog/problems/family_relations/aunt_2/common.py
@@ -0,0 +1,17 @@
+id = 98
+group = 'family_relations'
+number = 5
+visible = True
+facts = 'family_relations'
+
+solution = '''\
+sister98(X, Y) :-
+ parent(P, X),
+ parent(P, Y),
+ female(X),
+ X \== Y.
+
+aunt(X, Y) :-
+ sister98(X, Z),
+ parent(Z, Y).
+'''
diff --git a/prolog/problems/family_relations/aunt_2/en.py b/prolog/problems/family_relations/aunt_2/en.py
new file mode 100644
index 0000000..95780a1
--- /dev/null
+++ b/prolog/problems/family_relations/aunt_2/en.py
@@ -0,0 +1,13 @@
+id = 98
+name = 'aunt/2'
+slug = 'the aunt relation'
+
+description = '''\
+<p><code>aunt(X, Y)</code>: <code>X</code> is an aunt of <code>Y</code>.</p>
+<pre>
+ ?- aunt(sally, X).
+ X = vanessa ;
+ X = patricia.
+</pre>'''
+
+hint = {}