summaryrefslogtreecommitdiff
path: root/prolog/problems/lists/shiftright_2/common.py
blob: e443332552187b26e98dc0eb97e6e238baa3a93a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
# coding=utf-8

id = 114
group = 'lists'
number = 21
visible = True
facts = None

solution = '''\
conc114([], L, L).
conc114([H|T], L2, [H|L]) :-
  conc114(T, L2, L).
shiftright(L1, [H|T]) :-
  conc114(T, [H], L1).
'''