blob: 53589350d875d336d983d5d2dad9ad0c1f9fa7b6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# coding=utf-8
id = 114
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).
'''
|