diff options
author | Karl Berry <karl@freefriends.org> | 2016-04-10 21:01:13 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2016-04-10 21:01:13 +0000 |
commit | 6485e226745fdea37ad21cde17db5598856f0c59 (patch) | |
tree | ddcf2a71cd0e3374c21feca50f564143625f17bc /Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex | |
parent | 29484417f94035497851ce9993154d3e6e6d83e8 (diff) |
mcf2graph (10apr16)
git-svn-id: svn://tug.org/texlive/trunk@40386 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex')
-rw-r--r-- | Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex index 97665f04f28..69487d81d77 100644 --- a/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex +++ b/Master/texmf-dist/doc/metapost/mcf2graph/mcf_mplib_exa.tex @@ -1,5 +1,5 @@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2016.4.6 +% Example of MCF typest with LuaLaTeX(luamplib) by A.Yamaji 2016.4.10 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% \documentclass{article} %------------------------------------------------------------------------------ @@ -10,7 +10,6 @@ input mcf2graph.mf; mp_log_name:="temp-info.aux"; sw_auxout:=1; - aux_delimiter:=","; var3:="len_x"; tag3:="Lx"; var4:="calc_weight"; tag4:="MWc"; var5:="calc_formula"; tag5:="FMc"; @@ -40,10 +39,16 @@ \def\@MW{MW}\def\@MWc{MWc}\def\@FM{FM}\def\@FMc{FMc}\def\@Lx{Lx}\def\@Ly{Ly}% \def\@NO{NO}\def\@USE@{USE}\def\@logP@{logP}\def\@EXA@{EXA}\def\@EXB@{EXB}% %------------------------------------------------------------------------------- +% modified latex2e kernel program control (@for delimiter ','=>';') +\def\@sfor#1#2{\expandafter\def\expandafter\@tmp\expandafter{#1}% + \ifx\@tmp\@empty\else \expandafter\@rep#1;\@nil;\@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}}% +%------------------------------------------------------------------------------- \def\inputINFO#1{\openin\@auxf=#1\CONT@true% \loop -\read\@auxf to \tempinfo% -\ifeof\@auxf\CONT@false\else \@for\@temp:=\tempinfo\do{\mol@sel\@temp} \fi% +\read\@auxf to \@info% +\ifeof\@auxf\CONT@false\else \@sfor\@info{\mol@sel\@list}\fi% \ifCONT@ \repeat \closein\@auxf}% %-------------------------------------------------------------------------------- |