?- ['member.pro'].
% member.pro compiled 0.00 sec, 136 bytes
Yes
?- mem(s,[t,d,r,f,d]).
No
?- mem(s,[t,d,r,f,s]).
Yes
?- mem(Z,[t,d,r,f,s]).
Z = t ;
Z = d ;
Z = r ;
Z = f ;
Z = s ;
No
?- mem(z,List).
List = [z|_G246] ;
List = [_G245, z|_G249] ;
List = [_G245, _G248, z|_G252] ;
List = [_G245, _G248, _G251, z|_G255] ;
List = [_G245, _G248, _G251, _G254, z|_G258] ;
List = [_G245, _G248, _G251, _G254, _G257, z|_G261] ;
List = [_G245, _G248, _G251, _G254, _G257, _G260, z|_G264] ;
List = [_G245, _G248, _G251, _G254, _G257, _G260, _G263, z|_G267]
Yes
?-halt.
