Fichiers
typo-cpge/latex/inputTD.tex

85 lignes
2.8 KiB
TeX

\makeatletter
\@ifundefined{stylecentrale}
{\@ifundefined{resetlevel}{\def\resetlevel{[section]}}{}}
{%
\renewcommand\thesection{\Roman{section}}%
\renewcommand\thesubsection{\thesection.\Alph{subsection}}%
\def\resetlevel{[subsection]}
}
\theoremstyle{plain}
\theoremheaderfont{\bfseries}
\theorembodyfont{\upshape}
\theoremseparator{. }
\theoremsymbol{}
\newtheorem*{important}{Important}
\newtheorem*{rappel}{Rappel}
\usepackage{xfrac}
\usepackage{xparse}
\usepackage{comment}
\usepackage{xr}
\newif\ifcorrige
\def\corr{\filigrane{\Huge CORRIG\'E --- CORRIG\'E}\global\corrigetrue}
\newif\ifcorrigeseul
\def\corrseul{\filigrane{\Huge CORRIG\'E --- CORRIG\'E}\global\corrigeseultrue}
\usepackage{xstring}
\IfEndWith{\jobname}{\detokenize{-ENONCE}}{\let\corr\relax\let\corrseul\relax}{}
\IfEndWith{\jobname}{\detokenize{-PROF}}{\corr\let\corr\relax\let\corrseul\relax}{}
\IfEndWith{\jobname}{\detokenize{-CORRIGE}}{\corrseul\let\corr\relax\let\corrseul\relax}{}
\StrCut{\jobname}{\detokenize{-}}\basejobname\dummy
\def\pasenonce{
\excludecomment{enonce}
\excludecomment{qcmrep}
\excludecomment{qcm}
}
\def\avecenonce{\newenvironment{enonce}{}{}
\edef\@temp{\noexpand\newtheorem{question}{Question}\resetlevel}\@temp
\newtheorem{qcm}{QCM}
%
\NewDocumentEnvironment{qcmrep}{o}
{\IfValueT{##1}{\begingroup\setlength\columnseprule{0pt}\begin{multicols}{##1}}\begin{enumerate}\renewcommand\theenumi{\Alph{enumi}}}{\end{enumerate}\IfValueT{##1}{\end{multicols}\endgroup}}}
\AtBeginDocument{%
\ifcorrige
\immediate\typeout{Mode professeur}
\makeatletter\IfStrEq{\@subtitle}{}{}{\subtitle{Corrigé}}\makeatother
\newenvironment{corrige}{\begin{mdframed}[backgroundcolor=gray!20, skipbelow=1ex]}{\end{mdframed}}
\newenvironment{comcorrige}{\begin{mdframed}[backgroundcolor=gray!20, skipbelow=1ex]}{\end{mdframed}}
\newenvironment{qcmcorr}{\begin{mdframed}[backgroundcolor=gray!20, skipbelow=1ex]}{\end{mdframed}}
\avecenonce
\else\ifcorrigeseul
\externaldocument{\basejobname-ENONCE}
\immediate\typeout{Mode corrige}
\makeatletter\IfStrEq{\@subtitle}{}{}{\subtitle{Corrigé}}\makeatother
\pasenonce
\edef\@temp{\noexpand\newcounter{question}\resetlevel}\@temp
\specialcomment{question}{\refstepcounter{question}\begingroup\def\ProcessCutFile{}}{\endgroup}
\newtheorem{corrige}{Question}
\def\thequestion{\thesection.\arabic{question}} %% hack moche à améliorer
\let\thecorrige\thequestion
\newtheorem{qcmcorr}{QCM}
\newenvironment{comcorrige}{}{}
\else
\immediate\typeout{Mode enonce}
\excludecomment{corrige}
\excludecomment{comcorrige}
\excludecomment{qcmcorr}
\avecenonce
\fi\fi
}
\DeclareInstance{xfrac}{cinqdemi}{text}{scale-factor=1, h-scale=1.25, slash-left-kern=-2.5pt, slash-right-kern=-2.25pt}
\def\cinqdemi{\sfrac[cinqdemi]{5}{2}}
\endinput