summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/latex/mcf2graph/mcf_setup.sty
blob: 37945f166280d78d64c52f08b6df6b2b6ead0b18 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
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}}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%