concat([], L, L).
concat([H|T], L2, L3) :- concat(T,L2,Int), L3 = [H|Int].

# Hello
