5 lines
148 B
Prolog
5 lines
148 B
Prolog
schema([a,b,c,d,e]).
|
|
fds([ [[a],[b]], [[a,c],[d]], [[e],[a,b]],
|
|
[[a,d],[e]], [[a,b,c],[d]] ]).
|
|
answer(K) :- schema(R),fds(F),candkey(R,F,K).
|