L-99: Rename from repeat-len to len-repeat.

1 files changed, 1 insertions, 2 deletions

diff --git a/L-99.lisp b/L-99.lisp
index 15ae22f..b7e7ff8 100644
--- a/L-99.lisp
+++ b/L-99.lisp
@@ -268,7 +268,7 @@
       nil
       (cons x (repeat x (1- n)))))
 
-(defthm repeat-len
+(defthm len-repeat
   (implies (natp n)
            (equal (len (repeat x n))
                   n)))
@@ -400,4 +400,3 @@
   (implies (atom-listp x)
            (equal (encode-direct x)
                   (encode-modified x))))
-