summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/schemata
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2016-01-30 22:59:40 +0000
committerKarl Berry <karl@freefriends.org>2016-01-30 22:59:40 +0000
commit685a69bf7d32b572beaa13dbde7c4485952900fd (patch)
tree5a9a451568c6ed9205d708b40af41950d722d44d /Master/texmf-dist/tex/generic/schemata
parentaf3d4471550f82ec735687209a6d500c85ccb561 (diff)
schemata (30jan16)
git-svn-id: svn://tug.org/texlive/trunk@39510 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/schemata')
-rw-r--r--Master/texmf-dist/tex/generic/schemata/schemata.sty507
1 files changed, 309 insertions, 198 deletions
diff --git a/Master/texmf-dist/tex/generic/schemata/schemata.sty b/Master/texmf-dist/tex/generic/schemata/schemata.sty
index dd4e98849d8..79dd4d5b76d 100644
--- a/Master/texmf-dist/tex/generic/schemata/schemata.sty
+++ b/Master/texmf-dist/tex/generic/schemata/schemata.sty
@@ -5,212 +5,323 @@
%% The original source files were:
%%
%% schemata.dtx (with options: `package')
+%% --------:| ----------------------------------------------------------------
+%% schemata:| Generic package to aid construction of topical categories
+%% Author:| Charles P. Schaum
+%% E-mail:| charles dot schaum at comcast dot net
+%% License:| Released under the LaTeX Project Public License v1.3c or later
+%% See:| http://www.latex-project.org/lppl.txt
%%
-%% This is a generated file.
-%%
-%% Copyright (C) 2013 by Charles P. Schaum <charles dot schaum at comcast dot net>
-%%
-%% This file may be distributed and/or modified under the conditions of
-%% the LaTeX Project Public License, either version 1.2 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.2 or later is part of all distributions of LaTeX version
-%% 1999/12/01 or later.
-%%
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-\else
-\NeedsTeXFormat{LaTeX2e}[2005/12/01]
+\expandafter\ifx\csname newenvironment\endcsname\relax\else
+\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesPackage{schemata}
- [2013/09/23 v0.7 generic package to aid construction of topical categories]
+ [2016/01/25 v0.8 generic package to aid construction of topical categories]
\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-\def\DoBraces{\let\schemaLD\lbrace \let\schemaRD\rbrace}\DoBraces%
-\DoBraces%
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \catcode`@=11%
+ \def\DoBraces{\let\@schemata@LD\lbrace \let\@schemata@RD\rbrace}%
+ \DoBraces%
\else
-\DeclareOption{braces}{\let\schemaLD\lbrace \let\schemaRD\rbrace}
-\DeclareOption{brackets}{\let\schemaLD\lbrack \let\schemaRD\rbrack}
-\DeclareOption{parens}{\let\schemaLD( \let\schemaRD)}
-\ExecuteOptions{braces}
-\ProcessOptions\relax
-\fi
-\newbox\rhs%
-\newbox\lhs%
-\newdimen\rheight%
-\newdimen\lheight%
-\newif\ifschemaLC%
-\newif\ifschemaSwitch%
-\def\DoBraces{\let\schemaLD\lbrace \let\schemaRD\rbrace}\DoBraces%
-\def\DoBrackets{\let\schemaLD\lbrack \let\schemaRD\rbrack}%
-\def\DoParens{\let\schemaLD( \let\schemaRD)}%
-\def\LCschema{\schemaLCtrue}%
-\def\UCschema{\schemaLCfalse}%
-\def\SwitchSB{\schemaSwitchtrue}%
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-{\catcode`@=11
-\gdef\schemabox{\futurelet\testchar\schemab@x}
-\gdef\schemab@x{\ifx[\testchar \let\next\@schemabox%
- \else \let\next\@schemab@x \fi \next}
-\gdef\@schemab@x#1{\@schemabox[0pt]{#1}}
-\gdef\@schemabox[#1]#2{%
- \ifschemaLC\def\Adj{}%
- \ifschemaSwitch\def\Adj{\strut}\fi
- \else
- \def\Adj{\strut}%
- \ifschemaSwitch\def\Adj{}\fi
- \fi
- \schemaSwitchfalse%
- \ifdim#1<1pt
- \def\\{\egroup\hbox\bgroup\ignorespaces }%
- \vbox{\hbox\bgroup\Adj\ignorespaces #2\egroup}%
- \else
- \def\\{\hfil\egroup\hbox to #1\bgroup\ignorespaces }%
- \vbox{\hbox to #1\bgroup\Adj\ignorespaces #2\hfil\egroup}%
- \fi
-}}\else
-\newcommand{\schemabox}[2][0pt]{%
- \ifschemaLC\def\Adj{}%
- \ifschemaSwitch\def\Adj{\strut}\fi
- \else
- \def\Adj{\strut}%
- \ifschemaSwitch\def\Adj{}\fi
- \fi
- \schemaSwitchfalse%
- \ifdim#1<1pt
- \def\\{\egroup\hbox\bgroup\ignorespaces }%
- \vbox{\hbox\bgroup\Adj\ignorespaces #2\egroup}%
- \else
- \def\\{\hfil\egroup\hbox to #1\bgroup\ignorespaces }%
- \vbox{\hbox to #1\bgroup\Adj\ignorespaces #2\hfil\egroup}%
- \fi
-}\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-{\catcode`@=11
-\gdef\schema{\futurelet\testchar\schem@}
-\gdef\schem@{\ifx[\testchar \let\next\@schema%
- \else \let\next\@schem@ \fi \next}
-\gdef\@schem@#1#2{\@schema[open]{#1}{#2}}
-\gdef\@schema[#1]#2#3{%
- \def\Option{#1}\def\Open{open}%
- \ifx\Option\Open
- \setbox\rhs=\vbox{#3}%
- \rheight=\ht\rhs%
- \advance\rheight\dp\rhs%
- \advance\rheight by 1.44265ex%
- \hbox{$\vcenter{#2}\basiclbrace{\rheight}\vcenter{#3}$}%
- \else
- \setbox\lhs=\vbox{#2}%
- \lheight=\ht\lhs%
- \advance\lheight\dp\lhs%
- \advance\lheight by 1.44265ex%
- \hbox{$\vcenter{#2}\kern-0.2em\basicrbrace{\lheight}\vcenter{#3}$}%
- \fi
-}}\else
-\newcommand{\schema}[3][open]{%
- \def\Option{#1}\def\Open{open}%
- \ifx\Option\Open
- \setbox\rhs=\vbox{#3}%
- \rheight=\ht\rhs%
- \advance\rheight\dp\rhs%
- \advance\rheight by 1.44265ex%
- \hbox{$\vcenter{#2}\basiclbrace{\rheight}\vcenter{#3}$}%
- \else
- \setbox\lhs=\vbox{#2}%
- \lheight=\ht\lhs%
- \advance\lheight\dp\lhs%
- \advance\lheight by 1.44265ex%
- \hbox{$\vcenter{#2}\kern-0.2em\basicrbrace{\lheight}\vcenter{#3}$}%
- \fi
-}\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-{\catcode`@=11
-\gdef\Schema{\futurelet\testchar\Schem@}
-\gdef\Schem@{\ifx[\testchar \let\next\@Schema \else \let\next\@Schem@ \fi \next}
-\gdef\@Schem@#1#2#3#4{\@Schema[open]{#1}{#2}{#3}{#4}}
-\gdef\@Schema[#1]#2#3#4#5{%
- \def\Option{#1}\def\Open{open}%
- \ifx\Option\Open
- \dimen0=#2%
- \hbox{$\vcenter{\vskip1.44265\dimen0#4}\complexlbrace{#2}{#3}\vcenter{#5}$}%
- \else
- \dimen0=#2%
- \hbox{$\vcenter{\vskip1.44265\dimen0#4}\kern-0.2em%
- \complexrbrace{#2}{#3}\vcenter{#5}$}%
- \fi
-}}\else
-\newcommand{\Schema}[5][open]{%
- \def\Option{#1}\def\Open{open}%
- \ifx\Option\Open
+ \DeclareOption{braces}{\let\@schemata@LD\lbrace \let\@schemata@RD\rbrace}
+ \DeclareOption{brackets}{\let\@schemata@LD\lbrack \let\@schemata@RD\rbrack}
+ \DeclareOption{parens}{\let\@schemata@LD( \let\@schemata@RD)}
+ \ExecuteOptions{braces}
+ \ProcessOptions\relax
+\fi
+\newbox\@rhs%
+\newbox\@lhs%
+\newdimen\@rheight%
+\newdimen\@lheight%
+\newif\if@schemata@LCBox%
+\newif\if@schemata@SWBox%
+\newif\if@schemata@NudgeBox%
+\expandafter\ifx\csname newenvironment\endcsname\relax
+\else
+ \newcommand{\DoBraces}{\let\@schemata@LD\lbrace \let\@schemata@RD\rbrace}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\DoBrackets{\let\@schemata@LD\lbrack \let\@schemata@RD\rbrack}%
+\else
+ \newcommand{\DoBrackets}{\let\@schemata@LD\lbrack \let\@schemata@RD\rbrack}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\DoParens{\let\@schemata@LD( \let\@schemata@RD)}%
+\else
+ \newcommand{\DoParens}{\let\@schemata@LD( \let\@schemata@RD)}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\LCschema{\@schemata@LCBoxtrue}%
+\else
+ \newcommand{\LCschema}{\@schemata@LCBoxtrue}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\UCschema{\@schemata@LCBoxfalse}%
+\else
+ \newcommand{\UCschema}{\@schemata@LCBoxfalse}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\SwitchSB{\@schemata@SWBoxtrue}%
+\else
+ \newcommand{\SwitchSB}{\@schemata@SWBoxtrue}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\NudgeSB{\@schemata@NudgeBoxtrue}%
+\else
+ \newcommand{\NudgeSB}{\@schemata@NudgeBoxtrue}%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \gdef\schemabox{\futurelet\testchar\@schemabox}
+ \gdef\@schemabox{%
+ \ifx[\testchar
+ \let\next\@@schemabox%
+ \else
+ \let\next\@@schemab@x%
+ \fi
+ \next%
+ }%
+ \gdef\@@schemab@x#1{\@@schemabox[0pt]{#1}}
+ \gdef\@@schemabox[#1]#2{%
+ \ifinner
+ \if@schemata@LCBox
+ \def\@Adj{}%
+ \if@schemata@SWBox\def\@Adj{\strut}\fi
+ \else
+ \def\@Adj{\strut}%
+ \if@schemata@SWBox\def\@Adj{}\fi
+ \fi
+ \if@schemata@NudgeBox
+ \def\@Nudge{\kern0.2em}%
+ \else
+ \def\@Nudge{}%
+ \fi
+ \ifdim#1<1pt
+ \def\\{\@Nudge\egroup\hbox\bgroup\ignorespaces }%
+ \vbox{\hbox\bgroup\@Adj\ignorespaces #2\@Nudge\egroup}%
+ \else
+ \def\\{\hfil\egroup\hbox to #1\bgroup\ignorespaces }%
+ \vbox{\hbox to #1\bgroup\@Adj\ignorespaces #2\hfil\egroup}%
+ \fi
+ \else
+ #2%
+ \fi
+ \@schemata@SWBoxfalse%
+ \@schemata@NudgeBoxfalse%
+ }%
+\else
+ \newcommand{\schemabox}[2][0pt]{%
+ \ifinner
+ \if@schemata@LCBox
+ \def\@Adj{}%
+ \if@schemata@SWBox\def\@Adj{\strut}\fi
+ \else
+ \def\@Adj{\strut}%
+ \if@schemata@SWBox\def\@Adj{}\fi
+ \fi
+ \if@schemata@NudgeBox
+ \def\@Nudge{\kern0.2em}%
+ \else
+ \def\@Nudge{}%
+ \fi
+ \ifdim#1<1pt
+ \def\\{\@Nudge\egroup\hbox\bgroup\ignorespaces }%
+ \vbox{\hbox\bgroup\@Adj\ignorespaces #2\@Nudge\egroup}%
+ \else
+ \def\\{\hfil\egroup\hbox to #1\bgroup\ignorespaces }%
+ \vbox{\hbox to #1\bgroup\@Adj\ignorespaces #2\hfil\egroup}%
+ \fi
+ \else
+ #2%
+ \fi
+ \@schemata@SWBoxfalse%
+ \@schemata@NudgeBoxfalse%
+ }%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \gdef\schema{\futurelet\testchar\@schema}
+ \gdef\@schema{\ifx[\testchar \let\next\@@schema%
+ \else \let\next\@@schem@ \fi \next}
+ \gdef\@@schem@#1#2{\@@schema[open]{#1}{#2}}
+ \gdef\@@schema[#1]#2#3{%
+ \def\@ption{#1}\def\@pen{open}%
+ \ifx\@ption\@pen
+ \setbox\@rhs=\vbox{#3}%
+ \@rheight=\ht\@rhs%
+ \advance\@rheight\dp\@rhs%
+ \advance\@rheight by 1.44265ex%
+ \hbox{$\vcenter{#2}%
+ \@schemata@lbrace{\@rheight}%
+ \vcenter{#3}$}%
+ \else
+ \setbox\@lhs=\vbox{#2}%
+ \@lheight=\ht\@lhs%
+ \advance\@lheight\dp\@lhs%
+ \advance\@lheight by 1.44265ex%
+ \hbox{$\vcenter{#2}%
+ \kern-0.2em\@schemata@rbrace{\@lheight}%
+ \vcenter{#3}$}%
+ \fi
+ }%
+\else
+ \newcommand{\schema}[3][open]{%
+ \def\@ption{#1}\def\@pen{open}%
+ \ifx\@ption\@pen
+ \setbox\@rhs=\vbox{#3}%
+ \@rheight=\ht\@rhs%
+ \advance\@rheight\dp\@rhs%
+ \advance\@rheight by 1.44265ex%
+ \hbox{$\vcenter{#2}%
+ \@schemata@lbrace{\@rheight}%
+ \vcenter{#3}$}%
+ \else
+ \setbox\@lhs=\vbox{#2}%
+ \@lheight=\ht\@lhs%
+ \advance\@lheight\dp\@lhs%
+ \advance\@lheight by 1.44265ex%
+ \hbox{$\vcenter{#2}%
+ \kern-0.2em\@schemata@rbrace{\@lheight}%
+ \vcenter{#3}$}%
+ \fi
+ }%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \gdef\Schema{\futurelet\testchar\@Schema}
+ \gdef\@Schema{\ifx[\testchar \let\next\@@Schema%
+ \else \let\next\@@Schem@ \fi \next}
+ \gdef\@@Schem@#1#2#3#4{\@@Schema[open]{#1}{#2}{#3}{#4}}
+ \gdef\@@Schema[#1]#2#3#4#5{%
+ \def\@ption{#1}%
+ \def\@pen{open}%
\dimen0=#2%
- \hbox{$\vcenter{\vskip1.44265\dimen0#4}\complexlbrace{#2}{#3}\vcenter{#5}$}%
- \else
+ \ifx\@ption\@pen
+ \hbox{$\vcenter{\vskip1.44265\dimen0#4}%
+ \@schemata@biglbrace{#2}{#3}\vcenter{#5}$}%
+ \else
+ \hbox{$\vcenter{\vskip1.44265\dimen0#4}\kern-0.2em%
+ \@schemata@bigrbrace{#2}{#3}\vcenter{#5}$}%
+ \fi
+ }%
+\else
+ \newcommand{\Schema}[5][open]{%
+ \def\@ption{#1}%
+ \def\@pen{open}%
\dimen0=#2%
- \hbox{$\vcenter{\vskip1.44265\dimen0#4}\kern-0.2em%
- \complexrbrace{#2}{#3}\vcenter{#5}$}%
- \fi
-}\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
- \def\basiclbrace#1{%
- \ifmmode\left.\vcenter{\vbox to #1{\vfil}}\right\schemaLD\fi}
+ \ifx\@ption\@pen
+ \hbox{$\vcenter{\vskip1.44265\dimen0#4}%
+ \@schemata@biglbrace{#2}{#3}\vcenter{#5}$}%
+ \else
+ \hbox{$\vcenter{\vskip1.44265\dimen0#4}\kern-0.2em%
+ \@schemata@bigrbrace{#2}{#3}\vcenter{#5}$}%
+ \fi
+ }%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\@schemata@lbrace#1{%
+ \ifmmode\left.\vcenter{\vbox to #1{\vfil}}\right\@schemata@LD\fi}
+\else
+ \newcommand{\@schemata@lbrace}[1]{%
+ \ifmmode\left.\vcenter{\vbox to #1{\vfil}}\right\@schemata@LD\fi}
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\@schemata@rbrace#1{%
+ \ifmmode\left\@schemata@RD\vcenter{\vbox to #1{\vfil}}\right.\fi}
\else
- \newcommand{\basiclbrace}[1]{%
- \ifmmode\left.\vcenter{\vbox to #1{\vfil}}\right\schemaLD\fi}
+ \newcommand{\@schemata@rbrace}[1]{%
+ \ifmmode\left\@schemata@RD\vcenter{\vbox to #1{\vfil}}\right.\fi}
\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
- \def\basicrbrace#1{%
- \ifmmode\left\schemaRD\vcenter{\vbox to #1{\vfil}}\right.\fi}
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\@schemata@biglbrace#1#2{%
+ \dimen0=#1%
+ \dimen2=#2%
+ \dimen4=-\dimen2%
+ \ifdim\dimen4>\dimen2\dimen2=\dimen4\fi
+ \ifdim\dimen0<0pt
+ \ifmmode\vcenter{\hbox{$\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@LD%
+ \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
+ \else
+ \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
+ \atop\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@LD$}}\fi
+ \fi
+ }%
\else
- \newcommand{\basicrbrace}[1]{%
- \ifmmode\left\schemaRD\vcenter{\vbox to #1{\vfil}}\right.\fi}
-\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-\def\complexlbrace#1#2{%
- \dimen0=#1%
- \dimen2=#2%
- \ifdim\dimen0<0pt
- \ifmmode\vcenter{\hbox{$\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaLD%
- \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
- \else
- \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
- \atop\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaLD$}}\fi
- \fi
-}\else
-\newcommand{\complexlbrace}[2]{%
- \dimen0=#1%
- \dimen2=#2%
- \ifdim\dimen0<0pt
- \ifmmode\vcenter{\hbox{$\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaLD%
- \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
- \else
- \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
- \atop\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaLD$}}\fi
- \fi
-}\fi
-\expandafter\ifx\csname newenvironment\endcsname\relax%
-\def\complexrbrace#1#2{%
- \dimen0=#1%
- \dimen2=#2%
- \ifdim\dimen0<0pt
- \ifmmode\vcenter{\hbox{$\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaRD%
- \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
- \else
- \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
- \atop\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaRD$}}\fi
- \fi
-}\else
-\newcommand{\complexrbrace}[2]{%
- \dimen0=#1%
- \dimen2=#2%
- \ifdim\dimen0<0pt
- \ifmmode\vcenter{\hbox{$\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaRD%
- \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
- \else
- \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
- \atop\left.\vbox to 1.44265\dimen2{\vfil}\right\schemaRD$}}\fi
- \fi
-}\fi
-\endinput
+ \newcommand{\@schemata@biglbrace}[2]{%
+ \dimen0=#1%
+ \dimen2=#2%
+ \dimen4=-\dimen2%
+ \ifdim\dimen4>\dimen2\dimen2=\dimen4\fi
+ \ifdim\dimen0<0pt
+ \ifmmode\vcenter{\hbox{$\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@LD%
+ \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
+ \else
+ \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
+ \atop\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@LD$}}\fi
+ \fi
+ }%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \def\@schemata@bigrbrace#1#2{%
+ \dimen0=#1%
+ \dimen2=#2%
+ \dimen4=-\dimen2%
+ \ifdim\dimen4>\dimen2\dimen2=\dimen4\fi
+ \ifdim\dimen0<0pt
+ \ifmmode\vcenter{\hbox{$\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@RD%
+ \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
+ \else
+ \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
+ \atop\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@RD$}}\fi
+ \fi
+ }%
+\else
+ \newcommand{\@schemata@bigrbrace}[2]{%
+ \dimen0=#1%
+ \dimen2=#2%
+ \dimen4=-\dimen2%
+ \ifdim\dimen4>\dimen2\dimen2=\dimen4\fi
+ \ifdim\dimen0<0pt
+ \ifmmode\vcenter{\hbox{$\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@RD%
+ \atop\vbox to -1.44265\dimen0{\vfil}$}}\fi
+ \else
+ \ifmmode\vcenter{\hbox{$\vbox to 1.44265\dimen0{\vfil}%
+ \atop\left.%
+ \vbox to 1.44265\dimen2{\vfil}%
+ \right\@schemata@RD$}}\fi
+ \fi
+ }%
+\fi
+\expandafter\ifx\csname newenvironment\endcsname\relax
+ \catcode`@=12
+\fi
+%%
+%% Copyright (C) 2016 by Charles P. Schaum <charles dot schaum at comcast dot net>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License (LPPL), either
+%% version 1.3c of this license or (at your option) any later
+%% version. The latest version of this license is in the file:
+%%
+%% http://www.latex-project.org/lppl.txt
+%%
+%% This work is "maintained" (as per LPPL maintenance status) by
+%% Charles P. Schaum.
+%%
+%% This work consists of the file schemata.dtx and a Makefile.
+%% Running "make" generates the derived files README, schemata.pdf and schemata.sty.
+%% Running "make inst" installs the files in the user's TeX tree.
+%% Running "make install" installs the files in the local TeX tree.
+%%
%%
%% End of file `schemata.sty'.