为什么不打印整个列表？

Question

我想打印列表L的所有成员，但它只打印第一个成员。

user_friends_of_friends(Name,L):-
        user(ID,Name),
        findall(X,(be_friends(ID,X)),L),
        member(T,L),
        write(T).

我对这个prolog代码做错了什么？