Advertisement
Guest User

Untitled

a guest
Jun 20th, 2018
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Erlang 0.32 KB | None | 0 0
  1. dodaj_lisy(L1,L2) -> dodaj_lisy(L1,L2,L3).
  2. dodaj_lisy([],[H|T],L3) -> dodaj_lisy([],T, L3++[H]);
  3. dodaj_lisy([H|T], [], L3) -> dodaj_lisy(T,[],L3++[H]);
  4. dodaj_lisy([H1|T1], [H2|T2], L3) when H1 >= H2 -> dodaj_lisy([H1|T1], T2, L3++[H2]);
  5. dodaj_lisy([H1|T1], [H2|T2], L3) when H1 < H2 -> dodaj_lisy(T1, [H2|T2], L3++[H1]).
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement