diff --git a/src/libdoc/sun.bkph77 b/src/libdoc/sun.78
similarity index 98%
rename from src/libdoc/sun.bkph77
rename to src/libdoc/sun.78
index 2d9eed82..5ad68dc2 100755
--- a/src/libdoc/sun.bkph77
+++ b/src/libdoc/sun.78
@@ -240,7 +240,7 @@
 (DEFUN SUN-NOW-HERE NIL 
        (SUN LONGITUDE
 	    LATITUDE
-	    (UPDATE (STATUS DATE) 1900.)
+	    (STATUS DATE)
 	    (UPDATE (STATUS DAYTIME) GMT-OFFSET))) 
 
 ;;; CALCULATE DAY OF WEEK FROM DAYS SINCE 1975/01/01
@@ -279,4 +279,4 @@
 
 ;;; GIVE NORMAL OFFSET FROM G.M.T. IN HOURS AS SECOND ARGUMENT
 
-(SETQ GMT-OFFSET (+ (DAY-SAVE-CROCK (UPDATE (STATUS DATE) 1900.)) 5.)) 
+(SETQ GMT-OFFSET (+ (DAY-SAVE-CROCK (STATUS DATE)) 5.))