ao(19) = "33333333333333333333"\r
ao(20) = "03333333333333333330"\r
CASE 14\r
-ao(1) = "00000000000300000000"\r
-ao(2) = "00000000003300000000"\r
-ao(3) = "00000000003330000000"\r
-ao(4) = "00000000033331100000"\r
-ao(5) = "00000000033331100000"\r
-ao(6) = "00000000333333000000"\r
-ao(7) = "00000000331333000000"\r
-ao(8) = "00000000333111000000"\r
-ao(9) = "00033333333333333300"\r
-ao(10) = "03333333333333333333"\r
-ao(11) = "00333333333333333300"\r
-ao(12) = "00000033333333330000"\r
-ao(13) = "00000033333333000000"\r
-ao(14) = "00000333333333300000"\r
-ao(15) = "00000333330333330000"\r
-ao(16) = "00000333300033330000"\r
-ao(17) = "00000330000033333000"\r
-ao(18) = "00003300000000333300"\r
-ao(19) = "00003000000000003330"\r
-ao(20) = "00003000000000000030"\r
+\r
+\r
+ao(1) = "00000000000000000000"\r
+ao(2) = "00000000000000000000"\r
+ao(3) = "00000002222200000000"\r
+ao(4) = "00000022222222200000"\r
+ao(5) = "00000011133113000000"\r
+ao(6) = "00000131333133300000"\r
+ao(7) = "00000131133313330000"\r
+ao(8) = "00000113333111100000"\r
+ao(9) = "00000003333333000000"\r
+ao(10) = "00000011211100000000"\r
+ao(11) = "00000111211211100000"\r
+ao(12) = "00001111222211110000"\r
+ao(13) = "00003312322312330000"\r
+ao(14) = "00003332222223330000"\r
+ao(15) = "00003322222222330000"\r
+ao(16) = "00000022200222000000"\r
+ao(17) = "00000111000011100000"\r
+ao(18) = "00001111000011110000"\r
+ao(19) = "00000000000000000000"\r
+ao(20) = "00000000000000000000"\r
+\r
+\r
CASE 15\r
ao(1) = "0000000000300000000"\r
ao(2) = "0000000003300000000"\r
NEXT e\r
123\r
END SUB\r
-\r