/[emacs]/emacs/lisp/calc/calc-forms.el
ViewVC logotype

Diff of /emacs/lisp/calc/calc-forms.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by pj, Thu Dec 20 18:48:47 2001 UTC revision 1.4.4.1 by miles, Fri Apr 4 06:20:15 2003 UTC
# Line 3  Line 3 
3  ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.  ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
4    
5  ;; Author: David Gillespie <daveg@synaptics.com>  ;; Author: David Gillespie <daveg@synaptics.com>
6  ;; Maintainer: Colin Walters <walters@debian.org>  ;; Maintainers: D. Goel <deego@gnufans.org>
7    ;;              Colin Walters <walters@debian.org>
8    
9  ;; This file is part of GNU Emacs.  ;; This file is part of GNU Emacs.
10    
# Line 1228  Line 1229 
1229  ;;; Note: Longer names must appear before shorter names which are  ;;; Note: Longer names must appear before shorter names which are
1230  ;;;       substrings of them.  ;;;       substrings of them.
1231  (defvar math-tzone-names  (defvar math-tzone-names
1232    '( ( "MEGT" -1 "MET" "METDST" )                          ; Middle Europe    '(( "UTC" 0 0)
1233       ( "METDST" -1 -1 ) ( "MET" -1 0 )      ( "MEGT" -1 "MET" "METDST" )                          ; Middle Europe
1234       ( "MEGZ" -1 "MEZ" "MESZ" ) ( "MEZ" -1 0 ) ( "MESZ" -1 -1 )      ( "METDST" -1 -1 ) ( "MET" -1 0 )
1235       ( "WEGT" 0 "WET" "WETDST" )                           ; Western Europe      ( "MEGZ" -1 "MEZ" "MESZ" ) ( "MEZ" -1 0 ) ( "MESZ" -1 -1 )
1236       ( "WETDST" 0 -1 ) ( "WET" 0 0 )      ( "WEGT" 0 "WET" "WETDST" )                           ; Western Europe
1237       ( "BGT" 0 "GMT" "BST" ) ( "GMT" 0 0 ) ( "BST" 0 -1 )  ; Britain      ( "WETDST" 0 -1 ) ( "WET" 0 0 )
1238       ( "NGT" (float 35 -1) "NST" "NDT" )                   ; Newfoundland      ( "BGT" 0 "GMT" "BST" ) ( "GMT" 0 0 ) ( "BST" 0 -1 )  ; Britain
1239       ( "NST" (float 35 -1) 0 ) ( "NDT" (float 35 -1) -1 )      ( "NGT" (float 35 -1) "NST" "NDT" )                   ; Newfoundland
1240       ( "AGT" 4 "AST" "ADT" ) ( "AST" 4 0 ) ( "ADT" 4 -1 )  ; Atlantic      ( "NST" (float 35 -1) 0 ) ( "NDT" (float 35 -1) -1 )
1241       ( "EGT" 5 "EST" "EDT" ) ( "EST" 5 0 ) ( "EDT" 5 -1 )  ; Eastern      ( "AGT" 4 "AST" "ADT" ) ( "AST" 4 0 ) ( "ADT" 4 -1 )  ; Atlantic
1242       ( "CGT" 6 "CST" "CDT" ) ( "CST" 6 0 ) ( "CDT" 6 -1 )  ; Central      ( "EGT" 5 "EST" "EDT" ) ( "EST" 5 0 ) ( "EDT" 5 -1 )  ; Eastern
1243       ( "MGT" 7 "MST" "MDT" ) ( "MST" 7 0 ) ( "MDT" 7 -1 )  ; Mountain      ( "CGT" 6 "CST" "CDT" ) ( "CST" 6 0 ) ( "CDT" 6 -1 )  ; Central
1244       ( "PGT" 8 "PST" "PDT" ) ( "PST" 8 0 ) ( "PDT" 8 -1 )  ; Pacific      ( "MGT" 7 "MST" "MDT" ) ( "MST" 7 0 ) ( "MDT" 7 -1 )  ; Mountain
1245       ( "YGT" 9 "YST" "YDT" ) ( "YST" 9 0 ) ( "YDT" 9 -1 )  ; Yukon      ( "PGT" 8 "PST" "PDT" ) ( "PST" 8 0 ) ( "PDT" 8 -1 )  ; Pacific
1246  ))      ( "YGT" 9 "YST" "YDT" ) ( "YST" 9 0 ) ( "YDT" 9 -1 )  ; Yukon
1247        )
1248      "No doc yet.  See calc manual for now. ")
1249    
1250    
1251  (defun math-daylight-savings-adjust (date zone &optional dt)  (defun math-daylight-savings-adjust (date zone &optional dt)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.4.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26