Toggle navigation
?
users online
Logout
Open hangout
Open chat for current file
%example %c((1,[(2,[(4,[]),(5,[])]),(3,[(6,[])])]),1,R). f(A,B,R):-R is A+B. g(A,B,R):-R is A*B. b([],A,A). b([E|N],A,R):-b(N,A,T),c(E,A,Y),g(Y,T,R). c((C,S),A,R):-b(S,A,T),f(C,T,R).