In[]:=
ResourceFunction["MultiwayFunctionSystem"][v|->{2v+1,Map[If[EvenQ[#],#/2,#+1]&,v]},{{1,1}},3,"StatesGraph"]
Out[]=
In[]:=
ResourceFunction["MultiwayFunctionSystem"][v|->{2v+1,Map[If[EvenQ[#],#/2,#+1]&,v]},{{1,1}},3,"EvolutionEventsGraph"]
Out[]=
In[]:=
ResourceFunction["MultiwayFunctionSystem"][v|->{2v+1,Map[If[EvenQ[#],#/2,#+1]&,v]},{{1,1}},2,"EvolutionEventsGraph"]
Out[]=
In[]:=
ResourceFunction["MultiwayFunctionSystem"][v|->{2v+1,Map[If[EvenQ[#],#/2,#+1]&,v]},{{1,1}},3,"EvolutionEventsGraphStructure"]
Out[]=
