|
fricas (1) -> n:=5000
- whatever PI
fricas B:=OrderedVariableList [e[i] for i in 1..3]
Type: Type
fricas e:=enumerate()$B
fricas --List(Symbol) has OrderedSet
B has OrderedSet
Type: Boolean
fricas R:=Expression Integer
Type: Type
fricas R has CommutativeRing
Type: Boolean
fricas M:=FreeModule(R, B)
Type: Type
fricas TP:=TensorPower(n,R,B,M)
Type: Type
fricas t1:=tensor([e.1,e.2,e.3,e.1,e.2])$TP
fricas t2:=tensor([e.1,e.2,e.3,e.1])$TP
fricas t3:=tensor([e.1,e.2,e.3,e.2])$TP
fricas t4:=tensor([e.1,e.2,e.3])$TP
fricas T:=x*t1+y^2*t2+z^3*t3-u*t4
fricas support T
fricas numberOfMonomials T
fricas leadingTerm T
fricas leadingCoefficient T
Type: Expression(Integer)
fricas reductum T
|