Help for this page

Select Code to Download


  1. or download this
    $ perl -Mstrict -Mwarnings -E '
    my $x = qq{tlp_p2 <= (((((((NOT(tlp_p0(0) XOR tlp_add_p0(0)) AND\n
+};
...
NOT(tlp_p0(0) XOR tlp_add_p0(0)
NOT(tlp_p0(1) XOR tlp_add_p0(1)
NOT(tlp_p0(2) XOR tlp_add_p0(2)
  2. or download this
    $ perl -Mstrict -Mwarnings -E '
    my $x = qq{tlp_p2 <= (((((((NOT(tlp_p0(0) XOR tlp_add_p0(0)) AND\n
+};
...
NOT(tlp_p0(0) XOR tlp_add_p0(0)
NOT(tlp_p0(1) XOR tlp_add_p0(1))
NOT(tlp_p0(2) XOR tlp_add_p0(2))