summaryrefslogtreecommitdiff
path: root/prolog/problems/lists/shiftright_2/common.py
blob: 3d5c3a560ba9a8a1912fbb6539c67547ad37388a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
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).
'''