root :=  total-sign &
 [ NODE [CAT sent-cat & 
		[ M-FEATS [ 	VFORM fin,
				VERB true]]]].

;;; no futuro trocar vform por fin