From ac19f486a8738d31f57d8017a755088231008738 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Mon, 10 Aug 2020 21:03:24 +0000 Subject: mcf2graph (10aug20) git-svn-id: svn://tug.org/texlive/trunk@56086 c570f23f-e606-0410-a88d-b1316a301751 --- .../texmf-dist/tex/latex/mcf2graph/mcf_setup.sty | 75 ++++++++++++++++++++++ 1 file changed, 75 insertions(+) create mode 100644 Master/texmf-dist/tex/latex/mcf2graph/mcf_setup.sty (limited to 'Master/texmf-dist/tex/latex/mcf2graph') diff --git a/Master/texmf-dist/tex/latex/mcf2graph/mcf_setup.sty b/Master/texmf-dist/tex/latex/mcf2graph/mcf_setup.sty new file mode 100644 index 00000000000..37945f16628 --- /dev/null +++ b/Master/texmf-dist/tex/latex/mcf2graph/mcf_setup.sty @@ -0,0 +1,75 @@ +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% mcf_setup.sty for input aux file by Akira Yamaji 2020.08.10 +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\edef\@F{F} \edef\File{}% 1 +\edef\@C{C} \edef\Char{}% 2 +%------------------------------------ +\edef\@NO{NO} \edef\NO{}% 3 +\edef\@EN{EN} \edef\EN{}% 4 +\edef\@JN{JN} \edef\JN{}% 5 +\edef\@CAS{CAS} \edef\CAS{}% 6 +%------------------------------------ +\edef\@MW{MW} \edef\MW{}% 7 +\edef\@mw{mw} \edef\mw{}% 8 +\edef\@MI{MI} \edef\MI{}% 9 +\edef\@mi{mi} \edef\mi{}% 10 +\edef\@FM{FM} \edef\FM{}% 11 +\edef\@fm{fm} \edef\fm{}% 12 +%------------------------------------ +\edef\@Wd{w} \edef\Wd{}% 13 +\edef\@Ht{h} \edef\Ht{}% 14 +\edef\@Wone{w1} \edef\Wone{}% 15 +\edef\@Hone{h1} \edef\Hone{}% 16 +%------------------------------------ +\edef\@Use{Use} \edef\Use{}% 17 +\edef\@LogP{LogP} \edef\LogP{}% 18 +%------------------------------------ +\edef\@EXA{EXA} \edef\EXA{}% 19 +\edef\@EXB{EXB} \edef\EXB{}% 20 +%--------------------------------------------------------------------------- +\def\@tag@param#1:#2;{#1}% +\def\@var@param#1:#2;{#2}% +%---------------------------------------- +\def\tag@var#1{% +\if#1\empty\relax\else% + \edef\@tag{\expandafter\@tag@param#1;}% + \edef\@var{\expandafter\@var@param#1;}% + %---------------------------------------- + \ifx\@tag\@F\edef\File{\@var}\fi% 1 + \ifx\@tag\@C\edef\Char{\@var}\fi% 2 + %---------------------------------------- + \ifx\@tag\@NO\edef\NO{\@var}\fi% 3 + \ifx\@tag\@EN\edef\EN{\@var}\fi% 4 + \ifx\@tag\@JN\edef\JN{\@var}\fi% 5 + \ifx\@tag\@CAS\edef\CAS{\@var}\fi% 6 + %---------------------------------------- + \ifx\@tag\@MW\edef\MW{\@var}\fi% 7 + \ifx\@tag\@mw\edef\mw{\@var}\fi% 8 + \ifx\@tag\@MI\edef\MI{\@var}\fi% 9 + \ifx\@tag\@mi\edef\mi{\@var}\fi% 10 + \ifx\@tag\@FM\edef\FM{\@var}\fi% 11 + \ifx\@tag\@fm\edef\fm{\@var}\fi% 12 + %---------------------------------------- + \ifx\@tag\@Wd\edef\Wd{\@var}\fi% 13 + \ifx\@tag\@Ht\edef\Ht{\@var}\fi% 14 + \ifx\@tag\@Wone\edef\Wone{\@var}\fi% 15 + \ifx\@tag\@Hone\edef\Hone{\@var}\fi% 16 + %---------------------------------------- + \ifx\@tag\@Use\edef\Use{\@var}\fi% 17 + \ifx\@tag\@LogP\edef\LogP{\@var}\fi% 18 + %---------------------------------------- + \ifx\@tag\@EXA\edef\EXA{\@var}\fi% 19 + \ifx\@tag\@EXB\edef\EXB{\@var}\fi% 20 + %---------------------------------------- +\fi% +}% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +% sfor : modified latex2e kernel program control +% @for => @sfor delimiter ',' => ';' +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% +\def\@sfor#1#2{\expandafter\def\expandafter\@tmp\expandafter{#1}% + \ifx\@tmp\@empty\else\expandafter\@rep#1;\@nil;\@@\@list{#2}\fi}% +%------------------------------------------------------------------ +\def\@rep#1;#2\@@#3#4{\def#3{#1}\ifx#3\@nnil% + \expandafter\@fornoop\else#4\relax\expandafter\@rep\fi#2\@@#3{#4}}% +%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -- cgit v1.2.3