set Masters{i in 1..8} ordered = Codes7a[i];
display Masters;

display Masters > a16c-data.txt;


set Codes_10_3{i in 1..8} dimen 7 = Codewords_trip[i];
display Codes_10_3;

display Codes_10_3 > a16c-data.txt;



close a16c-data.txt;