☰

Макрофабрика и аргумент, передаваемый при вызове (часть 2)

tag-icon • tag-icon macros expl3
Макрофабрика и аргумент, передаваемый при вызове (часть 2)

Я создаю заводской макрос (A), который производит другой макрос (B). Макрос B заключается в воздействии на то, что он получает в качестве параметров для переменных при вызове. В настоящее время я могу делать все это без A, но это не масштабируется, потому что требует много переписывания.

ВидетьМакрофабрика и аргумент, переданный при вызове для всего контекста.

После ответов на вопрос предыдущий вопрос (Макрофабрика и аргумент, переданный при вызове) , я мог бы создать новый MWE с некоторыми открытыми пунктами:

  • пункт 1: Я ставлю запятые, \clist_map_inlineчтобы искусственно разграничить каждый аргумент
  • пункт 2: Я поместил список аргументов в определение (3 м):\NewDocumentCommand{\DefinitionVariables}{ m m m }%
  • пункт 3: Я помещаю все аргументы в \clist_map_inlineфункцию:\clist_map_inline:nn { #1, #2, #3}%

Итак, вопросы, возникающие в связи с этими изменениями:

  • пункт 1: Как мне не ставить запятые? Я думаю, это связано с функцией \clist_map_inline, поскольку запятая является встроенным разделителем. Возникает проблема, когда запятая находится внутри аргумента, так как функция обрезает ее, поскольку считает, что это разделитель. Я думал о чем-то вроде \foreach argument in {all the arguments}. Существует ли такая вещь?
  • пункт 2: Как сделать это m динамическим? Под динамическим я подразумеваю: иногда функция может принимать 3 аргумента, но иногда их может быть 7 или 9 (от 1 до 9). Что-то вродеnumberOfArgument * m

  • пункт 3: Это связано с предыдущим пунктом, как я могу сделать это динамичным и не жестко запрограммированным? (это \foreach argument in {all the arguments}решило бы эту проблему).

    \documentclass[twoside]{article}
% package pour utiliser une macro nested ac ses propres args
\usepackage{xparse}
\errorcontextlines32
\begin{document}
%==================================================================================
%     Prerequisite : lines of code to define variableI to variableXVI
%==================================================================================

\iffalse
\fi
\newcommand{\DefinitVariable}[1]{%
    \expandafter\newcommand\csname variable\Roman{#1}\endcsname{}%
    }%
%    Loop for defining all the variable
\newcounter{ctr}
\loop
    \stepcounter{ctr}
    \expandafter\DefinitVariable{ctr}%
\ifnum\thectr<16
\repeat
%==================================================================================
% Automation trial 5  : utilise la syntaxe expl3
\iftrue
%\iffalse

\ExplSyntaxOn
\NewDocumentCommand{\DefinitionVariables}{ m m m }%     <=== point 2 : there is as much 'm' as there is arguments
 {
  \int_zero:N \l_tmpa_int
  %\clist_map_inline:nn { #1 }
  \clist_map_inline:nn { #1, #2, #3}%         <=== point 3 : allows not to put comas in the arguments, but rise the pb if there is comas inside the argument // 
   {
    \int_incr:N \l_tmpa_int
    \tl_clear_new:c { variable \int_to_Roman:n { \l_tmpa_int } } 
    \tl_set:cn { variable \int_to_Roman:n { \l_tmpa_int } } { ##1 }
   }
 }
\ExplSyntaxOff

\DefinitionVariables{Laetitia, 8 }{Pierre, 10}{Cedric}%        <=== point 1 : coma inside the argument will be considered as a delimiter, so the mapping of variable will be wrong
La variable 2 est : \variableII  \\  FIN\\
La variable 1 est : \variableI  \\  FIN\\
La variable 3 est : \variableIII  \\  FIN\\
La variable 1 est : \variableI  \\  FIN\\
\fi

Любая помощь будет очень ценна!

решение1

Разрабатываемая версия предыдущего кода; новый \DefinitionVariablesпринимает два необязательных аргумента: фиксированное имя и разделитель; последний (почти) полностью произвольный, просто выберите символ (или их комбинацию), который не встречается в значениях, которые вы хотите присвоить переменным.

\documentclass{article}
\usepackage{xparse}

\ExplSyntaxOn
\NewDocumentCommand{\DefinitionVariables}{O{variable}mO{,}}
 {
  \aline_df:nnn { #1 } { #2 } { #3 }
 }

\int_new:N \l_aline_df_int
\seq_new:N \l_aline_df_values_seq

\cs_new_protected:Nn \aline_df:nnn
 {
  \int_zero:N \l_aline_df_int
  \seq_set_split:Nnn \l_aline_df_values_seq { #3 } { #2 }
  \seq_map_inline:Nn \l_aline_df_values_seq
   {
    \int_incr:N \l_aline_df_int
    \tl_clear_new:c { #1 \int_to_Roman:n { \l_aline_df_int } } 
    \tl_set:cn { #1 \int_to_Roman:n { \l_aline_df_int } } { ##1 }
   }
 }
\ExplSyntaxOff

\begin{document}

\DefinitionVariables{
  Laetitia, 8; Patrick, 10; Cedric
}[;]

\noindent
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
FIN

\bigskip

\DefinitionVariables[var]{A,B,C}

\noindent
La var 1 est : \varI\\
La var 2 est : \varII\\
La var 3 est : \varIII\\
FIN

\end{document}

введите описание изображения здесь

Другая процедура, основанная на рекурсии, позволяющая разделять аргументы фигурными скобками. Пока следует открывающая фигурная скобка, определяется новая переменная.

\documentclass{article}
\usepackage{xparse}

\ExplSyntaxOn
\NewDocumentCommand{\DefinitionVariables}{O{variable}}
 {% pass control to an inner function
  % #1 is the "name part", default "variable"
  \aline_df:n { #1 }
 }

% define an integer variable
\int_new:N \l_aline_df_int

\cs_new_protected:Nn \aline_df:n
 {
  % the integer variable assigns the trailing roman number
  \int_zero:N \l_aline_df_int
  % start the recursion
  \__aline_df_peek:n { #1 }
 }
\cs_new_protected:Nn \__aline_df_peek:n
 {
  % check whether the next token is { (ignoring spaces)
  \peek_catcode_ignore_spaces:NT \c_group_begin_token
   {
    % if it is, increment the counter and call
    % \__aline_df_next:nn { #1 } { #2 }, where
    % { #2 } is the next braced group
    \int_incr:N \l_aline_df_int
    \__aline_df_next:nn { #1 }
   }
 }
\cs_new_protected:Nn \__aline_df_next:nn
 {
  % if the variable is already defined, clear it
  % otherwise create it
  \tl_clear_new:c { #1 \int_to_Roman:n { \l_aline_df_int } }
  % set the variable
  \tl_set:cn { #1 \int_to_Roman:n { \l_aline_df_int } } { #2 }
  % restart the recursion
  \__aline_df_peek:n { #1 }
 }
\ExplSyntaxOff

\begin{document}

\DefinitionVariables{Laetitia, 8}{Patrick, 10}{Cedric}

\noindent
La variable 1 est : \variableI\\
La variable 2 est : \variableII\\
La variable 3 est : \variableIII\\
FIN

\bigskip

\DefinitionVariables[var]{A}{B}{C}{D}{E}{F}{G}{H}{I}{J}{K}

\noindent
La var 1 est : \varI\\
La var 2 est : \varII\\
La var 3 est : \varIII\\
La var 11 est : \varXI\\
FIN

\end{document}

введите описание изображения здесь

Связанный контент