Quelle  3.5.3   Sprache: unbekannt

#The penultimate command calls Singular's Groebner basis functions.
e:=SpaceGroupBBNWZ(2,10);;
Q:=RelativeCentralQuotientSpaceGroup(e,4);;
n:=50;;Print(PoincareSeries(Q,n),"\n");;
p:=HilbertPoincareSeries(LHSSpectralSequenceLastSheet(Q));;
Print(p,"\n");;

[ zur Elbe Produktseite wechseln0.5Quellennavigators  Analyse erneut starten  ]