Skip to content

Commit 6292f98

Browse files
mtorpeyjames-d-mitchell
authored andcommitted
DigraphAbsorptionExpectedSteps: add tests for mutability
1 parent acb3ce7 commit 6292f98

1 file changed

Lines changed: 14 additions & 0 deletions

File tree

tst/standard/attr.tst

Lines changed: 14 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -2920,6 +2920,20 @@ gap> DigraphAbsorptionExpectedSteps(ChainDigraph(5));
29202920
gap> DigraphAbsorptionExpectedSteps(CompleteDigraph(5));
29212921
[ 0, 0, 0, 0, 0 ]
29222922

2923+
# DigraphAbsorptionExpectedSteps: mutable digraphs
2924+
gap> gr := Digraph(IsMutableDigraph, [[1, 2], [2]]);;
2925+
gap> IsMutableDigraph(gr);
2926+
true
2927+
gap> DigraphAbsorptionExpectedSteps(gr);
2928+
[ 2, 0 ]
2929+
gap> DigraphAbsorptionExpectedSteps(gr);
2930+
[ 2, 0 ]
2931+
gap> DigraphAddEdge(gr, [2, 1]);;
2932+
gap> DigraphAbsorptionExpectedSteps(gr);
2933+
[ 0, 0 ]
2934+
gap> DigraphAbsorptionExpectedSteps(gr);
2935+
[ 0, 0 ]
2936+
29232937
# Absorption motivating example: game of 'Soccer Dice'
29242938
gap> soccer := Digraph([[7, 2, 3, 5, 1, 4],
29252939
> [7, 2, 3, 5, 5, 4],

0 commit comments

Comments
 (0)