RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/Prolog/loop-over-multiple-arrays-simultaneously.pro
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

5 lines
117 B
Prolog

multiple_arrays(L1, L2, L3) :-
maplist(display, L1, L2, L3).
display(A,B,C) :-
writef('%s%s%s\n', [[A],[B],[C]]).