RosettaCodeData/Task/Loop-over-multiple-arrays-simultaneously/Prolog/loop-over-multiple-arrays-simultaneously.pro

6 lines
117 B
Prolog
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
multiple_arrays(L1, L2, L3) :-
maplist(display, L1, L2, L3).
display(A,B,C) :-
writef('%s%s%s\n', [[A],[B],[C]]).