Skip to content

Commit

Permalink
added essential dependency test for Rhodes example (Krebs Cycle)
Browse files Browse the repository at this point in the history
  • Loading branch information
nehaniv committed Aug 10, 2023
1 parent a95d21f commit c78d247
Showing 1 changed file with 13 additions and 7 deletions.
20 changes: 13 additions & 7 deletions tst/lowerbound.tst
Original file line number Diff line number Diff line change
Expand Up @@ -4,11 +4,17 @@ gap> LoadPackage("sgpdec", false);;
gap> SgpDecFiniteSetDisplayOn();;
gap> S := FullTransformationSemigroup(4);;
gap> sk := Skeleton(S);;
gap> CheckEssentialDependency(sk, 1,2);
Group([ (2,3), (1,2), (1,3) ])
gap> CheckEssentialDependency(sk, 2,3);
Group([ (1,2) ])
gap> SgpDecFiniteSetDisplayOff();;

#
gap> StructureDescription(CheckEssentialDependency(sk, 1,2));
"S3"
gap> StructureDescription(CheckEssentialDependency(sk, 2,3));
"C2"
gap> #Krebs Cycle Example from Rhodes (2010) Figure 3 Part I:
gap> alpha:= Transformation([2,2,4,4,5,2]);; #NAD
gap> beta:= Transformation([1,3,3,4,5,6]);; #NADP
gap> gamma:=Transformation([1,2,3,5,5,6]);; #GDP
gap> delta:= Transformation([1,2,3,4,6,6]);; #NADP
gap> KrebsK2:=Semigroup(alpha,beta, gamma,delta);;;
gap> skel:=Skeleton(KrebsK2);;
gap> StructureDescription(CheckEssentialDependency(skel,5,6));
"C2"
gap> STOP_TEST( "Sgpdec package: lowerbound.tst", 10000);

0 comments on commit c78d247

Please sign in to comment.