SetDirectory["I:"]
I:\
SetDirectory["Science/Programs/Universe-96"]
I:\Science\Programs\Universe-96
basics=<<basicrules.m;
Length[basics]
36
Show[GraphicsArray[Partition[RulePicture[{#}]&/@basics,4]]];
Show[GraphicsArray[Partition[RulePicture[{#}]&/@basics,2]]];