rf-web/vendor/bundle/gems/rouge-3.12.0/lib/rouge/demos/prolog

10 lines
233 B
Plaintext
Raw Normal View History

2019-10-21 08:18:17 +00:00
diff(plus(A,B), X, plus(DA, DB))
<= diff(A, X, DA) and diff(B, X, DB).
diff(times(A,B), X, plus(times(A, DB), times(DA, B)))
<= diff(A, X, DA) and diff(B, X, DB).
equal(X, X).
diff(X, X, 1).
diff(Y, X, 0) <= not equal(Y, X).