From eeaf08a04fbfb2c1023048d1354ebc5e121a71e9 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 13 Jan 2006 00:08:36 +0000 Subject: tabvar git-svn-id: svn://tug.org/texlive/trunk@1371 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/tabvar/tabvar.1 | 18 +++ Master/texmf-dist/tex/latex/tabvar/tabvar.2 | 18 +++ Master/texmf-dist/tex/latex/tabvar/tabvar.3 | 18 +++ Master/texmf-dist/tex/latex/tabvar/tabvar.cfg | 36 +++++ Master/texmf-dist/tex/latex/tabvar/tabvar.sty | 195 ++++++++++++++++++++++++++ 5 files changed, 285 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/tabvar/tabvar.1 create mode 100644 Master/texmf-dist/tex/latex/tabvar/tabvar.2 create mode 100644 Master/texmf-dist/tex/latex/tabvar/tabvar.3 create mode 100644 Master/texmf-dist/tex/latex/tabvar/tabvar.cfg create mode 100644 Master/texmf-dist/tex/latex/tabvar/tabvar.sty (limited to 'Master') diff --git a/Master/texmf-dist/tex/latex/tabvar/tabvar.1 b/Master/texmf-dist/tex/latex/tabvar/tabvar.1 new file mode 100644 index 00000000000..cfc6c674262 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tabvar/tabvar.1 @@ -0,0 +1,18 @@ +%!PS +%%BoundingBox: -1 -1 25 13 +%%Creator: MetaPost +%%CreationDate: 2005.02.06:1858 +%%Pages: 1 +%%EndProlog +%%Page: 1 1 + 0 0.19925 dtransform truncate idtransform setlinewidth pop [] 0 setdash + 1 setlinecap 1 setlinejoin 10 setmiterlimit +newpath 0 0 moveto +23.91028 11.95514 lineto stroke +newpath 21.28954 8.93336 moveto +23.91028 11.95514 lineto +19.92043 11.67165 lineto + closepath +gsave fill grestore stroke +showpage +%%EOF diff --git a/Master/texmf-dist/tex/latex/tabvar/tabvar.2 b/Master/texmf-dist/tex/latex/tabvar/tabvar.2 new file mode 100644 index 00000000000..521093bcfa0 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tabvar/tabvar.2 @@ -0,0 +1,18 @@ +%!PS +%%BoundingBox: -1 -1 25 13 +%%Creator: MetaPost +%%CreationDate: 2005.02.06:1858 +%%Pages: 1 +%%EndProlog +%%Page: 1 1 + 0 0.19925 dtransform truncate idtransform setlinewidth pop [] 0 setdash + 1 setlinecap 1 setlinejoin 10 setmiterlimit +newpath 0 11.95514 moveto +23.91028 0 lineto stroke +newpath 19.92043 0.2835 moveto +23.91028 0 lineto +21.28954 3.02177 lineto + closepath +gsave fill grestore stroke +showpage +%%EOF diff --git a/Master/texmf-dist/tex/latex/tabvar/tabvar.3 b/Master/texmf-dist/tex/latex/tabvar/tabvar.3 new file mode 100644 index 00000000000..98946cec643 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tabvar/tabvar.3 @@ -0,0 +1,18 @@ +%!PS +%%BoundingBox: -1 -2 25 2 +%%Creator: MetaPost +%%CreationDate: 2005.02.06:1858 +%%Pages: 1 +%%EndProlog +%%Page: 1 1 + 0 0.19925 dtransform truncate idtransform setlinewidth pop [] 0 setdash + 1 setlinecap 1 setlinejoin 10 setmiterlimit +newpath 0 0 moveto +23.91028 0 lineto stroke +newpath 20.21468 -1.5308 moveto +23.91028 0 lineto +20.21468 1.5308 lineto + closepath +gsave fill grestore stroke +showpage +%%EOF diff --git a/Master/texmf-dist/tex/latex/tabvar/tabvar.cfg b/Master/texmf-dist/tex/latex/tabvar/tabvar.cfg new file mode 100644 index 00000000000..3e7d4d85b93 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tabvar/tabvar.cfg @@ -0,0 +1,36 @@ +%% Fichier de configuration de l'extension `tabvar.sty'. +%% +%% D\'ecommenter la ligne suivante pour que les variantes MetaPost +%% des fl\`eches soient utilis\'ees \`a la place de la fonte tabvar.pfb. +%% +%%\FlechesMPtrue +%% +%% Ce param\`etre permet d'ajuster la hauteur des lignes +%% de `tabvar' correspondant aux variations d'une fonction ; +%% sa valeur par d\'efaut est : +%% +%%\setlength{\TVextraheight}{0.7\baselineskip} +%% +%% Valeur de \arraycolsep utilis\'ee dans `tabvar'. +%% +%%\setlength{\TVarraycolsep}{1pt} +%% +%% Valeur de \arraystretch utilis\'ee dans `tabvar'. +%% +%%\renewcommand{\TVarraystretch}{1.5} +%% +%% Exemples de d\'efinitions de couleurs pour les colonnes `N' +%% o\`u la fonction est non d\'efinie. +%% +%%\definecolor{TVcolor}{gray}{0.5} +%%\definecolor{TVcolor}{rgb}{0.33, 0.12, 0} +%%\definecolor{TVcolor}{cmyk}{0.91,0,0.88,0.12} +%% +%% Les valeurs suivantes assurent que les colonnes `N' sont +%% colori\'ees sur toute leur largeur. +%% +%%\setlength{\TVcolorLeftSep}{\TVarraycolsep} +%%\setlength{\TVcolorRightSep}{\TVarraycolsep} +\endinput +%% +%% End of file `tabvar.cfg'. diff --git a/Master/texmf-dist/tex/latex/tabvar/tabvar.sty b/Master/texmf-dist/tex/latex/tabvar/tabvar.sty new file mode 100644 index 00000000000..cb9cd326c51 --- /dev/null +++ b/Master/texmf-dist/tex/latex/tabvar/tabvar.sty @@ -0,0 +1,195 @@ +%% +%% This is file `tabvar.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% tabvar.dtx (with options: `sty') +%% +%% IMPORTANT NOTICE: +%% +%% For the copyright see the source file. +%% +%% Any modified versions of this file must be renamed +%% with new filenames distinct from tabvar.sty. +%% +%% For distribution of the original source see the terms +%% for copying and modification in the file tabvar.dtx. +%% +%% This generated file may be distributed as long as the +%% original source files, as listed above, are part of the +%% same distribution. (The sources need not necessarily be +%% in the same archive or directory.) +%% +%% Copyright (C) Daniel Flipo 2003-2005 . +%% +\NeedsTeXFormat{LaTeX2e}[1997/06/01] +\ProvidesFile{tabvar.sty} + [2005/02/05 v0.9 (Daniel Flipo)] +\newif\ifFlechesMP \FlechesMPfalse +\DeclareOption{FlechesMP}{\FlechesMPtrue} +\DeclareOption{FlechesPS}{\FlechesMPfalse} +\ProcessOptions +\RequirePackage{array} +\RequirePackage{colortbl} +\RequirePackage{varwidth} +\RequirePackage{ifthen} +\RequirePackage{graphicx} +\RequirePackage{ifpdf} +\ifpdf + \input{supp-pdf} + \DeclareGraphicsRule{*}{mps}{*}{} +\fi +\newsavebox{\arup} +\newsavebox{\ardown} +\newsavebox{\arhor} +\providecommand{\@ptsize}{0} +\sbox{\arup} {\includegraphics[scale=1.\@ptsize]{tabvar.1}} +\sbox{\ardown}{\includegraphics[scale=1.\@ptsize]{tabvar.2}} +\sbox{\arhor} {\includegraphics[scale=1.\@ptsize]{tabvar.3}} +\newcommand{\FlecheCm}{\raisebox{.5ex}{\usebox{\arup}}} +\newcommand{\FlecheDm}{\raisebox{.5ex}{\usebox{\ardown}}} +\newcommand{\FlecheHm}{\raisebox{.5ex}{\usebox{\arhor}}} +\AtBeginDocument{% + \ifFlechesMP + \newcommand{\FlecheC}{\FlecheCm}% + \newcommand{\FlecheD}{\FlecheDm}% + \newcommand{\FlecheH}{\FlecheHm}% + \else + \DeclareFontFamily{U}{tv}{}% + \DeclareFontShape{U}{tv}{m}{n}{<->tabvar}{}% + \DeclareSymbolFont{tvsymbols}{U}{tv}{m}{n}% + \DeclareMathSymbol{\enearrow}{\mathrel}{tvsymbols}{"25}% + \DeclareMathSymbol{\esearrow}{\mathrel}{tvsymbols}{"26}% + \DeclareMathSymbol{\eastarrow}{\mathrel}{tvsymbols}{"21}% + \newcommand{\FlecheC}{\ensuremath{\enearrow}}% + \newcommand{\FlecheD}{\ensuremath{\esearrow}}% + \newcommand{\FlecheH}{\ensuremath{\eastarrow}}% + \fi} +\newdimen\TVextraheight +\setlength{\TVextraheight}{.7\baselineskip} +\newcount\@niveaux +\newcount\@pos +\newif\if@socle +\newcommand{\niveau}[2]{\global\@pos=#1 \global\@niveaux=#2 + \global\@socletrue} +\newcommand{\@socle}{% + \ifnum\@pos=1 \@soclefalse \fi + \if@socle + \rule{\z@}{\TVextraheight}% + \@tempcnta=\@pos + \advance\@tempcnta by -1 + \whiledo{\@tempcnta>0}{\TVnl \null \advance\@tempcnta by -1}% + \fi} +\newif\ifreset@niveaux +\newcommand{\reset@niveaux}{% + \ifreset@niveaux + \global\@niveaux=1 \global\@pos=1 \global\@soclefalse + \fi} +\newcolumntype{C}{% + >{\begin{varwidth}[b]{5em}\let\TVnl=\\ \let\\=\TVtabularnewline $}% + c% + <{\@socle \reset@niveaux + $\@finalstrut\@arstrutbox\end{varwidth}}} +\newcolumntype{L}{% + >{\begin{varwidth}[b]{5em}\let\TVnl=\\ \let\\=\TVtabularnewline $}% + l% + <{\@socle \reset@niveaux + $\@finalstrut\@arstrutbox\end{varwidth}}} +\newcolumntype{R}{% + >{\begin{varwidth}[b]{5em}\let\TVnl=\\ \let\\=\TVtabularnewline $}% + r% + <{\@socle \reset@niveaux + $\@finalstrut\@arstrutbox\end{varwidth}}} +\definecolor{TVcolor}{gray}{0.7} +\newdimen\TVarraycolsep +\newdimen\TVcolorLeftSep +\newdimen\TVcolorRightSep +\setlength{\TVcolorLeftSep}{\TVarraycolsep} +\setlength{\TVcolorRightSep}{\TVarraycolsep} +\newcolumntype{N}{% + >{\columncolor{TVcolor}[\TVcolorLeftSep][\TVcolorRightSep]} + c} +\newcommand{\decroit}{\FlecheD + \global\advance\@pos by -1 + \ifnum\@pos<1 + \PackageError{tabvar.sty}% + {Les arguments la commande + \protect\niveau\space sont incorrects}% + \fi} +\newcommand{\croit} {\raisebox{-\baselineskip}{\FlecheC}% + \global\advance\@pos by 1 + \ifnum\@pos>\@niveaux + \PackageError{tabvar.sty}% + {Les arguments la commande + \protect\niveau\space sont incorrects}% + \fi} +\newcommand{\constante}{\FlecheH} +\newcommand{\dbarre}{\ifnum\@niveaux=1 + \@tempdimc=\TVarraystretch\baselineskip + \else + \@tempcnta=\@niveaux + \advance\@tempcnta by -1 + \@tempdimc=\@tempcnta\baselineskip + \@tempdimb=\TVextraheight + \ifdim\@tempdimb<.7\baselineskip + \@tempdimb=.7\baselineskip + \fi + \advance\@tempdimc by \@tempdimb + \advance\@tempdimc by \dp\@arstrutbox + \fi + \rule[-\dp\@arstrutbox]{.5\p@}{\@tempdimc}% + \kern 2\p@ + \rule[-\dp\@arstrutbox]{.5\p@}{\@tempdimc}% + \@soclefalse} +\newcommand{\discont}[4][0]{% + \settowidth{\@tempdimc}{\ensuremath{#2}}% + \settowidth{\@tempdimb}{\ensuremath{#4}}% + \ifdim\@tempdimc<\@tempdimb \@tempdimc=\@tempdimb\fi + \rule{\z@}{\TVextraheight}% + \@soclefalse + \ifthenelse{\equal{#3}{<}}% + {\makebox[\@tempdimc]{\ensuremath{#4}}% + \@tempcnta=#1 + \whiledo{\@tempcnta>0}{\TVnl \null \advance\@tempcnta by -1}% + \TVnl + \makebox[\@tempdimc]{\ensuremath{#2}}% + \@tempcnta=\@pos + \advance\@tempcnta by -1 + \whiledo{\@tempcnta>0}{\TVnl \null \advance\@tempcnta by -1}% + \global\advance\@pos by 1 + \global\advance\@pos by #1 + }% + {\ifthenelse{\equal{#3}{>}}% + {\makebox[\@tempdimc]{\ensuremath{#2}}% + \@tempcnta=#1 + \whiledo{\@tempcnta>0}{\TVnl \null \advance\@tempcnta by -1}% + \TVnl + \makebox[\@tempdimc]{\ensuremath{#4}}% + \@tempcnta=\@pos + \advance\@tempcnta by -2 + \advance\@tempcnta by -#1 + \whiledo{\@tempcnta>0}{\TVnl \null \advance\@tempcnta by -1}% + \global\advance\@pos by -1 + \global\advance\@pos by -#1 + }% + {\PackageError{tabvar.sty}% + {Le second argument de \protect\discont\space doit \^etre + \MessageBreak soit '<' soit '>'}}% + }% +} +\newcommand{\TVarraystretch}{1.5} +\setlength{\TVarraycolsep}{1pt} +\newenvironment{tabvar}[1] + {\renewcommand{\arraystretch}{\TVarraystretch}% + \setlength{\arraycolsep}{\TVarraycolsep}% + \global\@niveaux=1 \global\@pos=1 \global\@soclefalse + \def\TVtabularnewline{\reset@niveauxtrue\tabularnewline}% + \begin{array}{#1}} + {\end{array}} +\InputIfFileExists{tabvar.cfg} + {\typeout{loading tabvar.cfg}} + {\typeout{tabvar.cfg not found, using default values}} +\endinput +%% +%% End of file `tabvar.sty'. -- cgit v1.2.3