[Maxima-commits] CVS: maxima/share/sym arite.lisp, 1.2, 1.3 resolcayley.lisp, 1.1.1.1, 1.2 resolv1.lisp, 1.3, 1.4 util.lisp, 1.3, 1.4

[Robert D. <rob...@us...>]

Update of /cvsroot/maxima/maxima/share/sym
In directory sc8-pr-cvs7.sourceforge.net:/tmp/cvs-serv29615/sym

Modified Files:
	arite.lisp resolcayley.lisp resolv1.lisp util.lisp 
Log Message:
Append end-of-line character at end of file. (Lack of end-of-line character
might cause a problem for some version or versions of some Lisp implementations.)

Index: arite.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/sym/arite.lisp,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- arite.lisp	7 Nov 2005 17:37:11 -0000	1.2
+++ arite.lisp	31 Oct 2006 05:37:21 -0000	1.3
@@ -87,4 +87,4 @@
                                               (binomial (- n lg)
                                                         (- p lg)))
                                    (cddr $part))))
-                (cdr $puissance_resolvante)))
\ No newline at end of file
+                (cdr $puissance_resolvante)))

Index: resolcayley.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/sym/resolcayley.lisp,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -u -d -r1.1.1.1 -r1.2
--- resolcayley.lisp	8 May 2000 06:09:44 -0000	1.1.1.1
+++ resolcayley.lisp	31 Oct 2006 05:37:21 -0000	1.2
@@ -1457,4 +1457,4 @@
          ((MLIST SIMP) -17640 5 5 4 3 3) ((MLIST SIMP) 12600 5 4 4 4 3)
          ((MLIST SIMP) -63000 4 4 4 4 4))))
       NIL NIL)) 
-(ADD2LNC '$Q $ARRAYS) 
\ No newline at end of file
+(ADD2LNC '$Q $ARRAYS) 

Index: resolv1.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/sym/resolv1.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- resolv1.lisp	7 Nov 2005 17:37:11 -0000	1.3
+++ resolv1.lisp	31 Oct 2006 05:37:21 -0000	1.4
@@ -461,4 +461,4 @@
    (un-sur-deux (cdr (puireduc_init degre (cons (/ degre 2) puissances)))))
 
 (defun un-sur-deux (liste); liste =(p1,p2,p3,....)  
-   (and liste (cons (cadr liste) (un-sur-deux (cddr liste)))))
\ No newline at end of file
+   (and liste (cons (cadr liste) (un-sur-deux (cddr liste)))))

Index: util.lisp
===================================================================
RCS file: /cvsroot/maxima/maxima/share/sym/util.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- util.lisp	7 Nov 2005 17:37:11 -0000	1.3
+++ util.lisp	31 Oct 2006 05:37:21 -0000	1.4
@@ -719,4 +719,4 @@
        (if (eql 1 b) 0
            (if (eql 0 (rem a b))
                 (- a (div a b))
-                (- a (1+ (/ a b)))))))
\ No newline at end of file
+                (- a (1+ (/ a b)))))))