summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-11-10 15:32:04 +0000
committerKarl Berry <karl@freefriends.org>2010-11-10 15:32:04 +0000
commit913aa38a3c607e94aaa2b13a5a408f1b539b1788 (patch)
tree8222f4fed88a41ca2ac871c08b8429d4bc7babfd /Master/texmf-dist/tex/latex
parentfba39c5e7dc3976d83353fef343f730466644088 (diff)
rm calxxxx, README disallows modification
git-svn-id: svn://tug.org/texlive/trunk@20397 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex')
-rw-r--r--Master/texmf-dist/tex/latex/calxxxx/cal2000.tex102
-rw-r--r--Master/texmf-dist/tex/latex/calxxxx/calxxxx.tex176
2 files changed, 0 insertions, 278 deletions
diff --git a/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex b/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex
deleted file mode 100644
index 91bdc77dfbd..00000000000
--- a/Master/texmf-dist/tex/latex/calxxxx/cal2000.tex
+++ /dev/null
@@ -1,102 +0,0 @@
-% This is a freeware program written in LaTeX2e. It prints calendar for the
-% years 1990--2020. For the years 1901--2099, use the 28-year period, so the
-% year 2099 has the same calendar as 2099-3*28=2015. Outside this interval,
-% period is 2800 years, but a program `CalXXXX.tex' can help.
-
-% Safe modifications are between two `=====' lines. Any other modification are
-% recommended only for TeXperts.
-
-\documentclass{article}
-\usepackage{array}
-\nofiles\thispagestyle{empty}
-
-\newif\ifCmRule % cm rule at right
-
-%========== Start of Safe Modifications =============
-% The following definitions are safe to change
-
-\setlength{\topmargin}{-1in} \setlength{\oddsidemargin}{-1in} % No margins
-
-\setlength{\tabcolsep}{.6pt}\renewcommand{\arraystretch}{.9}% Lenghts in the table
-\setlength{\extrarowheight}{1pt}\setlength{\doublerulesep}{2pt}
-
-\newcommand{\nsize}{\tiny}\newcommand{\tsize}{\scriptsize} % Numbers and text sizes
-
-% Language dependent definitions
-\newcommand{\YearMonths} % `Year' and months
-{Year & \bfseries J& F & \bfseries M & A & \bfseries M & J & \bfseries J & \bfseries A & S &
- \bfseries O & N & \bfseries D}
-\newcommand{\Day}[1]{\bfseries\ifcase#1 S \or M \or T \or W \or T \or F \or S \fi} % days of the week
-
-% Do you wish a cm rule? (default is false)
-\CmRulefalse % don't print the cm rule
-%\CmRuletrue % print the cm rule
-
-%========== End of Safe Modifications =============
-% It is not recommended to change anything below this line!
-
-% Print the cm scale at right
-\def\cmscale(#1,#2){\setlength{\unitlength}{1mm}
-\begin{picture}(0,0)(#1,#2)\tsize
- \newcounter{cms}\put(-.3,71){cm}
- \multiput(2,70)(0,-1){73}{\line(1,0){1}} \multiput(1,65)(0,-10){7}{\line(1,0){2}}
- \multiput(0,70)(0,-10){8}{\line(1,0){3}}
- \multiput(1,60.5)(0,-10){7}{\makebox(0,0)[b]{\addtocounter{cms}{1}\arabic{cms}}}
-\end{picture}}
-
-\begin{document} \nsize\noindent
-
-\ifCmRule\cmscale(-76,74.5)\fi% Print cm rule
-
-\begin{tabular}[t]{|r|*{4}{*{3}{>{\centering}m{6pt}}|}|c|rrrrrr|c|rrrrrr|}
- \hline
-\YearMonths&\multicolumn{7}{c|}{\textbf{0}}&\multicolumn{7}{c|}{\textbf{1}}\\ \hline
-1990 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{0}& 1& 8&15&22&29&&\Day{0}& & 7&14&21&28&\\
-1991 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{1}& 2& 9&16&23&30&&\Day{1}& 1& 8&15&22&29&\\
-1992 &3&6&0&3&5&1&3&6&2&4&0&2&\Day{2}& 3&10&17&24&31&&\Day{2}& 2& 9&16&23&30&\\
-1993 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{3}& 4&11&18&25& &&\Day{3}& 3&10&17&24&31&\\
-1994 &6&2&2&5&0&3&5&1&4&6&2&4&\Day{4}& 5&12&19&26& &&\Day{4}& 4&11&18&25& &\\
-1995 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{5}& 6&13&20&27& &&\Day{5}& 5&12&19&26& &\\
-1996 &1&4&5&1&3&6&1&4&0&2&5&0&\Day{6}& 7&14&21&28& &&\Day{6}& 6&13&20&27& &\\
- \cline{14-27}
-1997 &3&6&6&2&4&0&2&5&1&3&6&1&\multicolumn{7}{c|}{\textbf{2}}&\multicolumn{7}{c|}{\textbf{3}}\\
- \cline{14-27}
-1998 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{0}& & 6&13&20&27&&\Day{0}& & 5&12&19&26&\\
-1999 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{1}& & 7&14&21&28&&\Day{1}& & 6&13&20&27&\\
-2000 &6&2&3&6&1&4&6&2&5&0&3&5&\Day{2}& 1& 8&15&22&29&&\Day{2}& & 7&14&21&28&\\
- \cline{1-13}
-2001 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{3}& 2& 9&16&23&30&&\Day{3}& 1& 8&15&22&29&\\
-2002 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{4}& 3&10&17&24&31&&\Day{4}& 2& 9&16&23&30&\\
-2003 &3&6&6&2&4&0&2&5&1&3&6&1&\Day{5}& 4&11&18&25& &&\Day{5}& 3&10&17&24&31&\\
-2004 &4&0&1&4&6&2&4&0&3&5&1&3&\Day{6}& 5&12&19&26& &&\Day{6}& 4&11&18&25& &\\
- \cline{14-27}
-2005 &6&2&2&5&0&3&5&1&4&6&2&4&\multicolumn{7}{c|}{\textbf{4}}&\multicolumn{7}{c|}{\textbf{5}}\\
- \cline{14-27}
-2006 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{0}& & 4&11&18&25&&\Day{0}& & 3&10&17&24&31\\
-2007 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{1}& & 5&12&19&26&&\Day{1}& & 4&11&18&25&\\
-2008 &2&5&6&2&4&0&2&5&1&3&6&1&\Day{2}& & 6&13&20&27&&\Day{2}& & 5&12&19&26&\\
-2009 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{3}& & 7&14&21&28&&\Day{3}& & 6&13&20&27&\\
-2010 &5&1&1&4&6&2&4&0&3&5&1&3&\Day{4}& 1& 8&15&22&29&&\Day{4}& & 7&14&21&28&\\
- \cline{1-13}
-2011 &6&2&2&5&0&3&5&1&4&6&2&4&\Day{5}& 2& 9&16&23&30&&\Day{5}& 1& 8&15&22&29&\\
-2012 &0&3&4&0&2&5&0&3&6&1&4&6&\Day{6}& 3&10&17&24&31&&\Day{6}& 2& 9&16&23&30&\\
- \cline{14-27}
-2013 &2&5&5&1&3&6&1&4&0&2&5&0&\multicolumn{7}{c|}{\textbf{6}}&\multicolumn{7}{c|}{}\\ \cline{14-20}
-2014 &3&6&6&2&4&0&2&5&1&3&6&1&\Day{0}& & 2& 9&16&23&30&
- \multicolumn{7}{l|}{\ \tsize For the other}\\
-2015 &4&0&0&3&5&1&3&6&2&4&0&2&\Day{1}& & 3&10&17&24&31&
- \multicolumn{7}{l|}{\ \tsize years, add or}\\
-2016 &5&1&2&5&0&3&5&1&4&6&2&4&\Day{2}& & 4&11&18&25& &
- \multicolumn{7}{l|}{\ \tsize subtract 28.}\\
-2017 &0&3&3&6&1&4&6&2&5&0&3&5&\Day{3}& & 5&12&19&26& &
- \multicolumn{7}{l|}{\ \tsize So, for year}\\
-2018 &1&4&4&0&2&5&0&3&6&1&4&6&\Day{4}& & 6&13&20&27& &
- \multicolumn{7}{l|}{\ \tsize 2080, look for}\\
-2019 &2&5&5&1&3&6&1&4&0&2&5&0&\Day{5}& & 7&14&21&28& &
- \multicolumn{7}{l|}{\ \tsize $2080-3\times28$}\\
-2020 &3&6&0&3&5&1&3&6&2&4&0&2&\Day{6}& 1& 8&15&22&29& &
- \multicolumn{7}{l|}{\ \tsize $=1996$}\\
-\hline \multicolumn{27}{l}{\ \copyright Slobodan Jankovi\'c
- (\texttt{slobodan@archimed.filfak.ni.ac.yu})}
-\end{tabular}\\
-\end{document}
diff --git a/Master/texmf-dist/tex/latex/calxxxx/calxxxx.tex b/Master/texmf-dist/tex/latex/calxxxx/calxxxx.tex
deleted file mode 100644
index 658af975ca3..00000000000
--- a/Master/texmf-dist/tex/latex/calxxxx/calxxxx.tex
+++ /dev/null
@@ -1,176 +0,0 @@
-% This is a freeware program written in LaTeX2e. It prints the calendar for a given year.
-
-% Safe modifications are between two `=====' lines. Any other modification are recommended
-% only for TeXperts.
-
-\documentclass{article}
-\usepackage{array}
-\nofiles\thispagestyle{empty}
-
-% Counters, logical, and lengths
-\newcount\y \newcount\m \newcount\x % year, month, day of the week
-\newcount\p \newcount\q % temporary counters
-\newif\ifleap % if leap year
-\newif\ifJulian % if Julian calendar
-\newif\ifZeroExist % if 0th year exist
-\newif\ifCmRule % cm rule at right
-\newlength{\Wd} % the widest name of days
-\newlength{\Wdx} % temporary dim
-
-%========== Start of Safe Modifications =============
-% The following definitions are safe to change
-
-% Fonts for Year, Months and Days
-\def\yearfont{\normalsize\bfseries} \def\monthfont{\scriptsize\scshape} \def\dayfont{\tiny}
-
-% Language Dependent Definitions (B.C., A.D., months, and days)
-
-\def\BC{ B.C.}\def\AD{} % ` B.C.' after a negative year, nothing after a positive
-
-\def\Jan{January} \def\Feb{February}\def\Mar{March} \def\Apr{April}
-\def\May{May} \def\Jun{June} \def\Jul{July} \def\Aug{August}
-\def\Sep{September}\def\Oct{October} \def\Nov{November}\def\Dec{December}
-
-\def\Sun{\textbf{S}} \def\Mon{\textbf{M}} \def\Tue{\textbf{T}} \def\Wen{\textbf{W}}
-\def\Thr{\textbf{T}} \def\Fri{\textbf{F}} \def\Sat{\textbf{S}}
-
-% Margins and Spaces
-\setlength{\topmargin}{-1in}\setlength{\oddsidemargin}{-1in} % no margins
-\def\sm{\hspace{2pt}} % space between months
-
-% Select Gregorian/Julian calendar and zero/nonzero (default are both false)
-\Julianfalse % don't use Julian, use Gregorian calendar
-\ZeroExistfalse % zero year doesn't exist (before 1st is -1st year)
-%\Juliantrue % use Julian, don't use Gregorian calendar
-%\ZeroExisttrue % zero year exists (before 1st is 0th year)
-
-% Do you wish a cm rule? (default is false)
-\CmRulefalse % don't print the cm rule
-%\CmRuletrue % print the cm rule
-
-%========== End of Safe Modifications =============
-% It is not recommended to change anything below this line!
-
-% Set \x=the day of the week (0=Sunday, 1=Monday,...)
-\def\dayofweek#1{\m=#1 \x=\y % x:=y;
-\ifnum \x>0\else % if x<=0 then
- \ifZeroExist \else \advance\x by 1 \fi % begin if not ZeroExist x:=y+1;
- \q=\x \divide\q by 2800 \advance\q by -1 % q:=x; q:=(q div 2800-1)*2800;
- \multiply\q by 2800 \advance\x by -\q % x:=x-q
-\fi % end;
-\p=\x % p:=x;
-\q=\m \multiply \q by 3 % q=m*31;
-\advance \x by \q \advance \x by 4 % x:=x+q+4;
-\ifnum \m<3 \advance \p by -1 \else % if m<3 then p:=p-1 else
- \q=\m \multiply\q by 4 \advance\q by 23 % begin q:=(4*m+23) div 10;
- \divide\q by 10 \advance\x by -\q% x:=x-q
-\fi % end;
-\q=\p \divide\q by 4 \advance\x by \q % q:=p div 4; x:=x+q;
-\ifJulian \else % if not Julian then
- \divide\p by 100 \advance\p by 1 % begin p:=p div 100+1;
- \multiply\p by 3 \divide\p by 4 % p:=p*3 div 4;
- \advance\x by -\p % x:=x-p
-\fi % end;
-\p=\x \divide\p by 7 \multiply\p by 7 % p:=(x div 7)*7;
-\advance \x by -\p} % x:=x-p;
-
-%Is \y a leap year?
-\def\setleap{\leapfalse \x=\y % leap:=false; x:=y;
-\ifnum \x<0 % if x<0 then
- \ifZeroExist \else \advance\x by 1 \fi % begin if not ZeroExist else x:=x+1
-\fi % end;
-\p=\x \divide\p by 4 \multiply\p by 4 % p:=(x div 4)*4;
-\ifnum \x=\p % if x=p then
- \q=\x \divide\q by 100 \multiply\q by 100 % begin q:=(x div 100)*100;
- \ifnum \x=\q % if x=q then
- \q=\x \divide\q by 400 \multiply\q by 400 % begin q:=(x div 400)*400;
- \ifnum \x=\q \leaptrue \fi % if x=q then leap:=true
- \else \leaptrue % end else leap:=true
-\fi\fi}% end end
-
-% Defines all kind of rows
-\def\rows{%
-\def\rone{&1&8&15&22&29&}%rows for a month with 31 days
-\def\rtwo{&2&9&16&23&30&}\def\btwo{&&2&9&16&23&30}%
-\def\rthree{&3&10&17&24&31&}\def\bthree{&&3&10&17&24&31}%
-\def\rfour{&4&11&18&25&&}\def\bfour{&&4&11&18&25&}%
-\def\rfive{&5&12&19&26&&}\def\bfive{&&5&12&19&26&}%
-\def\rsix{&6&13&20&27&&}\def\bsix{&&6&13&20&27&}%
-\def\rseven{&7&14&21&28&&}\def\bseven{&&7&14&21&28&}%
-\ifnum\m=2 % if February ...
- \ifleap\else\def\rone{&1&8&15&22&&}\fi %if it isn't a leap year
- \def\rtwo{&2&9&16&23&&}\def\btwo{&&2&9&16&23&}%
- \def\rthree{&3&10&17&24&&}\def\bthree{&&3&10&17&24&}%
-\else % if other month with <=30 days ...
- \ifnum\m=1\else\ifnum\m=3\else\ifnum\m=5\else\ifnum\m=7\else\ifnum\m=8\else
- \ifnum\m=10\else\ifnum\m=12\else
- \def\rthree{&3&10&17&24&&}\def\bthree{&&3&10&17&24&}%
-\fi\fi\fi\fi\fi\fi\fi\fi}
-
-% Calendar of a month
-\def\Month#1{% #1=month
-\setleap\dayofweek{#1}\rows % set leap, set \x=day of the week, and define all rows
-\setlength{\tabcolsep}{0pt}
-\begin{tabular*}{7em}{|>{\centering}p{\Wd}|@{\extracolsep{\fill}}rrrrrr|}
-\multicolumn{7}{l}{\sm\monthfont %print name of a month \m
- \ifcase\m \or\Jan\or\Feb\or\Mar\or\Apr\or\May\or\Jun\or\Jul\or\Aug\or\Sep\or\Oct\or\Nov\or\Dec \fi}\\
-\hline
-\ifcase\x
- \Sun\rone\\ \Mon\rtwo\\ \Tue\rthree\\ \Wen\rfour\\ \Thr\rfive\\ \Fri\rsix\\ \Sat\rseven\\ \or %if Sunday
- \Sun\bseven\\ \Mon\rone\\ \Tue\rtwo\\ \Wen\rthree\\ \Thr\rfour\\ \Fri\rfive\\ \Sat\rsix\\ \or %if Monday
- \Sun\bsix\\ \Mon\bseven\\ \Tue\rone\\ \Wen\rtwo\\ \Thr\rthree\\ \Fri\rfour\\ \Sat\rfive\\ \or %if Tuesday
- \Sun\bfive\\ \Mon\bsix\\ \Tue\bseven\\ \Wen\rone\\ \Thr\rtwo\\ \Fri\rthree\\ \Sat\rfour\\ \or %if Wednesday
- \Sun\bfour\\ \Mon\bfive\\ \Tue\bsix\\ \Wen\bseven\\ \Thr\rone\\ \Fri\rtwo\\ \Sat\rthree\\ \or %if Thursday
- \Sun\bthree\\ \Mon\bfour\\ \Tue\bfive\\ \Wen\bsix\\ \Thr\bseven\\ \Fri\rone\\ \Sat\rtwo\\ \or %if Friday
- \Sun\btwo\\ \Mon\bthree\\ \Tue\bfour\\ \Wen\bfive\\ \Thr\bsix\\ \Fri\bseven\\ \Sat\rone\\ \fi %if Saturday
-\hline
-\end{tabular*}}
-
-% Enter the year
-\def\enteryear{\typeout{}
-\typeout{Enter the year (negative for B.C., 0th year does\ifZeroExist \else n't\fi \space exist),}
-\typeout{and I will make the calendar for that year!}
-\typeout{}\typeout{For the current year, \number\year th, just press the ENTER key!}
-\loop
- \typein[\Year]{}\ifx \Year\empty \y=\year \else \y=\Year \fi \relax
- \leapfalse \ifnum \y=0 \ifZeroExist \else \leaptrue \fi\fi
-\ifleap \typeout{}\typeout{0th year doesn't exist! Maybe you want the year -1.} \repeat
-\typeout{}\typeout{\ifJulian Julian \else Gregorian \fi Calendar for the year \number\y.}\typeout{}}
-
-% Set \Wd to the widest name of the days
-\def\SetWidth{%
-\settowidth{\Wd} {\dayfont\Sun} % Wd:=width(Sun);
-\settowidth{\Wdx}{\dayfont\Mon}\ifdim\Wd<\Wdx \Wd=\Wdx \fi % if Wd<width(Mon) then Wd:=width(Mon);
-\settowidth{\Wdx}{\dayfont\Tue}\ifdim\Wd<\Wdx \Wd=\Wdx \fi % etc.
-\settowidth{\Wdx}{\dayfont\Wen}\ifdim\Wd<\Wdx \Wd=\Wdx \fi
-\settowidth{\Wdx}{\dayfont\Thr}\ifdim\Wd<\Wdx \Wd=\Wdx \fi
-\settowidth{\Wdx}{\dayfont\Fri}\ifdim\Wd<\Wdx \Wd=\Wdx \fi
-\settowidth{\Wdx}{\dayfont\Sat}\ifdim\Wd<\Wdx \Wd=\Wdx \fi}
-
-% Print the calendar for the given year
-\def\printyear{%
-\begin{minipage}{.5\textwidth}\dayfont % set font for the days
-{\sm \yearfont
- \ifnum\y>0 \number\y\AD \else \ifZeroExist \the\y \else \p=-\y \number\p\BC\fi\fi
- \ifJulian \ (Julian)\fi}\\[.5ex] % print year
-\SetWidth
-\Month{1}\sm\Month{2}\sm\Month{3}\\% print all months
-\Month{4}\sm\Month{5}\sm\Month{6}\\ \Month{7}\sm\Month{8}\sm\Month{9}\\
-\Month{10}\sm\Month{11}\sm\Month{12}\par
-\ \copyright\texttt{slobodan@archimed.filfak.ni.ac.yu}
-\end{minipage}}
-
-% Print cm scale at right
-\def\cmscale(#1,#2){\setlength{\unitlength}{1mm}
-\begin{picture}(0,0)(#1,#2)\scriptsize
- \newcounter{cms}\put(-.3,71){cm}
- \multiput(2,70)(0,-1){70}{\line(1,0){1}} \multiput(1,65)(0,-10){7}{\line(1,0){2}}
- \multiput(0,70)(0,-10){8}{\line(1,0){3}}
- \multiput(1,60.5)(0,-10){7}{\makebox(0,0)[b]{\addtocounter{cms}{1}\arabic{cms}}}
-\end{picture}}
-
-\begin{document}
- \noindent \enteryear
- \printyear
- \ifCmRule\cmscale(8,35)\fi% Print cm rule
-\end{document}