(|SYSTEM|::|VERSION| '(20080430.))
#0Y_ #0Y |CHARSET|::|UTF-8|
#Y(#:|2 91 (SDEFUN DLP;shanksDiscLogAlgorithm;2MNniU;1 (# # # ...) ...)-1|
   #20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
   (|BOOT|::|DLP;shanksDiscLogAlgorithm;2MNniU;1|
    |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
    #Y(|BOOT|::|DLP;shanksDiscLogAlgorithm;2MNniU;1|
       #400Y(00 00 00 00 04 00 00 00 26 05 01 0F C5 F8 BD AD 90 01 31 80 46 BD
             81 EE 02 14 8E AF 80 A4 E1 AF E3 30 0A 14 81 EC 03 BC C6 5F 14 94
             00 95 01 36 01 16 01 09 0E BC D0 5F 14 94 00 95 01 36 01 16 01 FC
             C7 09 09 AF 81 B2 05 14 B2 8F AE 08 B2 E6 E7 6E 03 0E 2F 0F 6A 06
             1B 80 9F BC C6 5F 14 94 00 95 01 36 01 16 01 09 0E C7 09 0D 7D 0C
             C7 09 09 BD 81 B2 01 1B 2D A6 09 0D 7E 0C 1B 24 C7 1B 80 F7 BC C8
             5F 14 94 00 BC C1 95 03 36 03 16 01 1C 65 BC C9 5F 14 94 00 BC C2
             95 03 36 03 16 01 09 0E 85 09 B5 AE 90 01 32 03 93 0C 55 92 0C 4E
             BC CA 5F 14 94 00 E0 95 02 36 02 16 01 E1 CD 1B 80 CB BD AF E3 70
             0A 33 00 38 1B FF 56 BC D5 5F 14 94 00 BE D6 5F 14 94 00 BE 95 02
             36 02 F8 A9 7A B3 95 03 36 03 16 01 BC C9 5F 14 94 00 BC C2 95 03
             36 03 16 01 09 0E 85 09 B5 B3 91 01 32 4D 7D 0C 97 11 B0 30 0A FF
             C7 09 0D 04 12 09 0E BC D7 5F 14 94 00 C1 B2 73 00 38 95 03 36 03
             16 01 09 08 C7 09 09 A4 09 0A 1B 80 41 7E 0C AF B6 73 02 39 95 0C
             82 02 37 0D 1B 30 BC D8 5F 14 94 00 BE D6 5F 14 94 00 BE 95 02 36
             02 F8 B3 95 03 36 03 16 01 09 0B 78 DC 8E 13 51 BC C9 5F 14 94 00
             BC B7 95 03 36 03 16 01 09 0E 85 09 B5 B7 90 01 32 03 93 0C 45 93
             0C 05 C7 14 AB 1B 10 BC CA 5F 14 94 00 EE 95 02 36 02 16 01 E1 03
             15 5D 19 14)
       (30. 7. 0. 9. 10. 14.
        "discreteLog: second argument not in cyclic group generated by first argument"
        1. "failed" 2. |BOOT|::|QUOTIENT2| 16. (|BOOT|::|NonNegativeInteger|)
        (|BOOT|::|Integer|) |BOOT|::|coerce_failure_msg| |BOOT|::|error| 20.
        18. 22. 24.
        "discreteLog: second argument not in cyclic group generated by first argument"
        "failed")
       (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
       (|BOOT|::|logbase| |BOOT|::|c| |BOOT|::|p| |BOOT|::|$|)
       |COMMON-LISP|::|NIL| 1))
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|93 93 (DECLAIM (NOTINLINE DiscreteLogarithmPackage;))-2|
   #15Y(00 00 00 00 00 00 00 00 20 01 DA 31 62 19 01)
   ((|COMMON-LISP|::|NOTINLINE| |BOOT|::|DiscreteLogarithmPackage;|))
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|95 112 (DEFUN DiscreteLogarithmPackage (G720) ...)-3|
   #20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
   (|BOOT|::|DiscreteLogarithmPackage| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
    #Y(|BOOT|::|DiscreteLogarithmPackage|
       #66Y(03 00 01 00 01 00 00 00 20 02 63 AE 6F 00 7B 01 DB 6B 02 38 01 71
            6E DD 2D 03 04 F8 1C 11 53 14 B0 6F 06 7E 03 15 54 05 00 00 00 1D
            0D 1B 10 14 2F 05 19 03 05 00 00 00 1C 05 DB 6B 02 31 70 55 19 03)
       (|BOOT|::|devaluate| |BOOT|::|DiscreteLogarithmPackage|
        |BOOT|::|$ConstructorCache| |BOOT|::|domainEqualList|
        |BOOT|::|lassocShiftWithFunction| |BOOT|::|CDRwithIncrement|
        |BOOT|::|DiscreteLogarithmPackage;|)
       (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)))
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|114 127 (DEFUN DiscreteLogarithmPackage; (#1) ...)-4|
   #20Y(00 00 00 00 00 00 00 00 20 01 DA 2F 01 DA DC 32 9C C5 19 01)
   (|BOOT|::|DiscreteLogarithmPackage;| |SYSTEM|::|REMOVE-OLD-DEFINITIONS|
    #Y(|BOOT|::|DiscreteLogarithmPackage;|
       #60Y(00 00 00 00 01 00 00 00 26 02 01 03 B0 2F 00 F8 DB AD 61 02 F9 DC
            2F 03 FA AD AF C9 60 DE DE 63 6E 03 05 AF CB 60 6B 07 DB AE 7B 01
            E2 A3 7A 2D 04 09 AE 2F 0A B0 AF D0 60 9F 19 05)
       (|BOOT|::|devaluate| |BOOT|::|DiscreteLogarithmPackage| 27.
        |BOOT|::|GETREFV| 0. |BOOT|::|buildPredVector| 3.
        |BOOT|::|$ConstructorCache| 1. |BOOT|::|haddProp|
        |BOOT|::|stuffDomainSlots| 6.)
       (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|)
       (|BOOT|::|#1|) |COMMON-LISP|::|NIL| 1))
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
#Y(#:|129 156 (MAKEPROP 'DiscreteLogarithmPackage 'infovec ...)-5|
   #36Y(00 00 00 00 00 00 00 00 20 01 DA DB DC DD 63 DE DF 70 06 E1 E2 E3 E4 30
        06 5D 5D 7A E5 7B 05 2D 03 0C 19 01)
   (|BOOT|::|DiscreteLogarithmPackage| |BOOT|::|infovec|
    #(|COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
      |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|
      (|BOOT|::|local| |BOOT|::|#1|) (0. . |BOOT|::|One|) (|BOOT|::|Boolean|)
      (4. . |COMMON-LISP|::|=|) (10. . |COMMON-LISP|::|*|) (|BOOT|::|Void|)
      (|BOOT|::|String|) (|BOOT|::|OutputForm|) (16. . |BOOT|::|messagePrint|)
      (|BOOT|::|Table| 17. 25.) (21. . |BOOT|::|table|)
      (|BOOT|::|PositiveInteger|) (25. . |BOOT|::|lookup|)
      (|BOOT|::|Record| (|BOOT|::|:| |BOOT|::|key| 17.)
       (|BOOT|::|:| |BOOT|::|entry| 25.))
      (30. . |BOOT|::|insert!|) (|BOOT|::|Integer|) (36. . |BOOT|::|^|)
      (|BOOT|::|Union| 25. '"failed") (42. . |BOOT|::|search|)
      (|BOOT|::|NonNegativeInteger|)
      |BOOT|::|DLP;shanksDiscLogAlgorithm;2MNniU;1|)
    #(|BOOT|::|shanksDiscLogAlgorithm| 48.) 1. (0.) |BOOT|::|makeByteWordVec2|
    #(|COMMON-LISP|::|NIL|)
    #((|BOOT|::|Join|
       (|BOOT|::|mkCategory|
        (|COMMON-LISP|::|LIST|
         '((|BOOT|::|shanksDiscLogAlgorithm|
            ((|BOOT|::|Union| (|BOOT|::|NonNegativeInteger|) "failed")
             |BOOT|::|#1| |BOOT|::|#1| (|BOOT|::|NonNegativeInteger|)))
           |COMMON-LISP|::|T|))
        (|COMMON-LISP|::|LIST|) |COMMON-LISP|::|NIL| |COMMON-LISP|::|NIL|)))
    26.
    (0. 6. 0. 7. 2. 6. 8. 0. 0. 9. 2. 6. 0. 0. 0. 10. 1. 13. 11. 12. 14. 0. 15.
     0. 16. 1. 6. 17. 0. 18. 2. 15. 0. 19. 0. 20. 2. 6. 0. 0. 21. 22. 2. 15.
     23. 17. 0. 24. 3. 0. 23. 6. 6. 25. 26.)
    |BOOT|::|lookupComplete| |BOOT|::|MAKEPROP|)
   (|COMMON-LISP|::|T| |COMMON-LISP|::|T| |COMMON-LISP|::|T|))
