2 files changed, 27 insertions, 0 deletions
diff --git a/prolog/problems/lists/insert_3/common.py b/prolog/problems/lists/insert_3/common.py
new file mode 100644
index 0000000..fa3a937
--- /dev/null
+++ b/prolog/problems/lists/insert_3/common.py
@@ -0,0 +1,13 @@
+id = 106
+group = 'lists'
+number = 13
+visible = True
+facts = None
+
+solution = '''\
+del106(X, [X|T], T).
+del106(X, [Y|T], [Y|L]) :-
+  del106(X, T, L).
+insert(X, List, BigList) :-
+  del106(X, BigList, List).
+'''
diff --git a/prolog/problems/lists/insert_3/en.py b/prolog/problems/lists/insert_3/en.py
new file mode 100644
index 0000000..a4a1128
--- /dev/null
+++ b/prolog/problems/lists/insert_3/en.py
@@ -0,0 +1,14 @@
+id = 106
+name = 'insert/3'
+slug = 'insert an element into list'
+
+description = '''\
+<p><code>insert(X, L1, L2)</code>: the list <code>L2</code> is obtained from <code>L1</code> by inserting the element <code>X</code> at arbitrary position.</p>
+<pre>
+  ?- insert(1, [2,3], L).
+    L = [1,2,3] ;
+    L = [2,1,3] ;
+    L = [2,3,1].
+</pre>'''
+
+hint = {}