* interp/compiler.boot (compImport): Don't do anything if

	bootstrapping: there is no much to import for now.
	* interp/define.boot (getOperationAlist): Get the isFunctor
	property directly.
	(addDomain): Call isDomainForm.

5 files changed, 11 insertions, 11 deletions

diff --git a/src/share/algebra/browse.daase b/src/share/algebra/browse.daase
index 46a83c12..d73ee151 100644
--- a/src/share/algebra/browse.daase
+++ b/src/share/algebra/browse.daase
@@ -1,5 +1,5 @@
 
-(2276909 . 3524261741)       
+(2276909 . 3524374395)       
 (-18 A S) 
 ((|constructor| (NIL "One-dimensional-array aggregates serves as models for one-dimensional arrays. Categorically,{} these aggregates are finite linear aggregates with the \\spadatt{shallowlyMutable} property,{} that is,{} any component of the array may be changed without affecting the identity of the overall array. Array data structures are typically represented by a fixed area in storage and therefore cannot efficiently grow or shrink on demand as can list structures (see however \\spadtype{FlexibleArray} for a data structure which is a cross between a list and an array). Iteration over,{} and access to,{} elements of arrays is extremely fast (and often can be optimized to open-code). Insertion and deletion however is generally slow since an entirely new data structure must be created for the result."))) 
 NIL 
diff --git a/src/share/algebra/category.daase b/src/share/algebra/category.daase
index be4ee5c0..f932482b 100644
--- a/src/share/algebra/category.daase
+++ b/src/share/algebra/category.daase
@@ -1,5 +1,5 @@
 
-(207263 . 3524261745)        
+(207263 . 3524374399)        
 ((((-877)) . T)) 
 ((((-877)) . T)) 
 ((((-877)) . T)) 
diff --git a/src/share/algebra/compress.daase b/src/share/algebra/compress.daase
index 4044ef5b..4a02e57e 100644
--- a/src/share/algebra/compress.daase
+++ b/src/share/algebra/compress.daase
@@ -1,5 +1,5 @@
 
