sum.pl

loading
details
attribute value
description
owner Johannes Waldmann
uploaded 2017-08-17 03:45:07.0
disk size 191 Bytes
downloadable true
type
attribute value
name no_type
processor id 1
description this is the default benchmark type for rejected benchmarks and benchmarks that are not associated with a type.
owning community none
loading contents 
%query: sum(i,i,o).


% mode: sum[i,i,o]
sum([],[],[]).
sum([X1|Y1],[X2|Y2],[X3|Y3]) :- add(X1, X2, X3), sum(Y1,Y2,Y3).

% mode: add[i,i,o]
add(0, X, X). 
add(s(X), Y, s(Z)) :- add(X, Y, Z).
popout

content may be truncated. 'popout' for larger text window.

actions get anonymous link download benchmark