# # file: 6dim-metabelian.gap (split from lielib.gap) # purpose: GAP library of Lie algebras # created: pasha jan 6 2005 # modified: # modification: # # 6-dimensional metabelian Lie algebra # with [x_1,x_2]=x_5 and [x_3,x_4]=x_6, other zeros T := EmptySCTable (6, 0, "antisymmetric"); SetEntrySCTable (T, 1, 2, [1, 5]); SetEntrySCTable (T, 3, 4, [1, 6]); 6DimMetablian := LieAlgebraByStructureConstants (GroundField, T); Unbind (T); # end of 6dim-metabelian.gap