%
%			Special Dates File
%
% This file should contain special dates. The format is:
%
%			\date{month}{day}{text}
%
% The name of the month should be typed in full. Case is not significant.
% It is also possible to do complicated things like computing the days
% for Easter --- but only if you're a TeXpert.
%
% Put a file containing text like this in your current directory when you
% LaTeX cal.tex. The file will be read in after the year and month are
% read. The year is available in \year and the number of the month is
% available in \month. If \month is -1 then the entire year is about
% to be printed.
%
% Patchlevel 1.0
%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				JANUARY					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\date{Januar}{1}{Neujahr}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				FEBRUARY				%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				MARCH					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				APRIL					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				MAY					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				JUNE					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				JULY					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				AUGUST					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				SEPTEMBER				%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				OCTOBER					%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				NOVEMBER				%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				DECEMBER				%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\date{Dezember}{24}{Heilig Abend}%
\date{Dezember}{25}{1. Weihnachtstag}%
\date{Dezember}{26}{2. Weihnachtstag}%
\date{Dezember}{31}{Silvester}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%				EASTER					%
%									%
% This algorithm is taken from:						%
%									%
%	The Calculation of Easter					%
%	D. E. Knuth							%
%	CACM April 1962 p 209						%
%									%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
{%
\def\Golden{\count0 }%			year in Mentonic cycle
\def\Easter{\count0 }%			Easter Sunday
\def\GrCor{\count2 }%			Gregorian correction
\def\ClCor{\count4 }%			Clavian correction
\def\Epact{\count6 }%			age of calendar moon at start of year
\def\Century{\count6 }%			century
\def\Extra{\count8 }%			when Sunday occurs in March
\Golden=\year \divide\Golden by19 \multiply\Golden by-19 %
\advance\Golden by\year \advance\Golden by1 %
\ifnum\year>1582 %
  \Century=\year \divide\Century by100 \advance\Century by1 %
  \GrCor=\Century \multiply\GrCor by3 \divide\GrCor by-4 \advance\GrCor by12 %
  \ClCor=\Century \advance\ClCor by-18 \divide\ClCor by-25 %
  \advance\ClCor by\Century \advance\ClCor by-16 \divide\ClCor by3 %
  \Extra=\year \multiply\Extra by5 \divide\Extra by4 %
  \advance\Extra by\GrCor \advance\Extra by-10 %
  \Epact=\Golden \multiply\Epact by11 \advance\Epact by20 %
  \advance\Epact by\ClCor \advance\Epact by\GrCor %
  \count255=\Epact \divide\count255 by30 \multiply\count255 by-30 %
  \advance\Epact by\count255 %
  \ifnum\Epact>0 \else \advance\Epact by30 \fi%
  \ifnum\Epact=25 %
    \ifnum\Golden>11 %
      \advance\Epact by1 %
    \fi%
  \else%
    \ifnum\Epact=24 %
      \advance\Epact by1 %
    \fi%
  \fi%
\else%
  \Extra=\year \multiply\Extra by5 \divide\Extra by4 %
  \Epact=\Golden \multiply\Epact by11 \advance\Epact by-4 %
  \count255=\Epact \divide\count255 by30 \multiply\count255 by-30 %
  \advance\Epact by\count255 \advance\Epact by1 %
\fi%
\Easter=\Epact \multiply\Easter by-1 \advance\Easter by44 %
\ifnum\Easter<21 %
  \advance\Easter by30 %
\fi%
\advance\Extra by\Easter \count255=\Extra %
\divide\count255 by7 \multiply\count255 by-7 \advance\Extra by\count255 %
\multiply\Extra by-1 \advance\Easter by\Extra \advance\Easter by7 %
\ifnum\Easter>31 %
  \advance\Easter by-31 %
  \date{April}{\the\Easter}{Ostern}%
  \advance\Easter by1 %
  \date{April}{\the\Easter}{Oster Montag}%
  \advance\Easter by1 %
  \date{April}{\the\Easter}{Oster Dienstag}%
  \advance\Easter by-3 %
  \date{April}{\the\Easter}{Oster Samstag}%
  \advance\Easter by-1 %
  \date{April}{\the\Easter}{Karfreitag}%
\else%
  \date{Maerz}{\the\Easter}{Ostern}%
  \advance\Easter by1 %
  \date{Maerz}{\the\Easter}{Oster Montag}%
  \advance\Easter by1 %
  \date{Maerz}{\the\Easter}{Oster Dienstag}%
  \advance\Easter by-3 %
  \date{Maerz}{\the\Easter}{Oster Samstag}%
  \advance\Easter by-1 %
  \date{Maerz}{\the\Easter}{Karfreitag}%
\fi%
}%
