diff --git a/src/kenzo.lisp b/src/kenzo.lisp
index aaccad4..77753f1 100644
--- a/src/kenzo.lisp
+++ b/src/kenzo.lisp
@@ -64,7 +64,7 @@ complexes.")
 (SETF *CHCM-LIST* +EMPTY-LIST+)
 (PUSHNEW '*CHCM-LIST* *LIST-LIST*)
 
-(DEFPARAMETER +MAXIMAL-DIMENSION+ 15)
+(DEFPARAMETER +MAXIMAL-DIMENSION+ 16)
 
 (DEFVAR *MRPH-LIST*
   "This variable is bound to a list of user created morphisms.")