In[6]:= DefManifold[S2, 2, IndexRange[a, c]]
DefMetric[1, met2[-a, -b], CD2, {";", "\[Del]"}, PrintAs -> "g"]
In[8]:= FullSimplification[][NoScalar[EulerDensity[CD2]]]
Out[8]= RicciScalarCD2[]
So far so good
In[9]:= DefManifold[S3, 3, IndexRange[d, h]]
DefMetric[1, met3[-d, -e], CD3, {";", "\[Del]"}, PrintAs -> "g"]
In[11]:= FullSimplification[][NoScalar[EulerDensity[CD3]]]
During evaluation of In[11]:= ToCanonical::noident: Unknown expression not canonicalized: EulerDensity[CD3,3] .
During evaluation of In[11]:= ToCanonical::noident: Unknown expression not canonicalized: EulerDensity[CD3,3] .
During evaluation of In[11]:= ToCanonical::noident: Unknown expression not canonicalized: EulerDensity[CD3,3] .
During evaluation of In[11]:= General::stop: Further output of ToCanonical::noident will be suppressed during this calculation. >>
Out[11]= EulerDensity[CD3, 3]
Mathematica seems to have forgotten the definition of EulerDensity
In[12]:= DefManifold[S4, 4, IndexRange[i, p]]
DefMetric[1, met4[-i, -j], CD4, {";", "\[Del]"}, PrintAs -> "g"]
In[14]:= FullSimplification[][NoScalar[EulerDensity[CD4]]]
During evaluation of In[14]:= RInv::nodatabase: Can't find the Invar database. You can download it from
http://www.xact.es/Invar/.
Out[14]= $Aborted