(MILAWA::LIST-LIST-FIX
     (17 2
         (:REWRITE MILAWA::RANK-WHEN-NOT-CONSP))
     (8 2
        (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (7 2
        (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (4 4 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (4 1
        (:REWRITE MILAWA::RANK-WHEN-MEMBERP-WEAK))
     (4 1 (:REWRITE MILAWA::RANK-WHEN-MEMBERP))
     (2 2
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (2 2
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (2 2 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (2 2
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (2 2
        (:REWRITE MILAWA::MEMBERP-WHEN-MEMBERP-OF-CDR))
     (2 2
        (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-TWO))
     (2 2
        (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-ONE))
     (2 2
        (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (2 2
        (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (1 1 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (1 1
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (1 1
        (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP)))
(MILAWA::FAST-LIST-LIST-FIX$
     (17 2
         (:REWRITE MILAWA::RANK-WHEN-NOT-CONSP))
     (8 2
        (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (7 2
        (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (4 4 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (4 1
        (:REWRITE MILAWA::RANK-WHEN-MEMBERP-WEAK))
     (4 1 (:REWRITE MILAWA::RANK-WHEN-MEMBERP))
     (2 2
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (2 2
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (2 2 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (2 2
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (2 2
        (:REWRITE MILAWA::MEMBERP-WHEN-MEMBERP-OF-CDR))
     (2 2
        (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-TWO))
     (2 2
        (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-ONE))
     (2 2
        (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (2 2
        (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (1 1 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (1 1
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (1 1
        (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP)))
(MILAWA::LIST-LIST-FIX-WHEN-NOT-CONSP
     (4 1
        (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (3 1
        (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (1 1
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (1 1
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (1 1 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (1 1
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (1 1 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (1 1
        (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (1 1
        (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP)))
(MILAWA::LIST-LIST-FIX-OF-CONS
     (63 6
         (:REWRITE MILAWA::LIST-LIST-FIX-WHEN-NOT-CONSP))
     (50 15
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (50 5
         (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
     (47 17
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (39 17
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (35 5
         (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
     (17 17
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (17 17
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (15 15
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (10 10
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (10 10
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (10 10 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (3 3
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (3 3
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
     (3 3
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
     (2 2 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (2 2
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (2 2
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (2 2
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (2 2
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (2 2
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (2 2 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (2 2
        (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP)))
(MILAWA::TRUE-LISTP-OF-LIST-LIST-FIX
     (111 31
          (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (88 25
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (72 25
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (31 31
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (25 25
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (25 25
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (24 2
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (21 21
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (21 21
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (21 21 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (20 2
         (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (12 2
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (12 2
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (5 5 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (5 5
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (5 5
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (5 5
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (5 5
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (5 5
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (5 5
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (5 5 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (4 4 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (4 4
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (4 4
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (4 4 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (4 4
        (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (2 2
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY)))
(MILAWA::LEN-OF-LIST-LIST-FIX
     (73 27
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (50 17
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (36 9
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (27 27
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (27 27
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (21 21 (:REWRITE MILAWA::LEN-WHEN-TUPLEP))
     (18 18 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (18 18 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (18 18
         (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (11 11
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (11 11
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (11 11
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (11 11
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (10 10
         (:REWRITE MILAWA::TRUE-LISTP-OF-LIST-LIST-FIX))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (9 9
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (9 9
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
     (8 8
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (8 8
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (8 8
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (8 8
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (8 8
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (8 8 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (4 4 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (4 2 (:REWRITE MILAWA::NFIX-WHEN-ZP-CHEAP))
     (3 2
        (:REWRITE MILAWA::NFIX-WHEN-NOT-NATP-CHEAP))
     (1 1
        (:REWRITE MILAWA::ZP-WHEN-NOT-NATP-CHEAP))
     (1 1
        (:REWRITE MILAWA::ZP-WHEN-NATP-CHEAP)))
(MILAWA::CONSP-OF-LIST-LIST-FIX
     (94 25
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (28 28
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (28 28
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (24 24
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (24 24
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (23 23
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (23 23
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (23 23 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (18 18
         (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (18 18
         (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (13 13
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (13 13
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (13 13
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (13 13
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (13 13
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (11 11 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (6 1
        (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (6 1
        (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (5 1
        (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (2 2 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (2 2
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (2 2
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (2 2 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (2 2
        (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (1 1
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (1 1
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (1 1
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE)))
(MILAWA::CAR-OF-LIST-LIST-FIX
     (48 21
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (41 13
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (40 4
         (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
     (39 21
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (28 4
         (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
     (24 4
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (24 4
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (24 4
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (21 21
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (21 21
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (20 4
         (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
     (16 4
         (:REWRITE MILAWA::PREFIXP-OF-LIST-FIX-TWO))
     (13 13
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (9 9 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (9 9
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (9 9 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (9 9
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
     (9 9
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
     (8 8 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (8 8
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (8 8
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (8 8 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (8 8
        (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (8 8
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (4 4
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (4 4
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (4 4
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE)))
(MILAWA::CDR-OF-LIST-LIST-FIX
     (44 17
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (39 17
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (24 4
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (24 4
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (20 4
         (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
     (17 17
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (17 17
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (16 4
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (9 9
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (9 9
        (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (9 9 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (9 9
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (9 9 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (9 9
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (8 8 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (8 8
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (8 8
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (8 8 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (8 8
        (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (4 4 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (4 4
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (4 4
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (4 4
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (4 4
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
     (4 4
        (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (4 4
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (4 4
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (4 4
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (4 4
        (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP)))
(MILAWA::LIST-LIST-FIX-UNDER-IFF
     (92 23
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (81 23
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (23 23
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (23 23
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (23 23
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (23 23
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (23 23 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (23 23
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (23 23
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (17 17
         (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (17 17
         (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (12 12 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (12 12
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (12 12
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (12 12
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (12 12
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (12 12
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP)))
(MILAWA::LIST-LIST-FIX-OF-LIST-FIX
     (118 13
          (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
     (97 28
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (67 31
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (59 31
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (54 10 (:REWRITE MILAWA::CONSP-OF-LIST-FIX))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (41 41
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (41 41
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (36 9
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (28 28
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (18 18 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (18 18 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (18 18
         (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (16 8 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (12 12
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (12 12
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (12 12 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (9 9
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (9 9
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP)))
(MILAWA::LIST-LIST-FIX-OF-APP
     (176 22
          (:REWRITE MILAWA::APP-WHEN-NOT-CONSP-TWO))
     (159 72
          (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (134 72
          (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (109 21
          (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
     (108 10 (:REWRITE MILAWA::CONSP-OF-APP))
     (72 72
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (72 72
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (42 31
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (36 9
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (31 31
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (29 29
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (29 29
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (29 29 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (22 22
         (:REWRITE MILAWA::APP-OF-SINGLETON-LIST-CHEAP))
     (18 18 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (18 18 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (18 18
         (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (16 16
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (13 3
         (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (9 9
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (9 9
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (8 8 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (4 4 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR)))
(MILAWA::LIST-LIST-FIX-OF-REV
     (193 50
          (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (75 39
         (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (69 11
         (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
     (59 11 (:REWRITE MILAWA::REV-UNDER-IFF))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (54 9
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (50 50
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (50 50
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (36 9
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (24 24
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (20 20
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (20 20
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (20 20
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (20 20
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (20 20
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (20 13
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (18 18 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (18 18
         (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (18 18 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (18 18
         (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (17 2 (:REWRITE MILAWA::APP-WHEN-NOT-CONSP))
     (12 12
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (12 12
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (12 12 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (11 11 (:REWRITE MILAWA::TRUE-LISTP-OF-REV))
     (11 2
         (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (9 9
        (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
     (9 9
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (9 9
        (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (8 8 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (8 2
        (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
     (4 4 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (2 2
        (:REWRITE MILAWA::APP-WHEN-NOT-CONSP-TWO))
     (2 2
        (:REWRITE MILAWA::APP-OF-SINGLETON-LIST-CHEAP))
     (2 2
        (:REWRITE MILAWA::APP-OF-CONS-WHEN-NOT-CONSP-RIGHT)))
(MILAWA::FIRSTN-OF-LIST-LIST-FIX
 (816 9 (:REWRITE MILAWA::|(< a (- b c))|))
 (389 74
      (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (328 13 (:REWRITE MILAWA::LESS-OF-ONE-LEFT))
 (257 41
      (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (219 6 (:REWRITE MILAWA::SQUEEZE-LAW-THREE))
 (207 5
      (:REWRITE MILAWA::MINUS-WHEN-NOT-LESS))
 (149 2 (:REWRITE MILAWA::CONSP-OF-FIRSTN))
 (141 75
      (:REWRITE MILAWA::ZP-WHEN-NOT-NATP-CHEAP))
 (136 85
      (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (129 86
      (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (117 117 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (96 2 (:REWRITE MILAWA::|(= c (- a b))|))
 (86 86
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (86 86
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (86 2 (:REWRITE MILAWA::|(- (- a b) c)|))
 (82 70
     (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (81 6 (:REWRITE MILAWA::SQUEEZE-LAW-ONE))
 (80 6
     (:REWRITE MILAWA::EQUAL-OF-LEN-AND-ZERO))
 (77 77
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
 (77 77
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
 (74 7
     (:REWRITE MILAWA::LEN-OF-LIST-LIST-FIX))
 (64 35
     (:REWRITE MILAWA::NFIX-WHEN-NOT-NATP-CHEAP))
 (58 23
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (56 36
     (:REWRITE MILAWA::NFIX-WHEN-ZP-CHEAP))
 (53 6
     (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
 (42 42 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
 (41 41
     (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (34 34
     (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
 (25 5 (:REWRITE MILAWA::COMMUTATIVITY-OF-+))
 (24 8 (:REWRITE MILAWA::LESS-OF-ONE-RIGHT))
 (24 2 (:REWRITE MILAWA::|(< (- a b) c)|))
 (23 23
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (23 23 (:REWRITE MILAWA::NATP-OF-LEN))
 (21 21
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-FOUR))
 (20 20 (:REWRITE MILAWA::NATP-OF-PLUS))
 (20 20
     (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (20 20
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (20 20
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (20 20
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (20 20
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
 (20 10
     (:REWRITE MILAWA::PLUS-WHEN-ZP-RIGHT-CHEAP))
 (20 10
     (:REWRITE MILAWA::PLUS-WHEN-ZP-LEFT-CHEAP))
 (17 17
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
 (11 7
     (:REWRITE MILAWA::MINUS-WHEN-ZP-LEFT-CHEAP))
 (10 10 (:REWRITE MILAWA::LEN-WHEN-TUPLEP))
 (10 10
     (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-LESS-OF-PLUS))
 (10 10
     (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-EQUAL-OF-PLUS))
 (9 9 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (7 7
    (:REWRITE MILAWA::MINUS-WHEN-ZP-RIGHT-CHEAP))
 (5 5
    (:REWRITE MILAWA::|a <= b, c != 0 --> a < c+b|))
 (5 5
    (:REWRITE MILAWA::|a <= b, c != 0 --> a < b+c|))
 (5 5
    (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-LESS-OF-PLUS-TWO))
 (5 5
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (5 5 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (5 5 (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (5 5
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (5 5
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (4 4 (:REWRITE MILAWA::NATP-OF-MINUS))
 (4 4
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WITH-LEN-FREE))
 (4 4
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (3 3
    (:REWRITE MILAWA::|b <= c, a <= b --> a < 1+c|))
 (3 3
    (:REWRITE MILAWA::|a <= b, b <= c --> a < 1+c|))
 (3 3 (:REWRITE MILAWA::SQUEEZE-LAW-TWO))
 (2 2
    (:REWRITE MILAWA::CDR-OF-CDR-WITH-LEN-FREE-PAST-THE-END))
 (2
   2
   (:REWRITE MILAWA::CDR-OF-CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END)))
(MILAWA::RESTN-OF-LIST-LIST-FIX
 (774 8
      (:REWRITE MILAWA::LIST-LIST-FIX-WHEN-NOT-CONSP))
 (701 2 (:REWRITE MILAWA::CONSP-OF-RESTN))
 (535 3 (:REWRITE MILAWA::|(< (- a b) c)|))
 (368 45 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
 (227 46
      (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (221 9 (:REWRITE MILAWA::ANTISYMMETRY-OF-<))
 (171 7 (:REWRITE MILAWA::LESS-OF-ONE-LEFT))
 (153 39
      (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
 (148 2
      (:REWRITE MILAWA::|a < b --> a <= b-1|))
 (145 24
      (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (123 3
      (:REWRITE MILAWA::MINUS-WHEN-NOT-LESS))
 (98 23
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (90 44
     (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (84 44
     (:REWRITE MILAWA::ZP-WHEN-NOT-NATP-CHEAP))
 (82 26
     (:REWRITE MILAWA::NFIX-WHEN-NATP-CHEAP))
 (71 71 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (61 43
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (60 6
     (:REWRITE MILAWA::|a <= b, c != 0 --> a < c+b|))
 (59 43
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (59 6
     (:REWRITE MILAWA::|a <= b, c != 0 --> a < b+c|))
 (57 57
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
 (57 57
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
 (56 6 (:REWRITE MILAWA::SQUEEZE-LAW-TWO))
 (56 4 (:REWRITE MILAWA::SQUEEZE-LAW-ONE))
 (55 5 (:REWRITE MILAWA::LESS-OF-ONE-RIGHT))
 (52 7
     (:REWRITE MILAWA::RESTN-WHEN-NOT-NATP))
 (48 1 (:REWRITE MILAWA::|(= c (- a b))|))
 (46 1 (:REWRITE MILAWA::|(- (- a b) c)|))
 (43 43
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (43 43
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (43 26
     (:REWRITE MILAWA::NFIX-WHEN-NOT-NATP-CHEAP))
 (40 2
     (:REWRITE MILAWA::EQUAL-OF-LEN-AND-ZERO))
 (39 39 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
 (34 26
     (:REWRITE MILAWA::NFIX-WHEN-ZP-CHEAP))
 (26 2 (:REWRITE MILAWA::LEN-WHEN-NOT-CONSP))
 (24 24
     (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (22 22
     (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
 (20 20
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-FOUR))
 (20 3 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (15 1 (:REWRITE MILAWA::|(< a (- b c))|))
 (14 6
     (:REWRITE MILAWA::LESS-WHEN-ZP-RIGHT-CHEAP))
 (14 4 (:REWRITE MILAWA::SQUEEZE-LAW-THREE))
 (12 12 (:REWRITE MILAWA::NATP-OF-LEN))
 (12 8
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (12 2 (:REWRITE MILAWA::ONE-PLUS-TRICK))
 (10 10
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
 (10 10 (:REWRITE MILAWA::NATP-OF-PLUS))
 (10 10
     (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (10 10
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
 (8 8
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (6 6
    (:REWRITE MILAWA::|b <= c, a <= b --> a < 1+c|))
 (6 6
    (:REWRITE MILAWA::|a <= b, b <= c --> a < 1+c|))
 (6 6
    (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-LESS-OF-PLUS-TWO))
 (6 6
    (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-EQUAL-OF-PLUS))
 (6 4
    (:REWRITE MILAWA::MINUS-WHEN-ZP-LEFT-CHEAP))
 (6 2
    (:REWRITE MILAWA::PLUS-WHEN-ZP-RIGHT-CHEAP))
 (5 5 (:REWRITE MILAWA::NATP-OF-MINUS))
 (5 1
    (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
 (4 4 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (4 4
    (:REWRITE MILAWA::MINUS-WHEN-ZP-RIGHT-CHEAP))
 (4 4
    (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-LESS-OF-PLUS))
 (3 3
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (2 2
    (:REWRITE MILAWA::PLUS-WHEN-ZP-LEFT-CHEAP))
 (2 2 (:REWRITE MILAWA::LEN-WHEN-TUPLEP))
 (2 2
    (:REWRITE MILAWA::EQUAL-OF-NFIX-WITH-POSITIVE-CONSTANT))
 (1 1
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WITH-LEN-FREE))
 (1 1
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (1 1
    (:REWRITE MILAWA::CDR-OF-CDR-WITH-LEN-FREE-PAST-THE-END))
 (1
   1
   (:REWRITE MILAWA::CDR-OF-CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END)))
(MILAWA::REV-OF-LIST-LIST-FIX)
(MILAWA::MEMBERP-OF-LIST-FIX-IN-LIST-LIST-FIX-WHEN-MEMBERP
 (260 17
      (:REWRITE MILAWA::SUBSETP-WHEN-NOT-CONSP-TWO))
 (188 74
      (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (172 74
      (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (156 16
      (:REWRITE MILAWA::LIST-LIST-FIX-WHEN-NOT-CONSP))
 (121 18
      (:REWRITE MILAWA::MEMBERP-WHEN-NOT-CONSP))
 (107 24
      (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (106 106
      (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (102 46
      (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (97 17
     (:REWRITE MILAWA::SUBSETP-WHEN-NOT-CONSP))
 (96 24
     (:REWRITE MILAWA::SUBSETP-WHEN-PREFIXP-CHEAP))
 (81 9
     (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
 (66 3 (:REWRITE MILAWA::SUBSETP-OF-CONS))
 (57 9
     (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
 (46 46
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (45 27
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (44 8
     (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
 (43 43
     (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-ONE))
 (38 38
     (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (38 38
     (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (38 38 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (37 37
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (37 37
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (37 37
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (36 36
     (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (36 36
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
 (29 4
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (27 27
     (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (26 26
     (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (25 25
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
 (24 24
     (:REWRITE MILAWA::SUBSETP-TRANSITIVE-TWO))
 (24 24
     (:REWRITE MILAWA::SUBSETP-TRANSITIVE-ONE))
 (22 22 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (22 22
     (:REWRITE MILAWA::NOT-IN-SUBSET-WHEN-NOT-IN-SUPERSET-TWO))
 (22 22
     (:REWRITE MILAWA::MEMBERP-WHEN-DISJOINTP-TWO))
 (22 22
     (:REWRITE MILAWA::MEMBERP-WHEN-DISJOINTP-ONE))
 (19 4
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (19 4
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (6 6 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
 (6 6
    (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
 (6 6
    (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
 (6 6 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
 (6 6
    (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
 (6 6
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WITH-LEN-FREE))
 (6 6
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (6 6
    (:REWRITE MILAWA::CDR-OF-CDR-WITH-LEN-FREE-PAST-THE-END))
 (6 6
    (:REWRITE MILAWA::CDR-OF-CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (2 2 (:REWRITE MILAWA::CDR-OF-CONS)))
(MILAWA::SUBSETP-OF-LIST-LIST-FIXS-WHEN-SUBSETP
     (199 26
          (:REWRITE MILAWA::SUBSETP-WHEN-NOT-CONSP-TWO))
     (176 29
          (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
     (131 44
          (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (113 44
          (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (101 26
          (:REWRITE MILAWA::SUBSETP-WHEN-NOT-CONSP))
     (71 71
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (60 32
         (:REWRITE MILAWA::SUBSETP-TRANSITIVE-ONE))
     (60 7
         (:REWRITE MILAWA::MEMBERP-WHEN-MEMBERP-OF-CDR))
     (55 37
         (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (50 50
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (38 7
         (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-TWO))
     (37 37
         (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (37 30
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
     (30 30
         (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
     (29 29
         (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (29 29
         (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (29 29 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (24 2
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (23 1
         (:REWRITE MILAWA::CDR-OF-LIST-LIST-FIX))
     (17 17
         (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
     (17 17
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
     (17 17
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
     (17 17
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
     (17 17
         (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
     (16 8 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
     (12 2
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (12 2
         (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (11 11 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
     (10 1
         (:REWRITE MILAWA::MEMBERP-WHEN-NOT-CONSP))
     (10 1
         (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
     (9 7
        (:REWRITE MILAWA::IN-SUPERSET-WHEN-IN-SUBSET-ONE))
     (8 8
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (7 1
        (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
     (4 4 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
     (4 4
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
     (4 4
        (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
     (4 4 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
     (4 4
        (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
     (1 1
        (:REWRITE MILAWA::NOT-IN-SUBSET-WHEN-NOT-IN-SUPERSET-TWO))
     (1 1
        (:REWRITE MILAWA::NOT-IN-SUBSET-WHEN-NOT-IN-SUPERSET-ONE))
     (1 1
        (:REWRITE MILAWA::MEMBERP-WHEN-DISJOINTP-TWO))
     (1 1
        (:REWRITE MILAWA::MEMBERP-WHEN-DISJOINTP-ONE)))
(MILAWA::NTH-OF-LIST-LIST-FIX
 (221 9 (:REWRITE MILAWA::LESS-OF-ONE-LEFT))
 (219 4 (:REWRITE MILAWA::|(= c (- a b))|))
 (184 33
      (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (132 15
      (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (123 3
      (:REWRITE MILAWA::MINUS-WHEN-NOT-LESS))
 (95 26 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
 (94 4 (:REWRITE MILAWA::|(< (- a b) c)|))
 (72 42
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (65 42
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (56 35
     (:REWRITE MILAWA::ZP-WHEN-NOT-NATP-CHEAP))
 (53 16
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (46 1 (:REWRITE MILAWA::|(- (- a b) c)|))
 (42 42
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (42 42
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (42 14
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (41 41
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
 (41 41
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
 (41 5
     (:REWRITE MILAWA::LIST-FIX-WHEN-TRUE-LISTP))
 (36 36 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (34 24
     (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
 (32 12 (:REWRITE MILAWA::ANTISYMMETRY-OF-<))
 (29 29
     (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (29 5
     (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
 (24 24 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
 (21 21
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-FOUR))
 (18 18
     (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
 (18 6 (:REWRITE MILAWA::LESS-OF-ONE-RIGHT))
 (16 16
     (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (16 4
     (:REWRITE MILAWA::NFIX-WHEN-NATP-CHEAP))
 (15 5
     (:REWRITE MILAWA::LEN-OF-LIST-LIST-FIX))
 (15 1 (:REWRITE MILAWA::|(< a (- b c))|))
 (14 14
     (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (12 1 (:REWRITE MILAWA::|(< 0 (len x))|))
 (9 9
    (:REWRITE MILAWA::LESS-WHEN-ZP-RIGHT-CHEAP))
 (8 8 (:REWRITE MILAWA::LEN-WHEN-TUPLEP))
 (7 7 (:REWRITE MILAWA::NATP-OF-MINUS))
 (7 4
    (:REWRITE MILAWA::NFIX-WHEN-NOT-NATP-CHEAP))
 (6 4
    (:REWRITE MILAWA::MINUS-WHEN-ZP-LEFT-CHEAP))
 (5 5
    (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (5 5
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (5 5
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (5 5
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (5 5
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
 (4 4 (:REWRITE MILAWA::NFIX-WHEN-ZP-CHEAP))
 (4 4
    (:REWRITE MILAWA::MINUS-WHEN-ZP-RIGHT-CHEAP))
 (4 1
    (:REWRITE MILAWA::PREFIXP-OF-LIST-FIX-TWO))
 (3 3
    (:REWRITE MILAWA::|a <= b, c != 0 --> a < c+b|))
 (3 3
    (:REWRITE MILAWA::|a <= b, c != 0 --> a < b+c|))
 (3 3 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (3 3
    (:REWRITE MILAWA::PLUS-WHEN-ZP-RIGHT-CHEAP))
 (3 3
    (:REWRITE MILAWA::PLUS-WHEN-ZP-LEFT-CHEAP))
 (3 3
    (:REWRITE MILAWA::GATHER-CONSTANTS-FROM-LESS-OF-PLUS-TWO))
 (3 3
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (3 3 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (3 3 (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (3 3
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (2 2
    (:REWRITE MILAWA::|b <= c, a <= b --> a < 1+c|))
 (2 2
    (:REWRITE MILAWA::|a <= b, b <= c --> a < 1+c|))
 (2 2
    (:REWRITE MILAWA::|a < b --> a <= b-1|))
 (2 2 (:REWRITE MILAWA::SQUEEZE-LAW-TWO))
 (2 2
    (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
 (2 2 (:REWRITE MILAWA::ONE-PLUS-TRICK))
 (2 2
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WITH-LEN-FREE))
 (2 2
    (:REWRITE MILAWA::CONSP-OF-CDR-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (1 1
    (:REWRITE MILAWA::CDR-OF-CDR-WITH-LEN-FREE-PAST-THE-END))
 (1
   1
   (:REWRITE MILAWA::CDR-OF-CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END)))
(MILAWA::FAST-LIST-LIST-FIX$-REMOVAL
 (700 199
      (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (387 109
      (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (359 146
      (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (275 18
      (:REWRITE MILAWA::LIST-LIST-FIX-WHEN-NOT-CONSP))
 (265 17
      (:REWRITE MILAWA::CONSP-OF-LIST-LIST-FIX))
 (199 199
      (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (199 199
      (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (188 32
      (:REWRITE MILAWA::LIST-FIX-WHEN-NOT-CONSP))
 (180 34 (:REWRITE MILAWA::REV-UNDER-IFF))
 (143 143
      (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (96 16
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (96 16
     (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (71 71
     (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (71 71
     (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (71 71 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (64 16
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (55 19
     (:REWRITE MILAWA::APP-WHEN-NOT-CONSP-TWO))
 (34 34 (:REWRITE MILAWA::TRUE-LISTP-OF-REV))
 (33 33
     (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (33 33
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (33 33
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (33 33
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (33 33
     (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-CHEAP))
 (32 32 (:REWRITE MILAWA::TRICHOTOMY-OF-<))
 (32 32
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-TWO))
 (32 32
     (:REWRITE MILAWA::TRANSITIVITY-OF-<-THREE))
 (32 32 (:REWRITE MILAWA::TRANSITIVITY-OF-<))
 (32 32
     (:REWRITE MILAWA::LESS-WHEN-ZP-LEFT-CHEAP))
 (28 28
     (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (28 28
     (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (28 28
     (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (28 28
     (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (28 28
     (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (28 7
     (:REWRITE MILAWA::APP-OF-CONS-WHEN-NOT-CONSP-RIGHT))
 (19 19
     (:REWRITE MILAWA::APP-OF-SINGLETON-LIST-CHEAP))
 (16 16
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (16 16
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-ONE))
 (16 16
     (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (16 16
     (:REWRITE MILAWA::EQUAL-OF-BOOLEANS-REWRITE))
 (13 13 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (8 8
    (:REWRITE MILAWA::CDR-OF-CDR-WITH-LEN-FREE-PAST-THE-END))
 (8
   8
   (:REWRITE MILAWA::CDR-OF-CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END)))
