Quelle radical.gd Sprache: Shell

#! @Chapter Algebraic Properties of Braces
#! @Section Braces and Radical Rings
#! @Arguments ring
#! @Returns a group
#! @Description
#! This function returns a permutation representation
#! of the additive group of the given ring.
#! @ExampleSession
#! gap> rg := SmallRing(8,10);;
#! gap> StructureDescription(AdditiveGroupOfRing(rg));
#! "C4 x C2"
#! @EndExampleSession
DeclareAttribute("AdditiveGroupOfRing", IsRing);

#! @Arguments ring
#! @Returns true if the ring is radical and false otherwise.
#! @Description
#! This function checks whether a ring is Jacobson radical.
#! @ExampleSession
#! gap> rg := SmallRing(8,11);;
#! gap> IsJacobsonRadical(rg);
#! true
#! gap> rg := SmallRing(8,20);;
#! gap> IsJacobsonRadical(rg);
#! false
#! @EndExampleSession
DeclareAttribute("IsJacobsonRadical", IsRing);

# @Arguments ring
# @Returns a group
# @Description
# This function returns the adjoint group of the radical ring.
# @ExampleSession
# gap> rg := SmallRing(8,10);;
# gap> IsJacobsonRadical(rg);
# true
# gap> StructureDescription(AdjointGroup(rg));
# "D8"
# @EndExampleSession
# DeclareAttribute("AdjointGroup", IsRing);

# @Arguments ring
# @Returns a brace
# @Description
# This function returns the brace of the given radical ring.
# @ExampleSession
# gap> rg := SmallRing(8,10);;
# gap> IsJacobsonRadical(rg);
# true
# gap> IdBrace(RadicalRing2Brace(rg));
# [ 8, 13 ]
# @EndExampleSession
# DeclareAttribute("RadicalRing2Brace", IsRing);

#DeclareAttribute("Brace2RadicalRing", IsBrace);

Messung
C	H	Z	G
87	93	100	93

¤ Dauer der Verarbeitung: 0.2 Sekunden ¤

Wurzel

Suchen

PVS Prover

Isabelle Prover

Cephes Mathematical Library

Vienna Development Method

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung und die Messung sind noch experimentell.