cg[rule_,t_:20]:=ResourceFunction["WolframModel"][rule,Automatic,t,"LayeredCausalGraph"]
In[]:=
spl[rule_,t_:20]:=ResourceFunction["WolframModel"][rule,Automatic,t,"StatesPlotsList"]
In[]:=
mwcg[rule_,t_:5]:=ResourceFunction["MultiwaySystem"]["WolframModel"{rule},{First[rule]/._Integer0},t,"CausalGraphStructure"]
In[]:=
mwbg[rule_,t_:5]:=ResourceFunction["MultiwaySystem"]["WolframModel"{rule},{First[rule]/._Integer0},t,"BranchialGraphStructure"]
In[]:=
mw[rule_,t_:5]:=ResourceFunction["MultiwaySystem"]["WolframModel"{rule},{First[rule]/._Integer0},t,"StatesGraphStructure"]
In[]:=
{{1,2},{1,3}}{{1,1},{1,4},{1,5}}
Single looped behavior
Single looped behavior
cg[{{1,1},{1,1}}{{1,1},{1,1},{1,2}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,1}}{{1,1},{1,1},{1,2}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{1,1},{2,1},{2,3}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,1},{2,1},{2,3}},6]
In[]:=
Out[]=
SimpleGraph[%]
In[]:=
Out[]=
Simple cosmological horizon
Simple cosmological horizon
cg[{{1,1},{2,1}}{{1,1},{1,2},{3,1}}]
In[]:=
Out[]=
mwcg[{{1,1},{2,1}}{{1,1},{1,2},{3,1}}]
In[]:=
Out[]=
SimpleGraph[%]
In[]:=
Out[]=
mwcg[{{1,1},{2,1}}{{1,1},{1,2},{3,1}},6]
In[]:=
Out[]=
mwbg[{{1,1},{2,1}}{{1,1},{1,2},{3,1}},4]
In[]:=
Out[]=
mwbg[{{1,1},{2,1}}{{1,1},{1,2},{3,1}},5]
In[]:=
Out[]=
mw[{{1,1},{2,1}}{{1,1},{1,2},{3,1}},5]
In[]:=
Out[]=
spl[{{1,1},{2,1}}{{1,1},{1,2},{3,1}},10]
In[]:=
Out[]=
{{1,1},{1,2}}{{1,1},{1,2},{2,3}}
cg[{{1,1},{1,2}}{{2,2},{2,1},{1,3}},60]
In[]:=
Out[]=
Partial horizon
Partial horizon
cg[{{1,1},{1,2}}{{2,2},{2,1},{2,3}},60]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{2,2},{2,1},{2,3}},80]
In[]:=
Out[]=
Show[#,ImageSize{60,60}]&/@spl[{{1,1},{1,2}}{{2,2},{2,1},{2,3}},80]
In[]:=
Out[]=
Turing machine like
Turing machine like
cg[{{1,1},{1,2}}{{2,2},{2,3},{3,1}},40]
In[]:=
Out[]=
spl[{{1,1},{1,2}}{{2,2},{2,3},{3,1}},5]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{2,2},{2,3},{3,1}},10]
In[]:=
Out[]=
mw[{{1,1},{1,2}}{{2,2},{2,3},{3,1}},10]
In[]:=
Out[]=
Cosmological
Cosmological
cg[{{1,2},{1,3}}{{2,1},{1,3},{3,4}}]
In[]:=
Out[]=
spl[{{1,2},{1,3}}{{2,1},{1,3},{3,4}}]
In[]:=
Out[]=
Multitrack
Multitrack
cg[{{1,2},{1,3}}{{2,2},{3,2},{1,4}},30]
In[]:=
Out[]=
cg[{{1,2},{1,3}}{{2,2},{1,3},{1,4}},40]
In[]:=
Out[]=
cg[{{1,2},{1,3}}{{2,2},{2,4},{3,1}},30]
In[]:=
Out[]=
mw[{{1,2},{1,3}}{{2,2},{2,4},{3,1}}]
In[]:=
$Aborted
Out[]=
cg[{{1,2},{2,3}}{{2,4},{2,3},{4,1}}]
In[]:=
Out[]=
mwcg[{{1,2},{2,3}}{{2,4},{2,3},{4,1}},4]
In[]:=
Out[]=
mw[{{1,2},{2,3}}{{2,4},{2,3},{4,1}},5]
In[]:=
Out[]=
LayeredGraphPlot[%]
In[]:=
Out[]=
cg[{{1,2},{3,2}}{{4,4},{2,4},{1,3}},30]
In[]:=
Out[]=
mwcg[{{1,2},{3,2}}{{4,4},{2,4},{1,3}},5]
In[]:=
Out[]=
mwcg[{{1,2},{3,2}}{{4,4},{2,4},{1,3}},6]
In[]:=
$Aborted
Out[]=
Terminating
Terminating
cg[{{1,1},{1,2}}{{1,1},{2,3},{3,2}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,1},{2,3},{3,2}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{1,1},{2,3},{3,2}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,1},{2,3},{3,2}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{2,2},{3,2},{1,4}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{2,2},{3,2},{1,4}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{1,1},{2,3},{2,3}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,1},{2,3},{2,3}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{1,1},{2,3},{2,4}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,1},{2,3},{2,4}}]
In[]:=
Out[]=
cg[{{1,1},{1,2}}{{1,2},{1,2},{2,3}}]
In[]:=
Out[]=
mwcg[{{1,1},{1,2}}{{1,2},{1,2},{2,3}}]
In[]:=
Out[]=
cg[{{1,2},{2,3}}{{3,2},{3,2},{1,4}},20]
In[]:=
Out[]=
mwcg[{{1,2},{2,3}}{{3,2},{3,2},{1,4}}]
In[]:=
Out[]=
Other
Other
cg[{{1,2},{2,3}}{{4,4},{3,4},{2,1}}]
In[]:=
Out[]=
[ Slow to connect ]
[ Slow to connect ]
cg[{{1,2},{2,3}}{{4,4},{4,3},{2,3}},30]
In[]:=
Out[]=
spl[{{1,2},{2,3}}{{4,4},{4,3},{2,3}},5]
In[]:=
Out[]=
cg[{{1,2},{2,3}}{{4,1},{1,5},{5,3}}]
In[]:=
Out[]=
mwcg[{{1,2},{2,3}}{{4,1},{1,5},{5,3}},4]
In[]:=
Out[]=
cg[{{1,2},{3,2}}{{1,3},{1,2},{4,3}},30]
In[]:=
Out[]=
cg[{{1,2},{3,2}}{{2,2},{4,1},{1,3}},30]
In[]:=
Out[]=