2 files changed, 21 insertions, 0 deletions
diff --git a/prolog/problems/dcg/ab_2/common.py b/prolog/problems/dcg/ab_2/common.py
new file mode 100644
index 0000000..8cce3df
--- /dev/null
+++ b/prolog/problems/dcg/ab_2/common.py
@@ -0,0 +1,11 @@
+id = 162
+group = 'dcg'
+number = 69
+visible = True
+facts = None
+
+solution = '''\
+ab --> [a], ab.
+ab --> t162.
+t162 --> [b], t162.
+t162 --> [].'''
diff --git a/prolog/problems/dcg/ab_2/en.py b/prolog/problems/dcg/ab_2/en.py
new file mode 100644
index 0000000..8025081
--- /dev/null
+++ b/prolog/problems/dcg/ab_2/en.py
@@ -0,0 +1,10 @@
+id = 162
+name = 'ab/2'
+slug = 'a*b*'
+
+description = '''\
+<p>Write a DCG with the starting symbol <code>ab</code> for the language <code>a<sup>m</sup>b<sup>n</sup></code>, where m, n ≥ 0.</p>
+<p>Example words: <code>[]</code>, <code>a</code>, <code>aab</code>, <code>abbb</code>, <code>bbb</code>.</p>
+<p>Hint: to generate words of increasing length, use the query <code>conc(Word,_,_), ab(Word,[])</code>.</p>'''
+
+hint = {}