ERLANG List Functions 3

-module(list_functions2).
-export([start/2]).

start(List1,List2) ->
    append_more_lists(List1,List2),
    merge_lists(List1,List2),
    list_prefix(List1,List2),
    substract_list(List1,List2),
    list_suffix(List1,List2),
    unique_merge(List1,List2),
    zip_lists(List1,List2).

append_more_lists(List1,List2) ->
    io:format("List 1 and List 2 were appended ~p~n",[lists:append(List1,List2)]).    % lists:append(List1,List2)

merge_lists(List1,List2) ->
    io:format("List 1 and List 2 were merged ~p~n",[lists:merge(List1,List2)]).     % lists:merge(List1, List2)

list_prefix(List1,List2) ->
    io:format("Is List 1 is equal to the prefix of the List 2 ? ~p~n",[lists:prefix(List1,List2)]).   % lists:prefix(List1,List2)

substract_list(List1, List2) ->
    io:format("Elements in List 1 which is equalto List 2 is eliminated in resulted list ~p~n",[lists:substract(List1,List2)]).  % lists:substract(List1, List2)

list_suffix(List1,List2) ->
    io:format("Is List 1 is equal to the suffix of List2 ~p  ~n",[lists:suffix(List1,List2)]).   % lists:suffix(List1,List2)

unique_merge(List1,List2) ->
    io:format("List 1 and List 2 were uniquely merged ~p~n",[lists:umerge(List1,List2)]).   % lists:umerge(List1,List2)

zip_lists(List1,List2) ->
    io:format("List of tuples with two elements for each tuple index one from 1 List and index 2 from List 2 ~p~n",[lists:zip(List1,List2)]).   
% lists:zip(List1,List2)