home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 13 / 13.iso / p / p078 / 5.img / VLIB.PLB / INTEL_M.DSF < prev    next >
Encoding:
Text File  |  1989-03-27  |  83.4 KB  |  3,256 lines

  1. ; The following is the INTEL Macro-function library.
  2. ;
  3. ;All of the models contained in this file are Functional (Unit Delay) models,
  4. ;this means that timing parameters were not modeled.
  5. ;
  6. ;All Macro-functions using register primitives are cleared upon initialization.
  7. ;
  8. ;Reference material used for the creation of the models contained in the file
  9. ;were;
  10. ;
  11. ;    1. EMSYNTAX - Text file provided by Intel.
  12. ;       TTLSYNTX - Text file provided by Intel.
  13. ;        TTL.DOC - Text file provided by Intel.
  14. ;
  15. ;    2. Graphical representations of the Macro-functions provided by Intel.
  16. ;
  17. ;    3. The TEXAS INSTRUMENTS TTL Data Book Volume 2, 1985
  18. ;
  19. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; 
  20. :BNOR2       INTEL_M        3
  21. AND(P1,P2;P3;1,1,1,1);
  22. %
  23. ;
  24. :BNOR3       INTEL_M        4
  25. AND(P1,P2,P3;P4;1,1,1,1);
  26. %
  27. ;
  28. :BNOR4       INTEL_M        5
  29. AND(P1,P2,P3,P4;P5;1,1,1,1);
  30. %
  31. ;
  32. :BNOR6       INTEL_M        7
  33. AND(P1,P2,P3,P4,P5,P6;P7;1,1,1,1);
  34. %
  35. ;
  36. :BNOR8       INTEL_M        9
  37. AND(P1,P2,P3,P4,P5,P6,P7,P8;P9;1,1,1,1);
  38. %
  39. ;
  40. :BNOR12      INTEL_M       13
  41. AND(P1,P2,P3,P4,P5,P6,P7,P8,P9,P10,P11,P12;P13;1,1,1,1);
  42. %
  43. ;
  44. :BOR2       INTEL_M        3
  45. NAND(P1,P2;P3;1,1,1,1);
  46. %
  47. ;
  48. :BOR3       INTEL_M        4
  49. NAND(P1,P2,P3;P4;1,1,1,1);
  50. %
  51. ;
  52. :BOR4       INTEL_M        5
  53. NAND(P1,P2,P3,P4;P5;1,1,1,1);
  54. %
  55. ;
  56. :BOR6       INTEL_M        7
  57. NAND(P1,P2,P3,P4,P5,P6;P7;1,1,1,1);
  58. %
  59. ;
  60. :BOR8       INTEL_M        9
  61. NAND(P1,P2,P3,P4,P5,P6,P7,P8;P9;1,1,1,1);
  62. %
  63. ;
  64. :BOR12      INTEL_M       13
  65. NAND(P1,P2,P3,P4,P5,P6,P7,P8,P9,P10,P11,P12;P13;1,1,1,1);
  66. %
  67. ;
  68. :BNAND2       INTEL_M        3
  69. OR(P1,P2;P3;1,1,1,1);
  70. %
  71. ;
  72. :BNAND3       INTEL_M        4
  73. OR(P1,P2,P3;P4;1,1,1,1);
  74. %
  75. ;
  76. :BNAND4       INTEL_M        5
  77. OR(P1,P2,P3,P4;P5;1,1,1,1);
  78. %
  79. ;
  80. :BNAND6       INTEL_M        7
  81. OR(P1,P2,P3,P4,P5,P6;P7;1,1,1,1);
  82. %
  83. ;
  84. :BNAND8       INTEL_M        9
  85. OR(P1,P2,P3,P4,P5,P6,P7,P8;P9;1,1,1,1);
  86. %
  87. ;
  88. :BNAND12      INTEL_M       13
  89. OR(P1,P2,P3,P4,P5,P6,P7,P8,P9,P10,P11,P12;P13;1,1,1,1);
  90. %
  91. ;
  92. :BAND2       INTEL_M        3
  93. NOR(P1,P2;P3;1,1,1,1);
  94. %
  95. ;
  96. :BAND3       INTEL_M        4
  97. NOR(P1,P2,P3;P4;1,1,1,1);
  98. %
  99. ;
  100. :BAND4       INTEL_M        5
  101. NOR(P1,P2,P3,P4;P5;1,1,1,1);
  102. %
  103. ;
  104. :BAND6       INTEL_M        7
  105. NOR(P1,P2,P3,P4,P5,P6;P7;1,1,1,1);
  106. %
  107. ;
  108. :BAND8       INTEL_M        9
  109. NOR(P1,P2,P3,P4,P5,P6,P7,P8;P9;1,1,1,1);
  110. %
  111. ;
  112. :BAND12      INTEL_M       13
  113. NOR(P1,P2,P3,P4,P5,P6,P7,P8,P9,P10,P11,P12;P13;1,1,1,1);
  114. %
  115. ;
  116. ;NAND2
  117. ;
  118. :7400        INTEL_M       5
  119.    NAND(P1,P2;P3;1,1,1,1);
  120. %
  121. ;
  122. ;NOR2
  123. ;
  124. :7402        INTEL_M       5
  125.    NOR(P2,P3;P1;1,1,1,1);
  126. %
  127. ;
  128. ;NOT
  129. ;
  130. :7404        INTEL_M       4
  131.    INV(P1;P2;1,1,1,1);
  132. %
  133. ;
  134. ;AND2
  135. ;
  136. :7408        INTEL_M       5
  137.    AND(P1,P2;P3;1,1,1,1);
  138. %
  139. ;
  140. ;NAND3
  141. ;
  142. :7410        INTEL_M       6
  143.    NAND(P1,P2,P5;P4;1,1,1,1);
  144. %
  145. ;
  146. ;AND3
  147. ;
  148. :7411        INTEL_M       6
  149.    AND(P1,P2,P5;P4;1,1,1,1);
  150. %
  151. ;
  152. ;NAND4
  153. ;
  154. :7420        INTEL_M       7
  155.    NAND(P1,P2,P3,P4;P5;1,1,1,1);
  156. %
  157. ;
  158. ;AND4
  159. ;
  160. :7421        INTEL_M       7
  161. AND(P1,P2,P3,P4;P5;1,1,1,1)
  162. %
  163. ;
  164. ;NOR3
  165. ;
  166. :7427        INTEL_M       6
  167.    NOR(P1,P2,P5;P4;1,1,1,1);
  168. %
  169. ;
  170. ;NAND8
  171. ;
  172. :7430        INTEL_M       11
  173.    NAND(P1,P2,P3,P4,P5,P6,P9,P10;P8;1,1,1,1);
  174. %
  175. ;
  176. ;OR2
  177. ;
  178. :7432        INTEL_M       5
  179.    OR(P1,P2;P3;1,1,1,1);
  180. %
  181. ;
  182. ; 1-10 BCD TO DECIMAL DECODER
  183. ;
  184. :7442        INTEL_M    16
  185.    LINV(P15;L1);
  186.    LINV(P14;L3);
  187.    LINV(P13;L5);
  188.    LINV(P12;L7);
  189.    NAND(L1,L3,L5,L7;P1;1,1,1,1);
  190.    NAND(P15,L3,L5,L7;P2;1,1,1,1);
  191.    NAND(L1,P14,L5,L7;P3;1,1,1,1);
  192.    NAND(P15,P14,L5,L7;P4;1,1,1,1);
  193.    NAND(L1,L3,P13,L7;P5;1,1,1,1);
  194.    NAND(P15,L3,P13,L7;P6;1,1,1,1);
  195.    NAND(L1,P14,P13,L7;P7;1,1,1,1);
  196.    NAND(P15,P14,P13,L7;P9;1,1,1,1);
  197.    NAND(L1,L3,L5,P12;P10;1,1,1,1);
  198.    NAND(P15,L3,L5,P12;P11;1,1,1,1);
  199. %
  200. ;
  201. ;EXCESS 3 TO DECIMAL DECODER
  202. ;
  203. :7444        INTEL_M    16
  204.    LINV(P15;L1);
  205.    LINV(P14;L3);
  206.    LINV(P13;L5);
  207.    LINV(P12;L7);
  208.    NAND(L1,P14,L5,L7;P1;1,1,1,1);
  209.    NAND(L1,P14,P13,L7;P2;1,1,1,1);
  210.    NAND(P15,P14,P13,L7;P3;1,1,1,1);
  211.    NAND(P15,L3,P13,L7;P4;1,1,1,1);
  212.    NAND(L1,L3,P13,L7;P5;1,1,1,1);
  213.    NAND(L1,L3,P13,P12;P6;1,1,1,1);
  214.    NAND(P15,L3,P13,P12;P7;1,1,1,1);
  215.    NAND(P15,P14,P13,P12;P9;1,1,1,1);
  216.    NAND(L1,P14,P13,P12;P10;1,1,1,1);
  217.    NAND(L1,P14,L5,P12;P11;1,1,1,1);
  218. %
  219. ;
  220. ;BCD TO 7 SEGMENT DECODER
  221. ;
  222. :7447X        INTEL_M       16
  223.    LNAND(P7,P3;L1);
  224.    LNAND(P1,P3;L2);
  225.    LNAND(P2,P3;L3);
  226.    LINV(P6;L4);
  227.    LINV(P5;L5);
  228.    NAND(L1,L2,L3,L4,L5,P3;N1;1,1,1,1);
  229.    LAND(P4,N1;L6);
  230.    LNAND(L1,L6;L7);
  231.    LNAND(L2,L6;L8);
  232.    LNAND(L3,L6;L9);
  233.    LNAND(L4,L6;L10);
  234.    LAND(L8,L10;L11);
  235.    LAND(L1,L9;L12);
  236.    LAND(L7,L2,L3,L4;L13);
  237.    LAND(L8,L10;L14);
  238.    LAND(L7,L2,L9;L15);
  239.    LAND(L1,L8,L9;L16);
  240.    LAND(L9,L10;L17);
  241.    LAND(L1,L8,L3;L18);
  242.    LAND(L7,L2,L3;L19);
  243.    LAND(L1,L2,L9;L20);
  244.    LAND(L7,L8,L9;L21);
  245.    LAND(L2,L9;L22);
  246.    LAND(L7,L8;L23);
  247.    LAND(L8,L3;L24);
  248.    LAND(L7,L3,L4;L25);
  249.    LAND(L7,L8,L9;L26);
  250.    LAND(L2,L3,L4,P3;L27);
  251.    NOR(L11,L12,L13;P13;1,1,1,1);
  252.    NOR(L14,L15,L16;P12;1,1,1,1);
  253.    NOR(L17,L18;P11;1,1,1,1);
  254.    NOR(L19,L20,L21;P10;1,1,1,1);
  255.    NOR(L7,L22;P9;1,1,1,1);
  256.    NOR(L23,L24,L25;P15;1,1,1,1);
  257.    NOR(L26,L27;P14;1,1,1,1);
  258. %
  259. ;
  260. ;BCD TO SEVEN SEGMENT DECODER
  261. ;
  262. :7449        INTEL_M       14
  263.    LINV(P5;L1);
  264.    LINV(P1;L2);
  265.    LINV(P2;L3);
  266.    LINV(P4;L4);
  267.    LNAND(L1,P3;L5);
  268.    LNAND(L2,P3;L6);
  269.    LNAND(L3,P3;L7);
  270.    LNAND(L4,P3;L8);
  271.    LAND(L6,L8;L9);
  272.    LAND(L1,L7;L10);
  273.    LAND(L5,L2,L3,L4;L11);
  274.    LAND(L5,L2,L7;L12);
  275.    LAND(L1,L6,L7;L13);
  276.    LAND(L7,L8;L14);
  277.    LAND(L1,L6,L3;L15);
  278.    LAND(L1,L2,L7;L16);
  279.    LAND(L5,L6,L7;L17);
  280.    LAND(L2,L7;L18);
  281.    LAND(L5,L6;L19);
  282.    LAND(L6,L3;L20);
  283.    LAND(L5,L3,L4;L21);
  284.    LAND(L2,L3,L4;L22);
  285.    NOR(L9,L10,L11;P11;1,1,1,1);
  286.    NOR(L9,L12,L13;P10;1,1,1,1);
  287.    NOR(L14,L15;P9;1,1,1,1);
  288.    NOR(L11,L16,L17;P8;1,1,1,1);
  289.    NOR(L5,L18;P6;1,1,1,1);
  290.    NOR(L19,L20,L21;P13;1,1,1,1);
  291.    NOR(L17,L22;P12;1,1,1,1);
  292. %
  293. ;
  294. ;AND-GATED J-K FLIPFLOP WITH SYNCHRONOUS PRESET AND CLEAR
  295. ;
  296. :7472XA        INTEL_M       13
  297.    INV(P11;N1;0,0,0,0);
  298.    LINV(P12;L1);
  299.    LNAND(L1,N1;L2);
  300.    LAND(P1,IPL;L3);
  301.    LAND(P2,P3,P4;L4);
  302.    LAND(P8,P9,P10;L5);
  303.    JKFFPC(L4,L5,N1,L2,L3;P7,P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  304. %
  305. ;
  306. ;AND-GATED J-K FLIPFLOP WITH SYNCHRONOUS PRESET AND CLEAR
  307. ;
  308. :7472XB        INTEL_M       13
  309.    INV(P11;N1;0,0,0,0);
  310.    LINV(P12;L1);
  311.    LNAND(L1,N1;L2);
  312.    LAND(P1,IPL;L3);
  313.    LAND(P2,P3,P4;L4);
  314.    LAND(P8,P9,P10;L5);
  315.    JKFFPC(L4,L5,N1,L2,L3;P7,P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  316. %
  317. ;
  318. ;J-K FLIPFLOP WITH CLEAR
  319. ;
  320. :7473X        INTEL_M       8
  321.    INV(P1;N1;0,0,0,0);
  322.    LAND(P2,IPL;L1);   
  323.    JKFFC(P8,P3,N1,L1;P6,P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  324. %
  325. ;
  326. ;D-TYPE FLIPFLOP WITH SYNCHRONOUS PRESET AND CLEAR
  327. ;
  328. :7474X        INTEL_M       8
  329.    LAND(P1,IPL;L1);   
  330.    LINV(P4;L3);
  331.    LNAND(L3,P3;L4);   
  332.    DFFPC(P2,P3,L4,L1;P5,P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  333. %
  334. ;
  335. ;4-BIT BI-STABLE LATCH
  336. ;
  337. :7475X        INTEL_M       16
  338.    LINV(P2;L1);
  339.    LINV(P3;L2);
  340.    LINV(P6;L3);
  341.    LINV(P7;L4);
  342.    DLATCH(P2,P13;P16;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  343.    DLATCH(L1,P13;P1;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  344.    DLATCH(P3,P13;P15;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  345.    DLATCH(L2,P13;P14;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  346.    DLATCH(P6,P4;P10;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  347.    DLATCH(L3,P4;P11;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  348.    DLATCH(P7,P4;P9;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  349.    DLATCH(L4,P4;P8;1,1,1,1,1,0,1,1,1,1,1,1,0,1);
  350. %
  351. ;
  352. ;4-BIT BI-STABLE LATCH
  353. ;
  354. :7477X        INTEL_M       12
  355.    DLATCH(P1,P10;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  356.    DLATCH(P2,P10;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  357.    DLATCH(P5,P3;P8;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  358.    DLATCH(P6,P3;P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  359. %
  360. ;
  361. ;2 BIT BINARY FULL ADDER
  362. ;
  363. :7482X        INTEL_M       10
  364.    LINV(P9;L1);
  365.    LINV(P10;L2);
  366.    LAND(P5,N3;L3);
  367.    LAND(P2,N3;L4);
  368.    LAND(P3,N3;L5);
  369.    LAND(P5,P2,P3;L6);
  370.    LAND(P5,P2;L7);
  371.    LAND(P5,P3;L8);
  372.    LAND(P3,P2;L9);
  373.    LAND(N3,P6;L10);
  374.    LAND(L2,P6;L11);
  375.    LAND(L1,P6;L12);
  376.    LAND(N3,L2,L1;L13);
  377.    LAND(N3,L2;L14);
  378.    LAND(N3,L1;L15);
  379.    LAND(L2,L1;L16);
  380.    OR(L3,L4,L5,L6;P1;1,1,1,1);
  381.    NOR(L7,L8,L9;N3;1,1;1,1);
  382.    NOR(L10,L11,L12,L13;P8;1,1,1,1);
  383.    NOR(L14,L15,L16;P6;1,1,1,1);
  384. %
  385. ;
  386. ;4 BIT FULL ADDER
  387. ;
  388. :7483X        INTEL_M       16
  389.    LINV(P13;L1);
  390.    LNOR(P10,P11;L2);
  391.    LNAND(P10,P11;L3);
  392.    LNOR(P7,P8;L4);
  393.    LNAND(P7,P8;L5);
  394.    LNOR(P3,P4;L6);
  395.    LNAND(P3,P4;L7);
  396.    LNOR(P16,P1;L8);
  397.    LNAND(P16,P1;L9);
  398.    LINV(L1;L10);
  399.    LINV(L2;L11);
  400.    LAND(L11,L3;L12);
  401.    LAND(L1,L3;L13);
  402.    LINV(L4;L14);
  403.    LAND(L14,L5;L15);
  404.    LAND(L1,L3,L5;L16);
  405.    LAND(L5,L2;L17);
  406.    LINV(L6;L18);
  407.    LAND(L18,L7;L19);
  408.    LAND(L1,L3,L5,L7;L20);
  409.    LAND(L5,L7,L2;L21);
  410.    LAND(L7,L4;L22);
  411.    LINV(L8;L23);
  412.    LAND(L23,L9;L24);
  413.    LAND(L1,L3,L5,L7,L9;L25);
  414.    LAND(L5,L7,L9,L2;L26);
  415.    LAND(L7,L9,L4;L27);
  416.    LAND(L9,L6;L28);
  417.    LNOR(L13,L2;L29);
  418.    LNOR(L16,L17,L4;L30);
  419.    LNOR(L20,L21,L22,L6;L31);
  420.    XOR(L10,L12;P9;1,1,1,1);
  421.    XOR(L29,L15;P6;1,1,1,1);
  422.    XOR(L30,L19;P2;1,1,1,1);
  423.    XOR(L31,L24;P15;1,1,1,1);
  424.    NOR(L25,L26,L27,L28,L8;P14;1,1,1,1);
  425. %
  426. ;
  427. ;4 BIT MAGNITUDE COMPARATOR
  428. ;
  429. :7485X        INTEL_M       16
  430.    LNAND(P15,P1;L1);
  431.    LNAND(P13,P14;L2);
  432.    LNAND(P12,P11;L3);
  433.    LNAND(P10,P9;L4);
  434.    LAND(P15,L1;L5);
  435.    LAND(L1,P1;L6);
  436.    LAND(P13,L2;L7);
  437.    LAND(L2,P14;L8);
  438.    LAND(P12,L3;L9);
  439.    LAND(L3,P11;L10);
  440.    LAND(P10,L4;L11);
  441.    LAND(L4,P9;L12);
  442.    LNOR(L5,L6;L13);
  443.    LNOR(L7,L8;L14);
  444.    LNOR(L9,L10;L15);
  445.    LNOR(L11,L12;L16);
  446.    LAND(P14,L2,L13;L17);
  447.    LAND(P11,L3,L13,L14;L18);
  448.    LAND(P9,L4,L13,L14,L15;L19);
  449.    LAND(L13,L14,L15,L16,P2;L20);
  450.    LAND(L13,L14,L15,L16,P3;L21);
  451.    LAND(P3,L16,L15,L14,L13;L22);
  452.    LAND(P4,L16,L14,L15,L13;L23);
  453.    LAND(L15,L14,L13,L4,P10;L24);
  454.    LAND(L14,L13,L3,P12;L25);
  455.    LAND(L13,L2,P13;L26);
  456.    NOR(L6,L17,L18,L19,L20,L21;P5;1,1,1,1);
  457.    NOR(L22,L23,L24,L25,L26,L5;P7;1,1,1,1);
  458.    AND(L13,L14,P3,L15,L16;P6;1,1,1,1);
  459. %
  460. ;
  461. ;XOR
  462. ;
  463. :7486        INTEL_M    5
  464.    XOR(P1,P2;P3;1,1,1,1);
  465. %
  466. ;
  467. ;4-BIT TRUE/COMPLEMENT I/O ELEMENT
  468. ;
  469. :7487        INTEL_M       12
  470. LINV(P7;L1);
  471. LINV(P1;L2);
  472. LNAND(P2,L1;L3);
  473. LINV(L2;L4);
  474. LNAND(P4,L1;L5);
  475. LINV(L2;L6);
  476. LNAND(P9,L1;L7);
  477. LINV(L2;L8);
  478. LNAND(P11,L1;L9);
  479. LINV(L2;L10);
  480. XOR(L3,L4;P3;1,1,1,1);
  481. XOR(L5,L6;P5;1,1,1,1);
  482. XOR(L7,L8;P8;1,1,1,1);
  483. XOR(L9,L10;P10;1,1,1,1);
  484. %
  485. ;
  486. ;SYNCHRONOUS SET/RESET 4-BIT DECADE COUNTER
  487. ;
  488. :7490XD        INTEL_M       12
  489.    LNAND(P5,P6,P12;L1);
  490.    LNAND(P2,P3,P12;L2);
  491.    LAND(L2,L1;L3);
  492.    LAND(P8,P7;L8);
  493.    LAND(L2,IPL;L9);
  494.    LAND(L3,IPL;L10);
  495.    JKFFPC(ONE,ONE,P12,L1,L9;P11,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  496.    JKFFC(N10,ONE,N4,L10;P8,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  497.    JKFFC(ONE,ONE,N6,L10;P7,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  498.    JKFFPC(L8,P10,N4,L1,L9;P10,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  499. %
  500. ;
  501. ;SYNCHRONOUS SET/RESET 4-BIT BI-QUINARY COUNTER
  502. ;
  503. :7490XQ        INTEL_M       12
  504.    LNAND(P5,P6,P1;L1);
  505.    LNAND(P2,P3,P1;L2);
  506.    LAND(L2,L1;L3);
  507.    LAND(P8,P7;L8);
  508.    LAND(L2,IPL;L9);
  509.    LAND(L3,IPL;L10);
  510.    JKFFPC(ONE,ONE,N10,L1,L9;P11,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  511.    JKFFC(N10,ONE,P1,L10;P8,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  512.    JKFFC(ONE,ONE,N6,L10;P7,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  513.    JKFFPC(L8,P10,P1,L1,L9;P10,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  514. %
  515. ;
  516. ;SERIAL-IN SERIAL-OUT SHIFT REGISTER
  517. ;
  518. :7491        INTEL_M       7
  519.    LAND(P1,P2;L1);
  520.    DQFFC(L1,P3,IPL;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  521.    DQFFC(N1,P3,IPL;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  522.    DQFFC(N2,P3,IPL;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  523.    DQFFC(N3,P3,IPL;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  524.    DQFFC(N4,P3,IPL;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  525.    DQFFC(N5,P3,IPL;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  526.    DQFFC(N6,P3,IPL;N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  527.    DFFC(N7,P3,IPL;P5,P4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  528. %
  529. ;
  530. ;5-BIT SHIFT REGISTER
  531. ;
  532. :7496X        INTEL_M       16
  533.    LAND(P2,P8;L1);
  534.    LNAND(L1,P1;L2);
  535.    LAND(P3,P8;L3);
  536.    LNAND(L3,P1;L4);
  537.    LAND(P4,P8;L5);
  538.    LNAND(L5,P1;L6);
  539.    LAND(P6,P8;L7);
  540.    LNAND(L7,P1;L8);
  541.    LAND(P7,P8;L9);
  542.    LNAND(L9,P1;L10);
  543.    LAND(P16,IPL;L11);
  544.    DQFFPC(P9,P1,L2,L11;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  545.    DQFFPC(P15,P1,L4,L11;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  546.    DQFFPC(P14,P1,L6,L11;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  547.    DQFFPC(P13,P1,L8,L11;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  548.    DQFFPC(P11,P1,L10,L11;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  549. %
  550. ;
  551. ;NEGATIVE EDGE TRIGGERED FLIP-FLOP WITH PRESET AND CLEAR
  552. ;
  553. :74112XA        INTEL_M       9
  554.    LAND(P8,IPL;L1);
  555.    INV(P1;N1;0,0,0,0);
  556.    JKFFPC(P3,P2,N1,P4,L1;P5,P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  557. %
  558. ;
  559. ;NEGATIVE EDGE TRIGGERED FLIP-FLOP WITH CLEAR
  560. ;
  561. :74112XB        INTEL_M       9
  562.    LAND(P8,IPL;L1);
  563.    INV(P1;N1;0,0,0,0);
  564.    JKFFC(P3,P2,N1,L1;P5,P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  565. %
  566. ;
  567. ;BUS BUFFER WITH ACTIVE LOW ENABLE
  568. ;
  569. :74125       INTEL_M       5
  570.    LINV(P1;L1);
  571.    TSB(P2,L1;P3;1,1,1,1,1,1,1,1);
  572. %
  573. ;
  574. ;BUS BUFFER WITH ACTIVE HIGH ENABLE
  575. ;
  576. :74126        INTEL_M       5
  577.    TSB(P2,P1;P3;1,1,1,1,1,1,1,1);
  578. %
  579. :74138        INTEL_M       16
  580.    LINV(P1;L1);
  581.    LINV(P2;L2);
  582.    LINV(P3;L3);
  583.    LNOR(P4,P5;L4);
  584.    LAND(P6,L4;L5);
  585.    NAND(L1,L2,L3,L5;P15;1,1,1,1);
  586.    NAND(P1,L2,L3,L5;P14;1,1,1,1);
  587.    NAND(L1,P2,L3,L5;P13;1,1,1,1);
  588.    NAND(P1,P2,L3,L5;P12;1,1,1,1);
  589.    NAND(L1,L2,P3,L5;P11;1,1,1,1);
  590.    NAND(P1,L2,P3,L5;P10;1,1,1,1);
  591.    NAND(L1,P2,P3,L5;P9;1,1,1,1);
  592.    NAND(P1,P2,P3,L5;P7;1,1,1,1);
  593. %
  594. :74139        INTEL_M       9
  595.    LINV(P1;L1);
  596.    LINV(P2;L2);
  597.    LINV(P3;L3);
  598.    NAND(L2,L3,L1;P4;1,1,1,1);
  599.    NAND(P2,L3,L1;P5;1,1,1,1);
  600.    NAND(L2,P3,L1;P6;1,1,1,1);
  601.    NAND(P2,P3,L1;P7;1,1,1,1);
  602. %
  603. ;
  604. ;4-BIT COUNTER/LATCH, SEVEN SEGMENT DRIVER
  605. ;
  606. :74143X        INTEL_M       24
  607. LINV(P1;L1);
  608. LNOR(P1,P23;L2);
  609. LAND(P3,IPL;L3);
  610. LINV(P21;L4);
  611. LINV(P4;L5);
  612. LAND(N9,N7;L6);
  613. LOR(L6,N11;L7);
  614. NAND(L2,P2;N1;1,1,1,1);
  615. NAND(N5,L2,N12,P2;N2;1,1,1,1);
  616. NAND(N7,N5,L2,P2;N3;1,1,1,1);
  617. NAND(N5,L2,L7,P2;N4;1,1,1,1);
  618. JKFFC(ONE,ONE,N1,L3;N5,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  619. JKFFC(ONE,ONE,N2,L3;N7,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  620. JKFFC(ONE,ONE,N3,L3;N9,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  621. JKFFC(ONE,ONE,N4,L3;N11,N12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  622. LNAND(L4,N5;L8);
  623. LNAND(N6,L4;L9);
  624. LNAND(L4,N7;L10);
  625. LNAND(N8,L4;L11);
  626. LNAND(L4,N9;L12);
  627. LNAND(N10,L4;L13);
  628. LNAND(L4,N11;L14);
  629. LNAND(N12,L4;L15);
  630. NAND(L8,N13;P17;1,1,1,1);
  631. NAND(P17,L9;N13;1,1,1,1);
  632. NAND(L10,N14;P18;1,1,1,1);
  633. NAND(P18,L11;N14;1,1,1,1);
  634. NAND(L12,N15;P19;1,1,1,1);
  635. NAND(P19,L13;N15;1,1,1,1);
  636. NAND(L14,N16;P20;1,1,1,1);
  637. NAND(P20,L15;N16;1,1,1,1);
  638. LNAND(N13,N14,N15,N16;L16);
  639. LNAND(P17,N14,N15,N16;L17);
  640. LNAND(N13,P18,N15,N16;L18);
  641. LNAND(P17,P18,N15,N16;L19);
  642. LNAND(N16,P19,N14,N13;L20);
  643. LNAND(P17,P19,N16,N14;L21);
  644. LNAND(N13,P18,P19,N16;L22);
  645. LNAND(P17,P18,P19,N16;L23);
  646. LNAND(P17,N14,N15,P20;L24);
  647. LAND(N13,N14,N15,N16,L5;L25);
  648. LNOR(L25,P5;L26);
  649. AND(L1,N5,N11;P22;1,1,1,1);
  650. AND(L17,L20,L26;P15;1,1,1,1);
  651. AND(L21,L22,L26;P16;1,1,1,1);
  652. AND(L18,L26;P14;1,1,1,1);
  653. AND(L17,L20,L23,L26;P9;1,1,1,1);
  654. AND(L19,L20,L17,L21,L23,L24,L26;P11;1,1,1,1);
  655. AND(L19,L18,L17,L23,L26;P10;1,1,1,1);
  656. AND(L17,L16,L23,L26;P13;1,1,1,1);
  657. AND(L26,P7;P8;1,1,1,1);
  658. TSB(L26,ONE;P6;1,1,1,1,1,1,1,1);
  659. %
  660. ;
  661. ;BCD TO DECIMAL DECODER/DRIVER
  662. ;
  663. :74145        INTEL_M       16
  664.    LINV(P15;L1);
  665.    LINV(P14;L2);
  666.    LINV(P13;L3);
  667.    LINV(P12;L4);
  668.    NAND(L1,L2,L3,L4;P1;1,1,1,1);
  669.    NAND(P15,L2,L3,L4;P2;1,1,1,1);
  670.    NAND(L1,P14,L3,L4;P3;1,1,1,1);
  671.    NAND(P15,P14,L3,L4;P4;1,1,1,1);
  672.    NAND(L1,L2,P13,L4;P5;1,1,1,1);
  673.    NAND(P15,L2,P13,L4;P6;1,1,1,1);
  674.    NAND(L1,P14,P13,L4;P7;1,1,1,1);
  675.    NAND(P15,P14,P13,L4;P9;1,1,1,1);
  676.    NAND(L1,L2,L3,P12;P10;1,1,1,1);
  677.    NAND(P15,L2,L3,P12;P11;1,1,1,1);
  678. %
  679. ;
  680. ;8 TO 1 MULTIPLEXOR
  681. ;
  682. :74151        INTEL_M       16
  683.    LINV(P11;L1);
  684.    LINV(P10;L2);
  685.    LINV(P9;L3);
  686.    LINV(P7;L4);
  687.    LAND(P4,L1,L2,L3;L8);
  688.    LAND(P3,P11,L2,L3;L9);
  689.    LAND(P2,L1,P10,L3;L10);
  690.    LAND(P1,P11,P10,L3;L11);
  691.    LAND(P15,P9,L1,L2;L12);
  692.    LAND(P14,P9,P11,L2;L13);
  693.    LAND(P13,P9,L1,P10;L14);
  694.    LAND(P12,P9,P11,P10;L15);
  695.    LNOR(L8,L9,L10,L11,L12,L13,L14,L15;L16);
  696.    OR(P7,L16;P6;1,1,1,1);
  697.    INV(P6;P5;1,1,1,1);
  698. %
  699. ;
  700. ;4 TO 1 MULTIPLEXOR
  701. ;
  702. :74153        INTEL_M       16
  703.    LINV(P1;L1);
  704.    LINV(P15;L2);
  705.    LINV(P2;L3);
  706.    LINV(P14;L4);
  707.    LAND(L1,L3,L4,P6;L5);
  708.    LAND(L1,L3,P14,P5;L6);
  709.    LAND(L1,P2,L4,P4;L7);
  710.    LAND(L1,P2,P14,P3;L8);
  711.    LAND(P10,L3,L4,L2;L9);
  712.    LAND(P11,L3,P14,L2;L10);
  713.    LAND(P12,P2,L4,L2;L11);
  714.    LAND(P13,P2,P14,L2;L12);
  715.    OR(L5,L6,L7,L8;P7;1,1,1,1);
  716.    OR(L9,L10,L11,L12;P9;1,1,1,1);
  717. %
  718. ;
  719. ;4 TO 16 LINE DECODER
  720. ;
  721. :74154        INTEL_M       24
  722.    LINV(P23;L1);
  723.    LINV(P22;L2);
  724.    LINV(P21;L3);
  725.    LINV(P20;L4);
  726.    LNOR(P18,P19;L5);
  727.    NAND(L5,L1,L2,L3,L4;P1;1,1,1,1);
  728.    NAND(L5,P23,L2,L3,L4;P2;1,1,1,1);
  729.    NAND(L5,L1,P22,L3,L4;P3;1,1,1,1);
  730.    NAND(L5,P23,P22,L3,L4;P4;1,1,1,1);
  731.    NAND(L5,L1,L2,P21,L4;P5;1,1,1,1);
  732.    NAND(L5,P23,L2,P21,L4;P6;1,1,1,1);
  733.    NAND(L5,L1,P22,P21,L4;P7;1,1,1,1);
  734.    NAND(L5,P23,P22,P21,L4;P8;1,1,1,1);
  735.    NAND(L5,L1,L2,L3,P20;P9;1,1,1,1);
  736.    NAND(L5,P23,L2,L3,P20;P10;1,1,1,1);
  737.    NAND(L5,L1,P22,L3,P20;P11;1,1,1,1);
  738.    NAND(L5,P23,P22,L3,P20;P13;1,1,1,1);
  739.    NAND(L5,L1,L2,P21,P20;P14;1,1,1,1);
  740.    NAND(L5,P23,L2,P21,P20;P15;1,1,1,1);
  741.    NAND(L5,L1,P22,P21,P20;P16;1,1,1,1);
  742.    NAND(L5,P23,P22,P21,P20;P17;1,1,1,1);
  743. %
  744. ;
  745. ;1 TO 4 DECODER
  746. ;
  747. :74155        INTEL_M       16
  748.    LINV(P3;L1);
  749.    LINV(P13;L2);
  750.    LINV(P1;L3);
  751.    LINV(L1;L4);
  752.    LINV(L2;L5);
  753.    LNOR(P2,L3;L6);
  754.    LNOR(P14,P15;L7);
  755.    NAND(L1,L2,L6;P7;1,1,1,1);
  756.    NAND(L1,L5,L6;P6;1,1,1,1);
  757.    NAND(L4,L2,L6;P5;1,1,1,1);
  758.    NAND(L4,L5,L6;P4;1,1,1,1);
  759.    NAND(L1,L2,L7;P9;1,1,1,1);
  760.    NAND(L1,L5,L7;P10;1,1,1,1);
  761.    NAND(L4,L2,L7;P11;1,1,1,1);
  762.    NAND(L4,L5,L7;P12;1,1,1,1);
  763. %
  764. ;
  765. ;1 TO 4 DECODER
  766. ;
  767. :74156        INTEL_M       16
  768.    LINV(P3;L1);
  769.    LINV(P13;L2);
  770.    LINV(P1;L3);
  771.    LINV(L1;L4);
  772.    LINV(L2;L5);
  773.    LNOR(P2,L3;L6);
  774.    LNOR(P14,P15;L7);
  775.    NAND(L1,L2,L6;P7;1,1,1,1);
  776.    NAND(L1,L5,L6;P6;1,1,1,1);
  777.    NAND(L4,L2,L6;P5;1,1,1,1);
  778.    NAND(L4,L5,L6;P4;1,1,1,1);
  779.    NAND(L1,L2,L7;P9;1,1,1,1);
  780.    NAND(L1,L5,L7;P10;1,1,1,1);
  781.    NAND(L4,L2,L7;P11;1,1,1,1);
  782.    NAND(L4,L5,L7;P12;1,1,1,1);
  783. %
  784. ;
  785. ;1 TO 4 DECODER
  786. ;
  787. :74157        INTEL_M       16
  788.    LINV(P15;L1);
  789.    LINV(P1;L2);
  790.    LAND(P2,L2,L1;L3);
  791.    LAND(P3,P1,L1;L4);
  792.    LAND(P5,L2,L1;L5);
  793.    LAND(P6,P1,L1;L6);
  794.    LAND(P11,L2,L1;L7);
  795.    LAND(P10,P1,L1;L8);
  796.    LAND(P14,L2,L1;L9);
  797.    LAND(P13,P1,L1;L10);
  798.    OR(L3,L4;P4;1,1,1,1);
  799.    OR(L5,L6;P7;1,1,1,1);
  800.    OR(L7,L8;P9;1,1,1,1);
  801.    OR(L9,L10;P12;1,1,1,1);
  802. %
  803. ;
  804. ;2 TO 1 MULTIPLEXOR
  805. ;
  806. :74158        INTEL_M       16
  807.    LINV(P1;L1);
  808.    LINV(P15;L2);
  809.    LAND(P2,L1,L2;L3);
  810.    LAND(P3,P1,L2;L4);
  811.    LAND(P5,L1,L2;L5);
  812.    LAND(P6,P1,L2;L6);
  813.    LAND(P11,L1,L2;L7);
  814.    LAND(P10,P1,L2;L8);
  815.    LAND(P14,L1,L2;L9);
  816.    LAND(P13,P1,L2;L10);
  817.    NOR(L3,L4;P4;1,1,1,1);
  818.    NOR(L5,L6;P7;1,1,1,1);
  819.    NOR(L7,L8;P9;1,1,1,1);
  820.    NOR(L9,L10;P12;1,1,1,1);
  821. %
  822. ;
  823. ;4 BIT DECADE COUNTER WITH SYNCHRONOUS LOAD, ASYNCHRONOUS CLEAR
  824. ;
  825. :74160        INTEL_M       16
  826.    LINV(P9;L1);
  827.    LAND(P10,P7;L2);
  828.    LAND(P14,P11;L3);
  829.    LAND(P14,P13;L4);
  830.    LAND(P14,P13,P12;L5);
  831.    LAND(P14,L2;L6);
  832.    LAND(L4,L2;L7);
  833.    LAND(P14,P11;L8);
  834.    LNAND(L8,L2;L9);
  835.    LAND(L5,L2;L10);
  836.    LXOR(L2,P14;L11);
  837.    LXOR(L6,P13;L12);
  838.    LXOR(L7,P12;L13);
  839.    LXOR(L10,P11;L14);
  840.    LAND(P3,L1;L15);
  841.    LAND(P9,L11;L16);
  842.    LAND(P4,L1;L17);
  843.    LAND(P9,L9,L12;L18);
  844.    LAND(P5,L1;L19);
  845.    LAND(P9,L13;L20);
  846.    LAND(P6,L1;L21);
  847.    LAND(P9,L9,L14;L22);
  848.    LOR(L15,L16;L23);
  849.    LOR(L17,L18;L24);
  850.    LOR(L19,L20;L25);
  851.    LOR(L21,L22;L26);
  852.    LAND(P1,IPL;L27);
  853.    DQFFC(L23,P2,L27;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  854.    DQFFC(L24,P2,L27;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  855.    DQFFC(L25,P2,L27;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  856.    DQFFC(L26,P2,L27;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  857.    AND(P10,L3;P15;1,1,1,1);
  858. %
  859. ;
  860. ;4 BIT BINARY UP COUNTER WITH SYNCHRONOUS LOAD, ASYNCHRONOUS CLEAR
  861. ;
  862. :74161        INTEL_M       16
  863.    LAND(P7,P9,P10;L1);
  864.    LAND(P14,P13,P12,P11;L2);
  865.    LINV(P9;L3);
  866.    LAND(P9,P14;L4);
  867.    LXOR(L4,L1;L5);
  868.    LAND(L3,P3;L6);
  869.    LOR(L5,L6;L7);
  870.    LAND(P9,P13;L8);
  871.    LAND(L1,P14;L9);
  872.    LXOR(L8,L9;L10);
  873.    LAND(L3,P4;L11)
  874.    LOR(L10,L11;L12);
  875.    LAND(P9,P12;L13);
  876.    LAND(L1,P14,P13;L14);
  877.    LXOR(L13,L14;L15);
  878.    LAND(L3,P5;L16);
  879.    LOR(L15,L16;L17);
  880.    LAND(P9,P11;L18);
  881.    LAND(L1,P14,P13,P12;L19);
  882.    LXOR(L18,L19;L20);
  883.    LAND(L3,P6;L21);
  884.    LOR(L20,L21;L22);
  885.    LAND(P1,IPL;L23);
  886.    DQFFC(L7,P2,L23;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  887.    DQFFC(L12,P2,L23;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  888.    DQFFC(L17,P2,L23;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  889.    DQFFC(L22,P2,L23;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  890.    AND(P10,L2;P15;1,1,1,1);
  891. %
  892. ;
  893. ;4 BIT UP DECADE COUNTER WITH SYNCHRONOUS LOAD AND CLEAR
  894. ;
  895. :74162        INTEL_M       16
  896.    LINV(P1;L1);
  897.    LNOR(L1,P9;L2);
  898.    LNOR(L1,L2;L3);
  899.    LAND(P10,P7;L4);
  900.    LAND(P14,P11;L5);
  901.    LAND(P14,P13;L6);
  902.    LAND(P14,P13,P12;L7);
  903.    LAND(P14,L4;L8);
  904.    LAND(L6,L4;L9);
  905.    LAND(P14,P11;L10);
  906.    LNAND(L10,L4;L11);
  907.    LAND(L7,L4;L12);
  908.    LXOR(L4,P14;L13);
  909.    LXOR(L8,P13;L14);
  910.    LXOR(L9,P12;L15);
  911.    LXOR(L12,P11;L16);
  912.    LAND(P3,L2;L17);
  913.    LAND(L3,L13;L18);
  914.    LAND(P4,L2;L19);
  915.    LAND(L3,L11,L14;L20);
  916.    LAND(P5,L2;L21);
  917.    LAND(L3,L15;L22);
  918.    LAND(P6,L2;L23);
  919.    LAND(L3,L11,L16;L24);
  920.    LOR(L17,L18;L25);
  921.    LOR(L19,L20;L26);
  922.    LOR(L21,L22;L27);
  923.    LOR(L23,L24;L28);
  924.    DQFFC(L25,P2,IPL;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  925.    DQFFC(L26,P2,IPL;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  926.    DQFFC(L27,P2,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  927.    DQFFC(L28,P2,IPL;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  928.    AND(P10,L5;P15;1,1,1,1);
  929. %
  930. ;
  931. ;4 BIT BINARY COUNTER WITH SYNCHRONOUS LOAD AND CLEAR
  932. ;
  933. :74163        INTEL_M       16
  934.    LNAND(P7,P9,P10;L1);
  935.    LINV(P9;L2);
  936.    LINV(P1;L3);
  937.    LNOR(L1,L3;L4);
  938.    LNOR(P9,L3;L5);
  939.    LNOR(L2,L3;L6);
  940.    LAND(P14,P13,P12,P11;L7);
  941.    LAND(L6,P14;L8);
  942.    LXOR(L8,L4;L9);
  943.    LAND(L5,P3;L10);
  944.    LOR(L9,L10;L11);
  945.    LAND(L6,P13;L12);
  946.    LAND(L4,P14;L13);
  947.    LXOR(L12,L13;L14);
  948.    LAND(L5,P4;L15)
  949.    LOR(L14,L15;L16);
  950.    LAND(L6,P12;L17);
  951.    LAND(L4,P14,P13;L18);
  952.    LXOR(L17,L18;L19);
  953.    LAND(L5,P5;L20);
  954.    LOR(L19,L20;L21);
  955.    LAND(L6,P11;L22);
  956.    LAND(L4,P14,P13,P12;L23);
  957.    LXOR(L22,L23;L24);
  958.    LAND(L5,P6;L25);
  959.    LOR(L24,L25;L26);
  960.    DQFFC(L11,P2,IPL;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  961.    DQFFC(L16,P2,IPL;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  962.    DQFFC(L21,P2,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  963.    DQFFC(L26,P2,IPL;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  964.    AND(P10,L7;P15;1,1,1,1);
  965. %
  966. ;
  967. ;SERIAL IN, PARALLEL OUT SHIFT REGISTER
  968. ;
  969. :74164        INTEL_M       14
  970.    LAND(P1,P2;L1);
  971.    LAND(P9,IPL;L2);
  972.    DQFFC(L1,P8,L2;P3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  973.    DQFFC(P3,P8,L2;P4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  974.    DQFFC(P4,P8,L2;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  975.    DQFFC(P5,P8,L2;P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  976.    DQFFC(P6,P8,L2;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  977.    DQFFC(P10,P8,L2;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  978.    DQFFC(P11,P8,L2;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  979.    DQFFC(P12,P8,L2;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  980. %
  981. ;
  982. ;PARALLEL LOAD 8 BIT SHIFT REGISTER
  983. ;
  984. :74165X        INTEL_M       16
  985. LINV(P11;L1);
  986. LINV(P10;L2);
  987. LAND(P11,N1;L3);
  988. LAND(L1,P2,L2;L4);
  989. LAND(L1,P10,P1;L5);
  990. LAND(P11,N2;L6);
  991. LAND(L1,P3,L2;L7);
  992. LAND(L1,P10,N1;L8);
  993. LAND(P11,N3;L9);
  994. LAND(L1,P4,L2;L10);
  995. LAND(L1,P10,N2;L11);
  996. LAND(P11,N4;L12);
  997. LAND(L1,P5,L2;L13);
  998. LAND(L1,P10,N3;L14);
  999. LAND(P11,N5;L15);
  1000. LAND(L1,P6,L2;L16);
  1001. LAND(L1,P10,N4;L17);
  1002. LAND(P11,N6;L18);
  1003. LAND(L1,P7,L2;L19);
  1004. LAND(L1,P10,N5;L20);
  1005. LAND(P11,N7;L21);
  1006. LAND(L1,P8,L2;L22);
  1007. LAND(L1,P10,N6;L23);
  1008. LAND(P11,P14;L24);
  1009. LAND(L1,P9,L2;L25);
  1010. LAND(L1,P10,N7;L26);
  1011. LOR(L3,L4,L5;L30);
  1012. LOR(L6,L7,L8;L31);
  1013. LOR(L9,L10,L11;L32);
  1014. LOR(L12,L13,L14;L33);
  1015. LOR(L15,L16,L17;L34);
  1016. LOR(L18,L19,L20;L35);
  1017. LOR(L21,L22,L23;L36);
  1018. LOR(L24,L25,L26;L37);
  1019. DQFFC(L30,P12,IPL;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1020. DQFFC(L31,P12,IPL;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1021. DQFFC(L32,P12,IPL;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1022. DQFFC(L33,P12,IPL;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1023. DQFFC(L34,P12,IPL;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1024. DQFFC(L35,P12,IPL;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1025. DQFFC(L36,P12,IPL;N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1026. DFFC(L37,P12,IPL;P14,P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1027. %
  1028. ;
  1029. ;SYNCHRONOUS 4-BIT UP/DOWN COUNTERS
  1030. ;
  1031. :74168        INTEL_M       16
  1032.    LINV(P9;L1);
  1033.    LINV(P1;L2);
  1034.    LINV(P14;L3);
  1035.    LOR(P13,P14;L4);
  1036.    LOR(P12,P13,P14;L5);
  1037.    LNOR(P7,P10;L6);
  1038.    LAND(L2,P14;L7);
  1039.    LAND(P1,L3;L8);
  1040.    LNOR(L7,L8;L9);
  1041.    LAND(L2,L4;L10);
  1042.    LINV(P13;L43);
  1043.    LAND(P1,L43;L11);
  1044.    LAND(P1,L3;L12);
  1045.    LNOR(L10,L11,L12;L13);
  1046.    LINV(P12;L44);
  1047.    LOR(P1,P12,P13,P14,P11;L14);
  1048.    LINV(P11;L45);
  1049.    LNOR(L45,L2,L3;L15);
  1050.    LAND(L2,L5;L16);
  1051.    LAND(P1,L44;L17);
  1052.    LAND(P1,L43;L18);
  1053.    LAND(P1,L3;L19);
  1054.    LNOR(L16,L17,L18,L19;L20);
  1055.    LAND(L9,L6;L21);
  1056.    LAND(L13,L6;L22);
  1057.    LNAND(L15,L6;L23);
  1058.    LAND(L20,L6;L24);
  1059.    LXNOR(L6,L3;L25);
  1060.    LXNOR(L21,L43;L26);
  1061.    LXNOR(L22,L44;L27);
  1062.    LXNOR(L24,L45;L28);
  1063.    LAND(P3,L1;L29);
  1064.    LAND(P9,L25;L30);
  1065.    LOR(L29,L30;L31);
  1066.    LAND(P4,L1;L32);
  1067.    LAND(P9,L26,L14,L23;L33);
  1068.    LOR(L32,L33;L34);
  1069.    LAND(P5,L1;L35);
  1070.    LAND(P9,L14,L27;L36);
  1071.    LOR(L35,L36;L37);
  1072.    LAND(L1,P6;L38);
  1073.    LAND(P9,L23,L28;L39);
  1074.    LOR(L38,L39;L40);
  1075.    LNOR(L45,L2,L3,P10;L41);
  1076.    LINV(P10;L46);
  1077.    LAND(L46,L45,L2,L44,L43,L3;L42);
  1078.    DQFFC(L31,P2,IPL;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1079.    DQFFC(L34,P2,IPL;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1080.    DQFFC(L37,P2,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1081.    DQFFC(L40,P2,IPL;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1082.    NOR(L41,L42;P15;1,1,1,1);
  1083. %
  1084. ;
  1085. ;SYNCHRONOUS 4-BIT BINARY UP/DOWN COUNTER
  1086. ;
  1087. :74169        INTEL_M       16
  1088.    LINV(P9;L1);
  1089.    LOR(P10,P7;L2);
  1090.    LINV(P10;L3);
  1091.    LINV(P1;L4);
  1092.    LAND(P1,N1;L5);
  1093.    LNOR(N1,P1;L6);
  1094.    LNOR(L5,L6;L7);
  1095.    LAND(P1,N2;L8);
  1096.    LNOR(N2,P1;L9);
  1097.    LNOR(L8,L9;L10);
  1098.    LAND(P1,N3;L11);
  1099.    LNOR(N3,P1;L12);
  1100.    LNOR(L11,L12;L13);
  1101.    LAND(P1,N4;L14);
  1102.    LNOR(N4,P1;L15);
  1103.    LNOR(L14,L15;L16);
  1104.    LAND(L7,L10,L13,L16;L17);
  1105.    LAND(L3,L4,L17;L18);
  1106.    LAND(L3,P1,L17;L19);
  1107.    LNOR(L1,L2;L20);
  1108.    LNOR(N1,L1;L21);
  1109.    LXOR(L21,L20;L22);
  1110.    LAND(L1,P3;L23);
  1111.    LNOR(L22,L23;L24);
  1112.    LNOR(N2,L1;L25);
  1113.    LAND(L20,L7;L26);
  1114.    LXOR(L25,L26;L27);
  1115.    LAND(L1,P4;L28);
  1116.    LNOR(L27,L28;L29);
  1117.    LNOR(N3,L1;L30);
  1118.    LAND(L20,L7,L10;L31);
  1119.    LXOR(L30,L31;L32);
  1120.    LAND(L1,P5;L33);
  1121.    LNOR(L32,L33;L34);
  1122.    LNOR(N4,L1;L35);
  1123.    LAND(L20,L7,L10,L13;L36);
  1124.    LXOR(L35,L36;L37);
  1125.    LAND(L1,P6;L38);
  1126.    LNOR(L37,L38;L39);
  1127.    DFFP(L24,P2,IPL;N1,P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1128.    DFFP(L29,P2,IPL;N2,P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1129.    DFFP(L34,P2,IPL;N3,P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1130.    DFFP(L39,P2,IPL;N4,P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1131.    NOR(L18,L19;P15;1,1,1,1);
  1132. %
  1133. ;
  1134. ;HEX D-TYPE FLIPFLOP WITH COMMON CLEAR
  1135. ;
  1136. :74174X        INTEL_M       16
  1137.    LAND(P1,IPL;L1);
  1138.    DQFFC(P3,P9,L1;P2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1139.    DQFFC(P4,P9,L1;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1)
  1140.    DQFFC(P6,P9,L1;P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1141.    DQFFC(P11,P9,L1;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1142.    DQFFC(P13,P9,L1;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1143.    DQFFC(P14,P9,L1;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1144. %
  1145. ;
  1146. ;QUAD D-TYPE FLIPFLOP WITH COMMON CLOCK AND CLEAR
  1147. ;
  1148. :74175X        INTEL_M       16
  1149.    LAND(P1,IPL;L1);
  1150.    DFFC(P4,P9,L1;P2,P3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1151.    DFFC(P5,P9,L1;P7,P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1152.    DFFC(P12,P9,L1;P10,P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1153.    DFFC(P13,P9,L1;P15,P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1154. %
  1155. ;
  1156. ;4-BIT DECADE COUNTER
  1157. ;
  1158. :74176XD        INTEL_M       14
  1159.    LNAND(P1,P13;L1);
  1160.    LNAND(P4,L1,P8,P13;L2);
  1161.    LNAND(L1,L2,P8;L3);
  1162.    LNAND(P10,L1,P8,P13;L4);
  1163.    LNAND(L1,L4,P8;L5);
  1164.    LNAND(P3,L1,P8,P13;L6);
  1165.    LNAND(L1,L6,P8;L7);
  1166.    LNAND(P11,L1,P8,P13;L8);
  1167.    LNAND(L1,L8,P8;L9);
  1168.    LAND(P9,P2,P13;L10);
  1169.    LAND(L3,IPL,P13;L11);
  1170.    LAND(L5,IPL,P13;L12);
  1171.    LAND(L7,IPL,P13;L13);
  1172.    LAND(L9,IPL,P13;L14);
  1173.    JKFFPC(ONE,ONE,P8,L2,L11;P5,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1174.    JKFFPC(N10,N10,N4,L4,L12;P9,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1175.    JKFFPC(ONE,ONE,N6,L6,L13;P2,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1176.    JKFFPC(L10,P12,N4,L8,L14;P12,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1177. %
  1178. ;
  1179. ;4-BIT BI-QUINARY COUNTER
  1180. ;
  1181. :74176XQ        INTEL_M       14
  1182.    LNAND(P1,P13;L1);
  1183.    LNAND(P4,L1,P6,P13;L2);
  1184.    LNAND(L2,L1,P6;L3);
  1185.    LNAND(P10,L1,P6,P13;L4);
  1186.    LNAND(L4,L1,P6;L5);
  1187.    LNAND(P3,L1,P6,P13;L6);
  1188.    LNAND(L6,L1,P6;L7);
  1189.    LNAND(P11,L1,P6,P13;L8);
  1190.    LNAND(L8,L1,P6;L9);
  1191.    LAND(P9,P2;L10);
  1192.    LAND(L3,IPL,P13;L11);
  1193.    LAND(L5,IPL,P13;L12);
  1194.    LAND(L7,IPL,P13;L13);
  1195.    LAND(L9,IPL,P13;L14);
  1196.    JKFFPC(ONE,ONE,N10,L2,L11;P5,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1197.    JKFFPC(N10,N10,P6,L4,L12;P9,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1198.    JKFFPC(ONE,ONE,N6,L6,L13;P2,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1199.    JKFFPC(L10,P12,P6,L8,L14;P12,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1200. %
  1201. ;
  1202. ;4-BIT BINARY COUNTER
  1203. ;
  1204. :74177X        INTEL_M       14
  1205.    LNAND(P1,P13;L1);
  1206.    LNAND(P4,L1,P8,P13;L2);
  1207.    LNAND(L2,L1,P8;L3);
  1208.    LNAND(P10,L1,P8,P13;L4);
  1209.    LNAND(L4,L1,P8;L5);
  1210.    LNAND(P3,L1,P8,P13;L6);
  1211.    LNAND(L6,L1,P8;L7);
  1212.    LNAND(P11,L1,P8,P13;L8);
  1213.    LNAND(L8,L1,P8;L9);
  1214.    LAND(L3,IPL,P13;L10);
  1215.    LAND(L5,IPL,P13;L11);
  1216.    LAND(L7,IPL,P13;L12);
  1217.    LAND(L9,IPL,P13;L13);
  1218.    JKFFPC(ONE,ONE,P8,L2,L10;P5,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1219.    JKFFPC(ONE,ONE,N4,L4,L11;P9,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1220.    JKFFPC(ONE,ONE,N6,L6,L12;P2,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1221.    JKFFPC(ONE,ONE,N8,L8,L13;P12,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1222. %
  1223. ;
  1224. ;9 BIT ODD/EVEN PARITY GENERATOR/CHECKER
  1225. ;
  1226. :74180X        INTEL_M       14
  1227.    LXNOR(P8,P9,P10,P11,P12,P13,P1,P2;L1);
  1228.    LINV(L1;L2);
  1229.    LAND(L1,P4;L3);
  1230.    LAND(L2,P3;L4);
  1231.    LAND(P3,L1;L5);
  1232.    LAND(L2,P4;L6);
  1233.    NOR(L3,L4;P5;1,1,1,1);
  1234.    NOR(L5,L6;P6;1,1,1,1);
  1235. %
  1236. ;
  1237. ;9 BIT ODD/EVEN PARITY GENERATOR/CHECKER
  1238. ;
  1239. :74180XA        INTEL_M       16
  1240.    LXNOR(P8,P9,P10,P11,P12,P13,P1,P2;L1);
  1241.    LINV(L1;L2);
  1242.    LAND(L1,P4;L3);
  1243.    LAND(L2,P3;L4);
  1244.    LAND(P3,L1;L5);
  1245.    LAND(L2,P4;L6);
  1246.    NOR(L3,L4;P5;1,1,1,1);
  1247.    NOR(L5,L6;P6;1,1,1,1);
  1248. %
  1249. ;
  1250. ;LOOK AHEAD CARRY GENERATOR
  1251. ;
  1252. :74182        INTEL_M       16
  1253.    LINV(P13;L1);
  1254.    LAND(P5,P14,P1,P3;L2);
  1255.    LAND(P2,P5,P14,P1;L3);
  1256.    LAND(P15,P5,P14;L4);
  1257.    LAND(P6,P5;L5);
  1258.    LAND(P14,P1,P3,L1;L6);
  1259.    LAND(P4,P14,P1,P3;L7);
  1260.    LAND(P2,P14,P1;L8);
  1261.    LAND(P15,P14;L9);
  1262.    LAND(P1,P3,L1;L10);
  1263.    LAND(P4,P1,P3;L11);
  1264.    LAND(P2,P1;L12);
  1265.    LAND(P3,L1;L13);
  1266.    LAND(P4,P3;L14);
  1267.    OR(P6,P15,P2,P4;P7;1,1,1,1);
  1268.    OR(L2,L3,L4,L5;P10;1,1,1,1);
  1269.    NOR(L6,L7,L8,L9;P9;1,1,1,1);
  1270.    NOR(L10,L11,L12;P11;1,1,1,1);
  1271.    NOR(L13,L14;P12;1,1,1,1);
  1272. %
  1273. ;
  1274. ;DUAL CARRY SAVE FULL ADDER
  1275. ;
  1276. :74183        INTEL_M       7
  1277.    LINV(P3;L1);
  1278.    LINV(P2;L2);
  1279.    LINV(P1;L3);
  1280.    LAND(L1,L2;L7);
  1281.    LAND(L2,L3;L8);
  1282.    LAND(L1,L3;L9);
  1283.    LAND(P3,L2,P1;L10);
  1284.    LAND(L1,P2,P1;L11);
  1285.    LAND(L1,L2,L3;L12);
  1286.    LAND(P3,P2,L3;L13);
  1287.    NOR(L7,L8,L9;P4;1,1,1,1);
  1288.    NOR(L10,L11,L12,L13;P5;1,1,1,1);
  1289. %
  1290. ;
  1291. ;4 BIT UP/DOWN DECADE COUNTER WITH SYNCHRONOUS LOAD
  1292. ;
  1293. :74190XA        INTEL_M       16
  1294.    LINV(P14;L1);
  1295.    LINV(P4;L2);
  1296.    LINV(P11;L3);
  1297.    LINV(P5;L4);
  1298.    LNOR(P5,P4;L5);
  1299.    LNOR(P4,L4;L6);
  1300.    LAND(L4,P3,P7;L7);
  1301.    LAND(P5,N1,N2,N3,N4;L8);
  1302.    LNAND(P15,P14,L3;L9);
  1303.    LNAND(L9,P14,L3;L10);
  1304.    LNAND(P1,P14,L3;L11);
  1305.    LNAND(N2,N3,N4;L12);
  1306.    LNAND(L11,P14,L3;L13);
  1307.    LNAND(P10,P14,L3;L14);
  1308.    LNAND(L14,P14,L3;L15);
  1309.    LNAND(P9,P14,L3;L16);
  1310.    LNAND(L16,P14,L3;L17);
  1311.    LAND(L6,N1,L12;L18);
  1312.    LAND(P3,N4,L5;L19);
  1313.    LAND(L12,L6,N1,N2;L20);
  1314.    LAND(P3,P2,L5;L21);
  1315.    LAND(L6,N1,N2,N3;L22);
  1316.    LAND(P3,P7,L5;L23);
  1317.    LAND(P3,P2,P6,L5;L24);
  1318.    LINV(P4;L25);
  1319.    LOR(L18,L19;L26);
  1320.    LOR(L20,L21;L27);
  1321.    LOR(L22,L23,L24;L28);
  1322.    LAND(L10,IPL;L29);
  1323.    LAND(L13,IPL;L30);
  1324.    LAND(L15,IPL;L31);
  1325.    LAND(L17,IPL;L32);
  1326.    JKFFPC(L25,L25,P14,L9,L29;P3,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1327.    JKFFPC(L26,L26,P14,L11,L30;P2,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1328.    JKFFPC(L27,L27,P14,L14,L31;P6,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1329.    JKFFPC(L28,L28,P14,L16,L32;P7,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1330.    OR(L7,L8;P12;1,1,1,1);
  1331.    NAND(L1,L2,P12;P13;1,1,1,1);
  1332. %
  1333. ;
  1334. ;4 BIT UP/DOWN DECADE COUNTER WITH SYNCHRONOUS LOAD
  1335. ;
  1336. :74190XB        INTEL_M       16
  1337.    LINV(P14;L1);
  1338.    LINV(P4;L2);
  1339.    LINV(P11;L3);
  1340.    LINV(P5;L4);
  1341.    LNOR(P5,P4;L5);
  1342.    LNOR(P4,L4;L6);
  1343.    LAND(L4,P3,P7;L7);
  1344.    LAND(P5,N1,N2,N3,N4;L8);
  1345.    LNAND(P15,P14,L3;L9);
  1346.    LNAND(L9,P14,L3;L10);
  1347.    LNAND(P1,P14,L3;L11);
  1348.    LNAND(N2,N3,N4;L12);
  1349.    LNAND(L11,P14,L3;L13);
  1350.    LNAND(P10,P14,L3;L14);
  1351.    LNAND(L14,P14,L3;L15);
  1352.    LNAND(P9,P14,L3;L16);
  1353.    LNAND(L16,P14,L3;L17);
  1354.    LAND(L6,N1,L12;L18);
  1355.    LAND(P3,N4,L5;L19);
  1356.    LAND(L12,L6,N1,N2;L20);
  1357.    LAND(P3,P2,L5;L21);
  1358.    LAND(L6,N1,N2,N3;L22);
  1359.    LAND(P3,P7,L5;L23);
  1360.    LAND(P3,P2,P6,L5;L24);
  1361.    LINV(P4;L25);
  1362.    LOR(L18,L19;L26);
  1363.    LOR(L20,L21;L27);
  1364.    LOR(L22,L23,L24;L28);
  1365.    LAND(L10,IPL;L29);
  1366.    LAND(L13,IPL;L30);
  1367.    LAND(L15,IPL;L31);
  1368.    LAND(L17,IPL;L32);
  1369.    JKFFPC(L25,L25,P14,L9,L29;P3,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1370.    JKFFPC(L26,L26,P14,L11,L30;P2,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1371.    JKFFPC(L27,L27,P14,L14,L31;P6,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1372.    JKFFPC(L28,L28,P14,L16,L32;P7,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1373.    OR(L7,L8;P12;1,1,1,1);
  1374.    NAND(L1,L2,P12;P13;1,1,1,1);
  1375. %
  1376. ;
  1377. ;4 BIT BINARY UP/DOWN COUNTER WITH ASYNCHRONOUS LOAD
  1378. ;
  1379. :74191XA        INTEL_M       17
  1380.    LINV(P14;L1);
  1381.    LINV(P4;L2);
  1382.    LINV(P11;L3);
  1383.    LINV(P5;L4);
  1384.    LNOR(P5,P4;L5);
  1385.    LNOR(P4,L4;L6);
  1386.    LAND(L4,P3,P2,P6,P7;L7);
  1387.    LAND(P5,N1,N2,N3,N4;L8);
  1388.    LNAND(P15,L3;L9);
  1389.    LNAND(L9,L3;L10);
  1390.    LNAND(P1,L3;L11);
  1391.    LNAND(L11,L3;L12);
  1392.    LNAND(P10,L3;L13);
  1393.    LNAND(L13,L3;L14);
  1394.    LNAND(P9,L3;L15);
  1395.    LNAND(L15,L3;L16);
  1396.    LAND(L6,N1;L17);
  1397.    LAND(P3,L5;L18);
  1398.    LAND(L6,N1,N2;L19);
  1399.    LAND(P3,P2,L5;L20);
  1400.    LAND(L6,N1,N2,N3;L21);
  1401.    LAND(P3,P2,P6,L5;L22);
  1402.    LINV(P4;L23);
  1403.    LOR(L17,L18;L24);
  1404.    LOR(L19,L20;L25);
  1405.    LOR(L21,L22;L26);
  1406.    LAND(L10,IPL;L27);
  1407.    LAND(L12,IPL;L28);
  1408.    LAND(L14,IPL;L29);
  1409.    LAND(L16,IPL;L30);
  1410.    OR(L7,L8;P12;1,1,1,1);
  1411.    NAND(L1,L2,P12;P13;1,1,1,1);
  1412.    JKFFPC(L23,L23,P14,L9,L27;P3,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1413.    JKFFPC(L24,L24,P14,L11,L28;P2,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1414.    JKFFPC(L25,L25,P14,L13,L29;P6,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1415.    JKFFPC(L26,L26,P14,L15,L30;P7,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1416. %
  1417. ;
  1418. ;4 BIT BI-DIRECTIONAL SHIFT REGISTER WITH PARALLEL LOAD
  1419. ;
  1420. :74194        INTEL_M       16
  1421.   LINV(P10;L1);
  1422.   LINV(P9;L2);
  1423.   LAND(P10,P9;L3);
  1424.   LAND(P10,L2;L4);
  1425.   LAND(L1,P9;L5);
  1426.   LAND(L1,L2;L6);
  1427.   LAND(P2,L5;L7);
  1428.   LAND(L4,P14;L8);
  1429.   LAND(L3,P3;L9);
  1430.   LAND(L6,P15;L10);
  1431.   LOR(L7,L8,L9,L10;L11);
  1432.   LAND(P15,L5;L12);
  1433.   LAND(L4,P13;L13);
  1434.   LAND(L3,P4;L14);
  1435.   LAND(L6,P14;L15);
  1436.   LOR(L12,L13,L14,L15;L16);
  1437.   LAND(P14,L5;L17);
  1438.   LAND(L4,P12;L18);
  1439.   LAND(L3,P5;L19);
  1440.   LAND(L6,P13;L20);
  1441.   LOR(L17,L18,L19,L20;L21);
  1442.   LAND(P13,L5;L22);
  1443.   LAND(L4,P7;L23);
  1444.   LAND(L3,P6;L24);
  1445.   LAND(L6,P12;L25);
  1446.   LOR(L22,L23,L24,L25;L26);
  1447.   LAND(P1,IPL;L27);
  1448.   DQFFC(L11,P11,L27;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1449.   DQFFC(L16,P11,L27;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1450.   DQFFC(L21,P11,L27;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1451.   DQFFC(L26,P11,L27;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1452. %
  1453. ;
  1454. ;DUAL 4-LINE TO 1-LINE DATA SELECTOR
  1455. ;
  1456. :74253        INTEL_M       16
  1457.    LINV(P1;L1);
  1458.    LINV(P15;L2);
  1459.    LINV(P2;L3);
  1460.    LINV(P14;L4);
  1461.    LAND(L3,L4,P6,L1;L5);
  1462.    LAND(L3,P5,P14,L1;L6);
  1463.    LAND(L4,P4,P2,L1;L7);
  1464.    LAND(P3,P14,P2,L1;L8);
  1465.    LAND(L3,L4,P10,L2;L9);
  1466.    LAND(L3,P11,P14,L2;L10);
  1467.    LAND(L4,P12,P2,L2;L11);
  1468.    LAND(P13,P14,P2,L2;L12);
  1469.    LOR(L5,L6,L7,L8;L13);
  1470.    LOR(L9,L10,L11,L12;L14);
  1471.    TSB(L13,L1;P7;1,1,1,1,1,1,1,1);
  1472.    TSB(L14,L2;P9;1,1,1,1,1,1,1,1);
  1473. %
  1474. ;
  1475. ;QUAD 2 TO 1 ACTIVE HIGH DATA SELECTOR
  1476. ;
  1477. :74257X        INTEL_M       16
  1478.    INV(P1;N1;1,1,1,1);
  1479.    LINV(N1;L2);
  1480.    LAND(P2,N1;L3);
  1481.    LAND(P3,L2;L4);
  1482.    LAND(P5,N1;L5);
  1483.    LAND(P6,L2;L6);
  1484.    LAND(P11,N1;L7);
  1485.    LAND(P10,L2;L8);
  1486.    LAND(P14,N1;L9);
  1487.    LAND(P13,L2;L10);
  1488.    OR(L3,L4;P4;1,1,1,1);
  1489.    OR(L5,L6;P7;1,1,1,1);
  1490.    OR(L7,L8;P9;1,1,1,1);
  1491.    OR(L9,L10;P12;1,1,1,1);
  1492. %
  1493. ;
  1494. ;QUAD 2 TO 1 ACTIVE LOW DATA SELECTOR
  1495. ;
  1496. :74258X        INTEL_M       16
  1497.    INV(P1;N1;1,1,1,1);
  1498.    LINV(N1;L2);
  1499.    LAND(P2,N1;L3);
  1500.    LAND(P3,L2;L4);
  1501.    LAND(P5,N1;L5);
  1502.    LAND(P6,L2;L6);
  1503.    LAND(P11,N1;L7);
  1504.    LAND(P10,L2;L8);
  1505.    LAND(P14,N1;L9);
  1506.    LAND(P13,L2;L10);
  1507.    NOR(L3,L4;P4;1,1,1,1);
  1508.    NOR(L5,L6;P7;1,1,1,1);
  1509.    NOR(L7,L8;P9;1,1,1,1);
  1510.    NOR(L9,L10;P12;1,1,1,1);
  1511. %
  1512. ;
  1513. ;8 BIT ADDRESSABLE LATCH WITH CLEAR
  1514. ;
  1515. :74259XA        INTEL_M       16
  1516. LINV(P1;L1);
  1517. LINV(P2;L2);
  1518. LINV(P3;L3);
  1519. LINV(P15;L4);
  1520. LINV(P14;L5);
  1521. LAND(L1,L2,L3;L6);
  1522. LAND(P1,L2,L3;L7);
  1523. LAND(L1,P2,L3;L8);
  1524. LAND(P1,P2,L3;L9);
  1525. LAND(L1,L2,P3;L10);
  1526. LAND(P1,L2,P3;L11);
  1527. LAND(L1,P2,P3;L12);
  1528. LAND(P1,P2,P3;L13);
  1529. LNOR(L4,L5;L14);
  1530. LOR(L6,L4;L15);
  1531. LOR(L7,L4;L16);
  1532. LOR(L8,L4;L17);
  1533. LOR(L9,L4;L18);
  1534. LOR(L10,L4;L19);
  1535. LOR(L11,L4;L20);
  1536. LOR(L12,L4;L21);
  1537. LOR(L13,L4;L22);
  1538. LINV(L14;L23);
  1539. LNAND(P13,L5,L6;L24);
  1540. LAND(L15,L23;L25);
  1541. LNAND(P13,L5,L7;L26);
  1542. LAND(L16,L23;L27);
  1543. LNAND(P13,L5,L8;L28);
  1544. LAND(L17,L23;L29);
  1545. LNAND(P13,L5,L9;L30);
  1546. LAND(L18,L23;L31);
  1547. LNAND(P13,L5,L10;L32);
  1548. LAND(L19,L23;L33);
  1549. LNAND(P13,L5,L11;L34);
  1550. LAND(L20,L23;L35);
  1551. LNAND(P13,L5,L12;L36);
  1552. LAND(L21,L23;L37);
  1553. LNAND(P13,L5,L13;L38);
  1554. LAND(L22,L23;L39);
  1555. LAND(L24,L25;L40);
  1556. LNOR(L25,P4;L41);
  1557. LAND(L26,L27;L42);
  1558. LNOR(L27,P5;L43);
  1559. LAND(L28,L29;L44);
  1560. LNOR(L29,P6;L45);
  1561. LAND(L30,L31;L46);
  1562. LNOR(L31,P7;L47);
  1563. LAND(L32,L33;L48);
  1564. LNOR(L33,P9;L49);
  1565. LAND(L34,L35;L50);
  1566. LNOR(L35,P10;L51);
  1567. LAND(L36,L37;L52);
  1568. LNOR(L37,P11;L53);
  1569. LAND(L38,L39;L54);
  1570. LNOR(L39,P12;L55);
  1571. NOR(L40,L41;P4;1,1,1,1);
  1572. NOR(L42,L43;P5;1,1,1,1);
  1573. NOR(L44,L45;P6;1,1,1,1);
  1574. NOR(L46,L47;P7;1,1,1,1);
  1575. NOR(L48,L49;P9;1,1,1,1);
  1576. NOR(L50,L51;P10;1,1,1,1);
  1577. NOR(L52,L53;P11;1,1,1,1);
  1578. NOR(L54,L55;P12;1,1,1,1);
  1579. %
  1580. ;
  1581. ;8 BIT ADDRESSABLE LATCH WITH CLEAR
  1582. ;
  1583. :74259XB        INTEL_M       16
  1584. LINV(P1;L1);
  1585. LINV(P2;L2);
  1586. LINV(P3;L3);
  1587. LINV(P15;L4);
  1588. LINV(P14;L5);
  1589. LAND(L1,L2,L3;L6);
  1590. LAND(P1,L2,L3;L7);
  1591. LAND(L1,P2,L3;L8);
  1592. LAND(P1,P2,L3;L9);
  1593. LAND(L1,L2,P3;L10);
  1594. LAND(P1,L2,P3;L11);
  1595. LAND(L1,P2,P3;L12);
  1596. LAND(P1,P2,P3;L13);
  1597. LNOR(L4,L5;L14);
  1598. LOR(L6,L4;L15);
  1599. LOR(L7,L4;L16);
  1600. LOR(L8,L4;L17);
  1601. LOR(L9,L4;L18);
  1602. LOR(L10,L4;L19);
  1603. LOR(L11,L4;L20);
  1604. LOR(L12,L4;L21);
  1605. LOR(L13,L4;L22);
  1606. LINV(L14;L23);
  1607. LNAND(P13,L5,L6;L24);
  1608. LAND(L15,L23;L25);
  1609. LNAND(P13,L5,L7;L26);
  1610. LAND(L16,L23;L27);
  1611. LNAND(P13,L5,L8;L28);
  1612. LAND(L17,L23;L29);
  1613. LNAND(P13,L5,L9;L30);
  1614. LAND(L18,L23;L31);
  1615. LNAND(P13,L5,L10;L32);
  1616. LAND(L19,L23;L33);
  1617. LNAND(P13,L5,L11;L34);
  1618. LAND(L20,L23;L35);
  1619. LNAND(P13,L5,L12;L36);
  1620. LAND(L21,L23;L37);
  1621. LNAND(P13,L5,L13;L38);
  1622. LAND(L22,L23;L39);
  1623. LAND(L24,L25;L40);
  1624. LNOR(L25,P4;L41);
  1625. LAND(L26,L27;L42);
  1626. LNOR(L27,P5;L43);
  1627. LAND(L28,L29;L44);
  1628. LNOR(L29,P6;L45);
  1629. LAND(L30,L31;L46);
  1630. LNOR(L31,P7;L47);
  1631. LAND(L32,L33;L48);
  1632. LNOR(L33,P9;L49);
  1633. LAND(L34,L35;L50);
  1634. LNOR(L35,P10;L51);
  1635. LAND(L36,L37;L52);
  1636. LNOR(L37,P11;L53);
  1637. LAND(L38,L39;L54);
  1638. LNOR(L39,P12;L55);
  1639. NOR(L40,L41;P4;1,1,1,1);
  1640. NOR(L42,L43;P5;1,1,1,1);
  1641. NOR(L44,L45;P6;1,1,1,1);
  1642. NOR(L46,L47;P7;1,1,1,1);
  1643. NOR(L48,L49;P9;1,1,1,1);
  1644. NOR(L50,L51;P10;1,1,1,1);
  1645. NOR(L52,L53;P11;1,1,1,1);
  1646. NOR(L54,L55;P12;1,1,1,1);
  1647. %
  1648. ;
  1649. ;OCTAL D-TYPE FLIPFLOP WITH ASYNCHRONOUS CLEAR
  1650. ;
  1651. :74273X        INTEL_M       20
  1652.    LAND(P1,IPL;L1);
  1653.    DQFFC(P3,P11,L1;P2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1654.    DQFFC(P4,P11,L1;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1655.    DQFFC(P7,P11,L1;P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1656.    DQFFC(P8,P11,L1;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1657.    DQFFC(P13,P11,L1;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1658.    DQFFC(P14,P11,L1;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1659.    DQFFC(P17,P11,L1;P16;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1660.    DQFFC(P18,P11,L1;P19;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1661. %
  1662. ;
  1663. ;9 BIT ODD/EVEN PARITY GENERATOR/CHECKER
  1664. ;
  1665. :74280X        INTEL_M       13
  1666.    LXOR(P7,P8,P9,P10,P11,P12,P1,P2,P3;L1);
  1667.    INV(L1;P4;1,1,1,1);
  1668.    BUF(L1;P5;1,1,1,1);
  1669. %
  1670. ;
  1671. ;SYNCHRONOUS SET/RESET 4-BIT DECADE COUNTER
  1672. ;
  1673. :74290XD        INTEL_M       12
  1674.    LNAND(P1,P2,P8;L1);
  1675.    LNAND(P10,P11,P8;L2);
  1676.    LAND(L2,L1;L3);
  1677.    LAND(P4,P3;L8);
  1678.    LAND(L2,IPL;L9);
  1679.    LAND(L3,IPL;L10);
  1680.    JKFFPC(ONE,ONE,P8,L1,L9;P7,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1681.    JKFFC(N10,ONE,N4,L10;P4,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1682.    JKFFC(ONE,ONE,N6,L10;P3,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1683.    JKFFPC(L8,P6,N4,L1,L9;P6,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1684. %
  1685. ;
  1686. ;SYNCHRONOUS SET/RESET 4-BIT BI-QUINARY COUNTER
  1687. ;
  1688. :74290XQ        INTEL_M       12
  1689.    LNAND(P1,P2,P9;L1);
  1690.    LNAND(P10,P11,P9;L2);
  1691.    LAND(L2,L1;L3);
  1692.    LAND(P4,P3;L8);
  1693.    LAND(L2,IPL;L9);
  1694.    LAND(L3,IPL;L10);
  1695.    JKFFPC(ONE,ONE,N10,L1,L9;P7,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1696.    JKFFC(N10,ONE,P9,L10;P4,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1697.    JKFFC(ONE,ONE,N6,L10;P3,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1698.    JKFFPC(L8,P6,P9,L1,L9;P6,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1699. %
  1700. ;
  1701. ;QUAD 2 INPUT MULTIPLEXOR WITH STORAGE
  1702. ;
  1703. :74298XA        INTEL_M      16
  1704. LINV(P10;L1);
  1705. LAND(P3,L1;L2);
  1706. LAND(P10,P2;L3);
  1707. LAND(P4,L1;L4);
  1708. LAND(P10,P1;L5);
  1709. LAND(P9,L1;L6);
  1710. LAND(P10,P5;L7);
  1711. LAND(P7,L1;L8);
  1712. LAND(P10,P6;L9);
  1713. LOR(L2,L3;L10);
  1714. LOR(L4,L5;L11);
  1715. LOR(L6,L7;L12);
  1716. LOR(L8,L9;L13);
  1717. INV(P11;N1;1,1,1,1);
  1718. DQFFC(L10,N1,IPL;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1719. DQFFC(L11,N1,IPL;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1720. DQFFC(L12,N1,IPL;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1721. DQFFC(L13,N1,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1722. %
  1723. ;
  1724. ;QUAD 2 INPUT MULTIPLEXOR WITH STORAGE
  1725. ;
  1726. :74298XB        INTEL_M      16
  1727. LINV(P10;L1);
  1728. LAND(P3,L1;L2);
  1729. LAND(P10,P2;L3);
  1730. LAND(P4,L1;L4);
  1731. LAND(P10,P1;L5);
  1732. LAND(P9,L1;L6);
  1733. LAND(P10,P5;L7);
  1734. LAND(P7,L1;L8);
  1735. LAND(P10,P6;L9);
  1736. LOR(L2,L3;L10);
  1737. LOR(L4,L5;L11);
  1738. LOR(L6,L7;L12);
  1739. LOR(L8,L9;L13);
  1740. INV(P11;N1;1,1,1,1);
  1741. DQFFC(L10,N1,IPL;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1742. DQFFC(L11,N1,IPL;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1743. DQFFC(L12,N1,IPL;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1744. DQFFC(L13,N1,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1745. %
  1746. ;
  1747. ;DUAL 4-LINE TO 2-LINE DATA SELECTOR
  1748. ;
  1749. :74352        INTEL_M       16
  1750.    LINV(P1;L1);
  1751.    LINV(P15;L2);
  1752.    LINV(P2;L3);
  1753.    LINV(P14;L4);
  1754.    LAND(L1,L3,L4,P6;L5);
  1755.    LAND(L1,L3,P14,P5;L6);
  1756.    LAND(L1,P2,L4,P4;L7);
  1757.    LAND(L1,P2,P14,P3;L8);
  1758.    LAND(P10,L3,L4,L2;L9);
  1759.    LAND(P11,L3,P14,L2;L10);
  1760.    LAND(P12,P2,L4,L2;L11);
  1761.    LAND(P13,P2,P14,L2;L12);
  1762.    NOR(L5,L6,L7,L8;P7;1,1,1,1);
  1763.    NOR(L9,L10,L11,L12;P9;1,1,1,1);
  1764. %
  1765. ;
  1766. ;TRANSPARENT OCTAL D-TYPE LATCH WITH OUTPUT ENABLE
  1767. ;
  1768. :74373X        INTEL_M       20
  1769.    DLATCH(P3,P11;P2;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1770.    DLATCH(P4,P11;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1771.    DLATCH(P7,P11;P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1772.    DLATCH(P8,P11;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1773.    DLATCH(P13,P11;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1774.    DLATCH(P14,P11;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1775.    DLATCH(P17,P11;P16;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1776.    DLATCH(P18,P11;P19;1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1777. %
  1778. ;
  1779. ;OCTAL D-TYPE FLIP-FLOPS WITH ENABLE
  1780. ;
  1781. :74377        INTEL_M       20
  1782.    LINV(P1;L1);
  1783.    AND(L1,P11;N1;1,1,1,1);
  1784.    DQFFC(P3,N1,IPL;P2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1785.    DQFFC(P4,N1,IPL;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1786.    DQFFC(P7,N1,IPL;P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1787.    DQFFC(P8,N1,IPL;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1788.    DQFFC(P13,N1,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1789.    DQFFC(P14,N1,IPL;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1790.    DQFFC(P17,N1,IPL;P16;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1791.    DQFFC(P18,N1,IPL;P19;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1792. %
  1793. ;
  1794. ;HEX D-TYPE FLIP-FLOPS WITH ENABLE
  1795. ;
  1796. :74378        INTEL_M       16
  1797.    LINV(P1;L1);
  1798.    AND(L1,P9;N1;1,1,1,1);
  1799.    DQFFC(P3,N1,IPL;P2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1800.    DQFFC(P4,N1,IPL;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1801.    DQFFC(P6,N1,IPL;P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1802.    DQFFC(P11,N1,IPL;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1803.    DQFFC(P13,N1,IPL;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1804.    DQFFC(P14,N1,IPL;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1805. %
  1806. ;
  1807. ;4-BIT NEGATIVE EDGE TRIGGERED BCD/BI-QUINARY COUNTER WITH ASYNCHRONOUS CLEAR
  1808. ;
  1809. :74390X        INTEL_M       9
  1810.    LINV(P2;L1);
  1811.    LINV(P3;L2);
  1812.    LINV(P5;L3);
  1813.    LINV(P6;L4);
  1814.    LINV(P7;L5);
  1815.    LAND(L3,L5;L6);
  1816.    LAND(L4,L5;L7);
  1817.    LNOR(L6,L7;L8);
  1818.    LAND(L1,IPL;L9);
  1819.    INV(P1;N1;0,0,0,0);
  1820.    NAND(P4,L5;N2;0,0,0,0);
  1821.    NAND(P4,L8;N3;0,0,0,0);
  1822.    DQFFC(L2,N1,L9;P3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1823.    DFFC(L3,N2,L9;P5,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1824.    DQFFC(L4,N4,L9;P6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1825.    DQFFC(L5,N3,L9;P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1826. %
  1827. ;
  1828. ;4 BIT UP COUNTER WITH ASYNCHRONOUS CLEAR
  1829. ;
  1830. :74393XA        INTEL_M       8
  1831. LAND(P4,P3;L1);
  1832. LAND(P5,L1;L2);
  1833. XNOR(ONE,N2;N1;1,1,1,1);
  1834. LINV(P2;L3);
  1835. LAND(L3,IPL;L4);
  1836. INV(P1;N9;1,1,1,1);
  1837. DFFC(N1,N9,L4;P3,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1838. XNOR(P3,N4;N3;1,1,1,1);
  1839. DFFC(N3,N9,L4;P4,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1840. XNOR(L1,N6;N5;1,1,1,1);
  1841. DFFC(N5,N9,L4;P5,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1842. XNOR(L2,N8;N7;1,1,1,1);
  1843. DFFC(N7,N9,L4;P6,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1844. %
  1845. ;
  1846. ;4 BIT UP COUNTER WITH ASYNCHRONOUS CLEAR
  1847. ;
  1848. :74393XB        INTEL_M       8
  1849. LAND(P4,P3;L1);
  1850. LAND(P5,L1;L2);
  1851. XNOR(ONE,N2;N1;1,1,1,1);
  1852. LINV(P2;L3);
  1853. LAND(L3,IPL;L4);
  1854. INV(P1;N9;1,1,1,1);
  1855. DFFC(N1,N9,L4;P3,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1856. XNOR(P3,N4;N3;1,1,1,1);
  1857. DFFC(N3,N9,L4;P4,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1858. XNOR(L1,N6;N5;1,1,1,1);
  1859. DFFC(N5,N9,L4;P5,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1860. XNOR(L2,N8;N7;1,1,1,1);
  1861. DFFC(N7,N9,L4;P6,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1862. %
  1863. ;
  1864. ;4-BIT CASCADABLE SHIFT REGISTER WITH ASYNCHRONOUS CLEAR
  1865. ;
  1866. :74395XA        INTEL_M       16
  1867.    INV(P10;N1;0,0,0,0);
  1868.    LINV(P7;L2);
  1869.    LAND(P2,L2;L3);
  1870.    LAND(P7,P3;L4);
  1871.    LAND(P15,L2;L5);
  1872.    LAND(P7,P4;L6);
  1873.    LAND(P14,L2;L7);
  1874.    LAND(P7,P5;L8);
  1875.    LAND(P13,L2;L9);
  1876.    LAND(P7,P6;L10);
  1877.    LOR(L3,L4;L11);
  1878.    LOR(L5,L6;L12);
  1879.    LOR(L7,L8;L13);
  1880.    LOR(L9,L10;L14);
  1881.    LAND(P1,IPL;L15);
  1882.    DQFFC(L11,N1,L15;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1883.    DQFFC(L12,N1,L15;P14;1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1884.    DQFFC(L13,N1,L15;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1885.    DFFC(L14,N1,L15;P12,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1886.    ITSB(N2,ONE;P11;1,1,1,1,1,1,1,1);
  1887. %
  1888. ;
  1889. ;4-BIT CASCADABLE SHIFT REGISTER WITH ASYNCHRONOUS CLEAR
  1890. ;
  1891. :74395XB        INTEL_M       16
  1892.    INV(P10;N1;0,0,0,0);
  1893.    LINV(P7;L2);
  1894.    LAND(P2,L2;L3);
  1895.    LAND(P7,P3;L4);
  1896.    LAND(P15,L2;L5);
  1897.    LAND(P7,P4;L6);
  1898.    LAND(P14,L2;L7);
  1899.    LAND(P7,P5;L8);
  1900.    LAND(P13,L2;L9);
  1901.    LAND(P7,P6;L10);
  1902.    LOR(L3,L4;L11);
  1903.    LOR(L5,L6;L12);
  1904.    LOR(L7,L8;L13);
  1905.    LOR(L9,L10;L14);
  1906.    LAND(P1,IPL;L15);
  1907.    DQFFC(L11,N1,L15;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1908.    DQFFC(L12,N1,L15;P14;1,1,2,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1909.    DQFFC(L13,N1,L15;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1910.    DFFC(L14,N1,L15;P12,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  1911.    ITSB(N2,ONE;P11;1,1,1,1,1,1,1,1);
  1912. %
  1913. ;
  1914. ;4 GANGED NOCF (NO OUTPUT COMBINATORIAL FEEDBACK) PRIMITIVES
  1915. ;
  1916. :4NOCF        INTEL_M       8
  1917. BUF(P1;P5;1,1,1,1);
  1918. BUF(P2;P6;1,1,1,1);
  1919. BUF(P3;P7;1,1,1,1);
  1920. BUF(P4;P8;1,1,1,1);
  1921. %
  1922. ;
  1923. ;6 GANGED NOCF (NO OUTPUT COMBINATORIAL FEEDBACK) PRIMITIVES
  1924. ;
  1925. :6NOCF        INTEL_M       12
  1926. BUF(P1;P7;1,1,1,1);
  1927. BUF(P2;P8;1,1,1,1);
  1928. BUF(P3;P9;1,1,1,1);
  1929. BUF(P4;P10;1,1,1,1);
  1930. BUF(P5;P11;1,1,1,1);
  1931. BUF(P6;P12;1,1,1,1);
  1932. %
  1933. ;
  1934. ;8 GANGED NOCF (NO OUTPUT COMBINATORIAL FEEDBACK) PRIMITIVES
  1935. ;
  1936. :8NOCF        INTEL_M       16
  1937. BUF(P1;P9;1,1,1,1);
  1938. BUF(P2;P10;1,1,1,1);
  1939. BUF(P3;P11;1,1,1,1);
  1940. BUF(P4;P12;1,1,1,1);
  1941. BUF(P5;P13;1,1,1,1);
  1942. BUF(P6;P14;1,1,1,1);
  1943. BUF(P7;P15;1,1,1,1);
  1944. BUF(P8;P16;1,1,1,1);
  1945. %
  1946. ;
  1947. ;4 GANGED CONF (COMBINATORIAL OUTPUT NO FEEDBACK) PRIMITIVES
  1948. ;
  1949. :4CONF        INTEL_M       9
  1950. TSB(P1,P5;P6;1,1,1,1,1,1,1,1);
  1951. TSB(P2,P5;P7;1,1,1,1,1,1,1,1);
  1952. TSB(P3,P5;P8;1,1,1,1,1,1,1,1);
  1953. TSB(P4,P5;P9;1,1,1,1,1,1,1,1);
  1954. %
  1955. ;
  1956. ;6 GANGED CONF (COMBINATORIAL OUTPUT NO FEEDBACK) PRIMITIVES
  1957. ;
  1958. :6CONF        INTEL_M       13
  1959. TSB(P1,P7;P8;1,1,1,1,1,1,1,1);
  1960. TSB(P2,P7;P9;1,1,1,1,1,1,1,1);
  1961. TSB(P3,P7;P10;1,1,1,1,1,1,1,1);
  1962. TSB(P4,P7;P11;1,1,1,1,1,1,1,1);
  1963. TSB(P5,P7;P12;1,1,1,1,1,1,1,1);
  1964. TSB(P6,P7;P13;1,1,1,1,1,1,1,1);
  1965. %
  1966. ;
  1967. ;8 GANGED CONF (COMBINATORIAL OUTPUT NO FEEDBACK) PRIMITIVES
  1968. ;
  1969. :8CONF        INTEL_M       17
  1970. TSB(P1,P9;P10;1,1,1,1,1,1,1,1);
  1971. TSB(P2,P9;P11;1,1,1,1,1,1,1,1);
  1972. TSB(P3,P9;P12;1,1,1,1,1,1,1,1);
  1973. TSB(P4,P9;P13;1,1,1,1,1,1,1,1);
  1974. TSB(P5,P9;P14;1,1,1,1,1,1,1,1);
  1975. TSB(P6,P9;P15;1,1,1,1,1,1,1,1);
  1976. TSB(P7,P9;P16;1,1,1,1,1,1,1,1);
  1977. TSB(P8,P9;P17;1,1,1,1,1,1,1,1);
  1978. %
  1979. ;
  1980. ;4 GANGED COIF (COMBINATORIAL OUTPUT I/O FEEDBACK PRIMITIVES
  1981. ;
  1982. :4COIF        INTEL_M       13
  1983. TSB(P1,P5;P10;1,1,1,1,1,1,1,1);
  1984. TSB(P10,ONE;P6;1,1,1,1,1,1,1,1);
  1985. TSB(P2,P5;P11;1,1,1,1,1,1,1,1);
  1986. TSB(P11,ONE;P7;1,1,1,1,1,1,1,1);
  1987. TSB(P3,P5;P12;1,1,1,1,1,1,1,1);
  1988. TSB(P12,ONE;P8;1,1,1,1,1,1,1,1);
  1989. TSB(P4,P5;P13;1,1,1,1,1,1,1,1);
  1990. TSB(P13,ONE;P9;1,1,1,1,1,1,1,1);
  1991. %
  1992. ;
  1993. ;6 GANGED COIF (COMBINATORIAL OUTPUT I/O FEEDBACK PRIMITIVES
  1994. ;
  1995. :6COIF        INTEL_M       19
  1996. TSB(P1,P7;P14;1,1,1,1,1,1,1,1);
  1997. TSB(P14,ONE;P8;1,1,1,1,1,1,1,1);
  1998. TSB(P2,P7;P15;1,1,1,1,1,1,1,1);
  1999. TSB(P15,ONE;P9;1,1,1,1,1,1,1,1);
  2000. TSB(P3,P7;P16;1,1,1,1,1,1,1,1);
  2001. TSB(P16,ONE;P10;1,1,1,1,1,1,1,1);
  2002. TSB(P4,P7;P17;1,1,1,1,1,1,1,1);
  2003. TSB(P17,ONE;P11;1,1,1,1,1,1,1,1);
  2004. TSB(P5,P7;P18;1,1,1,1,1,1,1,1);
  2005. TSB(P18,ONE;P12;1,1,1,1,1,1,1,1);
  2006. TSB(P6,P7;P19;1,1,1,1,1,1,1,1);
  2007. TSB(P19,ONE;P13;1,1,1,1,1,1,1,1);
  2008. %
  2009. ;
  2010. ;8 GANGED COIF (COMBINATORIAL OUTPUT I/O FEEDBACK PRIMITIVES
  2011. ;
  2012. :8COIF        INTEL_M       25
  2013. TSB(P1,P9;P18;1,1,1,1,1,1,1,1);
  2014. TSB(P18,ONE;P10;1,1,1,1,1,1,1,1);
  2015. TSB(P2,P9;P19;1,1,1,1,1,1,1,1);
  2016. TSB(P19,ONE;P11;1,1,1,1,1,1,1,1);
  2017. TSB(P3,P9;P20;1,1,1,1,1,1,1,1);
  2018. TSB(P20,ONE;P12;1,1,1,1,1,1,1,1);
  2019. TSB(P4,P9;P21;1,1,1,1,1,1,1,1);
  2020. TSB(P21,ONE;P13;1,1,1,1,1,1,1,1);
  2021. TSB(P5,P9;P22;1,1,1,1,1,1,1,1);
  2022. TSB(P22,ONE;P14;1,1,1,1,1,1,1,1);
  2023. TSB(P6,P9;P23;1,1,1,1,1,1,1,1);
  2024. TSB(P23,ONE;P15;1,1,1,1,1,1,1,1);
  2025. TSB(P7,P9;P24;1,1,1,1,1,1,1,1);
  2026. TSB(P24,ONE;P16;1,1,1,1,1,1,1,1);
  2027. TSB(P8,P9;P25;1,1,1,1,1,1,1,1);
  2028. TSB(P25,ONE;P17;1,1,1,1,1,1,1,1);
  2029. %
  2030. ;
  2031. ;2 GANGED INPUT PRIMITIVES
  2032. ;
  2033. :2INP        INTEL_M       4
  2034. TSB(P1,ONE;P3;1,1,1,1,1,1,1,1);
  2035. TSB(P2,ONE;P4;1,1,1,1,1,1,1,1);
  2036. %
  2037. ;
  2038. ;4 GANGED INPUT PRIMITIVES
  2039. ;
  2040. :4INP        INTEL_M       8
  2041. TSB(P1,ONE;P5;1,1,1,1,1,1,1,1);
  2042. TSB(P2,ONE;P6;1,1,1,1,1,1,1,1);
  2043. TSB(P3,ONE;P7;1,1,1,1,1,1,1,1);
  2044. TSB(P4,ONE;P8;1,1,1,1,1,1,1,1);
  2045. %
  2046. ;
  2047. ;6 GANGED INPUT PRIMITIVES
  2048. ;
  2049. :6INP        INTEL_M       12
  2050. TSB(P1,ONE;P7;1,1,1,1,1,1,1,1);
  2051. TSB(P2,ONE;P8;1,1,1,1,1,1,1,1);
  2052. TSB(P3,ONE;P9;1,1,1,1,1,1,1,1);
  2053. TSB(P4,ONE;P10;1,1,1,1,1,1,1,1);
  2054. TSB(P5,ONE;P11;1,1,1,1,1,1,1,1);
  2055. TSB(P6,ONE;P12;1,1,1,1,1,1,1,1);
  2056. %
  2057. ;
  2058. ;8 GANGED INPUT PRIMITIVES
  2059. ;
  2060. :8INP        INTEL_M       16
  2061. TSB(P1,ONE;P9;1,1,1,1,1,1,1,1);
  2062. TSB(P2,ONE;P10;1,1,1,1,1,1,1,1);
  2063. TSB(P3,ONE;P11;1,1,1,1,1,1,1,1);
  2064. TSB(P4,ONE;P12;1,1,1,1,1,1,1,1);
  2065. TSB(P5,ONE;P13;1,1,1,1,1,1,1,1);
  2066. TSB(P6,ONE;P14;1,1,1,1,1,1,1,1);
  2067. TSB(P7,ONE;P15;1,1,1,1,1,1,1,1);
  2068. TSB(P8,ONE;P16;1,1,1,1,1,1,1,1);
  2069. %
  2070. ;
  2071. ;4 GANGED RONF (REGISTERED OUTPUT NO FEEDBACK) PRIMITIVES
  2072. ;
  2073. :4RONF        INTEL_M       11
  2074. LINV(P6;L1);
  2075. LAND(L1,IPL;L2);
  2076. DQFFC(P1,P5,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2077. TSB(N1,P7;P8;1,1,1,1,1,1,1,1);
  2078. DQFFC(P2,P5,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2079. TSB(N2,P7;P9;1,1,1,1,1,1,1,1);
  2080. DQFFC(P3,P5,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2081. TSB(N3,P7;P10;1,1,1,1,1,1,1,1);
  2082. DQFFC(P4,P5,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2083. TSB(N4,P7;P11;1,1,1,1,1,1,1,1);
  2084. %
  2085. ;
  2086. ;6 GANGED RONF (REGISTERED OUTPUT NO FEEDBACK) PRIMITIVES
  2087. ;
  2088. :6RONF        INTEL_M       15
  2089. LINV(P8;L1);
  2090. LAND(L1,IPL;L2);
  2091. DQFFC(P1,P7,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2092. TSB(N1,P9;P10;1,1,1,1,1,1,1,1);
  2093. DQFFC(P2,P7,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2094. TSB(N2,P9;P11;1,1,1,1,1,1,1,1);
  2095. DQFFC(P3,P7,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2096. TSB(N3,P9;P12;1,1,1,1,1,1,1,1);
  2097. DQFFC(P4,P7,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2098. TSB(N4,P9;P13;1,1,1,1,1,1,1,1);
  2099. DQFFC(P5,P7,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2100. TSB(N5,P9;P14;1,1,1,1,1,1,1,1);
  2101. DQFFC(P6,P7,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2102. TSB(N6,P9;P15;1,1,1,1,1,1,1,1);
  2103. %
  2104. ;
  2105. ;8 GANGED RONF (REGISTERED OUTPUT NO FEEDBACK) PRIMITIVES
  2106. ;
  2107. :8RONF        INTEL_M       19
  2108. LINV(P10;L1);
  2109. LAND(L1,IPL;L2);
  2110. DQFFC(P1,P9,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2111. TSB(N1,P11;P12;1,1,1,1,1,1,1,1);
  2112. DQFFC(P2,P9,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2113. TSB(N2,P11;P13;1,1,1,1,1,1,1,1);
  2114. DQFFC(P3,P9,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2115. TSB(N3,P11;P14;1,1,1,1,1,1,1,1);
  2116. DQFFC(P4,P9,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2117. TSB(N4,P11;P15;1,1,1,1,1,1,1,1);
  2118. DQFFC(P5,P9,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2119. TSB(N5,P11;P16;1,1,1,1,1,1,1,1);
  2120. DQFFC(P6,P9,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2121. TSB(N6,P11;P17;1,1,1,1,1,1,1,1);
  2122. DQFFC(P7,P9,L2;N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2123. TSB(N7,P11;P18;1,1,1,1,1,1,1,1);
  2124. DQFFC(P8,P9,L2;N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2125. TSB(N8,P11;P19;1,1,1,1,1,1,1,1);
  2126. %
  2127. ;
  2128. ;4 GANGED ROIF (REGISTERED OUTPUT I/O FEEDBACK) PRIMITIVES
  2129. ;
  2130. :4ROIF        INTEL_M       15
  2131. LINV(P6;L1);
  2132. LAND(L1,IPL;L2);
  2133. DQFFC(P1,P5,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2134. TSB(N1,P7;P12;1,1,1,1,1,1,1,1);
  2135. TSB(P12,ONE;P8;1,1,1,1,1,1,1,1);
  2136. DQFFC(P2,P5,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2137. TSB(N2,P7;P13;1,1,1,1,1,1,1,1);
  2138. TSB(P13,ONE;P9;1,1,1,1,1,1,1,1);
  2139. DQFFC(P3,P5,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2140. TSB(N3,P7;P14;1,1,1,1,1,1,1,1);
  2141. TSB(P14,ONE;P10;1,1,1,1,1,1,1,1);
  2142. DQFFC(P4,P5,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2143. TSB(N4,P7;P15;1,1,1,1,1,1,1,1);
  2144. TSB(P15,ONE;P11;1,1,1,1,1,1,1,1);
  2145. %
  2146. ;
  2147. ;6 GANGED ROIF (REGISTERED OUTPUT I/O FEEDBACK) PRIMITIVES
  2148. ;
  2149. :6ROIF        INTEL_M       21
  2150. LINV(P8;L1);
  2151. LAND(L1,IPL;L2);
  2152. DQFFC(P1,P7,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2153. TSB(N1,P9;P16;1,1,1,1,1,1,1,1);
  2154. TSB(P16,ONE;P10;1,1,1,1,1,1,1,1);
  2155. DQFFC(P2,P7,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2156. TSB(N2,P9;P17;1,1,1,1,1,1,1,1);
  2157. TSB(P17,ONE;P11;1,1,1,1,1,1,1,1);
  2158. DQFFC(P3,P7,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2159. TSB(N3,P9;P18;1,1,1,1,1,1,1,1);
  2160. TSB(P18,ONE;P12;1,1,1,1,1,1,1,1);
  2161. DQFFC(P4,P7,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2162. TSB(N4,P9;P19;1,1,1,1,1,1,1,1);
  2163. TSB(P19,ONE;P13;1,1,1,1,1,1,1,1);
  2164. DQFFC(P5,P7,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2165. TSB(N5,P9;P20;1,1,1,1,1,1,1,1);
  2166. TSB(P20,ONE;P14;1,1,1,1,1,1,1,1);
  2167. DQFFC(P6,P7,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2168. TSB(N6,P9;P21;1,1,1,1,1,1,1,1);
  2169. TSB(P21,ONE;P15;1,1,1,1,1,1,1,1);
  2170. %
  2171. ;
  2172. ;8 GANGED ROIF (REGISTERED OUTPUT I/O FEEDBACK) PRIMITIVES
  2173. ;
  2174. :8ROIF        INTEL_M       27
  2175. LINV(P10;L1);
  2176. LAND(L1,IPL;L2);
  2177. DQFFC(P1,P9,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2178. TSB(N1,P11;P20;1,1,1,1,1,1,1,1);
  2179. TSB(P20,ONE;P12;1,1,1,1,1,1,1,1);
  2180. DQFFC(P2,P9,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2181. TSB(N2,P11;P21;1,1,1,1,1,1,1,1);
  2182. TSB(P21,ONE;P13;1,1,1,1,1,1,1,1);
  2183. DQFFC(P3,P9,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2184. TSB(N3,P11;P22;1,1,1,1,1,1,1,1);
  2185. TSB(P22,ONE;P14;1,1,1,1,1,1,1,1);
  2186. DQFFC(P4,P9,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2187. TSB(N4,P11;P23;1,1,1,1,1,1,1,1);
  2188. TSB(P23,ONE;P15;1,1,1,1,1,1,1,1);
  2189. DQFFC(P5,P9,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2190. TSB(N5,P11;P24;1,1,1,1,1,1,1,1);
  2191. TSB(P24,ONE;P16;1,1,1,1,1,1,1,1);
  2192. DQFFC(P6,P9,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2193. TSB(N6,P11;P25;1,1,1,1,1,1,1,1);
  2194. TSB(P25,ONE;P17;1,1,1,1,1,1,1,1);
  2195. DQFFC(P7,P9,L2;N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2196. TSB(N7,P11;P26;1,1,1,1,1,1,1,1);
  2197. TSB(P26,ONE;P18;1,1,1,1,1,1,1,1);
  2198. DQFFC(P8,P9,L2;N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2199. TSB(N8,P11;P27;1,1,1,1,1,1,1,1);
  2200. TSB(P27,ONE;P19;1,1,1,1,1,1,1,1);
  2201. %
  2202. ;
  2203. ;4 GANGED RORF (REGISTERED OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2204. ;
  2205. :4RORF        INTEL_M       15
  2206. LINV(P6;L1);
  2207. LAND(L1,IPL;L2);
  2208. DQFFC(P1,P5,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2209. TSB(N1,P7;P12;1,1,1,1,1,1,1,1);
  2210. TSB(N1,ONE;P8;1,1,1,1,1,1,1,1);
  2211. DQFFC(P2,P5,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2212. TSB(N2,P7;P13;1,1,1,1,1,1,1,1);
  2213. TSB(N2,ONE;P9;1,1,1,1,1,1,1,1);
  2214. DQFFC(P3,P5,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2215. TSB(N3,P7;P14;1,1,1,1,1,1,1,1);
  2216. TSB(N3,ONE;P10;1,1,1,1,1,1,1,1);
  2217. DQFFC(P4,P5,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2218. TSB(N4,P7;P15;1,1,1,1,1,1,1,1);
  2219. TSB(N4,ONE;P11;1,1,1,1,1,1,1,1);
  2220. %
  2221. ;
  2222. ;6 GANGED RORF (REGISTERED OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2223. ;
  2224. :6RORF        INTEL_M       21
  2225. LINV(P8;L1);
  2226. LAND(L1,IPL;L2);
  2227. DQFFC(P1,P7,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2228. TSB(N1,P9;P16;1,1,1,1,1,1,1,1);
  2229. TSB(N1,ONE;P10;1,1,1,1,1,1,1,1);
  2230. DQFFC(P2,P7,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2231. TSB(N2,P9;P17;1,1,1,1,1,1,1,1);
  2232. TSB(N2,ONE;P11;1,1,1,1,1,1,1,1);
  2233. DQFFC(P3,P7,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2234. TSB(N3,P9;P18;1,1,1,1,1,1,1,1);
  2235. TSB(N3,ONE;P12;1,1,1,1,1,1,1,1);
  2236. DQFFC(P4,P7,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2237. TSB(N4,P9;P19;1,1,1,1,1,1,1,1);
  2238. TSB(N4,ONE;P13;1,1,1,1,1,1,1,1);
  2239. DQFFC(P5,P7,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2240. TSB(N5,P9;P20;1,1,1,1,1,1,1,1);
  2241. TSB(N5,ONE;P14;1,1,1,1,1,1,1,1);
  2242. DQFFC(P6,P7,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2243. TSB(N6,P9;P21;1,1,1,1,1,1,1,1);
  2244. TSB(N6,ONE;P15;1,1,1,1,1,1,1,1);
  2245. %
  2246. ;
  2247. ;8 GANGED RORF (REGISTERED OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2248. ;
  2249. :8RORF        INTEL_M       27
  2250. LINV(P10;L1);
  2251. LAND(L1,IPL;L2);
  2252. DQFFC(P1,P9,L2;N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2253. TSB(N1,P11;P20;1,1,1,1,1,1,1,1);
  2254. TSB(N1,ONE;P12;1,1,1,1,1,1,1,1);
  2255. DQFFC(P2,P9,L2;N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2256. TSB(N2,P11;P21;1,1,1,1,1,1,1,1);
  2257. TSB(N2,ONE;P13;1,1,1,1,1,1,1,1);
  2258. DQFFC(P3,P9,L2;N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2259. TSB(N3,P11;P22;1,1,1,1,1,1,1,1);
  2260. TSB(N3,ONE;P14;1,1,1,1,1,1,1,1);
  2261. DQFFC(P4,P9,L2;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2262. TSB(N4,P11;P23;1,1,1,1,1,1,1,1);
  2263. TSB(N4,ONE;P15;1,1,1,1,1,1,1,1);
  2264. DQFFC(P5,P9,L2;N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2265. TSB(N5,P11;P24;1,1,1,1,1,1,1,1);
  2266. TSB(N5,ONE;P16;1,1,1,1,1,1,1,1);
  2267. DQFFC(P6,P9,L2;N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2268. TSB(N6,P11;P25;1,1,1,1,1,1,1,1);
  2269. TSB(N6,ONE;P17;1,1,1,1,1,1,1,1);
  2270. DQFFC(P7,P9,L2;N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2271. TSB(N7,P11;P26;1,1,1,1,1,1,1,1);
  2272. TSB(N7,ONE;P18;1,1,1,1,1,1,1,1);
  2273. DQFFC(P8,P9,L2;N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2274. TSB(N8,P11;P27;1,1,1,1,1,1,1,1);
  2275. TSB(N8,ONE;P19;1,1,1,1,1,1,1,1);
  2276. %
  2277. ;
  2278. ;2 TO 1 MULTIPLEXOR
  2279. ;
  2280. :2MUX        INTEL_M       4
  2281. LINV(P2;L1);
  2282. LAND(P1,P3;L2);
  2283. LNOR(L1,P3;L3);
  2284. OR(L2,L3;P4;1,1,1,1);
  2285. %
  2286. ;
  2287. ;DUAL 2 TO 1 MULTIPLEXOR
  2288. ;
  2289. :D2MUX        INTEL_M       7
  2290. LINV(P2;L1);
  2291. LINV(P4;L2);
  2292. LAND(P1,P5;L3);
  2293. LNOR(L1,P5;L4);
  2294. LAND(P3,P5;L5);
  2295. LNOR(L2,P5;L6);
  2296. OR(L3,L4;P6;1,1,1,1);
  2297. OR(L5,L6;P7;1,1,1,1);
  2298. %
  2299. ;
  2300. ;QUAD 2 TO 1 MULTIPLEXOR
  2301. ;
  2302. :Q2MUX        INTEL_M       13
  2303. LINV(P2;L1);
  2304. LINV(P4;L2);
  2305. LINV(P6;L3);
  2306. LINV(P8;L4);
  2307. LAND(P1,P9;L5);
  2308. LNOR(L1,P9;L6);
  2309. LAND(P3,P9;L7);
  2310. LNOR(L2,P9;L8);
  2311. LAND(P5,P9;L9);
  2312. LNOR(L3,P9;L10);
  2313. LAND(P7,P9;L11);
  2314. LNOR(L4,P9;L12);
  2315. OR(L5,L6;P10;1,1,1,1);
  2316. OR(L7,L8;P11;1,1,1,1);
  2317. OR(L9,L10;P12;1,1,1,1);
  2318. OR(L11,L12;P13;1,1,1,1);
  2319. %
  2320. ;
  2321. ;4 GANGED NORF (NO OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2322. ;
  2323. :4REG        INTEL_M       10
  2324. LINV(P6;L1);
  2325. LAND(L1,IPL;L2);
  2326. DQFFC(P1,P5,L2;P7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2327. DQFFC(P2,P5,L2;P8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2328. DQFFC(P3,P5,L2;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2329. DQFFC(P4,P5,L2;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2330. %
  2331. ;
  2332. ;6 GANGED NORF (NO OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2333. ;
  2334. :6REG        INTEL_M       14
  2335. LINV(P8;L1);
  2336. LAND(L1,IPL;L2);
  2337. DQFFC(P1,P7,L2;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2338. DQFFC(P2,P7,L2;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2339. DQFFC(P3,P7,L2;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2340. DQFFC(P4,P7,L2;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2341. DQFFC(P5,P7,L2;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2342. DQFFC(P6,P7,L2;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2343. %
  2344. ;
  2345. ;8 GANGED NORF (NO OUTPUT REGISTERED FEEDBACK) PRIMITIVES
  2346. ;
  2347. :8REG        INTEL_M       18
  2348. LINV(P10;L1);
  2349. LAND(L1,IPL;L2);
  2350. DQFFC(P1,P9,L2;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2351. DQFFC(P2,P9,L2;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2352. DQFFC(P3,P9,L2;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2353. DQFFC(P4,P9,L2;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2354. DQFFC(P5,P9,L2;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2355. DQFFC(P6,P9,L2;P16;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2356. DQFFC(P7,P9,L2;P17;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2357. DQFFC(P8,P9,L2;P18;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2358. %
  2359. ;
  2360. ;4LATCH
  2361. ;
  2362. :4LATCH        INTEL_M       9
  2363. LINV(P6;L1);
  2364. LINV(P7;L2);
  2365. LINV(P8;L3);
  2366. LINV(P9;L4);
  2367. LAND(P1,P5;L5);
  2368. LNOR(P5,L1;L6);
  2369. LAND(P2,P5;L7);
  2370. LNOR(P5,L2;L8);
  2371. LAND(P3,P5;L9);
  2372. LNOR(P5,L3;L10);
  2373. LAND(P4,P5;L11);
  2374. LNOR(P5,L4;L12);
  2375. OR(L5,L6;P6;1,1,1,1);
  2376. OR(L7,L8;P7;1,1,1,1);
  2377. OR(L9,L10;P8;1,1,1,1);
  2378. OR(L11,L12;P9;1,1,1,1);
  2379. %
  2380. ;
  2381. ;6LATCH
  2382. ;
  2383. :6LATCH        INTEL_M       13
  2384. LINV(P8;L1);
  2385. LINV(P9;L2);
  2386. LINV(P10;L3);
  2387. LINV(P11;L4);
  2388. LINV(P12;L5);
  2389. LINV(P13;L6);
  2390. LAND(P1,P7;L7);
  2391. LNOR(P7,L1;L8);
  2392. LAND(P2,P7;L9);
  2393. LNOR(P7,L2;L10);
  2394. LAND(P3,P7;L11);
  2395. LNOR(P7,L3;L12);
  2396. LAND(P4,P7;L13);
  2397. LNOR(P7,L4;L14);
  2398. LAND(P5,P7;L15);
  2399. LNOR(P7,L5;L16);
  2400. LAND(P6,P7;L17);
  2401. LNOR(P7,L6;L18);
  2402. OR(L7,L8;P8;1,1,1,1);
  2403. OR(L9,L10;P9;1,1,1,1);
  2404. OR(L11,L12;P10;1,1,1,1);
  2405. OR(L13,L14;P11;1,1,1,1);
  2406. OR(L15,L16;P12;1,1,1,1);
  2407. OR(L17,L18;P13;1,1,1,1);
  2408. %
  2409. ;
  2410. ;8LATCH
  2411. ;
  2412. :8LATCH        INTEL_M       17
  2413. LINV(P10;L1);
  2414. LINV(P11;L2);
  2415. LINV(P12;L3);
  2416. LINV(P13;L4);
  2417. LINV(P14;L5);
  2418. LINV(P15;L6);
  2419. LINV(P16;L7);
  2420. LINV(P17;L8);
  2421. LAND(P1,P9;L9);
  2422. LNOR(P9,L1;L10);
  2423. LAND(P2,P9;L11);
  2424. LNOR(P9,L2;L12);
  2425. LAND(P3,P9;L13);
  2426. LNOR(P9,L3;L14);
  2427. LAND(P4,P9;L15);
  2428. LNOR(P9,L4;L16);
  2429. LAND(P5,P9;L17);
  2430. LNOR(P9,L5;L18);
  2431. LAND(P6,P9;L19);
  2432. LNOR(P9,L6;L20);
  2433. LAND(P7,P9;L21);
  2434. LNOR(P9,L7;L22);
  2435. LAND(P8,P9;L23);
  2436. LNOR(P9,L8;L24);
  2437. OR(L9,L10;P10;1,1,1,1);
  2438. OR(L11,L12;P11;1,1,1,1);
  2439. OR(L13,L14;P12;1,1,1,1);
  2440. OR(L15,L16;P13;1,1,1,1);
  2441. OR(L17,L18;P14;1,1,1,1);
  2442. OR(L19,L20;P15;1,1,1,1);
  2443. OR(L21,L22;P16;1,1,1,1);
  2444. OR(L23,L24;P17;1,1,1,1);
  2445. %
  2446. ;
  2447. ;D FLIP FLOP WITH ASYNCHRONOUS PRESET AND CLEAR
  2448. ;
  2449. :DFFPRE        INTEL_M       5
  2450. LINV(P2;L1);
  2451. LINV(P5;L2);
  2452. LAND(P1,L1;L3);
  2453. LNOR(L1,N1;L4);
  2454. LNOR(N1,P4,L1;L5);
  2455. LNOR(P2,P4,L2;L6);
  2456. NOR(L3,L4;N1;1,1,1,1);
  2457. OR(L5,P3,L6;P5;1,1,1,1);
  2458. %
  2459. ;
  2460. ;D LATCH
  2461. ;
  2462. :DLATCH       INTEL_M       3
  2463. LINV(P2;L1);
  2464. LAND(P1,P2;L2);
  2465. LAND(L1,P3;L3);
  2466. OR(L2,L3;P3;1,1,1,1);
  2467. %
  2468. ;
  2469. ;RS LATCH
  2470. ;
  2471. :RSLATCH        INTEL_M       3
  2472. LNOR(P1,P3;L1);
  2473. NOR(P2,L1;P3;1,1,1,1);
  2474. %
  2475. ;
  2476. ;8 BIT TRANSCEIVER
  2477. ;
  2478. :8TRANS        INTEL_M       18
  2479. LINV(P2;L1);
  2480. LAND(P1,L1;L2);
  2481. LAND(P2,P1;L3);
  2482. TSB(P11,L3;P3;1,1,1,1,1,1,1,1);
  2483. TSB(P12,L3;P4;1,1,1,1,1,1,1,1);
  2484. TSB(P13,L3;P5;1,1,1,1,1,1,1,1);
  2485. TSB(P14,L3;P6;1,1,1,1,1,1,1,1);
  2486. TSB(P15,L3;P7;1,1,1,1,1,1,1,1);
  2487. TSB(P16,L3;P8;1,1,1,1,1,1,1,1);
  2488. TSB(P17,L3;P9;1,1,1,1,1,1,1,1);
  2489. TSB(P18,L3;P10;1,1,1,1,1,1,1,1);
  2490. TSB(P3,L2;P11;1,1,1,1,1,1,1,1);
  2491. TSB(P4,L2;P12;1,1,1,1,1,1,1,1);
  2492. TSB(P5,L2;P13;1,1,1,1,1,1,1,1);
  2493. TSB(P6,L2;P14;1,1,1,1,1,1,1,1);
  2494. TSB(P7,L2;P15;1,1,1,1,1,1,1,1);
  2495. TSB(P8,L2;P16;1,1,1,1,1,1,1,1);
  2496. TSB(P9,L2;P17;1,1,1,1,1,1,1,1);
  2497. TSB(P10,L2;P18;1,1,1,1,1,1,1,1);
  2498. %
  2499. ;
  2500. ;4 BIT COMPARATOR
  2501. ;
  2502. :4COMP        INTEL_M       9
  2503. LXNOR(P1,P5;L1);
  2504. LXNOR(P2,P6;L2);
  2505. LXNOR(P3,P7;L3);
  2506. LXNOR(P4,P8;L4);
  2507. AND(L1,L2,L3,L4;P9;1,1,1,1);
  2508. %
  2509. ;
  2510. ;8 BIT COMPARATOR
  2511. ;
  2512. :8COMP        INTEL_M       17
  2513. LXNOR(P1,P9;L1);
  2514. LXNOR(P2,P10;L2);
  2515. LXNOR(P3,P11;L3);
  2516. LXNOR(P4,P12;L4);
  2517. LXNOR(P5,P13;L5);
  2518. LXNOR(P6,P14;L6);
  2519. LXNOR(P7,P15;L7);
  2520. LXNOR(P8,P16;L8);
  2521. AND(L1,L2,L3,L4,L5,L6,L7,L8;P17;1,1,1,1);
  2522. %
  2523. ;
  2524. ;1 BIT ADDER
  2525. ;
  2526. :1ADD        INTEL_M       5
  2527. LINV(P1;L1);
  2528. LINV(P2;L2);
  2529. LINV(P3;L3);
  2530. LAND(P2,P1;L4);
  2531. LAND(P3,P2;L5);
  2532. LAND(P3,P1;L6);
  2533. LNOR(L1,P2,P3;L7);
  2534. LNOR(P1,L2,P3;L8);
  2535. LNOR(P1,P2,L3;L9);
  2536. LAND(P1,P2,P3;L10);
  2537. OR(L4,L5,L6;P5;1,1,1,1);
  2538. OR(L7,L8,L9,L10;P4;1,1,1,1);
  2539. %
  2540. ;
  2541. ;2 BIT MULTIPLIER
  2542. ;
  2543. :2MULT        INTEL_M       8
  2544. LINV(P1;L1);
  2545. LINV(P2;L2);
  2546. LINV(P3;L3);
  2547. LINV(P4;L4);
  2548. LINV(P1;L5);
  2549. LINV(P3;L6);
  2550. LAND(L1,P3,P2;L7);
  2551. LAND(P4,L2,P1;L8);
  2552. LAND(P4,L3,P1;L9);
  2553. LAND(L4,P3,P2;L10);
  2554. LAND(P4,P2,L5;L11);
  2555. LAND(P4,L6,P2;L12);
  2556. AND(P3,P1;P5;1,1,1,1);
  2557. OR(L7,L8,L9,L10;P6;1,1,1,1);
  2558. OR(L11,L12;P7;1,1,1,1);
  2559. AND(P1,P2,P3,P4;P8;1,1,1,1);
  2560. %
  2561. ;
  2562. ;FREQUENCY DIVIDER
  2563. ;
  2564. :FDIV2        INTEL_M       6
  2565. XNOR(N1,P2;N2;1,1,1,1);
  2566. XNOR(N3,P2;N4;1,1,1,1);
  2567. XNOR(N5,P2;N6;1,1,1,1);
  2568. XNOR(N7,P2;N8;1,1,1,1);
  2569. DFFC(N2,P1,IPL;P3,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2570. DFFC(N4,P3,IPL;P4,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2571. DFFC(N6,P4,IPL;P5,N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2572. DFFC(N8,P5,IPL;P6,N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2573. %
  2574. ;
  2575. ;FREQUENCY DIVIDER
  2576. ;
  2577. :FDIV5        INTEL_M       6
  2578. LINV(P3;L1);
  2579. LINV(N3;L2);
  2580. LINV(P2;L3);
  2581. LINV(P2;L4);
  2582. LAND(L1,L2;L5);
  2583. LAND(N4,N3;L6);
  2584. LOR(L5,L6;L7);
  2585. LAND(L7,P2;L8);
  2586. LAND(N3,P2;L9);
  2587. LAND(L3,N4;L10);
  2588. LAND(N4,P2;L11);
  2589. LAND(L4,P3;L12);
  2590. LOR(L9,L10;L13);
  2591. LOR(L11,L12;L14);
  2592. XNOR(N2,L8;N1;1,1,1,1);
  2593. DFFC(N1,P1,IPL;N3,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2594. DQFFC(L13,P1,IPL;N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2595. DQFFC(L14,P1,IPL;P3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2596. LINV(N10;L15);
  2597. LNAND(L15,P5;L16);
  2598. LINV(P2;L17);
  2599. LAND(L16,P2;L18);
  2600. LAND(P5,L17;L19);
  2601. LAND(P2,N10;L20);
  2602. LOR(L19,L20;L21);
  2603. XNOR(N5,P2;N6;1,1,1,1);
  2604. XNOR(N7,P2;N8;1,1,1,1);
  2605. XNOR(N9,L18;N11;1,1,1,1);
  2606. DFFC(N6,P3,IPL;P4,N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2607. DFFC(N8,P4,IPL;P6,N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2608. DFFC(N11,P3,IPL;N10,N9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2609. DQFFC(L21,P3,IPL;P5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2610. %
  2611. ;
  2612. ;1 TO 2 DECODER
  2613. ;
  2614. :1DEC        INTEL_M       3
  2615. INV(P1;P2;1,1,1,1);
  2616. BUF(P1;P3;1,1,1,1);
  2617. %
  2618. ;
  2619. ;3 TO 8 DECODER
  2620. ;
  2621. :3DEC        INTEL_M       11
  2622.    LINV(P1;L1);
  2623.    LINV(P2;L2);
  2624.    LINV(P3;L3);
  2625.    AND(L1,L2,L3;P4;1,1,1,1);
  2626.    AND(P1,L2,L3;P5;1,1,1,1);
  2627.    AND(L1,P2,L3;P6;1,1,1,1);
  2628.    AND(P1,P2,L3;P7;1,1,1,1);
  2629.    AND(L1,L2,P3;P8;1,1,1,1);
  2630.    AND(P1,L2,P3;P9;1,1,1,1);
  2631.    AND(L1,P2,P3;P10;1,1,1,1);
  2632.    AND(P1,P2,P3;P11;1,1,1,1);
  2633. %
  2634. ;
  2635. ;2 TO 4 DECODER
  2636. ;
  2637. :2DEC        INTEL_M       6
  2638.    LINV(P1;L1);
  2639.    LINV(P2;L2);
  2640.    AND(L1,L2;P3;1,1,1,1);
  2641.    AND(P1,L2;P4;1,1,1,1);
  2642.    AND(L1,P2;P5;1,1,1,1);
  2643.    AND(P1,P2;P6;1,1,1,1);
  2644. %
  2645. ;
  2646. ;4 TO 16 DECODER
  2647. ;
  2648. :4DEC        INTEL_M       20
  2649.    LINV(P1;L1);
  2650.    LINV(P2;L2);
  2651.    LINV(P3;L3);
  2652.    LINV(P4;L4);
  2653.    AND(L1,L2,L3,L4;P5;1,1,1,1);
  2654.    AND(P1,L2,L3,L4;P6;1,1,1,1);
  2655.    AND(L1,P2,L3,L4;P7;1,1,1,1);
  2656.    AND(P1,P2,L3,L4;P8;1,1,1,1);
  2657.    AND(L1,L2,P3,L4;P9;1,1,1,1);
  2658.    AND(P1,L2,P3,L4;P10;1,1,1,1);
  2659.    AND(L1,P2,P3,L4;P11;1,1,1,1);
  2660.    AND(P1,P2,P3,L4;P12;1,1,1,1);
  2661.    AND(L1,L2,L3,P4;P13;1,1,1,1);
  2662.    AND(P1,L2,L3,P4;P14;1,1,1,1);
  2663.    AND(L1,P2,L3,P4;P15;1,1,1,1);
  2664.    AND(P1,P2,L3,P4;P16;1,1,1,1);
  2665.    AND(L1,L2,P3,P4;P17;1,1,1,1);
  2666.    AND(P1,L2,P3,P4;P18;1,1,1,1);
  2667.    AND(L1,P2,P3,P4;P19;1,1,1,1);
  2668.    AND(P1,P2,P3,P4;P20;1,1,1,1);
  2669. %
  2670. ;
  2671. ;2 BIT SHIFT WITH PARALLEL LOAD
  2672. ;
  2673. :2SHIFT        INTEL_M       9
  2674. LINV(P6;L1);
  2675. LINV(P4;L2);
  2676. LINV(P7;L3);
  2677. LINV(L1;L4);
  2678. LINV(L2;L5);
  2679. LAND(L3,IPL;L6);
  2680. LAND(P3,L5;L7);
  2681. LAND(L2,P1,L4;L8);
  2682. LAND(L2,L1,P8;L9);
  2683. LAND(P8,L5;L10);
  2684. LAND(L2,P2,L4;L11);
  2685. LAND(L2,L1,P9;L12);
  2686. LOR(L7,L8,L9;L13);
  2687. LOR(L10,L11,L12;L14);
  2688. DQFFC(L13,P5,L6;P8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2689. DQFFC(L14,P5,L6;P9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2690. %
  2691. ;
  2692. ;4 BIT SHIFT WITH PARALLEL LOAD
  2693. ;
  2694. :4SHIFT        INTEL_M       13
  2695. LINV(P8;L1);
  2696. LINV(P6;L2);
  2697. LINV(P9;L3);
  2698. LINV(L1;L4);
  2699. LINV(L2;L5);
  2700. LAND(L3,IPL;L6);
  2701. LAND(P5,L5;L7);
  2702. LAND(L2,P1,L4;L8);
  2703. LAND(L2,L1,P10;L9);
  2704. LAND(P10,L5;L10);
  2705. LAND(L2,P2,L4;L11);
  2706. LAND(L2,L1,P11;L12);
  2707. LAND(P11,L5;L13);
  2708. LAND(L2,P3,L4;L14);
  2709. LAND(L2,L1,P12;L15);
  2710. LAND(P12,L5;L16);
  2711. LAND(L2,P4,L4;L17);
  2712. LAND(L2,L1,P13;L18);
  2713. LOR(L7,L8,L9;L19);
  2714. LOR(L10,L11,L12;L20);
  2715. LOR(L13,L14,L15;L21);
  2716. LOR(L16,L17,L18;L22);
  2717. DQFFC(L19,P7,L6;P10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2718. DQFFC(L20,P7,L6;P11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2719. DQFFC(L21,P7,L6;P12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2720. DQFFC(L22,P7,L6;P13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2721. %
  2722. ;
  2723. ;8 BIT SHIFT WITH PARALLEL LOAD
  2724. ;
  2725. :8SHIFT        INTEL_M       21
  2726. LINV(P12;L1);
  2727. LINV(P10;L2);
  2728. LINV(P13;L3);
  2729. LINV(L1;L4);
  2730. LINV(L2;L5);
  2731. LAND(L3,IPL;L6);
  2732. LAND(P9,L5;L7);
  2733. LAND(L2,P1,L4;L8);
  2734. LAND(L2,L1,P14;L9);
  2735. LAND(P14,L5;L10);
  2736. LAND(L2,P2,L4;L11);
  2737. LAND(L2,L1,P15;L12);
  2738. LAND(P15,L5;L13);
  2739. LAND(L2,P3,L4;L14);
  2740. LAND(L2,L1,P16;L15);
  2741. LAND(P16,L5;L16);
  2742. LAND(L2,P4,L4;L17);
  2743. LAND(L2,L1,P17;L18);
  2744. LAND(P17,L5;L19);
  2745. LAND(L2,P5,L4;L20);
  2746. LAND(L2,L1,P18;L21);
  2747. LAND(P18,L5;L22);
  2748. LAND(L2,P6,L4;L23);
  2749. LAND(L2,L1,P19;L24);
  2750. LAND(P19,L5;L25);
  2751. LAND(L2,P7,L4;L26);
  2752. LAND(L2,L1,P20;L27);
  2753. LAND(P20,L5;L28);
  2754. LAND(L2,P8,L4;L29);
  2755. LAND(L2,L1,P21;L30);
  2756. LOR(L7,L8,L9;L31);
  2757. LOR(L10,L11,L12;L32);
  2758. LOR(L13,L14,L15;L33);
  2759. LOR(L16,L17,L18;L34);
  2760. LOR(L19,L20,L21;L35);
  2761. LOR(L22,L23,L24;L36);
  2762. LOR(L25,L26,L27;L37);
  2763. LOR(L28,L29,L30;L38);
  2764. DQFFC(L31,P11,L6;P14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2765. DQFFC(L32,P11,L6;P15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2766. DQFFC(L33,P11,L6;P16;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2767. DQFFC(L34,P11,L6;P17;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2768. DQFFC(L35,P11,L6;P18;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2769. DQFFC(L36,P11,L6;P19;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2770. DQFFC(L37,P11,L6;P20;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2771. DQFFC(L38,P11,L6;P21;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2772. %
  2773. ;
  2774. ;16 BIT SHIFT WITH PARALLEL LOAD
  2775. ;
  2776. :16SHIFT        INTEL_M       37
  2777. LINV(P20;L1);
  2778. LINV(P18;L2);
  2779. LINV(P21;L3);
  2780. LINV(L1;L4);
  2781. LINV(L2;L5);
  2782. LAND(L3,IPL;L6);
  2783. LAND(P17,L5;L7);
  2784. LAND(L2,P1,L4;L8);
  2785. LAND(L2,L1,P22;L9);
  2786. LAND(P22,L5;L10);
  2787. LAND(L2,P2,L4;L11);
  2788. LAND(L2,L1,P23;L12);
  2789. LAND(P23,L5;L13);
  2790. LAND(L2,P3,L4;L14);
  2791. LAND(L2,L1,P24;L15);
  2792. LAND(P24,L5;L16);
  2793. LAND(L2,P4,L4;L17);
  2794. LAND(L2,L1,P25;L18);
  2795. LAND(P25,L5;L19);
  2796. LAND(L2,P5,L4;L20);
  2797. LAND(L2,L1,P26;L21);
  2798. LAND(P26,L5;L22);
  2799. LAND(L2,P6,L4;L23);
  2800. LAND(L2,L1,P27;L24);
  2801. LAND(P27,L5;L25);
  2802. LAND(L2,P7,L4;L26);
  2803. LAND(L2,L1,P28;L27);
  2804. LAND(P28,L5;L28);
  2805. LAND(L2,P8,L4;L29);
  2806. LAND(L2,L1,P29;L30);
  2807. LAND(P29,L5;L31);
  2808. LAND(L2,P9,L4;L32);
  2809. LAND(L2,L1,P30;L33);
  2810. LAND(P30,L5;L34);
  2811. LAND(L2,P10,L4;L35);
  2812. LAND(L2,L1,P31;L36);
  2813. LAND(P31,L5;L37);
  2814. LAND(L2,P11,L4;L38);
  2815. LAND(L2,L1,P32;L39);
  2816. LAND(P32,L5;L40);
  2817. LAND(L2,P12,L4;L41);
  2818. LAND(L2,L1,P33;L42);
  2819. LAND(P33,L5;L43);
  2820. LAND(L2,P13,L4;L44);
  2821. LAND(L2,L1,P34;L45);
  2822. LAND(P34,L5;L46);
  2823. LAND(L2,P14,L4;L47);
  2824. LAND(L2,L1,P35;L48);
  2825. LAND(P35,L5;L49);
  2826. LAND(L2,P15,L4;L50);
  2827. LAND(L2,L1,P36;L51);
  2828. LAND(P36,L5;L52);
  2829. LAND(L2,P16,L4;L53);
  2830. LAND(L2,L1,P37;L54);
  2831. LOR(L7,L8,L9;L55);
  2832. LOR(L10,L11,L12;L56);
  2833. LOR(L13,L14,L15;L57);
  2834. LOR(L16,L17,L18;L58);
  2835. LOR(L19,L20,L21;L59);
  2836. LOR(L22,L23,L24;L60);
  2837. LOR(L25,L26,L27;L61);
  2838. LOR(L28,L29,L30;L62);
  2839. LOR(L31,L32,L33;L63);
  2840. LOR(L34,L35,L36;L64);
  2841. LOR(L37,L38,L39;L65);
  2842. LOR(L40,L41,L42;L66);
  2843. LOR(L43,L44,L45;L67);
  2844. LOR(L46,L47,L48;L68);
  2845. LOR(L49,L50,L51;L69);
  2846. LOR(L52,L53,L54;L70);
  2847. DQFFC(L55,P19,L6;P22;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2848. DQFFC(L56,P19,L6;P23;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2849. DQFFC(L57,P19,L6;P24;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2850. DQFFC(L58,P19,L6;P25;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2851. DQFFC(L59,P19,L6;P26;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2852. DQFFC(L60,P19,L6;P27;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2853. DQFFC(L61,P19,L6;P28;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2854. DQFFC(L62,P19,L6;P29;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2855. DQFFC(L63,P19,L6;P30;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2856. DQFFC(L64,P19,L6;P31;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2857. DQFFC(L65,P19,L6;P32;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2858. DQFFC(L66,P19,L6;P33;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2859. DQFFC(L67,P19,L6;P34;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2860. DQFFC(L68,P19,L6;P35;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2861. DQFFC(L69,P19,L6;P36;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2862. DQFFC(L70,P19,L6;P37;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2863. %
  2864. ;
  2865. ;8 BIT ODD PARITY GENERATOR
  2866. ;
  2867. :8PARODD        INTEL_M       9
  2868. LXNOR(P1,P2;L1);
  2869. LXNOR(P3,P4;L2);
  2870. LXNOR(P5,P6;L3);
  2871. LXNOR(P7,P8;L4);
  2872. LXOR(L1,L2;L5);
  2873. LXOR(L3,L4;L6);
  2874. XOR(L5,L6;P9;1,1,1,1);
  2875. %
  2876. ;
  2877. ;8 BIT EVEN PARITY GENERATOR
  2878. ;
  2879. :8PAREVN        INTEL_M       9
  2880. LXNOR(P1,P2;L1);
  2881. LXNOR(P3,P4;L2);
  2882. LXNOR(P5,P6;L3);
  2883. LXNOR(P7,P8;L4);
  2884. LXOR(L1,L2;L5);
  2885. LXOR(L3,L4;L6);
  2886. XNOR(L5,L6;P9;1,1,1,1);
  2887. %
  2888. ;
  2889. ;4 TO 1 MULTIPLEXOR
  2890. ;
  2891. :4MUX        INTEL_M       7
  2892.    LINV(P6;L1);
  2893.    LINV(P5;L2);
  2894.    LAND(L1,L2,P1;L3);
  2895.    LAND(L1,P5,P2;L4);
  2896.    LAND(P6,L2,P3;L5);
  2897.    LAND(P6,P5,P4;L6);
  2898.    OR(L3,L4,L5,L6;P7;1,1,1,1);
  2899. %
  2900. ;
  2901. ;8 TO 1 MULTIPLEXOR
  2902. ;
  2903. :8MUX        INTEL_M       12
  2904.    LINV(P9;L1);
  2905.    LINV(P10;L2);
  2906.    LINV(P11;L3);
  2907.    LAND(P1,L1,L2,L3;L8);
  2908.    LAND(P2,P9,L2,L3;L9);
  2909.    LAND(P3,L1,P10,L3;L10);
  2910.    LAND(P4,P9,P10,L3;L11);
  2911.    LAND(P5,P11,L1,L2;L12);
  2912.    LAND(P6,P11,P9,L2;L13);
  2913.    LAND(P7,P11,L1,P10;L14);
  2914.    LAND(P8,P11,P9,P10;L15);
  2915.    OR(L8,L9,L10,L11,L12,L13,L14,L15;P12;1,1,1,1);
  2916. %
  2917. ;
  2918. ;16 TO MULTIPLEXOR
  2919. ;
  2920. :16MUX        INTEL_M       21
  2921. LINV(P17;L1);
  2922. LINV(P18;L2);
  2923. LINV(P19;L3);
  2924. LINV(P20;L4);
  2925. LAND(P1,L1,L2,L3,L4;L5);
  2926. LAND(P2,P17,L2,L3,L4;L6);
  2927. LAND(P3,L1,P18,L3,L4;L7);
  2928. LAND(P4,P17,P18,L3,L4;L8);
  2929. LAND(P5,L1,L2,P19,L4;L9);
  2930. LAND(P6,P17,L2,P19,L4;L10);
  2931. LAND(P7,L1,P18,P19,L4;L11);
  2932. LAND(P8,P17,P18,P19,L4;L12);
  2933. LAND(P9,L1,L2,L3,P20;L13);
  2934. LAND(P10,P17,L2,L3,P20;L14);
  2935. LAND(P11,L1,P18,L3,P20;L15);
  2936. LAND(P12,P17,P18,L3,P20;L16);
  2937. LAND(P13,L1,L2,P19,P20;L17);
  2938. LAND(P14,P17,L2,P19,P20;L18);
  2939. LAND(P15,L1,P18,P19,P20;L19);
  2940. LAND(P16,P17,P18,P19,P20;L20);
  2941. OR(L5,L6,L7,L8,L9,L10,L11,L12,L13,L14,L15,L16,L17,L18,L19,L20;P21;1,1,1,1);
  2942. %
  2943. ;
  2944. ;BCD TO SEVEN SEGMENT DECODER
  2945. ;
  2946. :7SEG        INTEL_M       11
  2947.    LINV(P1;L1);
  2948.    LINV(P2;L2);
  2949.    LINV(P3;L3);
  2950.    LINV(P4;L4);
  2951.    LAND(P2,P4;L9);
  2952.    LAND(L1,P3;L10);
  2953.    LAND(P1,L2,L3,L4;L11);
  2954.    LAND(P1,L2,P3;L12);
  2955.    LAND(L1,P2,P3;L13);
  2956.    LAND(P3,P4;L14);
  2957.    LAND(L1,P2,L3;L15);
  2958.    LAND(L1,L2,P3;L16);
  2959.    LAND(P1,P2,P3;L17);
  2960.    LAND(P1,L2,L3;L18);
  2961.    LAND(L2,P3;L19);
  2962.    LAND(P1,P2;L20);
  2963.    LAND(P2,L3;L21);
  2964.    LAND(P1,L3,L4;L22);
  2965.    LAND(L2,L3,L4;L23);
  2966.    NOR(L9,L10,L11;P5;1,1,1,1);
  2967.    NOR(L9,L12,L13;P6;1,1,1,1);
  2968.    NOR(L14,L15;P7;1,1,1,1);
  2969.    NOR(L16,L17,L18;P8;1,1,1,1);
  2970.    NOR(P1,L19;P9;1,1,1,1);
  2971.    NOR(L20,L21,L22;P10;1,1,1,1);
  2972.    NOR(L17,L23;P11;1,1,1,1);
  2973. %
  2974. ;
  2975. ;2 BIT BINARY COUNTER WITH SYNCHRONOUS LOAD ASYNCHRONOUS CLEAR
  2976. ;
  2977. :2CNT        INTEL_M       7
  2978. LINV(P4;L1);
  2979. LAND(P4,P1;L2);
  2980. LAND(P4,P2;L3);
  2981. LINV(P5;L4);
  2982. LAND(L4,IPL;L5);
  2983. LAND(L1,N1;L6);
  2984. LAND(P7,N1,L1;L7);
  2985. LAND(P6,L1,N2;L8);
  2986. LOR(L2,L6;L9);
  2987. LOR(L7,L8,L3;L10);
  2988. DFFC(L9,P3,L5;P6,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2989. DFFC(L10,P3,L5;P7,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  2990. %
  2991. ;
  2992. ;4 BIT BINARY COUNTER WITH SYNCHRONOUS LOAD ASYNCHRONOUS CLEAR
  2993. ;
  2994. :4CNT        INTEL_M       11
  2995. LINV(P6;L1);
  2996. LAND(P6,P1;L2);
  2997. LAND(P6,P2;L3);
  2998. LAND(P6,P3;L4);
  2999. LAND(P6,P4;L5);
  3000. LINV(P7;L6);
  3001. LAND(L6,IPL;L7);
  3002. LNAND(P8,P9;L8);
  3003. LNAND(P8,P9,P10;L9);
  3004. LAND(L1,N1;L10);
  3005. LAND(P9,N1,L1;L11);
  3006. LAND(P8,L1,N2;L12);
  3007. LAND(P10,L8,L1;L13);
  3008. LAND(P8,P9,L1,N3;L14);
  3009. LAND(P11,L9,L1;L15);
  3010. LAND(P8,P9,P10,L1,N4;L16);
  3011. LOR(L2,L10;L17);
  3012. LOR(L11,L12,L3;L18);
  3013. LOR(L13,L14,L4;L19);
  3014. LOR(L15,L16,L5;L20);
  3015. DFFC(L17,P5,L7;P8,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3016. DFFC(L18,P5,L7;P9,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3017. DFFC(L19,P5,L7;P10,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3018. DFFC(L20,P5,L7;P11,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3019. %
  3020. ;
  3021. ;8 BIT BINARY COUNTER WITH SYNCHRONOUS LOAD ASYNCHRONOUS CLEAR
  3022. ;
  3023. :8CNT        INTEL_M       19
  3024. LINV(P10;L1);
  3025. LAND(P10,P1;L2);
  3026. LAND(P10,P2;L3);
  3027. LAND(P10,P3;L4);
  3028. LAND(P10,P4;L5);
  3029. LAND(P10,P5;L6);
  3030. LAND(P10,P6;L7);
  3031. LAND(P10,P7;L8);
  3032. LAND(P10,P8;L9);
  3033. LINV(P11;L10);
  3034. LAND(L10,IPL;L11);
  3035. LNAND(P12,P13;L12);
  3036. LNAND(P12,P13,P14;L13);
  3037. LNAND(P12,P13,P14,P15;L14);
  3038. LNAND(P12,P13,P14,P15,P16;L15);
  3039. LNAND(P12,P13,P14,P15,P16,P17;L16);
  3040. LNAND(P12,P13,P14,P15,P16,P17,P18;L17);
  3041. LAND(L1,N1;L18);
  3042. LAND(P13,N1,L1;L19);
  3043. LAND(P12,L1,N2;L20);
  3044. LAND(P14,L12,L1;L21);
  3045. LAND(P12,P13,L1,N3;L22);
  3046. LAND(P15,L13,L1;L23);
  3047. LAND(P12,P13,P14,L1,N4;L24);
  3048. LAND(P16,L14,L1;L25);
  3049. LAND(P12,P13,P14,P15,L1,N5;L26);
  3050. LAND(P17,L15,L1;L27);
  3051. LAND(P12,P13,P14,P15,P16,L1,N6;L28);
  3052. LAND(P18,L16,L1;L29);
  3053. LAND(P12,P13,P14,P15,P16,P17,L1,N7;L30);
  3054. LAND(P19,L17,L1;L31);
  3055. LAND(P12,P13,P14,P15,P16,P17,P18,L1,N8;L32);
  3056. LOR(L2,L18;L33);
  3057. LOR(L19,L20,L3;L34);
  3058. LOR(L21,L22,L4;L35);
  3059. LOR(L23,L24,L5;L36);
  3060. LOR(L25,L26,L6;L37);
  3061. LOR(L27,L28,L7;L38);
  3062. LOR(L29,L30,L8;L39);
  3063. LOR(L31,L32,L9;L40);
  3064. DFFC(L33,P9,L11;P12,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3065. DFFC(L34,P9,L11;P13,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3066. DFFC(L35,P9,L11;P14,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3067. DFFC(L36,P9,L11;P15,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3068. DFFC(L37,P9,L11;P16,N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3069. DFFC(L38,P9,L11;P17,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3070. DFFC(L39,P9,L11;P18,N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3071. DFFC(L40,P9,L11;P19,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3072. %
  3073. ;
  3074. ;16 BIT BINARY COUNTER WITH SYNCHRONOUS LOAD ASYNCHRONOUS CLEAR
  3075. ;
  3076. :16CNT        INTEL_M       35
  3077. LINV(P18;L1);
  3078. LAND(P18,P1;L2);
  3079. LAND(P18,P2;L3);
  3080. LAND(P18,P3;L4);
  3081. LAND(P18,P4;L5);
  3082. LAND(P18,P5;L6);
  3083. LAND(P18,P6;L7);
  3084. LAND(P18,P7;L8);
  3085. LAND(P18,P8;L9);
  3086. LAND(P18,P9;L10);
  3087. LAND(P18,P10;L11);
  3088. LAND(P18,P11;L12);
  3089. LAND(P18,P12;L13);
  3090. LAND(P18,P13;L14);
  3091. LAND(P18,P14;L15);
  3092. LAND(P18,P15;L16);
  3093. LAND(P18,P16;L17);
  3094. LINV(P19;L18);
  3095. LAND(L18,IPL;L19);
  3096. LNAND(P20,P21;L20);
  3097. LNAND(P20,P21,P22;L21);
  3098. LNAND(P20,P21,P22,P23;L22);
  3099. LNAND(P20,P21,P22,P23,P24;L23);
  3100. LNAND(P20,P21,P22,P23,P24,P25;L24);
  3101. LNAND(P20,P21,P22,P23,P24,P25,P26;L25);
  3102. LNAND(P20,P21,P22,P23,P24,P25,P26,P27;L26);
  3103. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28;L27);
  3104. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29;L28);
  3105. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30;L29);
  3106. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31;L30);
  3107. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32;L31);
  3108. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32,P33;L32);
  3109. LNAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32,P33,P34;L33);
  3110. LAND(L1,N1;L34);
  3111. LAND(P21,N1,L1;L35);
  3112. LAND(P20,L1,N2;L36);
  3113. LAND(P22,L20,L1;L37);
  3114. LAND(P20,P21,L1,N3;L38);
  3115. LAND(P23,L21,L1;L39);
  3116. LAND(P20,P21,P22,L1,N4;L40);
  3117. LAND(P24,L22,L1;L41);
  3118. LAND(P20,P21,P22,P23,L1,N5;L42);
  3119. LAND(P25,L23,L1;L43);
  3120. LAND(P20,P21,P22,P23,P24,L1,N6;L44);
  3121. LAND(P26,L24,L1;L45);
  3122. LAND(P20,P21,P22,P23,P24,P25,L1,N7;L46);
  3123. LAND(P27,L25,L1;L47);
  3124. LAND(P20,P21,P22,P23,P24,P25,P26,L1,N8;L48);
  3125. LAND(P28,L26,L1;L49);
  3126. LAND(P20,P21,P22,P23,P24,P25,P26,P27,L1,N9;L50);
  3127. LAND(P29,L27,L1;L51);
  3128. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,L1,N10;L52);
  3129. LAND(P30,L28,L1;L53);
  3130. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,L1,N11;L54);
  3131. LAND(P31,L29,L1;L55);
  3132. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,L1,N12;L56);
  3133. LAND(P32,L30,L1;L57);
  3134. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,L1,N13;L58);
  3135. LAND(P33,L31,L1;L59);
  3136. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32,L1,N14;L60);
  3137. LAND(P34,L32,L1;L61);
  3138. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32,P33,L1,N15;L62);
  3139. LAND(P35,L33,L1;L63);
  3140. LAND(P20,P21,P22,P23,P24,P25,P26,P27,P28,P29,P30,P31,P32,P33,P34,L1,N16;L64);
  3141. LOR(L2,L34;L65);
  3142. LOR(L35,L36,L3;L66);
  3143. LOR(L37,L38,L4;L67);
  3144. LOR(L39,L40,L5;L68);
  3145. LOR(L41,L42,L6;L69);
  3146. LOR(L43,L44,L7;L70);
  3147. LOR(L45,L46,L8;L71);
  3148. LOR(L47,L48,L9;L72);
  3149. LOR(L49,L50,L10;L73);
  3150. LOR(L51,L52,L11;L74);
  3151. LOR(L53,L54,L12;L75);
  3152. LOR(L55,L56,L13;L76);
  3153. LOR(L57,L58,L14;L77);
  3154. LOR(L59,L60,L15;L78);
  3155. LOR(L61,L62,L16;L79);
  3156. LOR(L63,L64,L17;L80);
  3157. DFFC(L65,P17,L19;P20,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3158. DFFC(L66,P17,L19;P21,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3159. DFFC(L67,P17,L19;P22,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3160. DFFC(L68,P17,L19;P23,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3161. DFFC(L69,P17,L19;P24,N5;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3162. DFFC(L70,P17,L19;P25,N6;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3163. DFFC(L71,P17,L19;P26,N7;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3164. DFFC(L72,P17,L19;P27,N8;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3165. DFFC(L73,P17,L19;P28,N9;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3166. DFFC(L74,P17,L19;P29,N10;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3167. DFFC(L75,P17,L19;P30,N11;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3168. DFFC(L76,P17,L19;P31,N12;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3169. DFFC(L77,P17,L19;P32,N13;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3170. DFFC(L78,P17,L19;P33,N14;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3171. DFFC(L79,P17,L19;P34,N15;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3172. DFFC(L80,P17,L19;P35,N16;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3173. %
  3174. ;
  3175. ;BINARY TO GRAY CONVERTOR
  3176. ;
  3177. :BINGRY        INTEL_M       8
  3178. XOR(P1,P2;P5;1,1,1,1);
  3179. XOR(P2,P3;P6;1,1,1,1);
  3180. XOR(P3,P4;P7;1,1,1,1);
  3181. TSB(P4,ONE;P8;1,1,1,1,1,1,1,1);
  3182. %
  3183. ;
  3184. ;GRAY CODE TO BINARY CONVERTOR
  3185. ;
  3186. :GRYBIN        INTEL_M       8
  3187. LXOR(P1,P2;L1);
  3188. LXOR(P3,P4;L2);
  3189. LXOR(P3,P4;L3);
  3190. XOR(L1,L2;P5;1,1,1,1);
  3191. XOR(P2,L3;P6;1,1,1,1);
  3192. XOR(P3,P4;P7;1,1,1,1);
  3193. TSB(P4,IPL;P8;1,1,1,1,1,1,1,1);
  3194. %
  3195. ;
  3196. ;10 TO 4 LINE DE-MULTIPLEXOR
  3197. ;
  3198. :10MUXBCD        INTEL_M       14
  3199. LINV(P1;L1);
  3200. LINV(P2;L2);
  3201. LINV(P3;L3);
  3202. LINV(P4;L4);
  3203. LINV(P5;L5);
  3204. LINV(P6;L6);
  3205. LINV(P7;L7);
  3206. LINV(P8;L8);
  3207. LINV(P9;L9);
  3208. LINV(P10;L10);
  3209. LAND(L1,P2,L3,L4,L5,L6,L7,L8,L9,L10;L11);
  3210. LAND(L1,L2,P3,L4,L5,L6,L7,L8,L9,L10;L12);
  3211. LAND(L1,L2,L3,P4,L5,L6,L7,L8,L9,L10;L13);
  3212. LAND(L1,L2,L3,L4,P5,L6,L7,L8,L9,L10;L14);
  3213. LAND(L1,L2,L3,L4,L5,P6,L7,L8,L9,L10;L15);
  3214. LAND(L1,L2,L3,L4,L5,L6,P7,L8,L9,L10;L16);
  3215. LAND(L1,L2,L3,L4,L5,L6,L7,P8,L9,L10;L17);
  3216. LAND(L1,L2,L3,L4,L5,L6,L7,L8,P9,L10;L18);
  3217. LAND(L1,L2,L3,L4,L5,L6,L7,L8,L9,P10;L19);
  3218. OR(L11,L13,L15,L17,L19;P11;1,1,1,1);
  3219. OR(L12,L13,L16,L17;P12;1,1,1,1);
  3220. OR(L14,L15,L16,L17;P13;1,1,1,1);
  3221. OR(L18,L19;P14;1,1,1,1);
  3222. %
  3223. ;
  3224. ;4 BIT DECADE COUNTER WITH SYNCHRONOUS LOAD ASYNCHRONOUS CLEAR
  3225. ;
  3226. :BCDCNT        INTEL_M       11
  3227. LINV(P6;L1);
  3228. LAND(P6,P1;L2);
  3229. LAND(P6,P2;L3);
  3230. LAND(P6,P3;L4);
  3231. LAND(P6,P4;L5);
  3232. LINV(P7;L6);
  3233. LAND(L6,IPL;L7);
  3234. LAND(P8,P11;L8);
  3235. LINV(L8;L9);
  3236. LXOR(N1,L8;L10);
  3237. LNAND(P8,P9;L11);
  3238. LNAND(P8,P9,P10;L12);
  3239. LAND(L1,N1;L13);
  3240. LAND(P9,L10,L1;L14);
  3241. LAND(P8,L1,L9,N2;L15);
  3242. LAND(P10,L11,L1;L16);
  3243. LAND(P8,P9,L1,N3;L17);
  3244. LAND(P11,L12,L1,L9;L18);
  3245. LAND(P8,P9,P10,L1,N4;L19);
  3246. LOR(L2,L13;L20);
  3247. LOR(L14,L15,L3;L21);
  3248. LOR(L16,L17,L4;L22);
  3249. LOR(L18,L19,L5;L23);
  3250. DFFC(L20,P5,L7;P8,N1;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3251. DFFC(L21,P5,L7;P9,N2;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3252. DFFC(L22,P5,L7;P10,N3;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3253. DFFC(L23,P5,L7;P11,N4;1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1);
  3254. %
  3255.