view lisp/calendar/cal-iso.el @ 26056:9c4556ef15de
(Fget_buffer_create, Fmake_indirect_buffer, Fkill_buffer):
Don't initialize prompt_end_charpos field.
author
Gerd Moellmann <gerd@gnu.org>
date
Sun, 17 Oct 1999 12:53:14 +0000 (1999-10-17)
parents
d179de7ad92e
children
7a94f1c588c4
line source
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;;; cal-iso.el --- calendar functions for the ISO calendar.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Copyright (C) 1995, 1997 Free Software Foundation, Inc.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Author: Edward M. Reingold <reingold@cs.uiuc.edu>
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Keywords: calendar
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Human-Keywords: ISO calendar, calendar, diary
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; This file is part of GNU Emacs.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; GNU Emacs is free software; you can redistribute it and/or modify
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; it under the terms of the GNU General Public License as published by
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; the Free Software Foundation; either version 2, or (at your option)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; any later version.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; GNU Emacs is distributed in the hope that it will be useful,
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; GNU General Public License for more details.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; You should have received a copy of the GNU General Public License
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; along with GNU Emacs; see the file COPYING. If not, write to the
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Boston, MA 02111-1307, USA.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;;; Commentary:
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; This collection of functions implements the features of calendar.el and
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; diary.el that deal with the ISO calendar.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Technical details of all the calendrical calculations can be found in
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; ``Calendrical Calculations'' by Nachum Dershowitz and Edward M. Reingold,
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Cambridge University Press (1997).
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Comments, corrections, and improvements should be sent to
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Edward M. Reingold Department of Computer Science
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; (217) 333-6733 University of Illinois at Urbana-Champaign
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; reingold@cs.uiuc.edu 1304 West Springfield Avenue
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;; Urbana, Illinois 61801
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;;; Code:
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (require 'calendar)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun calendar-absolute-from-iso (date)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "The number of days elapsed between the Gregorian date 12/31/1 BC and DATE.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� The `ISO year' corresponds approximately to the Gregorian year, but
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� weeks start on Monday and end on Sunday. The first week of the ISO year is
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� the first such week in which at least 4 days are in a year. The ISO
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� commercial DATE has the form (week day year) in which week is in the range
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� 1..52 and day is in the range 0..6 (1 = Monday, 2 = Tuesday, ..., 0 =
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� Sunday). The Gregorian date Sunday, December 31, 1 BC is imaginary."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (let* ((week (extract-calendar-month date))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (day (extract-calendar-day date))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (year (extract-calendar-year date)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (+ (calendar-dayname-on-or-before
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� 1 (+ 3 (calendar-absolute-from-gregorian (list 1 1 year))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (* 7 (1- week))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (if (= day 0) 6 (1- day)))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun calendar-iso-from-absolute (date)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "Compute the `ISO commercial date' corresponding to the absolute DATE.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� The ISO year corresponds approximately to the Gregorian year, but weeks
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� start on Monday and end on Sunday. The first week of the ISO year is the
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� first such week in which at least 4 days are in a year. The ISO commercial
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� date has the form (week day year) in which week is in the range 1..52 and
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� day is in the range 0..6 (1 = Monday, 2 = Tuesday, ..., 0 = Sunday). The
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� absolute date is the number of days elapsed since the (imaginary) Gregorian
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� date Sunday, December 31, 1 BC."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (let* ((approx (extract-calendar-year
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-gregorian-from-absolute (- date 3))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (year (+ approx
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-sum y approx
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (>= date (calendar-absolute-from-iso (list 1 1 (1+ y))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� 1))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (list
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (1+ (/ (- date (calendar-absolute-from-iso (list 1 1 year))) 7))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (% date 7)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� year)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun calendar-iso-date-string (&optional date)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "String of ISO date of Gregorian DATE.
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� Defaults to today's date if DATE is not given."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (let* ((d (calendar-absolute-from-gregorian
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (or date (calendar-current-date))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (day (% d 7))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (iso-date (calendar-iso-from-absolute d)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (format "Day %s of week %d of %d"
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (if (zerop day) 7 day)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (extract-calendar-month iso-date)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (extract-calendar-year iso-date))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun calendar-print-iso-date ()
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "Show equivalent ISO date for the date under the cursor."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (interactive)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (message "ISO date: %s"
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-iso-date-string (calendar-cursor-to-date t))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun calendar-goto-iso-date (date &optional noecho)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "Move cursor to ISO DATE; echo ISO date unless NOECHO is t."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (interactive
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (let* ((today (calendar-current-date))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (year (calendar-read
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "ISO calendar year (>0): "
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� '(lambda (x) (> x 0))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (int-to-string (extract-calendar-year today))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (no-weeks (extract-calendar-month
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-iso-from-absolute
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (1-
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-dayname-on-or-before
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� 1 (calendar-absolute-from-gregorian
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (list 1 4 (1+ year))))))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (week (calendar-read
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (format "ISO calendar week (1-%d): " no-weeks)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� '(lambda (x) (and (> x 0) (<= x no-weeks)))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (day (calendar-read
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "ISO day (1-7): "
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� '(lambda (x) (and (<= 1 x) (<= x 7))))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (list (list week day year))))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-goto-date (calendar-gregorian-from-absolute
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (calendar-absolute-from-iso date)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (or noecho (calendar-print-iso-date)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (defun diary-iso-date ()
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� "ISO calendar equivalent of date diary entry."
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (format "ISO date: %s" (calendar-iso-date-string date)))
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� (provide 'cal-iso)
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩���
+ ��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��渇��膩��活�o申�鰹申鐃緒申鐃初����鐃緒申��申鐃醇�鐃緒申��申鐃初姐�渇��膩��渇����鐃緒申鐃緒申��膩��鰹申鐃順�渇����紮�鐃醇�鐃緒申鐃緒申����鐃初��膩��鰹申鐃順�渇��膩��� ;;; cal-iso.el ends here