RosettaCodeData/Task/Loops-Foreach/Prolog/loops-foreach.pro
2015-02-20 00:35:01 -05:00

7 lines
98 B
Prolog

?- foreach(member(X, [red,green,blue,black,white]), writeln(X)).
red
green
blue
black
white
true.