Finde lister i Prolog

Bolig(villa, 300, 5,1945).
Bolig(villa, 200, 5,1985).
Bolig(lejlighed, 2, 1977).
Bolig(lejlighed, 500t, 3, 1995).

findhus :-
    write('Hvilken type bolig har du ? : '), read(T), nl,
    bolig(T, M, V, Y),
    write([T, M, V, Y]).

Hvordan gør man så alle lister skrives ud? og ikke kun den første der matcher ?
Hvis man skrive villa, skal begge skrives ud og ikke kunden første ??