From 71db68240c80cefaaa67581c2caa53172d824de0 Mon Sep 17 00:00:00 2001 From: Gerd Heber Date: Sat, 4 Jul 2015 16:50:04 -0500 Subject: [PATCH] Fixed an apparently wrong type declaration. --- src/chcm-elementary-op.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/chcm-elementary-op.lisp b/src/chcm-elementary-op.lisp index 5424f6e..37a2e9c 100644 --- a/src/chcm-elementary-op.lisp +++ b/src/chcm-elementary-op.lisp @@ -297,7 +297,7 @@ (= degr -1)) (error "In (METHOD ADD CHAIN-COMPLEX MORPHISM), the data are not coherent.")) (let ((new-dffr (add dffr perturbation strt))) - (declare (type intr-mrph new-dffr)) + (declare (type morphism new-dffr)) (let ((new-chcm (build-chcm :cmpr cmpr :basis basis