5 lines
135 B
Prolog
5 lines
135 B
Prolog
|
?- leap_year([1900,1994,1996,1997,2000 ]).
|
||
|
|
leap years : [1996,2000]
|
||
|
|
not leap years : [1900,1994,1997]
|
||
|
|
L = [1900,1994,1996,1997,2000].
|