sum

2018-10-15 13:47:25 +01:00
parent a03aa3c27c
commit 70cb6ed01e
2 changed files with 6 additions and 1 deletions
--- a/library/matrix.yap
+++ b/library/matrix.yap
@@ -775,6 +775,9 @@ rhs(log(RHS), Logs ) :- !,
 rhs(exp(RHS), Logs ) :- !,
 	rhs(RHS, X1),
 	matrix_to_exps( X1, Logs ).
+rhs(sum(RHS), Logs ) :- !,
+	rhs(RHS, X1),
+	matrix_sum( X1, Logs ).
 rhs(S, NS) :-
 	rhs_opaque( S ), !,
 	S = NS.