From c57247e8a1112808e6deabf965f83222b8886b37 Mon Sep 17 00:00:00 2001 From: Gerd Heber Date: Mon, 11 Apr 2016 19:20:17 -0400 Subject: [PATCH] Updated ABSM slot descriptions. --- src/classes.lisp | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/src/classes.lisp b/src/classes.lisp index da39ff3..91ead58 100644 --- a/src/classes.lisp +++ b/src/classes.lisp @@ -584,8 +584,9 @@ A T-MAT (= Terme de Matrice) has five components: (DEFTYPE IABSM () '(satisfies iabsm-p)) (DEFSTRUCT (ABSM (:conc-name nil) (:print-function absm-print)) - (dgop (:type 'dgop)) - (gmsm (:type 'gmsm))) + (dgop 0 :type dgop) + (gmsm nil :type gmsm)) + #| ()