parse out programs
In A140000.txt1
we have
%t A140000 QuadPrimes2[4, -4, 331, 10000] (* see A106856 *)
%o A140000 (MAGMA) [p: p in PrimesUpTo(12000) | p mod 1320 in [91, 331, 379, 499, 619, 691, 859, 1171, 1219, 1291]]; // _Vincenzo Librandi_, Aug 03 2012
The first one is mathematica and the second one is (obviously) magma (both computer algebra systems) they should generate
<code id="A140000.code1">
<data format="Mathematica">QuadPrimes2[4, -4, 331, 10000]</data>
</code>
<code id="A140000.code2">
<metadata>
<dc:creator>Vincenzo Librandi</dc:creator>
<dc:date>Aug 03 2012</dc:date>
<dc:description>see A106856</dc:description>
</metadata>
<data format="MAGMA">[p: p in PrimesUpTo(12000) | p mod 1320 in [91, 331, 379, 499, 619, 691, 859, 1171, 1219, 1291]];</data>
</code>
There should only be a finite set of programs, so we should be able to treat them equally.