blob: 57bcca621cbe0deaee1ebd181cf3b5bf03ea88be (
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
76
77
78
79
80
81
82
83
84
85
86
87
|
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% mcf_setup.sty for input aux file by Akira Yamaji 2021.05.05
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%------------------------------------
\edef\@J{J} \edef\Job{}% 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
%---------------------------------------------------------------------------
\edef\@pk{pk}%
\edef\@mps{mps}%
\edef\@eps{eps}%
\edef\@png{png}%
\edef\@png{svg}%
%---------------------------------------------------------------------------
\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\@J\edef\Job{\@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%
}%
%-----------------------------------------------------------------------------
\def\z@num#1{\ifnum#1<10 00\the#1\else\ifnum#1<100 0\the#1\else \the#1\fi\fi}%
%-----------------------------------------------------------------------------
\def\infotovar#1{\@sfor#1{\tag@var\@list}}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% 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}}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|