Skip to content

Commit 076b70e

Browse files
committed
refactor: rename addiction -> addition
Fix #9
1 parent c1bca55 commit 076b70e

File tree

3 files changed

+5
-5
lines changed

3 files changed

+5
-5
lines changed

src/inferences.lisp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -42,8 +42,8 @@
4242
(operands (first-operand exp))))
4343
exp))
4444

45-
(defun addiction (exp p)
46-
"Addiction in inference rule ::
45+
(defun addition (exp p)
46+
"Addition in inference rule ::
4747
p => (v p q)"
4848
(make-disjunction exp p))
4949

src/package.lisp

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -10,7 +10,7 @@
1010
#:modus-ponens ;; inferences
1111
#:modus-tollens
1212
#:syllogism-disjunctive
13-
#:addiction
13+
#:addition
1414
#:conjunction
1515
#:simplification-first
1616
#:simplification-second

t/test-inference-rules.lisp

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -19,9 +19,9 @@
1919
'(=> X Z))
2020
"Inference: SYLLOGISM-HYPOTHETICAL")
2121

22-
(ok (equal (addiction 'p 'q)
22+
(ok (equal (addition 'p 'q)
2323
'(v p q))
24-
"Inference: ADDICTION")
24+
"Inference: ADDITION")
2525

2626
(ok (equal (conjunction '(=> p q) 'p)
2727
'(^ (=> P Q) P))

0 commit comments

Comments
 (0)