In this example we test if a vector field is homogeneous,
i1 : X = newField("3*ax_0+x_1*ax_1")
o1 = 3ax + x ax
0 1 1
o1 : DiffAlgField
|
i2 : isHomogeneous X o2 = false |
In this example we test if a projective logarithmic differential 1-form is homogeneous,
i3 : w = random logarithmicForm(2,{1,2},"a",Projective => true)
2 2 2 2 2 2
o3 = (120x x + 144x + 306x x + 108x x + 108x )dx + (- 120x - 144x x - 108x x - 264x x - 72x )dx + (- 306x + 264x -
0 1 1 0 2 1 2 2 0 0 0 1 0 2 1 2 2 1 0 1
----------------------------------------------------------------------------------------------------------------------------
108x x + 72x x )dx
0 2 1 2 2
o3 : DiffAlgForm
|
i4 : isHomogeneous w o4 = true |