--- pkg/src/Csparse.c	2006/05/15 22:36:59	1265
+++ pkg/src/Csparse.c	2006/05/16 19:12:13	1267
@@ -107,7 +107,8 @@
     chcp = cholmod_aat((!tr) ? chxt : chx, (int *) NULL, 0, chx->xtype, &c);
     if(!chcp)
 	error("Csparse_crossprod(): error return from cholmod_aat()");
-
+    cholmod_band_inplace((tr) ? -(chcp->nrow) : 0, (tr) ? 0 : chcp->ncol,
+			 chcp->xtype, chcp, &c);
     if (trip) {
 	cholmod_free_sparse(&chx, &c);
 	Free(cht);