MathAction SandBoxDemoXFreeAlgebra



SandBoxDemoXFreeAlgebra
last edited 5 years ago by pagani
fricas
(1) ->
Category: XFreeAlgebra(vl : OrderedSet, R : Ring) : Category -- ++ Author: Michel Petitot petitot@lifl.fr -- ++ Date Created: 91 -- should be enough to impl TensorAlgebra(R-Module), R comm. ? -- see also SandBoxFreeProduct by B.P.
B:=OrderedVariableList [b[i] for i in 1..5]
Type: Type
fricas
R:=Expression Integer
Type: Type
fricas
X:=XDistributedPolynomial(B,R)
Type: Type
fricas
b:=[a::X for a in enumerate()$B]
Type: List(XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer)))
fricas
t0:=0$X
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
t1:=1$X
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
t2:=b.1*b.2
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
t3:=b.3*t2 - t2*b.3
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
vl:=varList t3
Type: List(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]))
fricas
leadingMonomial t3
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
reductum t3
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
degree t3
Type: PositiveInteger?
fricas
t4:=x*t3+y^2*t2+z^3*t1
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
degree t4
Type: PositiveInteger?
fricas
leadingMonomial t4
Type: XDistributedPolynomial(OrderedVariableList([b[1],b[2],b[3],b[4],b[5]]),Expression(Integer))
fricas
degree t4
Type: PositiveInteger?
fricas
leadingCoefficient t4
Type: Expression(Integer)
fricas
coefficients t4
Type: List(Expression(Integer))
fricas
X has XFreeAlgebra(B,R)
Type: Boolean



Subject: Be Bold !!
( 15 subscribers )
Please rate this page:

AltStyle によって変換されたページ (->オリジナル) /