(MILAWA::RW.ASSMCTRLP)
(MILAWA::RW.ASSMCTRL)
(MILAWA::RW.ASSMCTRL->PRIMARYP)
(MILAWA::RW.ASSMCTRL->SECONDARYP)
(MILAWA::RW.ASSMCTRL->DIRECTP)
(MILAWA::RW.ASSMCTRL->NEGATIVEP)
(MILAWA::RW.ASSMCTRL-UNDER-IFF)
(MILAWA::BOOLEANP-OF-RW.ASSMCTRLP
 (44 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
 (32 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
 (24 10
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (21 5
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (16 1
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (14 1
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
 (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (7 1 (:DEFINITION NOT))
 (6 3
    (:REWRITE MILAWA::CONSP-OF-CAR-WHEN-CONS-LISTP))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (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))
 (5 5
    (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP-ALT))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP))
 (3 3
    (:REWRITE MILAWA::NATP-OF-CAR-WHEN-NAT-LISTP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-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::TRUE-LISTP-OF-CDR))
 (1 1
    (:REWRITE MILAWA::TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1 1
    (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP))
 (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::CONS-LISTP-WHEN-NOT-CONSP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP-ALT))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP))
 (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::FORCING-RW.ASSMCTRLP-OF-RW.ASSMCTRL
     (48 8
         (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
     (48 8
         (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
     (16 1
         (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
     (14 1
         (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
     (10 10
         (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
     (10 10
         (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
     (10 10
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
     (10 10
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
     (10 10
         (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
     (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
     (8 8
        (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
     (8 8
        (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
     (8 8
        (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
     (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
     (6 1
        (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
     (6 1
        (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
     (5 5
        (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
     (5 5
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
     (5 5
        (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
     (5 5
        (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
     (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))
     (2 2
        (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
     (1 1
        (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
     (1 1
        (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
     (1 1
        (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP)))
(MILAWA::RW.ASSMCTRL->PRIMARYP-OF-RW.ASSMCTRL)
(MILAWA::RW.ASSMCTRL->SECONDARYP-OF-RW.ASSMCTRL)
(MILAWA::RW.ASSMCTRL->DIRECTP-OF-RW.ASSMCTRL)
(MILAWA::RW.ASSMCTRL->NEGATIVEP-OF-RW.ASSMCTRL)
(MILAWA::FORCING-BOOLEANP-OF-RW.ASSMCTRL->PRIMARYP
 (45 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
 (33 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
 (24 10
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (21 5
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (16 1
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (14 1
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
 (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (7 7 (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (7 7
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (7 7
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (7 7
    (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
 (7 4
    (:REWRITE MILAWA::CONSP-OF-CAR-WHEN-CONS-LISTP))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (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::NATP-OF-CAR-WHEN-NAT-LISTP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP-ALT))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-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::TRUE-LISTP-OF-CDR))
 (1 1
    (:REWRITE MILAWA::TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1 1
    (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP))
 (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::CONS-LISTP-WHEN-NOT-CONSP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP-ALT))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP))
 (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::FORCING-BOOLEANP-OF-RW.ASSMCTRL->SECONDARYP
 (49 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
 (32 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
 (24 10
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (21 5
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (16 1
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (14 1
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
 (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (6 6
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (6 6 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (6 6 (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
 (6 3
    (:REWRITE MILAWA::CONSP-OF-CAR-WHEN-CONS-LISTP))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (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))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP-ALT))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP))
 (3 3
    (:REWRITE MILAWA::NATP-OF-CAR-WHEN-NAT-LISTP))
 (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::TRUE-LISTP-OF-CDR))
 (1 1
    (:REWRITE MILAWA::TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1 1
    (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP))
 (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::CONS-LISTP-WHEN-NOT-CONSP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP-ALT))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP))
 (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::FORCING-BOOLEANP-OF-RW.ASSMCTRL->DIRECTP
 (45 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
 (33 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
 (24 10
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (21 5
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (16 1
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (14 1
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
 (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (7 4
    (:REWRITE MILAWA::CONSP-OF-CAR-WHEN-CONS-LISTP))
 (6 6
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (6 6 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (6 6 (:REWRITE MILAWA::CAR-WHEN-NOT-CONSP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-OF-SINGLETON-LIST-CHEAP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-MEMBERP-AND-NOT-MEMBERP-OF-CDR-CHEAP))
 (6 6
    (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (4 4
    (:REWRITE MILAWA::NATP-OF-CAR-WHEN-NAT-LISTP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP-ALT))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WITH-LEN-FREE))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-3-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-TUPLEP-2-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-MEMBERP-NOT-CAR-CHEAP))
 (3 3
    (:REWRITE MILAWA::CONSP-OF-CDR-WHEN-LEN-TWO-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::TRUE-LISTP-OF-CDR))
 (1 1
    (:REWRITE MILAWA::TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1 1
    (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP))
 (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::CONS-LISTP-WHEN-NOT-CONSP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP-ALT))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP))
 (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::FORCING-BOOLEANP-OF-RW.ASSMCTRL->NEGATIVEP
 (51 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-CONSP-CHEAP))
 (32 5
     (:REWRITE MILAWA::BOOLEANP-WHEN-NATP-CHEAP))
 (24 10
     (:REWRITE MILAWA::CONSP-WHEN-TRUE-LISTP-CHEAP))
 (21 5
     (:REWRITE MILAWA::CONSP-WHEN-NATP-CHEAP))
 (16 1
     (:REWRITE MILAWA::SAME-LENGTH-PREFIXES-EQUAL-CHEAP))
 (14 1
     (:REWRITE MILAWA::PREFIXP-WHEN-NOT-CONSP-TWO))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-NONEMPTY-SUBSET-CHEAP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP-ALT))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-OF-CONS-LISTP))
 (10 10
     (:REWRITE MILAWA::CONSP-WHEN-MEMBERP-CHEAP))
 (8 8 (:REWRITE MILAWA::NATP-WHEN-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-NOT-ZP-CHEAP))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP-ALT))
 (8 8
    (:REWRITE MILAWA::NATP-WHEN-MEMBERP-OF-NAT-LISTP))
 (8 8 (:REWRITE MILAWA::NATP-OF-LEN-FREE))
 (7 7
    (:REWRITE MILAWA::CDR-WHEN-TRUE-LISTP-WITH-LEN-FREE-PAST-THE-END))
 (7 7 (:REWRITE MILAWA::CDR-WHEN-NOT-CONSP))
 (6 3
    (:REWRITE MILAWA::CONSP-OF-CAR-WHEN-CONS-LISTP))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS-TWO))
 (6 1
    (:REWRITE MILAWA::NOT-EQUAL-WHEN-LESS))
 (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))
 (5 5
    (:REWRITE MILAWA::CAR-WHEN-ALL-EQUALP))
 (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))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-TUPLEP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-NOT-CONSP))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP-ALT))
 (3 3
    (:REWRITE MILAWA::TRUE-LISTP-WHEN-MEMBERP-OF-TRUE-LIST-LISTP))
 (3 3
    (:REWRITE MILAWA::NATP-OF-CAR-WHEN-NAT-LISTP))
 (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))
 (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))
 (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))
 (1 1 (:REWRITE MILAWA::TRUE-LISTP-OF-CDR))
 (1 1
    (:REWRITE MILAWA::TRUE-LISTP-OF-CAR-WHEN-TRUE-LIST-LISTP))
 (1 1
    (:REWRITE MILAWA::FORCING-PREFIXP-WHEN-NOT-PREFIXP-BADGUY))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP-ALT))
 (1 1
    (:REWRITE MILAWA::EQUAL-WHEN-MEMBERP-OF-ALL-EQUALP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-WHEN-NOT-CONSP))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP-ALT))
 (1 1
    (:REWRITE MILAWA::CONS-LISTP-OF-SUBSETP-WHEN-CONS-LISTP)))
(MILAWA::CHANGE-RW.ASSMCTRL-FN)
