102 lines
2.2 KiB
TeX
102 lines
2.2 KiB
TeX
\ProvidesExplPackage {luamml-patches-array} {2024-10-30} {0.2.0}
|
|
{Feel free to add a description here}
|
|
|
|
\lua_now:n { require'luamml-array' }
|
|
|
|
\cs_set:Npn \@classz {
|
|
\@classx
|
|
\@tempcnta \count@
|
|
\prepnext@tok
|
|
\@addtopreamble {
|
|
\ifcase \@chnum
|
|
\hfil
|
|
\hskip 1sp
|
|
\d@llarbegin
|
|
\cs_if_eq:NNTF \d@llarbegin \begingroup {
|
|
\insert@column
|
|
\d@llarend
|
|
} {
|
|
\__luamml_array_init_col:
|
|
\insert@column
|
|
\luamml_save:nn {} {mtd}
|
|
\d@llarend
|
|
\__luamml_array_finalize_col:w 0~
|
|
}
|
|
\do@row@strut
|
|
\hfil
|
|
\or
|
|
\hskip 1sp
|
|
\d@llarbegin
|
|
\cs_if_eq:NNTF \d@llarbegin \begingroup {
|
|
\insert@column
|
|
\d@llarend
|
|
} {
|
|
\__luamml_array_init_col:
|
|
\insert@column
|
|
\luamml_save:nn {} {mtd}
|
|
\d@llarend
|
|
\__luamml_array_finalize_col:w 1~
|
|
}
|
|
\do@row@strut
|
|
\hfil
|
|
\or
|
|
\hfil
|
|
\hskip 1sp
|
|
\d@llarbegin
|
|
\cs_if_eq:NNTF \d@llarbegin \begingroup {
|
|
\insert@column
|
|
\d@llarend
|
|
} {
|
|
\__luamml_array_init_col:
|
|
\insert@column
|
|
\luamml_save:nn {} {mtd}
|
|
\d@llarend
|
|
\__luamml_array_finalize_col:w 2~
|
|
}
|
|
\do@row@strut
|
|
\or
|
|
\setbox \ar@mcellbox \vbox \@startpbox { \@nextchar }
|
|
\insert@pcolumn
|
|
\@endpbox
|
|
\ar@align@mcell
|
|
\do@row@strut
|
|
\or
|
|
\vtop \@startpbox { \@nextchar }
|
|
\insert@pcolumn
|
|
\@endpbox
|
|
\do@row@strut
|
|
\or
|
|
\vbox \@startpbox { \@nextchar }
|
|
\insert@pcolumn
|
|
\@endpbox
|
|
\do@row@strut
|
|
\fi
|
|
}
|
|
\prepnext@tok
|
|
}
|
|
|
|
\IfPackageAtLeastTF {array} {2023/12/11} {
|
|
\cs_set:Npn \endarray {
|
|
\tbl_crcr:n{endarray}
|
|
\__luamml_array_save_array:
|
|
\egroup
|
|
\UseTaggingSocket{tbl/finalize}
|
|
\tbl_restore_outer_cell_data:
|
|
\egroup
|
|
\mode_if_math:T { \__luamml_array_finalize_array: }
|
|
\@arrayright
|
|
\gdef \@preamble {}
|
|
}
|
|
} {
|
|
\cs_new_eq:NN \insert@pcolumn \insert@column
|
|
\cs_set:Npn \endarray {
|
|
\crcr
|
|
\__luamml_array_save_array:
|
|
\egroup
|
|
\egroup
|
|
\mode_if_math:T { \__luamml_array_finalize_array: }
|
|
\@arrayright
|
|
\gdef \@preamble {}
|
|
}
|
|
}
|