\catcode`\@=11
\directlua{cstypo_czech_language_id = \the\l@czech}
\catcode`\@=12
\directlua{require('cstypo')}

\long\def\cstypoSingleLetterEnable{%
  \directlua{cstypo_single_letter_enable()}}
\long\def\cstypoSingleLetterDisable{%
  \directlua{cstypo_single_letter_disable()}}

\long\def\cstypoALetterEnable{%
  \directlua{cstypo_a_letter_enable()}}
\long\def\cstypoALetterDisable{%
  \directlua{cstypo_a_letter_disable()}}

\long\def\cstypoPercentsEnable{%
  \directlua{cstypo_percents_enable()}}
\long\def\cstypoPercentsDisable{%
  \directlua{cstypo_percents_disable()}}

\long\def\cstypoParagraphEnable{%
  \directlua{cstypo_paragraph_enable()}}
\long\def\cstypoParagraphDisable{%
  \directlua{cstypo_paragraph_disable()}}