{{1,2}}->{{4,2}}

In[]:=
rules=Import["/Users/sw/Dropbox/Physics/Data/RuleEnumerations/12-42c.wxf"];
In[]:=
Length[rules]
Out[]=
3740
In[]:=
ImageCollectionFromRules[rules,{{0,0}}];
In[]:=
Length[%]
Out[]=
403
In[]:=
MakeFSP/@Partition[%111,UpTo[80]]
Out[]=

{{1,2}}->{{3,2}}

{{1,3}}->{{2,3}}