Append Function In Prolog