emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/calendar/solar.el,v


From: Glenn Morris
Subject: [Emacs-diffs] Changes to emacs/lisp/calendar/solar.el,v
Date: Sat, 08 Mar 2008 03:48:34 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       08/03/08 03:48:34

Index: solar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/calendar/solar.el,v
retrieving revision 1.66
retrieving revision 1.67
diff -u -b -r1.66 -r1.67
--- solar.el    7 Mar 2008 05:16:37 -0000       1.66
+++ solar.el    8 Mar 2008 03:48:33 -0000       1.67
@@ -721,7 +721,7 @@
              (* 62833.1961680 U)
              (* 0.0000001
                 (apply '+
-                       (mapcar '(lambda (x)
+                       (mapcar (lambda (x)
                                   (* (car x)
                                      (sin (mod
                                            (+ (car (cdr x))
@@ -974,7 +974,7 @@
          (W (- (* 35999.373 T) 2.47))
          (Delta-lambda (+ 1 (* 0.0334 (solar-cosine-degrees W))
                             (* 0.0007 (solar-cosine-degrees (* 2 W)))))
-         (S (apply '+ (mapcar '(lambda(x)
+         (S (apply '+ (mapcar (lambda(x)
                                  (* (car x) (solar-cosine-degrees
                                              (+ (* (car (cdr (cdr x))) T)
                                                   (car (cdr x))))))
@@ -1088,5 +1088,5 @@
 
 (provide 'solar)
 
-;;; arch-tag: bc0ff693-df58-4666-bde4-2a7837ccb8fe
+;; arch-tag: bc0ff693-df58-4666-bde4-2a7837ccb8fe
 ;;; solar.el ends here




reply via email to

[Prev in Thread] Current Thread [Next in Thread]