In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraph",VertexSize1]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraph",VertexSize1]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraphStructure"]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},3,"StatesGraphStructure"]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},4,"StatesGraphStructure"]
Out[]=
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},5,"StatesGraphStructure"]
In[]:=
MultiwaySystem[WolframModel[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}],{{0,0},{0,0}},4,"StatesGraphStructure"]
Out[]=
In[]:=
LayeredGraphPlot[%431,AspectRatio1/2]
Out[]=
In[]:=
CanonicalCriticalPairs[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}},"IncludeSelfPairs"False]
Out[]=
{}
In[]:=
CanonicalCriticalPairs[{{{x,y},{x,z}}{{x,z},{x,w},{y,w},{z,w}}}]
Out[]=
The paths multiply step by step.....