dirac_slash should give something with non-zero metric.
authorChris Dams <Chris.Dams@mi.infn.it>
Wed, 4 Jan 2006 20:47:54 +0000 (20:47 +0000)
committerChris Dams <Chris.Dams@mi.infn.it>
Wed, 4 Jan 2006 20:47:54 +0000 (20:47 +0000)
ginac/clifford.cpp

index d25047ac27444db2904aab46543ddeebfa929265..e166d0847bac8b273d1f4e1fa4cc456ec25827fc 100644 (file)
@@ -830,7 +830,10 @@ ex dirac_slash(const ex & e, const ex & dim, unsigned char rl)
        // Slashed vectors are actually stored as a clifford object with the
        // vector as its base expression and a (dummy) index that just serves
        // for storing the space dimensionality
-       return clifford(e, varidx(0, dim), 0, rl);
+
+       static varidx xi((new symbol)->setflag(status_flags::dynallocated), dim),
+               chi((new symbol)->setflag(status_flags::dynallocated), dim);
+   return clifford(e, varidx(0, dim), indexed((new minkmetric)->setflag(status_flags::dynallocated), symmetric2(), xi, chi), rl, true);
 }
 
 /** Check whether a given tinfo key (as returned by return_type_tinfo()