-(30 . 3524261740)            
+(30 . 3524374394)            
 (4428 |Enumeration| |Mapping| |Record| |Union| |ofCategory| |isDomain|
  ATTRIBUTE |package| |domain| |category| CATEGORY |nobranch| AND |Join|
  |ofType| SIGNATURE "failed" "algebra" |OneDimensionalArrayAggregate&|
diff --git a/src/share/algebra/interp.daase b/src/share/algebra/interp.daase
index 2dcb85cb..34c448ef 100644
--- a/src/share/algebra/interp.daase
+++ b/src/share/algebra/interp.daase
@@ -1,5 +1,5 @@
 
-(3096901 . 3524261751)       
+(3096901 . 3524374406)       
 ((-1935 (((-114) (-1 (-114) |#2| |#2|) $) 86 T ELT) (((-114) $) NIL T ELT)) (-1933 (($ (-1 (-114) |#2| |#2|) $) 18 T ELT) (($ $) NIL T ELT)) (-4218 ((|#2| $ (-558) |#2|) NIL T ELT) ((|#2| $ (-1255 (-558)) |#2|) 44 T ELT)) (-2510 (($ $) 80 T ELT)) (-4272 ((|#2| (-1 |#2| |#2| |#2|) $ |#2| |#2|) 52 T ELT) ((|#2| (-1 |#2| |#2| |#2|) $ |#2|) 50 T ELT) ((|#2| (-1 |#2| |#2| |#2|) $) 49 T ELT)) (-3839 (((-558) (-1 (-114) |#2|) $) 27 T ELT) (((-558) |#2| $) NIL T ELT) (((-558) |#2| $ (-558)) 96 T ELT)) (-3290 (((-661 |#2|) $) 13 T ELT)) (-3938 (($ (-1 (-114) |#2| |#2|) $ $) 64 T ELT) (($ $ $) NIL T ELT)) (-2160 (($ (-1 |#2| |#2|) $) 37 T ELT)) (-4388 (($ (-1 |#2| |#2|) $) NIL T ELT) (($ (-1 |#2| |#2| |#2|) $ $) 60 T ELT)) (-2517 (($ |#2| $ (-558)) NIL T ELT) (($ $ $ (-558)) 67 T ELT)) (-1468 (((-3 |#2| "failed") (-1 (-114) |#2|) $) 29 T ELT)) (-2158 (((-114) (-1 (-114) |#2|) $) 23 T ELT)) (-4230 ((|#2| $ (-558) |#2|) NIL T ELT) ((|#2| $ (-558)) NIL T ELT) (($ $ (-1255 (-558))) 66 T ELT)) (-2518 (($ $ (-558)) 76 T ELT) (($ $ (-1255 (-558))) 75 T ELT)) (-2157 (((-791) (-1 (-114) |#2|) $) 34 T ELT) (((-791) |#2| $) NIL T ELT)) (-1934 (($ $ $ (-558)) 69 T ELT)) (-3820 (($ $) 68 T ELT)) (-3950 (($ (-661 |#2|)) 73 T ELT)) (-4232 (($ $ |#2|) NIL T ELT) (($ |#2| $) NIL T ELT) (($ $ $) 87 T ELT) (($ (-661 $)) 85 T ELT)) (-4376 (((-877) $) 92 T ELT)) (-2159 (((-114) (-1 (-114) |#2|) $) 22 T ELT)) (-3454 (((-114) $ $) 95 T ELT)) (-3086 (((-114) $ $) 99 T ELT))) 
 (((-18 |#1| |#2|) (-10 -7 (-15 -3454 ((-114) |#1| |#1|)) (-15 -4376 ((-877) |#1|)) (-15 -3086 ((-114) |#1| |#1|)) (-15 -1933 (|#1| |#1|)) (-15 -1933 (|#1| (-1 (-114) |#2| |#2|) |#1|)) (-15 -2510 (|#1| |#1|)) (-15 -1934 (|#1| |#1| |#1| (-558))) (-15 -1935 ((-114) |#1|)) (-15 -3938 (|#1| |#1| |#1|)) (-15 -3839 ((-558) |#2| |#1| (-558))) (-15 -3839 ((-558) |#2| |#1|)) (-15 -3839 ((-558) (-1 (-114) |#2|) |#1|)) (-15 -1935 ((-114) (-1 (-114) |#2| |#2|) |#1|)) (-15 -3938 (|#1| (-1 (-114) |#2| |#2|) |#1| |#1|)) (-15 -4218 (|#2| |#1| (-1255 (-558)) |#2|)) (-15 -2517 (|#1| |#1| |#1| (-558))) (-15 -2517 (|#1| |#2| |#1| (-558))) (-15 -2518 (|#1| |#1| (-1255 (-558)))) (-15 -2518 (|#1| |#1| (-558))) (-15 -4388 (|#1| (-1 |#2| |#2| |#2|) |#1| |#1|)) (-15 -4232 (|#1| (-661 |#1|))) (-15 -4232 (|#1| |#1| |#1|)) (-15 -4232 (|#1| |#2| |#1|)) (-15 -4232 (|#1| |#1| |#2|)) (-15 -4230 (|#1| |#1| (-1255 (-558)))) (-15 -3950 (|#1| (-661 |#2|))) (-15 -1468 ((-3 |#2| "failed") (-1 (-114) |#2|) |#1|)) (-15 -4272 (|#2| (-1 |#2| |#2| |#2|) |#1|)) (-15 -4272 (|#2| (-1 |#2| |#2| |#2|) |#1| |#2|)) (-15 -4272 (|#2| (-1 |#2| |#2| |#2|) |#1| |#2| |#2|)) (-15 -4230 (|#2| |#1| (-558))) (-15 -4230 (|#2| |#1| (-558) |#2|)) (-15 -4218 (|#2| |#1| (-558) |#2|)) (-15 -2157 ((-791) |#2| |#1|)) (-15 -3290 ((-661 |#2|) |#1|)) (-15 -2157 ((-791) (-1 (-114) |#2|) |#1|)) (-15 -2158 ((-114) (-1 (-114) |#2|) |#1|)) (-15 -2159 ((-114) (-1 (-114) |#2|) |#1|)) (-15 -2160 (|#1| (-1 |#2| |#2|) |#1|)) (-15 -4388 (|#1| (-1 |#2| |#2|) |#1|)) (-15 -3820 (|#1| |#1|))) (-19 |#2|) (-1238)) (T -18)) 
 NIL 
@@ -400,7 +400,7 @@ NIL
 ((-2967 (((-114) $ $) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-4376 (((-877) $) 16 T ELT) (($ (-1203)) NIL T ELT) (((-1203) $) NIL T ELT)) (-3651 (((-661 (-1156)) $) 10 T ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3454 (((-114) $ $) NIL T ELT))) 
 (((-135) (-13 (-1104) (-10 -8 (-15 -3651 ((-661 (-1156)) $))))) (T -135)) 
 ((-3651 (*1 *2 *1) (-12 (-5 *2 (-661 (-1156))) (-5 *1 (-135))))) 
-((-2967 (((-114) $ $) 49 T ELT)) (-3606 (((-114) $) NIL T ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 (-791) #1="failed") $) 58 T ELT)) (-3574 (((-791) $) 56 T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-2641 (((-114) $) NIL T ELT)) (-2930 (($ $ $) NIL T ELT)) (-3258 (($ $ $) 37 T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1429 (((-114)) 59 T ELT)) (-1428 (((-114) (-114)) 61 T ELT)) (-2924 (((-114) $) 30 T ELT)) (-1430 (((-114) $) 55 T ELT)) (-4376 (((-877) $) 28 T ELT) (($ (-791)) 20 T ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3059 (($) 18 T CONST)) (-3065 (($) 19 T CONST)) (-1431 (($ (-791)) 21 T ELT)) (-2965 (((-114) $ $) NIL T ELT)) (-2966 (((-114) $ $) 40 T ELT)) (-3454 (((-114) $ $) 32 T ELT)) (-3085 (((-114) $ $) NIL T ELT)) (-3086 (((-114) $ $) 35 T ELT)) (-4267 (((-3 $ #1#) $ $) 42 T ELT)) (-4269 (($ $ $) 38 T ELT)) (** (($ $ (-791)) NIL T ELT) (($ $ (-938)) NIL T ELT) (($ $ $) 54 T ELT)) (* (($ (-791) $) 48 T ELT) (($ (-938) $) NIL T ELT) (($ $ $) 45 T ELT))) 
+((-2967 (((-114) $ $) 49 T ELT)) (-3606 (((-114) $) NIL T ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 (-791) #1="failed") $) 60 T ELT)) (-3574 (((-791) $) 58 T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-2641 (((-114) $) NIL T ELT)) (-2930 (($ $ $) NIL T ELT)) (-3258 (($ $ $) 37 T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1429 (((-114)) 61 T ELT)) (-1428 (((-114) (-114)) 63 T ELT)) (-2924 (((-114) $) 30 T ELT)) (-1430 (((-114) $) 57 T ELT)) (-4376 (((-877) $) 28 T ELT) (($ (-791)) 20 T ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3059 (($) 18 T CONST)) (-3065 (($) 19 T CONST)) (-1431 (($ (-791)) 21 T ELT)) (-2965 (((-114) $ $) NIL T ELT)) (-2966 (((-114) $ $) 40 T ELT)) (-3454 (((-114) $ $) 32 T ELT)) (-3085 (((-114) $ $) NIL T ELT)) (-3086 (((-114) $ $) 35 T ELT)) (-4267 (((-3 $ #1#) $ $) 42 T ELT)) (-4269 (($ $ $) 38 T ELT)) (** (($ $ (-791)) NIL T ELT) (($ $ (-938)) NIL T ELT) (($ $ $) 56 T ELT)) (* (($ (-791) $) 48 T ELT) (($ (-938) $) NIL T ELT) (($ $ $) 45 T ELT))) 
 (((-136) (-13 (-861) (-23) (-746) (-1059 (-791)) (-10 -8 (-6 (-4427 "*")) (-15 -4267 ((-3 $ "failed") $ $)) (-15 ** ($ $ $)) (-15 -1431 ($ (-791))) (-15 -2924 ((-114) $)) (-15 -1430 ((-114) $)) (-15 -1429 ((-114))) (-15 -1428 ((-114) (-114)))))) (T -136)) 
 ((-4267 (*1 *1 *1 *1) (|partial| -5 *1 (-136))) (** (*1 *1 *1 *1) (-5 *1 (-136))) (-1431 (*1 *1 *2) (-12 (-5 *2 (-791)) (-5 *1 (-136)))) (-2924 (*1 *2 *1) (-12 (-5 *2 (-114)) (-5 *1 (-136)))) (-1430 (*1 *2 *1) (-12 (-5 *2 (-114)) (-5 *1 (-136)))) (-1429 (*1 *2) (-12 (-5 *2 (-114)) (-5 *1 (-136)))) (-1428 (*1 *2 *2) (-12 (-5 *2 (-114)) (-5 *1 (-136))))) 
 ((-2967 (((-114) $ $) NIL T ELT)) (-1432 (($ (-661 |#3|)) 62 T ELT)) (-3834 (($ $) 125 T ELT) (($ $ (-558) (-558)) 124 T ELT)) (-4154 (($) 20 T ELT)) (-3575 (((-3 |#3| "failed") $) 85 T ELT)) (-3574 ((|#3| $) NIL T ELT)) (-1436 (($ $ (-661 (-558))) 126 T ELT)) (-1433 (((-661 |#3|) $) 57 T ELT)) (-3511 (((-791) $) 67 T ELT)) (-4374 (($ $ $) 119 T ELT)) (-1434 (($) 66 T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-1435 (($) 19 T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-4230 ((|#3| $ (-558)) 71 T ELT) ((|#3| $) 70 T ELT) ((|#3| $ (-558) (-558)) 72 T ELT) ((|#3| $ (-558) (-558) (-558)) 73 T ELT) ((|#3| $ (-558) (-558) (-558) (-558)) 74 T ELT) ((|#3| $ (-661 (-558))) 75 T ELT)) (-4378 (((-791) $) 68 T ELT)) (-2193 (($ $ (-558) $ (-558)) 120 T ELT) (($ $ (-558) (-558)) 122 T ELT)) (-4376 (((-877) $) 93 T ELT) (($ |#3|) 94 T ELT) (($ (-246 |#2| |#3|)) 101 T ELT) (($ (-1163 |#2| |#3|)) 104 T ELT) (($ (-661 |#3|)) 76 T ELT) (($ (-661 $)) 82 T ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3059 (($) 95 T CONST)) (-3065 (($) 96 T CONST)) (-3454 (((-114) $ $) 106 T ELT)) (-4267 (($ $) 112 T ELT) (($ $ $) 110 T ELT)) (-4269 (($ $ $) 108 T ELT)) (* (($ |#3| $) 117 T ELT) (($ $ |#3|) 118 T ELT) (($ $ (-558)) 115 T ELT) (($ (-558) $) 114 T ELT) (($ $ $) 121 T ELT))) 
@@ -1139,7 +1139,7 @@ NIL
 ((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) NIL T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4362 (((-114) $) NIL T ELT)) (-4359 (((-791)) NIL T ELT)) (-3750 (((-925 |#1|) $) NIL T ELT) (($ $ (-938)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1878 (((-1210 (-938) (-791)) (-558)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3538 (((-791)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 (-925 |#1|) #1#) $) NIL T ELT)) (-3574 (((-925 |#1|) $) NIL T ELT)) (-2000 (($ (-1288 (-925 |#1|))) NIL T ELT)) (-1876 (((-3 "prime" "polynomial" "normal" "cyclic")) NIL (|has| (-925 |#1|) (-381)) ELT)) (-2963 (($ $ $) NIL T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-3395 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-3234 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1883 (((-114) $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1974 (($ $ (-791)) NIL (-3957 (|has| (-925 |#1|) (-147)) (|has| (-925 |#1|) (-381))) ELT) (($ $) NIL (-3957 (|has| (-925 |#1|) (-147)) (|has| (-925 |#1|) (-381))) ELT)) (-4153 (((-114) $) NIL T ELT)) (-4202 (((-938) $) NIL (|has| (-925 |#1|) (-381)) ELT) (((-845 (-938)) $) NIL (-3957 (|has| (-925 |#1|) (-147)) (|has| (-925 |#1|) (-381))) ELT)) (-2641 (((-114) $) NIL T ELT)) (-2223 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-2221 (((-114) $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3534 (((-925 |#1|) $) NIL T ELT) (($ $ (-938)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3865 (((-711 $) $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2224 (((-1192 (-925 |#1|)) $) NIL T ELT) (((-1192 $) $ (-938)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-2220 (((-938) $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1807 (((-1192 (-925 |#1|)) $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1806 (((-1192 (-925 |#1|)) $) NIL (|has| (-925 |#1|) (-381)) ELT) (((-3 (-1192 (-925 |#1|)) #1#) $ $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1808 (($ $ (-1192 (-925 |#1|))) NIL (|has| (-925 |#1|) (-381)) ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) NIL T ELT)) (-3866 (($) NIL (|has| (-925 |#1|) (-381)) CONST)) (-2631 (($ (-938)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-4361 (((-114) $) NIL T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1870 (((-977 (-1141))) NIL T ELT)) (-2640 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-1879 (((-661 (-2 (|:| -4162 (-558)) (|:| -2632 (-558))))) NIL (|has| (-925 |#1|) (-381)) ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-4360 (((-845 (-938))) NIL T ELT) (((-938)) NIL T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-1975 (((-791) $) NIL (|has| (-925 |#1|) (-381)) ELT) (((-3 (-791) #1#) $ $) NIL (-3957 (|has| (-925 |#1|) (-147)) (|has| (-925 |#1|) (-381))) ELT)) (-4341 (((-136)) NIL T ELT)) (-4188 (($ $ (-791)) NIL (|has| (-925 |#1|) (-381)) ELT) (($ $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-4378 (((-845 (-938)) $) NIL T ELT) (((-938) $) NIL T ELT)) (-3603 (((-1192 (-925 |#1|))) NIL T ELT)) (-1877 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-1809 (($) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3642 (((-1288 (-925 |#1|)) $) NIL T ELT) (((-709 (-925 |#1|)) (-1288 $)) NIL T ELT)) (-3104 (((-3 (-1288 $) #1#) (-709 $)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-4376 (((-877) $) NIL T ELT) (($ (-558)) NIL T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ (-925 |#1|)) NIL T ELT)) (-3103 (($ $) NIL (|has| (-925 |#1|) (-381)) ELT) (((-711 $) $) NIL (-3957 (|has| (-925 |#1|) (-147)) (|has| (-925 |#1|) (-381))) ELT)) (-3528 (((-791)) NIL T CONST)) (-1378 (((-114) $ $) NIL T ELT)) (-2222 (((-1288 $)) NIL T ELT) (((-1288 $) (-938)) NIL T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-4363 (((-114) $) NIL T ELT)) (-3059 (($) NIL T CONST)) (-3065 (($) NIL T CONST)) (-4358 (($ $) NIL (|has| (-925 |#1|) (-381)) ELT) (($ $ (-791)) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3070 (($ $ (-791)) NIL (|has| (-925 |#1|) (-381)) ELT) (($ $) NIL (|has| (-925 |#1|) (-381)) ELT)) (-3454 (((-114) $ $) NIL T ELT)) (-4379 (($ $ $) NIL T ELT) (($ $ (-925 |#1|)) NIL T ELT)) (-4267 (($ $) NIL T ELT) (($ $ $) NIL T ELT)) (-4269 (($ $ $) NIL T ELT)) (** (($ $ (-938)) NIL T ELT) (($ $ (-791)) NIL T ELT) (($ $ (-558)) NIL T ELT)) (* (($ (-938) $) NIL T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) NIL T ELT) (($ $ $) NIL T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT) (($ $ (-925 |#1|)) NIL T ELT) (($ (-925 |#1|) $) NIL T ELT))) 
 (((-357 |#1| |#2|) (-13 (-341 (-925 |#1|)) (-10 -7 (-15 -1870 ((-977 (-1141)))))) (-938) (-938)) (T -357)) 
 ((-1870 (*1 *2) (-12 (-5 *2 (-977 (-1141))) (-5 *1 (-357 *3 *4)) (-14 *3 (-938)) (-14 *4 (-938))))) 
-((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) 58 T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4362 (((-114) $) NIL T ELT)) (-4359 (((-791)) NIL T ELT)) (-3750 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-1878 (((-1210 (-938) (-791)) (-558)) 56 (|has| |#1| (-381)) ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3538 (((-791)) NIL (|has| |#1| (-381)) ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 |#1| #1#) $) 142 T ELT)) (-3574 ((|#1| $) 113 T ELT)) (-2000 (($ (-1288 |#1|)) 130 T ELT)) (-1876 (((-3 "prime" "polynomial" "normal" "cyclic")) 121 (|has| |#1| (-381)) ELT)) (-2963 (($ $ $) NIL T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-3395 (($) 124 (|has| |#1| (-381)) ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-3234 (($) 160 (|has| |#1| (-381)) ELT)) (-1883 (((-114) $) 66 (|has| |#1| (-381)) ELT)) (-1974 (($ $ (-791)) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT) (($ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4153 (((-114) $) NIL T ELT)) (-4202 (((-938) $) 60 (|has| |#1| (-381)) ELT) (((-845 (-938)) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-2641 (((-114) $) 62 T ELT)) (-2223 (($) 162 (|has| |#1| (-381)) ELT)) (-2221 (((-114) $) NIL (|has| |#1| (-381)) ELT)) (-3534 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-3865 (((-711 $) $) NIL (|has| |#1| (-381)) ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2224 (((-1192 |#1|) $) 117 T ELT) (((-1192 $) $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-2220 (((-938) $) 171 (|has| |#1| (-381)) ELT)) (-1807 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT)) (-1806 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-1192 |#1|) #1#) $ $) NIL (|has| |#1| (-381)) ELT)) (-1808 (($ $ (-1192 |#1|)) NIL (|has| |#1| (-381)) ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) 178 T ELT)) (-3866 (($) NIL (|has| |#1| (-381)) CONST)) (-2631 (($ (-938)) 96 (|has| |#1| (-381)) ELT)) (-4361 (((-114) $) 147 T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1870 (((-977 (-1141))) 57 T ELT)) (-2640 (($) 158 (|has| |#1| (-381)) ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-1879 (((-661 (-2 (|:| -4162 (-558)) (|:| -2632 (-558))))) 119 (|has| |#1| (-381)) ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-4360 (((-845 (-938))) 90 T ELT) (((-938)) 91 T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-1975 (((-791) $) 161 (|has| |#1| (-381)) ELT) (((-3 (-791) #1#) $ $) 154 (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4341 (((-136)) NIL T ELT)) (-4188 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-4378 (((-845 (-938)) $) NIL T ELT) (((-938) $) NIL T ELT)) (-3603 (((-1192 |#1|)) 122 T ELT)) (-1877 (($) 159 (|has| |#1| (-381)) ELT)) (-1809 (($) 167 (|has| |#1| (-381)) ELT)) (-3642 (((-1288 |#1|) $) 77 T ELT) (((-709 |#1|) (-1288 $)) NIL T ELT)) (-3104 (((-3 (-1288 $) #1#) (-709 $)) NIL (|has| |#1| (-381)) ELT)) (-4376 (((-877) $) 174 T ELT) (($ (-558)) NIL T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ |#1|) 100 T ELT)) (-3103 (($ $) NIL (|has| |#1| (-381)) ELT) (((-711 $) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-3528 (((-791)) 155 T CONST)) (-1378 (((-114) $ $) NIL T ELT)) (-2222 (((-1288 $)) 144 T ELT) (((-1288 $) (-938)) 98 T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-4363 (((-114) $) NIL T ELT)) (-3059 (($) 67 T CONST)) (-3065 (($) 103 T CONST)) (-4358 (($ $) 107 (|has| |#1| (-381)) ELT) (($ $ (-791)) NIL (|has| |#1| (-381)) ELT)) (-3070 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-3454 (((-114) $ $) 65 T ELT)) (-4379 (($ $ $) 176 T ELT) (($ $ |#1|) 177 T ELT)) (-4267 (($ $) 157 T ELT) (($ $ $) NIL T ELT)) (-4269 (($ $ $) 86 T ELT)) (** (($ $ (-938)) 180 T ELT) (($ $ (-791)) 181 T ELT) (($ $ (-558)) 179 T ELT)) (* (($ (-938) $) NIL T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) 102 T ELT) (($ $ $) 101 T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT) (($ $ |#1|) NIL T ELT) (($ |#1| $) 175 T ELT))) 
+((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) 58 T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4362 (((-114) $) NIL T ELT)) (-4359 (((-791)) NIL T ELT)) (-3750 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-1878 (((-1210 (-938) (-791)) (-558)) 56 (|has| |#1| (-381)) ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3538 (((-791)) NIL (|has| |#1| (-381)) ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 |#1| #1#) $) 141 T ELT)) (-3574 ((|#1| $) 113 T ELT)) (-2000 (($ (-1288 |#1|)) 130 T ELT)) (-1876 (((-3 "prime" "polynomial" "normal" "cyclic")) 121 (|has| |#1| (-381)) ELT)) (-2963 (($ $ $) NIL T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-3395 (($) 124 (|has| |#1| (-381)) ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-3234 (($) 159 (|has| |#1| (-381)) ELT)) (-1883 (((-114) $) 66 (|has| |#1| (-381)) ELT)) (-1974 (($ $ (-791)) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT) (($ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4153 (((-114) $) NIL T ELT)) (-4202 (((-938) $) 60 (|has| |#1| (-381)) ELT) (((-845 (-938)) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-2641 (((-114) $) 62 T ELT)) (-2223 (($) 161 (|has| |#1| (-381)) ELT)) (-2221 (((-114) $) NIL (|has| |#1| (-381)) ELT)) (-3534 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-3865 (((-711 $) $) NIL (|has| |#1| (-381)) ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2224 (((-1192 |#1|) $) 117 T ELT) (((-1192 $) $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-2220 (((-938) $) 170 (|has| |#1| (-381)) ELT)) (-1807 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT)) (-1806 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-1192 |#1|) #1#) $ $) NIL (|has| |#1| (-381)) ELT)) (-1808 (($ $ (-1192 |#1|)) NIL (|has| |#1| (-381)) ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) 177 T ELT)) (-3866 (($) NIL (|has| |#1| (-381)) CONST)) (-2631 (($ (-938)) 96 (|has| |#1| (-381)) ELT)) (-4361 (((-114) $) 146 T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1870 (((-977 (-1141))) 57 T ELT)) (-2640 (($) 157 (|has| |#1| (-381)) ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-1879 (((-661 (-2 (|:| -4162 (-558)) (|:| -2632 (-558))))) 119 (|has| |#1| (-381)) ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-4360 (((-845 (-938))) 90 T ELT) (((-938)) 91 T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-1975 (((-791) $) 160 (|has| |#1| (-381)) ELT) (((-3 (-791) #1#) $ $) 153 (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4341 (((-136)) NIL T ELT)) (-4188 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-4378 (((-845 (-938)) $) NIL T ELT) (((-938) $) NIL T ELT)) (-3603 (((-1192 |#1|)) 122 T ELT)) (-1877 (($) 158 (|has| |#1| (-381)) ELT)) (-1809 (($) 166 (|has| |#1| (-381)) ELT)) (-3642 (((-1288 |#1|) $) 77 T ELT) (((-709 |#1|) (-1288 $)) NIL T ELT)) (-3104 (((-3 (-1288 $) #1#) (-709 $)) NIL (|has| |#1| (-381)) ELT)) (-4376 (((-877) $) 173 T ELT) (($ (-558)) NIL T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ |#1|) 100 T ELT)) (-3103 (($ $) NIL (|has| |#1| (-381)) ELT) (((-711 $) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-3528 (((-791)) 154 T CONST)) (-1378 (((-114) $ $) NIL T ELT)) (-2222 (((-1288 $)) 143 T ELT) (((-1288 $) (-938)) 98 T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-4363 (((-114) $) NIL T ELT)) (-3059 (($) 67 T CONST)) (-3065 (($) 103 T CONST)) (-4358 (($ $) 107 (|has| |#1| (-381)) ELT) (($ $ (-791)) NIL (|has| |#1| (-381)) ELT)) (-3070 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-3454 (((-114) $ $) 65 T ELT)) (-4379 (($ $ $) 175 T ELT) (($ $ |#1|) 176 T ELT)) (-4267 (($ $) 156 T ELT) (($ $ $) NIL T ELT)) (-4269 (($ $ $) 86 T ELT)) (** (($ $ (-938)) 179 T ELT) (($ $ (-791)) 180 T ELT) (($ $ (-558)) 178 T ELT)) (* (($ (-938) $) NIL T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) 102 T ELT) (($ $ $) 101 T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT) (($ $ |#1|) NIL T ELT) (($ |#1| $) 174 T ELT))) 
 (((-358 |#1| |#2|) (-13 (-341 |#1|) (-10 -7 (-15 -1870 ((-977 (-1141)))))) (-363) (-1192 |#1|)) (T -358)) 
 ((-1870 (*1 *2) (-12 (-5 *2 (-977 (-1141))) (-5 *1 (-358 *3 *4)) (-4 *3 (-363)) (-14 *4 (-1192 *3))))) 
 ((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) NIL T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4362 (((-114) $) NIL T ELT)) (-4359 (((-791)) NIL T ELT)) (-3750 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-1878 (((-1210 (-938) (-791)) (-558)) NIL (|has| |#1| (-381)) ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3538 (((-791)) NIL (|has| |#1| (-381)) ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 |#1| #1#) $) NIL T ELT)) (-3574 ((|#1| $) NIL T ELT)) (-2000 (($ (-1288 |#1|)) NIL T ELT)) (-1876 (((-3 "prime" "polynomial" "normal" "cyclic")) NIL (|has| |#1| (-381)) ELT)) (-2963 (($ $ $) NIL T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-3395 (($) NIL (|has| |#1| (-381)) ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-3234 (($) NIL (|has| |#1| (-381)) ELT)) (-1883 (((-114) $) NIL (|has| |#1| (-381)) ELT)) (-1974 (($ $ (-791)) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT) (($ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4153 (((-114) $) NIL T ELT)) (-4202 (((-938) $) NIL (|has| |#1| (-381)) ELT) (((-845 (-938)) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-2641 (((-114) $) NIL T ELT)) (-2223 (($) NIL (|has| |#1| (-381)) ELT)) (-2221 (((-114) $) NIL (|has| |#1| (-381)) ELT)) (-3534 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-3865 (((-711 $) $) NIL (|has| |#1| (-381)) ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2224 (((-1192 |#1|) $) NIL T ELT) (((-1192 $) $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-2220 (((-938) $) NIL (|has| |#1| (-381)) ELT)) (-1807 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT)) (-1806 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-1192 |#1|) #1#) $ $) NIL (|has| |#1| (-381)) ELT)) (-1808 (($ $ (-1192 |#1|)) NIL (|has| |#1| (-381)) ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) NIL T ELT)) (-3866 (($) NIL (|has| |#1| (-381)) CONST)) (-2631 (($ (-938)) NIL (|has| |#1| (-381)) ELT)) (-4361 (((-114) $) NIL T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-1870 (((-977 (-1141))) NIL T ELT)) (-2640 (($) NIL (|has| |#1| (-381)) ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-1879 (((-661 (-2 (|:| -4162 (-558)) (|:| -2632 (-558))))) NIL (|has| |#1| (-381)) ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-4360 (((-845 (-938))) NIL T ELT) (((-938)) NIL T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-1975 (((-791) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-791) #1#) $ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4341 (((-136)) NIL T ELT)) (-4188 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-4378 (((-845 (-938)) $) NIL T ELT) (((-938) $) NIL T ELT)) (-3603 (((-1192 |#1|)) NIL T ELT)) (-1877 (($) NIL (|has| |#1| (-381)) ELT)) (-1809 (($) NIL (|has| |#1| (-381)) ELT)) (-3642 (((-1288 |#1|) $) NIL T ELT) (((-709 |#1|) (-1288 $)) NIL T ELT)) (-3104 (((-3 (-1288 $) #1#) (-709 $)) NIL (|has| |#1| (-381)) ELT)) (-4376 (((-877) $) NIL T ELT) (($ (-558)) NIL T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ |#1|) NIL T ELT)) (-3103 (($ $) NIL (|has| |#1| (-381)) ELT) (((-711 $) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-3528 (((-791)) NIL T CONST)) (-1378 (((-114) $ $) NIL T ELT)) (-2222 (((-1288 $)) NIL T ELT) (((-1288 $) (-938)) NIL T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-4363 (((-114) $) NIL T ELT)) (-3059 (($) NIL T CONST)) (-3065 (($) NIL T CONST)) (-4358 (($ $) NIL (|has| |#1| (-381)) ELT) (($ $ (-791)) NIL (|has| |#1| (-381)) ELT)) (-3070 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-3454 (((-114) $ $) NIL T ELT)) (-4379 (($ $ $) NIL T ELT) (($ $ |#1|) NIL T ELT)) (-4267 (($ $) NIL T ELT) (($ $ $) NIL T ELT)) (-4269 (($ $ $) NIL T ELT)) (** (($ $ (-938)) NIL T ELT) (($ $ (-791)) NIL T ELT) (($ $ (-558)) NIL T ELT)) (* (($ (-938) $) NIL T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) NIL T ELT) (($ $ $) NIL T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT) (($ $ |#1|) NIL T ELT) (($ |#1| $) NIL T ELT))) 
@@ -1174,7 +1174,7 @@ NIL
 ((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) NIL T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4362 (((-114) $) NIL T ELT)) (-4359 (((-791)) NIL T ELT)) (-3750 ((|#1| $) NIL T ELT) (($ $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-1878 (((-1210 (-938) (-791)) (-558)) 129 (|has| |#1| (-381)) ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3538 (((-791)) 155 (|has| |#1| (-381)) ELT)) (-4154 (($) NIL T CONST)) (-3575 (((-3 |#1| #1#) $) 103 T ELT)) (-3574 ((|#1| $) 100 T ELT)) (-2000 (($ (-1288 |#1|)) 95 T ELT)) (-1876 (((-3 "prime" "polynomial" "normal" "cyclic")) 126 (|has| |#1| (-381)) ELT)) (-2963 (($ $ $) NIL T ELT)) (-3887 (((-3 $ #1#) $) NIL T ELT)) (-3395 (($) 92 (|has| |#1| (-381)) ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-3234 (($) 51 (|has| |#1| (-381)) ELT)) (-1883 (((-114) $) NIL (|has| |#1| (-381)) ELT)) (-1974 (($ $ (-791)) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT) (($ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4153 (((-114) $) NIL T ELT)) (-4202 (((-938) $) NIL (|has| |#1| (-381)) ELT) (((-845 (-938)) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-2641 (((-114) $) NIL T ELT)) (-2223 (($) 130 (|has| |#1| (-381)) ELT)) (-2221 (((-114) $) 84 (|has| |#1| (-381)) ELT)) (-3534 ((|#1| $) 47 T ELT) (($ $ (-938)) 52 (|has| |#1| (-381)) ELT)) (-3865 (((-711 $) $) NIL (|has| |#1| (-381)) ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2224 (((-1192 |#1|) $) 75 T ELT) (((-1192 $) $ (-938)) NIL (|has| |#1| (-381)) ELT)) (-2220 (((-938) $) 107 (|has| |#1| (-381)) ELT)) (-1807 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT)) (-1806 (((-1192 |#1|) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-1192 |#1|) #1#) $ $) NIL (|has| |#1| (-381)) ELT)) (-1808 (($ $ (-1192 |#1|)) NIL (|has| |#1| (-381)) ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) NIL T ELT)) (-3866 (($) NIL (|has| |#1| (-381)) CONST)) (-2631 (($ (-938)) 105 (|has| |#1| (-381)) ELT)) (-4361 (((-114) $) 157 T ELT)) (-3661 (((-1141) $) NIL T ELT)) (-2640 (($) 44 (|has| |#1| (-381)) ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-1879 (((-661 (-2 (|:| -4162 (-558)) (|:| -2632 (-558))))) 124 (|has| |#1| (-381)) ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-4360 (((-845 (-938))) NIL T ELT) (((-938)) 154 T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-1975 (((-791) $) NIL (|has| |#1| (-381)) ELT) (((-3 (-791) #1#) $ $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-4341 (((-136)) NIL T ELT)) (-4188 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-4378 (((-845 (-938)) $) NIL T ELT) (((-938) $) 67 T ELT)) (-3603 (((-1192 |#1|)) 98 T ELT)) (-1877 (($) 135 (|has| |#1| (-381)) ELT)) (-1809 (($) NIL (|has| |#1| (-381)) ELT)) (-3642 (((-1288 |#1|) $) 63 T ELT) (((-709 |#1|) (-1288 $)) NIL T ELT)) (-3104 (((-3 (-1288 $) #1#) (-709 $)) NIL (|has| |#1| (-381)) ELT)) (-4376 (((-877) $) 153 T ELT) (($ (-558)) NIL T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ |#1|) 97 T ELT)) (-3103 (($ $) NIL (|has| |#1| (-381)) ELT) (((-711 $) $) NIL (-3957 (|has| |#1| (-147)) (|has| |#1| (-381))) ELT)) (-3528 (((-791)) 159 T CONST)) (-1378 (((-114) $ $) 161 T ELT)) (-2222 (((-1288 $)) 119 T ELT) (((-1288 $) (-938)) 58 T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-4363 (((-114) $) NIL T ELT)) (-3059 (($) 121 T CONST)) (-3065 (($) 40 T CONST)) (-4358 (($ $) 78 (|has| |#1| (-381)) ELT) (($ $ (-791)) NIL (|has| |#1| (-381)) ELT)) (-3070 (($ $ (-791)) NIL (|has| |#1| (-381)) ELT) (($ $) NIL (|has| |#1| (-381)) ELT)) (-3454 (((-114) $ $) 117 T ELT)) (-4379 (($ $ $) 109 T ELT) (($ $ |#1|) 110 T ELT)) (-4267 (($ $) 90 T ELT) (($ $ $) 115 T ELT)) (-4269 (($ $ $) 113 T ELT)) (** (($ $ (-938)) NIL T ELT) (($ $ (-791)) 53 T ELT) (($ $ (-558)) 138 T ELT)) (* (($ (-938) $) NIL T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) 88 T ELT) (($ $ $) 65 T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT) (($ $ |#1|) NIL T ELT) (($ |#1| $) 86 T ELT))) 
 (((-368 |#1| |#2|) (-341 |#1|) (-363) (-1192 |#1|)) (T -368)) 
 NIL 
-((-1898 (((-977 (-1192 |#1|)) (-1192 |#1|)) 49 T ELT)) (-3395 (((-1192 |#1|) (-938) (-938)) 157 T ELT) (((-1192 |#1|) (-938)) 153 T ELT)) (-1883 (((-114) (-1192 |#1|)) 109 T ELT)) (-1885 (((-938) (-938)) 85 T ELT)) (-1886 (((-938) (-938)) 93 T ELT)) (-1884 (((-938) (-938)) 83 T ELT)) (-2221 (((-114) (-1192 |#1|)) 113 T ELT)) (-1893 (((-3 (-1192 |#1|) #1="failed") (-1192 |#1|)) 137 T ELT)) (-1896 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 142 T ELT)) (-1895 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 141 T ELT)) (-1894 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 140 T ELT)) (-1892 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 133 T ELT)) (-1897 (((-1192 |#1|) (-1192 |#1|)) 71 T ELT)) (-1888 (((-1192 |#1|) (-938)) 147 T ELT)) (-1891 (((-1192 |#1|) (-938)) 150 T ELT)) (-1890 (((-1192 |#1|) (-938)) 149 T ELT)) (-1889 (((-1192 |#1|) (-938)) 148 T ELT)) (-1887 (((-1192 |#1|) (-938)) 145 T ELT))) 
+((-1898 (((-977 (-1192 |#1|)) (-1192 |#1|)) 49 T ELT)) (-3395 (((-1192 |#1|) (-938) (-938)) 159 T ELT) (((-1192 |#1|) (-938)) 155 T ELT)) (-1883 (((-114) (-1192 |#1|)) 110 T ELT)) (-1885 (((-938) (-938)) 85 T ELT)) (-1886 (((-938) (-938)) 94 T ELT)) (-1884 (((-938) (-938)) 83 T ELT)) (-2221 (((-114) (-1192 |#1|)) 114 T ELT)) (-1893 (((-3 (-1192 |#1|) #1="failed") (-1192 |#1|)) 139 T ELT)) (-1896 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 144 T ELT)) (-1895 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 143 T ELT)) (-1894 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 142 T ELT)) (-1892 (((-3 (-1192 |#1|) #1#) (-1192 |#1|)) 134 T ELT)) (-1897 (((-1192 |#1|) (-1192 |#1|)) 71 T ELT)) (-1888 (((-1192 |#1|) (-938)) 149 T ELT)) (-1891 (((-1192 |#1|) (-938)) 152 T ELT)) (-1890 (((-1192 |#1|) (-938)) 151 T ELT)) (-1889 (((-1192 |#1|) (-938)) 150 T ELT)) (-1887 (((-1192 |#1|) (-938)) 147 T ELT))) 
 (((-369 |#1|) (-10 -7 (-15 -1883 ((-114) (-1192 |#1|))) (-15 -2221 ((-114) (-1192 |#1|))) (-15 -1884 ((-938) (-938))) (-15 -1885 ((-938) (-938))) (-15 -1886 ((-938) (-938))) (-15 -1887 ((-1192 |#1|) (-938))) (-15 -1888 ((-1192 |#1|) (-938))) (-15 -1889 ((-1192 |#1|) (-938))) (-15 -1890 ((-1192 |#1|) (-938))) (-15 -1891 ((-1192 |#1|) (-938))) (-15 -1892 ((-3 (-1192 |#1|) #1="failed") (-1192 |#1|))) (-15 -1893 ((-3 (-1192 |#1|) #1#) (-1192 |#1|))) (-15 -1894 ((-3 (-1192 |#1|) #1#) (-1192 |#1|))) (-15 -1895 ((-3 (-1192 |#1|) #1#) (-1192 |#1|))) (-15 -1896 ((-3 (-1192 |#1|) #1#) (-1192 |#1|))) (-15 -3395 ((-1192 |#1|) (-938))) (-15 -3395 ((-1192 |#1|) (-938) (-938))) (-15 -1897 ((-1192 |#1|) (-1192 |#1|))) (-15 -1898 ((-977 (-1192 |#1|)) (-1192 |#1|)))) (-363)) (T -369)) 
 ((-1898 (*1 *2 *3) (-12 (-4 *4 (-363)) (-5 *2 (-977 (-1192 *4))) (-5 *1 (-369 *4)) (-5 *3 (-1192 *4)))) (-1897 (*1 *2 *2) (-12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-3395 (*1 *2 *3 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-3395 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1896 (*1 *2 *2) (|partial| -12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-1895 (*1 *2 *2) (|partial| -12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-1894 (*1 *2 *2) (|partial| -12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-1893 (*1 *2 *2) (|partial| -12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-1892 (*1 *2 *2) (|partial| -12 (-5 *2 (-1192 *3)) (-4 *3 (-363)) (-5 *1 (-369 *3)))) (-1891 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1890 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1889 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1888 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1887 (*1 *2 *3) (-12 (-5 *3 (-938)) (-5 *2 (-1192 *4)) (-5 *1 (-369 *4)) (-4 *4 (-363)))) (-1886 (*1 *2 *2) (-12 (-5 *2 (-938)) (-5 *1 (-369 *3)) (-4 *3 (-363)))) (-1885 (*1 *2 *2) (-12 (-5 *2 (-938)) (-5 *1 (-369 *3)) (-4 *3 (-363)))) (-1884 (*1 *2 *2) (-12 (-5 *2 (-938)) (-5 *1 (-369 *3)) (-4 *3 (-363)))) (-2221 (*1 *2 *3) (-12 (-5 *3 (-1192 *4)) (-4 *4 (-363)) (-5 *2 (-114)) (-5 *1 (-369 *4)))) (-1883 (*1 *2 *3) (-12 (-5 *3 (-1192 *4)) (-4 *4 (-363)) (-5 *2 (-114)) (-5 *1 (-369 *4))))) 
 ((-1899 ((|#1| (-1192 |#2|)) 60 T ELT))) 
@@ -1256,7 +1256,7 @@ NIL
 NIL 
 (-13 (-658 |t#1|) (-10 -7 (IF (|has| |t#1| (-658 (-558))) (-6 (-658 (-558))) |%noBranch|))) 
 (((-21) . T) ((-23) . T) ((-25) . T) ((-102) . T) ((-133) . T) ((-630 (-877)) . T) ((-666 (-558)) . T) ((-666 |#1|) . T) ((-668 (-558)) |has| |#1| (-658 (-558))) ((-668 |#1|) . T) ((-658 (-558)) |has| |#1| (-658 (-558))) ((-658 |#1|) . T) ((-1122) . T) ((-1238) . T)) 
-((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) 16 T ELT)) (-3531 (((-558) $) 44 T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4201 (($ $) 120 T ELT)) (-3912 (($ $) 81 T ELT)) (-4069 (($ $) 72 T ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-3438 (($ $) 28 T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3910 (($ $) 79 T ELT)) (-4068 (($ $) 67 T ELT)) (-4053 (((-558) $) 60 T ELT)) (-2830 (($ $ (-558)) 55 T ELT)) (-3914 (($ $) NIL T ELT)) (-4067 (($ $) NIL T ELT)) (-4154 (($) NIL T CONST)) (-3529 (($ $) 122 T ELT)) (-3575 (((-3 (-558) #1#) $) 217 T ELT) (((-3 (-419 (-558)) #1#) $) 213 T ELT)) (-3574 (((-558) $) 215 T ELT) (((-419 (-558)) $) 211 T ELT)) (-2963 (($ $ $) NIL T ELT)) (-1948 (((-558) $ $) 110 T ELT)) (-3887 (((-3 $ #1#) $) 125 T ELT)) (-1947 (((-419 (-558)) $ (-791)) 218 T ELT) (((-419 (-558)) $ (-791) (-791)) 210 T ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-4153 (((-114) $) NIL T ELT)) (-2605 (((-938)) 106 T ELT) (((-938) (-938)) 107 (|has| $ (-6 -4416)) ELT)) (-3604 (((-114) $) 38 T ELT)) (-4057 (($) 22 T ELT)) (-3197 (((-903 (-391) $) $ (-905 (-391)) (-903 (-391) $)) NIL T ELT)) (-1940 (((-1294) (-791)) 177 T ELT)) (-1941 (((-1294)) 182 T ELT) (((-1294) (-791)) 183 T ELT)) (-1943 (((-1294)) 184 T ELT) (((-1294) (-791)) 185 T ELT)) (-1942 (((-1294)) 180 T ELT) (((-1294) (-791)) 181 T ELT)) (-4202 (((-558) $) 50 T ELT)) (-2641 (((-114) $) 21 T ELT)) (-3412 (($ $ (-558)) NIL T ELT)) (-2832 (($ $) 32 T ELT)) (-3534 (($ $) NIL T ELT)) (-3605 (((-114) $) 18 T ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2930 (($ $ $) NIL T ELT) (($) NIL (-12 (-2959 (|has| $ (-6 -4408))) (-2959 (|has| $ (-6 -4416)))) ELT)) (-3258 (($ $ $) NIL T ELT) (($) NIL (-12 (-2959 (|has| $ (-6 -4408))) (-2959 (|has| $ (-6 -4416)))) ELT)) (-2606 (((-558) $) 112 T ELT)) (-1946 (($) 90 T ELT) (($ $) 97 T ELT)) (-1945 (($) 96 T ELT) (($ $) 98 T ELT)) (-4372 (($ $) 84 T ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) 127 T ELT)) (-1977 (((-938) (-558)) 27 (|has| $ (-6 -4416)) ELT)) (-3661 (((-1141) $) NIL T ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3530 (($ $) 41 T ELT)) (-3532 (($ $) 119 T ELT)) (-3672 (($ (-558) (-558)) 115 T ELT) (($ (-558) (-558) (-938)) 116 T ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-2632 (((-558) $) 113 T ELT)) (-1944 (($) 99 T ELT)) (-4373 (($ $) 78 T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-3014 (((-938)) 108 T ELT) (((-938) (-938)) 109 (|has| $ (-6 -4416)) ELT)) (-4188 (($ $) 126 T ELT) (($ $ (-791)) NIL T ELT)) (-1976 (((-938) (-558)) 31 (|has| $ (-6 -4416)) ELT)) (-3915 (($ $) NIL T ELT)) (-4066 (($ $) NIL T ELT)) (-3913 (($ $) NIL T ELT)) (-4065 (($ $) NIL T ELT)) (-3911 (($ $) 80 T ELT)) (-4064 (($ $) 71 T ELT)) (-4402 (((-391) $) 203 T ELT) (((-229) $) 204 T ELT) (((-905 (-391)) $) NIL T ELT) (((-1180) $) 188 T ELT) (((-547) $) 201 T ELT) (($ (-229)) 209 T ELT)) (-4376 (((-877) $) 192 T ELT) (($ (-558)) 214 T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ (-558)) 214 T ELT) (($ (-419 (-558))) NIL T ELT) (((-229) $) 205 T ELT)) (-3528 (((-791)) NIL T CONST)) (-3533 (($ $) 121 T ELT)) (-1978 (((-938)) 42 T ELT) (((-938) (-938)) 62 (|has| $ (-6 -4416)) ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3095 (((-938)) 111 T ELT)) (-3918 (($ $) 87 T ELT)) (-3906 (($ $) 30 T ELT) (($ $ $) 40 T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-3916 (($ $) 85 T ELT)) (-3904 (($ $) 20 T ELT)) (-3920 (($ $) NIL T ELT)) (-3908 (($ $) NIL T ELT)) (-3921 (($ $) NIL T ELT)) (-3909 (($ $) NIL T ELT)) (-3919 (($ $) NIL T ELT)) (-3907 (($ $) NIL T ELT)) (-3917 (($ $) 86 T ELT)) (-3905 (($ $) 33 T ELT)) (-3803 (($ $) 39 T ELT)) (-3059 (($) 17 T CONST)) (-3065 (($) 24 T CONST)) (-3070 (($ $) NIL T ELT) (($ $ (-791)) NIL T ELT)) (-2965 (((-114) $ $) 189 T ELT)) (-2966 (((-114) $ $) 26 T ELT)) (-3454 (((-114) $ $) 37 T ELT)) (-3085 (((-114) $ $) NIL T ELT)) (-3086 (((-114) $ $) 43 T ELT)) (-4379 (($ $ $) 29 T ELT) (($ $ (-558)) 23 T ELT)) (-4267 (($ $) 19 T ELT) (($ $ $) 34 T ELT)) (-4269 (($ $ $) 54 T ELT)) (** (($ $ (-938)) 65 T ELT) (($ $ (-791)) NIL T ELT) (($ $ (-558)) 91 T ELT) (($ $ (-419 (-558))) 137 T ELT) (($ $ $) 129 T ELT)) (* (($ (-938) $) 61 T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) 66 T ELT) (($ $ $) 53 T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT))) 
+((-2967 (((-114) $ $) NIL T ELT)) (-3606 (((-114) $) 16 T ELT)) (-3531 (((-558) $) 44 T ELT)) (-2274 (((-2 (|:| -1980 $) (|:| -4412 $) (|:| |associate| $)) $) NIL T ELT)) (-2273 (($ $) NIL T ELT)) (-2271 (((-114) $) NIL T ELT)) (-4201 (($ $) 120 T ELT)) (-3912 (($ $) 81 T ELT)) (-4069 (($ $) 72 T ELT)) (-1426 (((-3 $ #1="failed") $ $) NIL T ELT)) (-4205 (($ $) NIL T ELT)) (-4401 (((-417 $) $) NIL T ELT)) (-3438 (($ $) 28 T ELT)) (-1788 (((-114) $ $) NIL T ELT)) (-3910 (($ $) 79 T ELT)) (-4068 (($ $) 67 T ELT)) (-4053 (((-558) $) 60 T ELT)) (-2830 (($ $ (-558)) 55 T ELT)) (-3914 (($ $) NIL T ELT)) (-4067 (($ $) NIL T ELT)) (-4154 (($) NIL T CONST)) (-3529 (($ $) 122 T ELT)) (-3575 (((-3 (-558) #1#) $) 217 T ELT) (((-3 (-419 (-558)) #1#) $) 213 T ELT)) (-3574 (((-558) $) 215 T ELT) (((-419 (-558)) $) 211 T ELT)) (-2963 (($ $ $) NIL T ELT)) (-1948 (((-558) $ $) 110 T ELT)) (-3887 (((-3 $ #1#) $) 125 T ELT)) (-1947 (((-419 (-558)) $ (-791)) 218 T ELT) (((-419 (-558)) $ (-791) (-791)) 210 T ELT)) (-2962 (($ $ $) NIL T ELT)) (-3142 (((-2 (|:| -4384 (-661 $)) (|:| -2640 $)) (-661 $)) NIL T ELT)) (-4153 (((-114) $) NIL T ELT)) (-2605 (((-938)) 106 T ELT) (((-938) (-938)) 107 (|has| $ (-6 -4416)) ELT)) (-3604 (((-114) $) 38 T ELT)) (-4057 (($) 22 T ELT)) (-3197 (((-903 (-391) $) $ (-905 (-391)) (-903 (-391) $)) NIL T ELT)) (-1940 (((-1294) (-791)) 177 T ELT)) (-1941 (((-1294)) 182 T ELT) (((-1294) (-791)) 183 T ELT)) (-1943 (((-1294)) 184 T ELT) (((-1294) (-791)) 185 T ELT)) (-1942 (((-1294)) 180 T ELT) (((-1294) (-791)) 181 T ELT)) (-4202 (((-558) $) 50 T ELT)) (-2641 (((-114) $) 21 T ELT)) (-3412 (($ $ (-558)) NIL T ELT)) (-2832 (($ $) 32 T ELT)) (-3534 (($ $) NIL T ELT)) (-3605 (((-114) $) 18 T ELT)) (-1785 (((-3 (-661 $) #1#) (-661 $) $) NIL T ELT)) (-2930 (($ $ $) NIL T ELT) (($) NIL (-12 (-2959 (|has| $ (-6 -4408))) (-2959 (|has| $ (-6 -4416)))) ELT)) (-3258 (($ $ $) NIL T ELT) (($) NIL (-12 (-2959 (|has| $ (-6 -4408))) (-2959 (|has| $ (-6 -4416)))) ELT)) (-2606 (((-558) $) 112 T ELT)) (-1946 (($) 90 T ELT) (($ $) 97 T ELT)) (-1945 (($) 96 T ELT) (($ $) 98 T ELT)) (-4372 (($ $) 84 T ELT)) (-2102 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3660 (((-1180) $) NIL T ELT)) (-2874 (($ $) 127 T ELT)) (-1977 (((-938) (-558)) 27 (|has| $ (-6 -4416)) ELT)) (-3661 (((-1141) $) NIL T ELT)) (-3109 (((-1192 $) (-1192 $) (-1192 $)) NIL T ELT)) (-3562 (($ $ $) NIL T ELT) (($ (-661 $)) NIL T ELT)) (-3530 (($ $) 41 T ELT)) (-3532 (($ $) 119 T ELT)) (-3672 (($ (-558) (-558)) 115 T ELT) (($ (-558) (-558) (-938)) 116 T ELT)) (-4162 (((-417 $) $) NIL T ELT)) (-1786 (((-2 (|:| |coef1| $) (|:| |coef2| $) (|:| -2640 $)) $ $) NIL T ELT) (((-3 (-2 (|:| |coef1| $) (|:| |coef2| $)) #1#) $ $ $) NIL T ELT)) (-3886 (((-3 $ #1#) $ $) NIL T ELT)) (-3141 (((-711 (-661 $)) (-661 $) $) NIL T ELT)) (-2632 (((-558) $) 113 T ELT)) (-1944 (($) 99 T ELT)) (-4373 (($ $) 78 T ELT)) (-1787 (((-791) $) NIL T ELT)) (-3280 (((-2 (|:| -2184 $) (|:| -3303 $)) $ $) NIL T ELT)) (-3014 (((-938)) 108 T ELT) (((-938) (-938)) 109 (|has| $ (-6 -4416)) ELT)) (-4188 (($ $) 126 T ELT) (($ $ (-791)) NIL T ELT)) (-1976 (((-938) (-558)) 31 (|has| $ (-6 -4416)) ELT)) (-3915 (($ $) NIL T ELT)) (-4066 (($ $) NIL T ELT)) (-3913 (($ $) NIL T ELT)) (-4065 (($ $) NIL T ELT)) (-3911 (($ $) 80 T ELT)) (-4064 (($ $) 71 T ELT)) (-4402 (((-391) $) 202 T ELT) (((-229) $) 204 T ELT) (((-905 (-391)) $) NIL T ELT) (((-1180) $) 188 T ELT) (((-547) $) 200 T ELT) (($ (-229)) 209 T ELT)) (-4376 (((-877) $) 192 T ELT) (($ (-558)) 214 T ELT) (($ $) NIL T ELT) (($ (-419 (-558))) NIL T ELT) (($ (-558)) 214 T ELT) (($ (-419 (-558))) NIL T ELT) (((-229) $) 205 T ELT)) (-3528 (((-791)) NIL T CONST)) (-3533 (($ $) 121 T ELT)) (-1978 (((-938)) 42 T ELT) (((-938) (-938)) 62 (|has| $ (-6 -4416)) ELT)) (-1378 (((-114) $ $) NIL T ELT)) (-3095 (((-938)) 111 T ELT)) (-3918 (($ $) 87 T ELT)) (-3906 (($ $) 30 T ELT) (($ $ $) 40 T ELT)) (-2272 (((-114) $ $) NIL T ELT)) (-3916 (($ $) 85 T ELT)) (-3904 (($ $) 20 T ELT)) (-3920 (($ $) NIL T ELT)) (-3908 (($ $) NIL T ELT)) (-3921 (($ $) NIL T ELT)) (-3909 (($ $) NIL T ELT)) (-3919 (($ $) NIL T ELT)) (-3907 (($ $) NIL T ELT)) (-3917 (($ $) 86 T ELT)) (-3905 (($ $) 33 T ELT)) (-3803 (($ $) 39 T ELT)) (-3059 (($) 17 T CONST)) (-3065 (($) 24 T CONST)) (-3070 (($ $) NIL T ELT) (($ $ (-791)) NIL T ELT)) (-2965 (((-114) $ $) 189 T ELT)) (-2966 (((-114) $ $) 26 T ELT)) (-3454 (((-114) $ $) 37 T ELT)) (-3085 (((-114) $ $) NIL T ELT)) (-3086 (((-114) $ $) 43 T ELT)) (-4379 (($ $ $) 29 T ELT) (($ $ (-558)) 23 T ELT)) (-4267 (($ $) 19 T ELT) (($ $ $) 34 T ELT)) (-4269 (($ $ $) 54 T ELT)) (** (($ $ (-938)) 65 T ELT) (($ $ (-791)) NIL T ELT) (($ $ (-558)) 91 T ELT) (($ $ (-419 (-558))) 137 T ELT) (($ $ $) 129 T ELT)) (* (($ (-938) $) 61 T ELT) (($ (-791) $) NIL T ELT) (($ (-558) $) 66 T ELT) (($ $ $) 53 T ELT) (($ $ (-419 (-558))) NIL T ELT) (($ (-419 (-558)) $) NIL T ELT))) 
 (((-391) (-13 (-416) (-240) (-631 (-1180)) (-630 (-229)) (-1224) (-631 (-547)) (-635 (-229)) (-10 -8 (-15 -4379 ($ $ (-558))) (-15 ** ($ $ $)) (-15 -2832 ($ $)) (-15 -1948 ((-558) $ $)) (-15 -2830 ($ $ (-558))) (-15 -1947 ((-419 (-558)) $ (-791))) (-15 -1947 ((-419 (-558)) $ (-791) (-791))) (-15 -1946 ($)) (-15 -1945 ($)) (-15 -1944 ($)) (-15 -3906 ($ $ $)) (-15 -1946 ($ $)) (-15 -1945 ($ $)) (-15 -1943 ((-1294))) (-15 -1943 ((-1294) (-791))) (-15 -1942 ((-1294))) (-15 -1942 ((-1294) (-791))) (-15 -1941 ((-1294))) (-15 -1941 ((-1294) (-791))) (-15 -1940 ((-1294) (-791))) (-6 -4416) (-6 -4408)))) (T -391)) 
 ((** (*1 *1 *1 *1) (-5 *1 (-391))) (-4379 (*1 *1 *1 *2) (-12 (-5 *2 (-558)) (-5 *1 (-391)))) (-2832 (*1 *1 *1) (-5 *1 (-391))) (-1948 (*1 *2 *1 *1) (-12 (-5 *2 (-558)) (-5 *1 (-391)))) (-2830 (*1 *1 *1 *2) (-12 (-5 *2 (-558)) (-5 *1 (-391)))) (-1947 (*1 *2 *1 *3) (-12 (-5 *3 (-791)) (-5 *2 (-419 (-558))) (-5 *1 (-391)))) (-1947 (*1 *2 *1 *3 *3) (-12 (-5 *3 (-791)) (-5 *2 (-419 (-558))) (-5 *1 (-391)))) (-1946 (*1 *1) (-5 *1 (-391))) (-1945 (*1 *1) (-5 *1 (-391))) (-1944 (*1 *1) (-5 *1 (-391))) (-3906 (*1 *1 *1 *1) (-5 *1 (-391))) (-1946 (*1 *1 *1) (-5 *1 (-391))) (-1945 (*1 *1 *1) (-5 *1 (-391))) (-1943 (*1 *2) (-12 (-5 *2 (-1294)) (-5 *1 (-391)))) (-1943 (*1 *2 *3) (-12 (-5 *3 (-791)) (-5 *2 (-1294)) (-5 *1 (-391)))) (-1942 (*1 *2) (-12 (-5 *2 (-1294)) (-5 *1 (-391)))) (-1942 (*1 *2 *3) (-12 (-5 *3 (-791)) (-5 *2 (-1294)) (-5 *1 (-391)))) (-1941 (*1 *2) (-12 (-5 *2 (-1294)) (-5 *1 (-391)))) (-1941 (*1 *2 *3) (-12 (-5 *3 (-791)) (-5 *2 (-1294)) (-5 *1 (-391)))) (-1940 (*1 *2 *3) (-12 (-5 *3 (-791)) (-5 *2 (-1294)) (-5 *1 (-391))))) 
 ((-1949 (((-661 (-305 (-965 (-171 |#1|)))) (-305 (-419 (-965 (-171 (-558))))) |#1|) 51 T ELT) (((-661 (-305 (-965 (-171 |#1|)))) (-419 (-965 (-171 (-558)))) |#1|) 50 T ELT) (((-661 (-661 (-305 (-965 (-171 |#1|))))) (-661 (-305 (-419 (-965 (-171 (-558)))))) |#1|) 47 T ELT) (((-661 (-661 (-305 (-965 (-171 |#1|))))) (-661 (-419 (-965 (-171 (-558))))) |#1|) 41 T ELT)) (-1950 (((-661 (-661 (-171 |#1|))) (-661 (-419 (-965 (-171 (-558))))) (-661 (-1198)) |#1|) 30 T ELT) (((-661 (-171 |#1|)) (-419 (-965 (-171 (-558)))) |#1|) 18 T ELT))) 
@@ -1481,7 +1481,7 @@ NIL
 ((-4376 (*1 *1 *2) (-12 (-5 *2 (-661 (-342))) (-4 *1 (-453)))) (-4376 (*1 *1 *2) (-12 (-5 *2 (-342)) (-4 *1 (-453)))) (-4376 (*1 *1 *2) (-12 (-5 *2 (-2 (|:| |localSymbols| (-1202)) (|:| -1813 (-661 (-342))))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-326 (-391)))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-326 (-391)))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-326 (-558)))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-326 (-558)))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-965 (-391)))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-965 (-391)))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-965 (-558)))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-965 (-558)))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-419 (-965 (-391))))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-419 (-965 (-391))))) (-4 *1 (-453)))) (-3574 (*1 *1 *2) (-12 (-5 *2 (-1288 (-419 (-965 (-558))))) (-4 *1 (-453)))) (-3575 (*1 *1 *2) (|partial| -12 (-5 *2 (-1288 (-419 (-965 (-558))))) (-4 *1 (-453))))) 
 (-13 (-408) (-10 -8 (-15 -4376 ($ (-661 (-342)))) (-15 -4376 ($ (-342))) (-15 -4376 ($ (-2 (|:| |localSymbols| (-1202)) (|:| -1813 (-661 (-342)))))) (-15 -3574 ($ (-1288 (-326 (-391))))) (-15 -3575 ((-3 $ "failed") (-1288 (-326 (-391))))) (-15 -3574 ($ (-1288 (-326 (-558))))) (-15 -3575 ((-3 $ "failed") (-1288 (-326 (-558))))) (-15 -3574 ($ (-1288 (-965 (-391))))) (-15 -3575 ((-3 $ "failed") (-1288 (-965 (-391))))) (-15 -3574 ($ (-1288 (-965 (-558))))) (-15 -3575 ((-3 $ "failed") (-1288 (-965 (-558))))) (-15 -3574 ($ (-1288 (-419 (-965 (-391)))))) (-15 -3575 ((-3 $ "failed") (-1288 (-419 (-965 (-391)))))) (-15 -3574 ($ (-1288 (-419 (-965 (-558)))))) (-15 -3575 ((-3 $ "failed") (-1288 (-419 (-965 (-558)))))))) 
 (((-630 (-877)) . T) ((-408) . T) ((-1238) . T)) 
-((-2047 (((-114)) 18 T ELT)) (-2048 (((-114) (-114)) 19 T ELT)) (-2049 (((-114)) 14 T ELT)) (-2050 (((-114) (-114)) 15 T ELT)) (-2052 (((-114)) 16 T ELT)) (-2053 (((-114) (-114)) 17 T ELT)) (-2044 (((-938) (-938)) 22 T ELT) (((-938)) 21 T ELT)) (-2045 (((-791) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558))))) 52 T ELT)) (-2043 (((-938) (-938)) 24 T ELT) (((-938)) 23 T ELT)) (-2046 (((-2 (|:| -2977 (-558)) (|:| -1987 (-661 |#1|))) |#1|) 94 T ELT)) (-2042 (((-417 |#1|) (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558))))))) 176 T ELT)) (-4164 (((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114)) 210 T ELT)) (-4163 (((-417 |#1|) |#1| (-791) (-791)) 225 T ELT) (((-417 |#1|) |#1| (-661 (-791)) (-791)) 222 T ELT) (((-417 |#1|) |#1| (-661 (-791))) 224 T ELT) (((-417 |#1|) |#1| (-791)) 223 T ELT) (((-417 |#1|) |#1|) 221 T ELT)) (-2064 (((-3 |#1| #1="failed") (-938) |#1| (-661 (-791)) (-791) (-114)) 227 T ELT) (((-3 |#1| #1#) (-938) |#1| (-661 (-791)) (-791)) 228 T ELT) (((-3 |#1| #1#) (-938) |#1| (-661 (-791))) 230 T ELT) (((-3 |#1| #1#) (-938) |#1| (-791)) 229 T ELT) (((-3 |#1| #1#) (-938) |#1|) 231 T ELT)) (-4162 (((-417 |#1|) |#1| (-791) (-791)) 220 T ELT) (((-417 |#1|) |#1| (-661 (-791)) (-791)) 216 T ELT) (((-417 |#1|) |#1| (-661 (-791))) 218 T ELT) (((-417 |#1|) |#1| (-791)) 217 T ELT) (((-417 |#1|) |#1|) 215 T ELT)) (-2051 (((-114) |#1|) 44 T ELT)) (-2063 (((-756 (-791)) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558))))) 99 T ELT)) (-2054 (((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114) (-1118 (-791)) (-791)) 214 T ELT))) 
+((-2047 (((-114)) 18 T ELT)) (-2048 (((-114) (-114)) 19 T ELT)) (-2049 (((-114)) 14 T ELT)) (-2050 (((-114) (-114)) 15 T ELT)) (-2052 (((-114)) 16 T ELT)) (-2053 (((-114) (-114)) 17 T ELT)) (-2044 (((-938) (-938)) 22 T ELT) (((-938)) 21 T ELT)) (-2045 (((-791) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558))))) 52 T ELT)) (-2043 (((-938) (-938)) 24 T ELT) (((-938)) 23 T ELT)) (-2046 (((-2 (|:| -2977 (-558)) (|:| -1987 (-661 |#1|))) |#1|) 94 T ELT)) (-2042 (((-417 |#1|) (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558))))))) 176 T ELT)) (-4164 (((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114)) 209 T ELT)) (-4163 (((-417 |#1|) |#1| (-791) (-791)) 224 T ELT) (((-417 |#1|) |#1| (-661 (-791)) (-791)) 221 T ELT) (((-417 |#1|) |#1| (-661 (-791))) 223 T ELT) (((-417 |#1|) |#1| (-791)) 222 T ELT) (((-417 |#1|) |#1|) 220 T ELT)) (-2064 (((-3 |#1| #1="failed") (-938) |#1| (-661 (-791)) (-791) (-114)) 226 T ELT) (((-3 |#1| #1#) (-938) |#1| (-661 (-791)) (-791)) 227 T ELT) (((-3 |#1| #1#) (-938) |#1| (-661 (-791))) 229 T ELT) (((-3 |#1| #1#) (-938) |#1| (-791)) 228 T ELT) (((-3 |#1| #1#) (-938) |#1|) 230 T ELT)) (-4162 (((-417 |#1|) |#1| (-791) (-791)) 219 T ELT) (((-417 |#1|) |#1| (-661 (-791)) (-791)) 215 T ELT) (((-417 |#1|) |#1| (-661 (-791))) 217 T ELT) (((-417 |#1|) |#1| (-791)) 216 T ELT) (((-417 |#1|) |#1|) 214 T ELT)) (-2051 (((-114) |#1|) 43 T ELT)) (-2063 (((-756 (-791)) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558))))) 99 T ELT)) (-2054 (((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114) (-1118 (-791)) (-791)) 213 T ELT))) 
 (((-454 |#1|) (-10 -7 (-15 -2042 ((-417 |#1|) (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))))) (-15 -2063 ((-756 (-791)) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558)))))) (-15 -2043 ((-938))) (-15 -2043 ((-938) (-938))) (-15 -2044 ((-938))) (-15 -2044 ((-938) (-938))) (-15 -2045 ((-791) (-661 (-2 (|:| -4162 |#1|) (|:| -4378 (-558)))))) (-15 -2046 ((-2 (|:| -2977 (-558)) (|:| -1987 (-661 |#1|))) |#1|)) (-15 -2047 ((-114))) (-15 -2048 ((-114) (-114))) (-15 -2049 ((-114))) (-15 -2050 ((-114) (-114))) (-15 -2051 ((-114) |#1|)) (-15 -2052 ((-114))) (-15 -2053 ((-114) (-114))) (-15 -4162 ((-417 |#1|) |#1|)) (-15 -4162 ((-417 |#1|) |#1| (-791))) (-15 -4162 ((-417 |#1|) |#1| (-661 (-791)))) (-15 -4162 ((-417 |#1|) |#1| (-661 (-791)) (-791))) (-15 -4162 ((-417 |#1|) |#1| (-791) (-791))) (-15 -4163 ((-417 |#1|) |#1|)) (-15 -4163 ((-417 |#1|) |#1| (-791))) (-15 -4163 ((-417 |#1|) |#1| (-661 (-791)))) (-15 -4163 ((-417 |#1|) |#1| (-661 (-791)) (-791))) (-15 -4163 ((-417 |#1|) |#1| (-791) (-791))) (-15 -2064 ((-3 |#1| #1="failed") (-938) |#1|)) (-15 -2064 ((-3 |#1| #1#) (-938) |#1| (-791))) (-15 -2064 ((-3 |#1| #1#) (-938) |#1| (-661 (-791)))) (-15 -2064 ((-3 |#1| #1#) (-938) |#1| (-661 (-791)) (-791))) (-15 -2064 ((-3 |#1| #1#) (-938) |#1| (-661 (-791)) (-791) (-114))) (-15 -4164 ((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114))) (-15 -2054 ((-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| |#1|) (|:| -2626 (-558)))))) |#1| (-114) (-1118 (-791)) (-791)))) (-1264 (-558))) (T -454)) 
 ((-2054 (*1 *2 *3 *4 *5 *6) (-12 (-5 *4 (-114)) (-5 *5 (-1118 (-791))) (-5 *6 (-791)) (-5 *2 (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| *3) (|:| -2626 (-558))))))) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4164 (*1 *2 *3 *4) (-12 (-5 *4 (-114)) (-5 *2 (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| *3) (|:| -2626 (-558))))))) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2064 (*1 *2 *3 *2 *4 *5 *6) (|partial| -12 (-5 *3 (-938)) (-5 *4 (-661 (-791))) (-5 *5 (-791)) (-5 *6 (-114)) (-5 *1 (-454 *2)) (-4 *2 (-1264 (-558))))) (-2064 (*1 *2 *3 *2 *4 *5) (|partial| -12 (-5 *3 (-938)) (-5 *4 (-661 (-791))) (-5 *5 (-791)) (-5 *1 (-454 *2)) (-4 *2 (-1264 (-558))))) (-2064 (*1 *2 *3 *2 *4) (|partial| -12 (-5 *3 (-938)) (-5 *4 (-661 (-791))) (-5 *1 (-454 *2)) (-4 *2 (-1264 (-558))))) (-2064 (*1 *2 *3 *2 *4) (|partial| -12 (-5 *3 (-938)) (-5 *4 (-791)) (-5 *1 (-454 *2)) (-4 *2 (-1264 (-558))))) (-2064 (*1 *2 *3 *2) (|partial| -12 (-5 *3 (-938)) (-5 *1 (-454 *2)) (-4 *2 (-1264 (-558))))) (-4163 (*1 *2 *3 *4 *4) (-12 (-5 *4 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4163 (*1 *2 *3 *4 *5) (-12 (-5 *4 (-661 (-791))) (-5 *5 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4163 (*1 *2 *3 *4) (-12 (-5 *4 (-661 (-791))) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4163 (*1 *2 *3 *4) (-12 (-5 *4 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4163 (*1 *2 *3) (-12 (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4162 (*1 *2 *3 *4 *4) (-12 (-5 *4 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4162 (*1 *2 *3 *4 *5) (-12 (-5 *4 (-661 (-791))) (-5 *5 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4162 (*1 *2 *3 *4) (-12 (-5 *4 (-661 (-791))) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4162 (*1 *2 *3 *4) (-12 (-5 *4 (-791)) (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-4162 (*1 *2 *3) (-12 (-5 *2 (-417 *3)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2053 (*1 *2 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2052 (*1 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2051 (*1 *2 *3) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2050 (*1 *2 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2049 (*1 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2048 (*1 *2 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2047 (*1 *2) (-12 (-5 *2 (-114)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2046 (*1 *2 *3) (-12 (-5 *2 (-2 (|:| -2977 (-558)) (|:| -1987 (-661 *3)))) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2045 (*1 *2 *3) (-12 (-5 *3 (-661 (-2 (|:| -4162 *4) (|:| -4378 (-558))))) (-4 *4 (-1264 (-558))) (-5 *2 (-791)) (-5 *1 (-454 *4)))) (-2044 (*1 *2 *2) (-12 (-5 *2 (-938)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2044 (*1 *2) (-12 (-5 *2 (-938)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2043 (*1 *2 *2) (-12 (-5 *2 (-938)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2043 (*1 *2) (-12 (-5 *2 (-938)) (-5 *1 (-454 *3)) (-4 *3 (-1264 (-558))))) (-2063 (*1 *2 *3) (-12 (-5 *3 (-661 (-2 (|:| -4162 *4) (|:| -4378 (-558))))) (-4 *4 (-1264 (-558))) (-5 *2 (-756 (-791))) (-5 *1 (-454 *4)))) (-2042 (*1 *2 *3) (-12 (-5 *3 (-2 (|:| |contp| (-558)) (|:| -1987 (-661 (-2 (|:| |irr| *4) (|:| -2626 (-558))))))) (-4 *4 (-1264 (-558))) (-5 *2 (-417 *4)) (-5 *1 (-454 *4))))) 
 ((-2058 (((-558) |#2|) 52 T ELT) (((-558) |#2| (-791)) 51 T ELT)) (-2057 (((-558) |#2|) 64 T ELT)) (-2059 ((|#3| |#2|) 26 T ELT)) (-3534 ((|#3| |#2| (-938)) 15 T ELT)) (-4263 ((|#3| |#2|) 16 T ELT)) (-2060 ((|#3| |#2|) 9 T ELT)) (-3002 ((|#3| |#2|) 10 T ELT)) (-2056 ((|#3| |#2| (-938)) 71 T ELT) ((|#3| |#2|) 34 T ELT)) (-2055 (((-558) |#2|) 66 T ELT))) 
@@ -1869,7 +1869,7 @@ NIL
 ((-3486 (((-1192 (-419 (-1192 |#2|))) |#2| (-628 |#2|) (-628 |#2|) (-1192 |#2|)) 35 T ELT)) (-2289 (((-3 (-2 (|:| |mainpart| |#2|) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| |#2|) (|:| |logand| |#2|))))) #1="failed") |#2| (-628 |#2|) (-628 |#2|) (-661 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|))) 105 T ELT) (((-3 (-2 (|:| |mainpart| |#2|) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| |#2|) (|:| |logand| |#2|))))) #1#) |#2| (-628 |#2|) (-628 |#2|) (-661 |#2|) |#2| (-1192 |#2|)) 115 T ELT)) (-2287 (((-595 |#2|) |#2| (-628 |#2|) (-628 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|))) 85 T ELT) (((-595 |#2|) |#2| (-628 |#2|) (-628 |#2|) |#2| (-1192 |#2|)) 55 T ELT)) (-2288 (((-3 (-2 (|:| -2351 |#2|) (|:| |coeff| |#2|)) #1#) |#2| (-628 |#2|) (-628 |#2|) |#2| (-628 |#2|) |#2| (-419 (-1192 |#2|))) 92 T ELT) (((-3 (-2 (|:| -2351 |#2|) (|:| |coeff| |#2|)) #1#) |#2| (-628 |#2|) (-628 |#2|) |#2| |#2| (-1192 |#2|)) 114 T ELT)) (-2290 (((-3 |#2| #1#) |#2| |#2| (-628 |#2|) (-628 |#2|) (-1 (-3 |#2| #1#) |#2| |#2| (-1198)) (-628 |#2|) |#2| (-419 (-1192 |#2|))) 110 T ELT) (((-3 |#2| #1#) |#2| |#2| (-628 |#2|) (-628 |#2|) (-1 (-3 |#2| #1#) |#2| |#2| (-1198)) |#2| (-1192 |#2|)) 116 T ELT)) (-2291 (((-2 (|:| |particular| (-3 |#2| #1#)) (|:| -2222 (-661 |#2|))) |#3| |#2| (-628 |#2|) (-628 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|))) 133 (|has| |#3| (-678 |#2|)) ELT) (((-2 (|:| |particular| (-3 |#2| #1#)) (|:| -2222 (-661 |#2|))) |#3| |#2| (-628 |#2|) (-628 |#2|) |#2| (-1192 |#2|)) 132 (|has| |#3| (-678 |#2|)) ELT)) (-3487 ((|#2| (-1192 (-419 (-1192 |#2|))) (-628 |#2|) |#2|) 53 T ELT)) (-3480 (((-1192 (-419 (-1192 |#2|))) (-1192 |#2|) (-628 |#2|)) 34 T ELT))) 
 (((-573 |#1| |#2| |#3|) (-10 -7 (-15 -2287 ((-595 |#2|) |#2| (-628 |#2|) (-628 |#2|) |#2| (-1192 |#2|))) (-15 -2287 ((-595 |#2|) |#2| (-628 |#2|) (-628 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|)))) (-15 -2288 ((-3 (-2 (|:| -2351 |#2|) (|:| |coeff| |#2|)) #1="failed") |#2| (-628 |#2|) (-628 |#2|) |#2| |#2| (-1192 |#2|))) (-15 -2288 ((-3 (-2 (|:| -2351 |#2|) (|:| |coeff| |#2|)) #1#) |#2| (-628 |#2|) (-628 |#2|) |#2| (-628 |#2|) |#2| (-419 (-1192 |#2|)))) (-15 -2289 ((-3 (-2 (|:| |mainpart| |#2|) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| |#2|) (|:| |logand| |#2|))))) #1#) |#2| (-628 |#2|) (-628 |#2|) (-661 |#2|) |#2| (-1192 |#2|))) (-15 -2289 ((-3 (-2 (|:| |mainpart| |#2|) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| |#2|) (|:| |logand| |#2|))))) #1#) |#2| (-628 |#2|) (-628 |#2|) (-661 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|)))) (-15 -2290 ((-3 |#2| #1#) |#2| |#2| (-628 |#2|) (-628 |#2|) (-1 (-3 |#2| #1#) |#2| |#2| (-1198)) |#2| (-1192 |#2|))) (-15 -2290 ((-3 |#2| #1#) |#2| |#2| (-628 |#2|) (-628 |#2|) (-1 (-3 |#2| #1#) |#2| |#2| (-1198)) (-628 |#2|) |#2| (-419 (-1192 |#2|)))) (-15 -3486 ((-1192 (-419 (-1192 |#2|))) |#2| (-628 |#2|) (-628 |#2|) (-1192 |#2|))) (-15 -3487 (|#2| (-1192 (-419 (-1192 |#2|))) (-628 |#2|) |#2|)) (-15 -3480 ((-1192 (-419 (-1192 |#2|))) (-1192 |#2|) (-628 |#2|))) (IF (|has| |#3| (-678 |#2|)) (PROGN (-15 -2291 ((-2 (|:| |particular| (-3 |#2| #1#)) (|:| -2222 (-661 |#2|))) |#3| |#2| (-628 |#2|) (-628 |#2|) |#2| (-1192 |#2|))) (-15 -2291 ((-2 (|:| |particular| (-3 |#2| #1#)) (|:| -2222 (-661 |#2|))) |#3| |#2| (-628 |#2|) (-628 |#2|) (-628 |#2|) |#2| (-419 (-1192 |#2|))))) |%noBranch|)) (-13 (-464) (-1059 (-558)) (-149) (-658 (-558))) (-13 (-433 |#1|) (-27) (-1224)) (-1122)) (T -573)) 
 ((-2291 (*1 *2 *3 *4 *5 *5 *5 *4 *6) (-12 (-5 *5 (-628 *4)) (-5 *6 (-419 (-1192 *4))) (-4 *4 (-13 (-433 *7) (-27) (-1224))) (-4 *7 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| |particular| (-3 *4 #1="failed")) (|:| -2222 (-661 *4)))) (-5 *1 (-573 *7 *4 *3)) (-4 *3 (-678 *4)) (-4 *3 (-1122)))) (-2291 (*1 *2 *3 *4 *5 *5 *4 *6) (-12 (-5 *5 (-628 *4)) (-5 *6 (-1192 *4)) (-4 *4 (-13 (-433 *7) (-27) (-1224))) (-4 *7 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| |particular| (-3 *4 #1#)) (|:| -2222 (-661 *4)))) (-5 *1 (-573 *7 *4 *3)) (-4 *3 (-678 *4)) (-4 *3 (-1122)))) (-3480 (*1 *2 *3 *4) (-12 (-5 *4 (-628 *6)) (-4 *6 (-13 (-433 *5) (-27) (-1224))) (-4 *5 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-1192 (-419 (-1192 *6)))) (-5 *1 (-573 *5 *6 *7)) (-5 *3 (-1192 *6)) (-4 *7 (-1122)))) (-3487 (*1 *2 *3 *4 *2) (-12 (-5 *3 (-1192 (-419 (-1192 *2)))) (-5 *4 (-628 *2)) (-4 *2 (-13 (-433 *5) (-27) (-1224))) (-4 *5 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *1 (-573 *5 *2 *6)) (-4 *6 (-1122)))) (-3486 (*1 *2 *3 *4 *4 *5) (-12 (-5 *4 (-628 *3)) (-4 *3 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-1192 (-419 (-1192 *3)))) (-5 *1 (-573 *6 *3 *7)) (-5 *5 (-1192 *3)) (-4 *7 (-1122)))) (-2290 (*1 *2 *2 *2 *3 *3 *4 *3 *2 *5) (|partial| -12 (-5 *3 (-628 *2)) (-5 *4 (-1 (-3 *2 #2="failed") *2 *2 (-1198))) (-5 *5 (-419 (-1192 *2))) (-4 *2 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *1 (-573 *6 *2 *7)) (-4 *7 (-1122)))) (-2290 (*1 *2 *2 *2 *3 *3 *4 *2 *5) (|partial| -12 (-5 *3 (-628 *2)) (-5 *4 (-1 (-3 *2 #2#) *2 *2 (-1198))) (-5 *5 (-1192 *2)) (-4 *2 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *1 (-573 *6 *2 *7)) (-4 *7 (-1122)))) (-2289 (*1 *2 *3 *4 *4 *5 *4 *3 *6) (|partial| -12 (-5 *4 (-628 *3)) (-5 *5 (-661 *3)) (-5 *6 (-419 (-1192 *3))) (-4 *3 (-13 (-433 *7) (-27) (-1224))) (-4 *7 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| |mainpart| *3) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| *3) (|:| |logand| *3)))))) (-5 *1 (-573 *7 *3 *8)) (-4 *8 (-1122)))) (-2289 (*1 *2 *3 *4 *4 *5 *3 *6) (|partial| -12 (-5 *4 (-628 *3)) (-5 *5 (-661 *3)) (-5 *6 (-1192 *3)) (-4 *3 (-13 (-433 *7) (-27) (-1224))) (-4 *7 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| |mainpart| *3) (|:| |limitedlogs| (-661 (-2 (|:| |coeff| *3) (|:| |logand| *3)))))) (-5 *1 (-573 *7 *3 *8)) (-4 *8 (-1122)))) (-2288 (*1 *2 *3 *4 *4 *3 *4 *3 *5) (|partial| -12 (-5 *4 (-628 *3)) (-5 *5 (-419 (-1192 *3))) (-4 *3 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| -2351 *3) (|:| |coeff| *3))) (-5 *1 (-573 *6 *3 *7)) (-4 *7 (-1122)))) (-2288 (*1 *2 *3 *4 *4 *3 *3 *5) (|partial| -12 (-5 *4 (-628 *3)) (-5 *5 (-1192 *3)) (-4 *3 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-2 (|:| -2351 *3) (|:| |coeff| *3))) (-5 *1 (-573 *6 *3 *7)) (-4 *7 (-1122)))) (-2287 (*1 *2 *3 *4 *4 *4 *3 *5) (-12 (-5 *4 (-628 *3)) (-5 *5 (-419 (-1192 *3))) (-4 *3 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-595 *3)) (-5 *1 (-573 *6 *3 *7)) (-4 *7 (-1122)))) (-2287 (*1 *2 *3 *4 *4 *3 *5) (-12 (-5 *4 (-628 *3)) (-5 *5 (-1192 *3)) (-4 *3 (-13 (-433 *6) (-27) (-1224))) (-4 *6 (-13 (-464) (-1059 (-558)) (-149) (-658 (-558)))) (-5 *2 (-595 *3)) (-5 *1 (-573 *6 *3 *7)) (-4 *7 (-1122))))) 
-((-2301 (((-558) (-558) (-791)) 87 T ELT)) (-2300 (((-558) (-558)) 85 T ELT)) (-2299 (((-558) (-558)) 83 T ELT)) (-2298 (((-558) (-558)) 89 T ELT)) (-3206 (((-558) (-558) (-558)) 67 T ELT)) (-2297 (((-558) (-558) (-558)) 64 T ELT)) (-2296 (((-419 (-558)) (-558)) 29 T ELT)) (-2295 (((-558) (-558)) 34 T ELT)) (-2294 (((-558) (-558)) 76 T ELT)) (-3203 (((-558) (-558)) 47 T ELT)) (-2293 (((-661 (-558)) (-558)) 82 T ELT)) (-2292 (((-558) (-558) (-558) (-558) (-558)) 60 T ELT)) (-3199 (((-419 (-558)) (-558)) 56 T ELT))) 
+((-2301 (((-558) (-558) (-791)) 87 T ELT)) (-2300 (((-558) (-558)) 85 T ELT)) (-2299 (((-558) (-558)) 82 T ELT)) (-2298 (((-558) (-558)) 89 T ELT)) (-3206 (((-558) (-558) (-558)) 67 T ELT)) (-2297 (((-558) (-558) (-558)) 64 T ELT)) (-2296 (((-419 (-558)) (-558)) 29 T ELT)) (-2295 (((-558) (-558)) 34 T ELT)) (-2294 (((-558) (-558)) 76 T ELT)) (-3203 (((-558) (-558)) 47 T ELT)) (-2293 (((-661 (-558)) (-558)) 81 T ELT)) (-2292 (((-558) (-558) (-558) (-558) (-558)) 60 T ELT)) (-3199 (((-419 (-558)) (-558)) 56 T ELT))) 
 (((-574) (-10 -7 (-15 -3199 ((-419 (-558)) (-558))) (-15 -2292 ((-558) (-558) (-558) (-558) (-558))) (-15 -2293 ((-661 (-558)) (-558))) (-15 -3203 ((-558) (-558))) (-15 -2294 ((-558) (-558))) (-15 -2295 ((-558) (-558))) (-15 -2296 ((-419 (-558)) (-558))) (-15 -2297 ((-558) (-558) (-558))) (-15 -3206 ((-558) (-558) (-558))) (-15 -2298 ((-558) (-558))) (-15 -2299 ((-558) (-558))) (-15 -2300 ((-558) (-558))) (-15 -2301 ((-558) (-558) (-791))))) (T -574)) 
 ((-2301 (*1 *2 *2 *3) (-12 (-5 *2 (-558)) (-5 *3 (-791)) (-5 *1 (-574)))) (-2300 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2299 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2298 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-3206 (*1 *2 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2297 (*1 *2 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2296 (*1 *2 *3) (-12 (-5 *2 (-419 (-558))) (-5 *1 (-574)) (-5 *3 (-558)))) (-2295 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2294 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-3203 (*1 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-2293 (*1 *2 *3) (-12 (-5 *2 (-661 (-558))) (-5 *1 (-574)) (-5 *3 (-558)))) (-2292 (*1 *2 *2 *2 *2 *2) (-12 (-5 *2 (-558)) (-5 *1 (-574)))) (-3199 (*1 *2 *3) (-12 (-5 *2 (-419 (-558))) (-5 *1 (-574)) (-5 *3 (-558))))) 
 ((-2302 (((-2 (|:| |answer| |#4|) (|:| -2350 |#4|)) |#4| (-1 |#2| |#2|)) 56 T ELT))) 
diff --git a/src/share/algebra/operation.daase b/src/share/algebra/operation.daase
index ca72f4e6..6be70b4a 100644
--- a/src/share/algebra/operation.daase
+++ b/src/share/algebra/operation.daase
@@ -1,5 +1,5 @@
 
-(719417 . 3524261742)        
+(719417 . 3524374396)        
 (((*1 *2 *3 *4)
   (|partial| -12 (-5 *3 (-1288 *4)) (-4 *4 (-13 (-1070) (-658 (-558))))
    (-5 *2 (-1288 (-419 (-558)))) (-5 *1 (-1317 *4)))))