diff options
Diffstat (limited to 'Master/texmf-dist/tex/generic/babel/hebcal.sty')
-rw-r--r-- | Master/texmf-dist/tex/generic/babel/hebcal.sty | 441 |
1 files changed, 0 insertions, 441 deletions
diff --git a/Master/texmf-dist/tex/generic/babel/hebcal.sty b/Master/texmf-dist/tex/generic/babel/hebcal.sty deleted file mode 100644 index 2f89eec3eb3..00000000000 --- a/Master/texmf-dist/tex/generic/babel/hebcal.sty +++ /dev/null @@ -1,441 +0,0 @@ -%% -%% This is file `hebcal.sty', -%% generated with the docstrip utility. -%% -%% The original source files were: -%% -%% hebrew.dtx (with options: `calendar') -%% -%% This is a generated file. -%% -%% Copyright 1997-2004 Boris Lavva and any individual authors -%% listed elsewhere in this file. All rights reserved. -%% -%% This is a generated file. -%% -%% Copyright 1989-2005 Johannes L. Braams and any individual authors -%% listed elsewhere in this file. All rights reserved. -%% -%% This file was generated from file(s) of the Babel system. -%% --------------------------------------------------------- -%% -%% It may be distributed and/or modified under the -%% conditions of the LaTeX Project Public License, either version 1.3 -%% of this license or (at your option) any later version. -%% The latest version of this license is in -%% http://www.latex-project.org/lppl.txt -%% and version 1.3 or later is part of all distributions of LaTeX -%% version 2003/12/01 or later. -%% -%% This work has the LPPL maintenance status "maintained". -%% -%% The Current Maintainer of this work is Johannes Braams. -%% -%% This file may only be distributed together with a copy of the Babel -%% system. You may however distribute the Babel system without -%% such generated files. -%% -%% The list of all files belonging to the Babel distribution is -%% given in the file `manifest.bbl'. See also `legal.bbl for additional -%% information. -%% -%% The list of derived (unpacked) files belonging to the distribution -%% and covered by LPPL is defined by the unpacking scripts (with -%% extension .ins) which are part of the distribution. -%% Hebrew language definition and additional packages. -%% Copyright (C) 1997 -- 2005 Boris Lavva. -%% Babel package for LaTeX version 2e -%% Copyright (C) 1989 -- 2005 by Johannes Braams, -%% TeXniek -%% All rights reserved. -%% TeX & LaTeX macros for computing Hebrew date from Gregorian one -%% Copyright (C) 1991 by Michail Rozman, misha@iop.tartu.ew.su -%% -\ProvidesPackage{hebcal} - [2005/03/30 v2.3h % - Hebrew calendar - Hebrew language support from the babel system] -\newif\if@full@hebrew@year -\@full@hebrew@yearfalse -\DeclareOption{full}{\@full@hebrew@yeartrue} -\ProcessOptions -\newcount\Hebrewday \newcount\Hebrewmonth \newcount\Hebrewyear -\def\Hebrewdate#1#2#3{% - \HebrewFromGregorian{#1}{#2}{#3} - {\Hebrewday}{\Hebrewmonth}{\Hebrewyear}% - \ifundefined{if@rl}% - \FormatForEnglish{\Hebrewday}{\Hebrewmonth}{\Hebrewyear}% - \else% - \FormatDate{\Hebrewday}{\Hebrewmonth}{\Hebrewyear}% - \fi} -\def\Hebrewtoday{\Hebrewdate{\day}{\month}{\year}} -\let\hebrewtoday=\Hebrewtoday -\def\Hebrewsetreg{% - \HebrewFromGregorian{\day}{\month}{\year} - {\Hebrewday}{\Hebrewmonth}{\Hebrewyear}} -\def\FormatDate#1#2#3{% - \if@rl% - \FormatForHebrew{#1}{#2}{#3}% - \else% - \FormatForEnglish{#1}{#2}{#3} - \fi} -\def\HebrewYearName#1{{% - \@tempcnta=#1\divide\@tempcnta by 1000\multiply\@tempcnta by 1000 - \ifnum#1=\@tempcnta\relax % divisible by 1000: disambiguate - \Hebrewnumeralfinal{#1}\ )\heblamed\hebpe"\hebgimel(% - \else % not divisible by 1000 - \ifnum#1<1000\relax % first millennium: disambiguate - \Hebrewnumeralfinal{#1}\ )\heblamed\hebpe"\hebgimel(% - \else - \ifnum#1<5000 - \Hebrewnumeralfinal{#1}% - \else - \ifnum#1<6000 % current millenium, print without thousands - \@tempcnta=#1\relax - \if@full@hebrew@year\else\advance\@tempcnta by -5000\fi - \Hebrewnumeralfinal{\@tempcnta}% - \else % #1>6000 - \Hebrewnumeralfinal{#1}% - \fi - \fi - \fi - \fi}} -\def\HebrewMonthName#1#2{% - \ifnum #1 = 7 % - \CheckLeapHebrewYear{#2}% - \if@HebrewLeap \hebalef\hebdalet\hebresh\ \hebbet'% - \else \hebalef\hebdalet\hebresh% - \fi% - \else% - \ifcase#1% - % nothing for 0 - \or\hebtav\hebshin\hebresh\hebyod% - \or\hebhet\hebshin\hebvav\hebfinalnun% - \or\hebkaf\hebsamekh\heblamed\hebvav% - \or\hebtet\hebbet\hebtav% - \or\hebshin\hebbet\hebtet% - \or\hebalef\hebdalet\hebresh\ \hebalef'% - \or\hebalef\hebdalet\hebresh\ \hebbet'% - \or\hebnun\hebyod\hebsamekh\hebfinalnun% - \or\hebalef\hebyod\hebyod\hebresh% - \or\hebsamekh\hebyod\hebvav\hebfinalnun% - \or\hebtav\hebmem\hebvav\hebzayin% - \or\hebalef\hebbet% - \or\hebalef\heblamed\hebvav\heblamed% - \fi% - \fi} -\def\HebrewDayName#1{\Hebrewnumeral{#1}} -\def\FormatForHebrew#1#2#3{% - \HebrewDayName{#1}~\hebbet\HebrewMonthName{#2}{#3},~% - \HebrewYearName{#3}} -\def\HebrewMonthNameInEnglish#1#2{% - \ifnum #1 = 7% - \CheckLeapHebrewYear{#2}% - \if@HebrewLeap Adar II\else Adar\fi% - \else% - \ifcase #1% - % nothing for 0 - \or Tishrei% - \or Heshvan% - \or Kislev% - \or Tebeth% - \or Shebat% - \or Adar I% - \or Adar II% - \or Nisan% - \or Iyar% - \or Sivan% - \or Tammuz% - \or Av% - \or Elul% - \fi - \fi} -\def\FormatForEnglish#1#2#3{% - \HebrewMonthNameInEnglish{#2}{#3} \number#1,\ \number#3} -\newcount\@common -\def\Remainder#1#2#3{% - #3 = #1% % c = a - \divide #3 by #2% % c = a/b - \multiply #3 by -#2% % c = -b(a/b) - \advance #3 by #1}% % c = a - b(a/b) -\newif\if@Divisible -\def\CheckIfDivisible#1#2{% - {% - \countdef\tmp = 0% \tmp == \count0 - temporary variable - \Remainder{#1}{#2}{\tmp}% - \ifnum \tmp = 0% - \global\@Divisibletrue% - \else% - \global\@Divisiblefalse% - \fi}} -\def\ifundefined#1{\expandafter\ifx\csname#1\endcsname\relax} -\newif\if@GregorianLeap -\def\IfGregorianLeap#1{% - \CheckIfDivisible{#1}{4}% - \if@Divisible% - \CheckIfDivisible{#1}{100}% - \if@Divisible% - \CheckIfDivisible{#1}{400}% - \if@Divisible% - \@GregorianLeaptrue% - \else% - \@GregorianLeapfalse% - \fi% - \else% - \@GregorianLeaptrue% - \fi% - \else% - \@GregorianLeapfalse% - \fi% - \if@GregorianLeap} -\def\GregorianDaysInPriorMonths#1#2#3{% - {% - #3 = \ifcase #1% - 0 \or% % no month number 0 - 0 \or% - 31 \or% - 59 \or% - 90 \or% - 120 \or% - 151 \or% - 181 \or% - 212 \or% - 243 \or% - 273 \or% - 304 \or% - 334% - \fi% - \IfGregorianLeap{#2}% - \ifnum #1 > 2% % if month after February - \advance #3 by 1% % add leap day - \fi% - \fi% - \global\@common = #3}% - #3 = \@common} -\def\GregorianDaysInPriorYears#1#2{% - {% - \countdef\tmpc = 4% % \tmpc==\count4 - \countdef\tmpb = 2% % \tmpb==\count2 - \tmpb = #1% % - \advance \tmpb by -1% % - \tmpc = \tmpb% % \tmpc = \tmpb = year-1 - \multiply \tmpc by 365% % Days in prior years = - #2 = \tmpc% % = 365*(year-1) ... - \tmpc = \tmpb% % - \divide \tmpc by 4% % \tmpc = (year-1)/4 - \advance #2 by \tmpc% % ... plus Julian leap days ... - \tmpc = \tmpb% % - \divide \tmpc by 100% % \tmpc = (year-1)/100 - \advance #2 by -\tmpc% % ... minus century years ... - \tmpc = \tmpb% % - \divide \tmpc by 400% % \tmpc = (year-1)/400 - \advance #2 by \tmpc% % ... plus 4-century years. - \global\@common = #2}% - #2 = \@common} -\def\AbsoluteFromGregorian#1#2#3#4{% - {% - \countdef\tmpd = 0% % \tmpd==\count0 - #4 = #1% % days so far this month - \GregorianDaysInPriorMonths{#2}{#3}{\tmpd}% - \advance #4 by \tmpd% % add days in prior months - \GregorianDaysInPriorYears{#3}{\tmpd}% - \advance #4 by \tmpd% % add days in prior years - \global\@common = #4}% - #4 = \@common} -\newif\if@HebrewLeap -\def\CheckLeapHebrewYear#1{% - {% - \countdef\tmpa = 0% % \tmpa==\count0 - \countdef\tmpb = 1% % \tmpb==\count1 - \tmpa = #1% - \multiply \tmpa by 7% - \advance \tmpa by 1% - \Remainder{\tmpa}{19}{\tmpb}% - \ifnum \tmpb < 7% % \tmpb = (7*year+1)%19 - \global\@HebrewLeaptrue% - \else% - \global\@HebrewLeapfalse% - \fi}} -\def\HebrewElapsedMonths#1#2{% - {% - \countdef\tmpa = 0% % \tmpa==\count0 - \countdef\tmpb = 1% % \tmpb==\count1 - \countdef\tmpc = 2% % \tmpc==\count2 - \tmpa = #1% % - \advance \tmpa by -1% % - #2 = \tmpa% % #2 = \tmpa = year-1 - \divide #2 by 19% % Number of complete Meton cycles - \multiply #2 by 235% % #2 = 235*((year-1)/19) - \Remainder{\tmpa}{19}{\tmpb}% \tmpa = years%19-years this cycle - \tmpc = \tmpb% % - \multiply \tmpb by 12% % - \advance #2 by \tmpb% % add regular months this cycle - \multiply \tmpc by 7% % - \advance \tmpc by 1% % - \divide \tmpc by 19% % \tmpc = (1+7*((year-1)%19))/19 - - \advance #2 by \tmpc% % add leap months - \global\@common = #2}% - #2 = \@common} -\def\HebrewElapsedDays#1#2{% - {% - \countdef\tmpa = 0% % \tmpa==\count0 - \countdef\tmpb = 1% % \tmpb==\count1 - \countdef\tmpc = 2% % \tmpc==\count2 - \HebrewElapsedMonths{#1}{#2}% - \tmpa = #2% % - \multiply \tmpa by 13753% % - \advance \tmpa by 5604% % \tmpa=MonthsElapsed*13758 + 5604 - \Remainder{\tmpa}{25920}{\tmpc}% \tmpc == ConjunctionParts - \divide \tmpa by 25920% - \multiply #2 by 29% - \advance #2 by 1% - \advance #2 by \tmpa% % #2 = 1 + MonthsElapsed*29 + - \Remainder{#2}{7}{\tmpa}% % \tmpa == DayOfWeek - \ifnum \tmpc < 19440% - \ifnum \tmpc < 9924% - \else% % New moon at 9 h. 204 p. or later - \ifnum \tmpa = 2% % on Tuesday ... - \CheckLeapHebrewYear{#1}% of a common year - \if@HebrewLeap% - \else% - \advance #2 by 1% - \fi% - \fi% - \fi% - \ifnum \tmpc < 16789% - \else% % New moon at 15 h. 589 p. or later - \ifnum \tmpa = 1% % on Monday ... - \advance #1 by -1% - \CheckLeapHebrewYear{#1}% at the end of leap year - \if@HebrewLeap% - \advance #2 by 1% - \fi% - \fi% - \fi% - \else% - \advance #2 by 1% % new moon at or after midday - \fi% - \Remainder{#2}{7}{\tmpa}% % \tmpa == DayOfWeek - \ifnum \tmpa = 0% % if Sunday ... - \advance #2 by 1% - \else% % - \ifnum \tmpa = 3% % Wednesday ... - \advance #2 by 1% - \else% - \ifnum \tmpa = 5% % or Friday - \advance #2 by 1% - \fi% - \fi% - \fi% - \global\@common = #2}% - #2 = \@common} -\def\DaysInHebrewYear#1#2{% - {% - \countdef\tmpe = 12% % \tmpe==\count12 - \HebrewElapsedDays{#1}{\tmpe}% - \advance #1 by 1% - \HebrewElapsedDays{#1}{#2}% - \advance #2 by -\tmpe% - \global\@common = #2}% - #2 = \@common} -\def\HebrewDaysInPriorMonths#1#2#3{% - {% - \countdef\tmpf= 14% % \tmpf==\count14 - #3 = \ifcase #1% % Days in prior month of regular year - 0 \or% % no month number 0 - 0 \or% % Tishri - 30 \or% % Heshvan - 59 \or% % Kislev - 89 \or% % Tebeth - 118 \or% % Shebat - 148 \or% % Adar I - 148 \or% % Adar II - 177 \or% % Nisan - 207 \or% % Iyar - 236 \or% % Sivan - 266 \or% % Tammuz - 295 \or% % Av - 325 \or% % Elul - 400% % Dummy - \fi% - \CheckLeapHebrewYear{#2}% - \if@HebrewLeap% % in leap year - \ifnum #1 > 6% % if month after Adar I - \advance #3 by 30% % add 30 days - \fi% - \fi% - \DaysInHebrewYear{#2}{\tmpf}% - \ifnum #1 > 3% - \ifnum \tmpf = 353% % - \advance #3 by -1% % - \fi% % Short Kislev - \ifnum \tmpf = 383% % - \advance #3 by -1% % - \fi% % - \fi% - \ifnum #1 > 2% - \ifnum \tmpf = 355% % - \advance #3 by 1% % - \fi% % Long Heshvan - \ifnum \tmpf = 385% % - \advance #3 by 1% % - \fi% % - \fi% - \global\@common = #3}% - #3 = \@common} -\def\AbsoluteFromHebrew#1#2#3#4{% - {% - #4 = #1% - \HebrewDaysInPriorMonths{#2}{#3}{#1}% - \advance #4 by #1% % Add days in prior months this year - \HebrewElapsedDays{#3}{#1}% - \advance #4 by #1% % Add days in prior years - \advance #4 by -1373429% % Subtract days before Gregorian - \global\@common = #4}% % 01.01.0001 - #4 = \@common} -\def\HebrewFromGregorian#1#2#3#4#5#6{% - {% - \countdef\tmpx= 17% % \tmpx==\count17 - \countdef\tmpy= 18% % \tmpy==\count18 - \countdef\tmpz= 19% % \tmpz==\count19 - #6 = #3% % - \global\advance #6 by 3761% approximation from above - \AbsoluteFromGregorian{#1}{#2}{#3}{#4}% - \tmpz = 1 \tmpy = 1% - \AbsoluteFromHebrew{\tmpz}{\tmpy}{#6}{\tmpx}% - \ifnum \tmpx > #4% % - \global\advance #6 by -1% Hyear = Gyear + 3760 - \AbsoluteFromHebrew{\tmpz}{\tmpy}{#6}{\tmpx}% - \fi% % - \advance #4 by -\tmpx% % Days in this year - \advance #4 by 1% % - #5 = #4% % - \divide #5 by 30% % Approximation for month from below - \loop% % Search for month - \HebrewDaysInPriorMonths{#5}{#6}{\tmpx}% - \ifnum \tmpx < #4% - \advance #5 by 1% - \tmpy = \tmpx% - \repeat% - \global\advance #5 by -1% - \global\advance #4 by -\tmpy}} -%% -%% \CharacterTable -%% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z -%% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z -%% Digits \0\1\2\3\4\5\6\7\8\9 -%% Exclamation \! Double quote \" Hash (number) \# -%% Dollar \$ Percent \% Ampersand \& -%% Acute accent \' Left paren \( Right paren \) -%% Asterisk \* Plus \+ Comma \, -%% Minus \- Point \. Solidus \/ -%% Colon \: Semicolon \; Less than \< -%% Equals \= Greater than \> Question mark \? -%% Commercial at \@ Left bracket \[ Backslash \\ -%% Right bracket \] Circumflex \^ Underscore \_ -%% Grave accent \` Left brace \{ Vertical bar \| -%% Right brace \} Tilde \~} -%% -\endinput -%% -%% End of file `hebcal.sty'. |