katsu #2156(2007/08/14 12:30 GMT) [ Prolog ] Rating0/0=0.00
SWI-prologには 入れ子にできる、C風範囲コメントがあります。
1 2 3 4 5 6 7 8
crossp([],[]). crossp([X|Xs],[I|Is]):-member(I,X),crossp(Xs,Is). /* /* * comment */ */ :-findall(X,crossp([[1,2,3],[uno,due,tre],[un,doux,trois]],X),Xs),writeln(Xs).
Rating0/0=0.00-0+
[ reply ]
katsu
#2156()
[
Prolog
]
Rating0/0=0.00
crossp([],[]). crossp([X|Xs],[I|Is]):-member(I,X),crossp(Xs,Is). /* /* * comment */ */ :-findall(X,crossp([[1,2,3],[uno,due,tre],[un,doux,trois]],X),Xs),writeln(Xs).Rating0/0=0.00-0+
[ reply ]