From 71fb3d7c88ffb35cc84f502bd71206f68a2d3ae6 Mon Sep 17 00:00:00 2001 From: Jean-Christophe Jameux Date: Sat, 15 Jan 2022 17:49:45 +0100 Subject: [PATCH] =?UTF-8?q?Int=C3=A9gration=20du=20pr=C3=A9ambule=20LaTeX?= =?UTF-8?q?=20dans=20la=20sortie=20QuizScan?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Sujets.tex | 45 ----------------------------------- fav.svg | 1 + index.html | 2 +- prof.js | 5 +++- src/GenerateurDeProblemes.elm | 43 ++++++++++++++++++++++++++++++++- 5 files changed, 48 insertions(+), 48 deletions(-) delete mode 100644 Sujets.tex create mode 100644 fav.svg diff --git a/Sujets.tex b/Sujets.tex deleted file mode 100644 index 13b5807..0000000 --- a/Sujets.tex +++ /dev/null @@ -1,45 +0,0 @@ -\documentclass[oneside,twocolumn,landscape]{book} -\usepackage[T1]{fontenc} -\usepackage[utf8]{inputenc} -\usepackage{geometry} -\geometry{verbose,tmargin=1cm,bmargin=1cm,lmargin=2cm,rmargin=2cm} -\setcounter{secnumdepth}{3} -\setcounter{tocdepth}{3} -\usepackage{mathrsfs} -\usepackage{amsmath} -\usepackage{amssymb} -\usepackage{amsfonts} -\usepackage{bbold} -\usepackage{xcolor} -\pagestyle{empty} -\newcounter{NumeroDuSujet} -\setcounter{NumeroDuSujet}{10} -\newenvironment{Sujet}[1][] - {\refstepcounter{NumeroDuSujet}\section*{Numéro du sujet :~\theNumeroDuSujet}\par #1}{\newpage} -\newcounter{NumeroDeLaQuestion}[NumeroDuSujet] -\newenvironment{VraiFaux}[1][] - {\begin{enumerate}\setcounter{enumi}{\theNumeroDeLaQuestion}#1} - {\end{enumerate}\stepcounter{NumeroDeLaQuestion}} -\newenvironment{QCM}[1][] - {\begin{enumerate}\setcounter{enumi}{\theNumeroDeLaQuestion}\item #1} - {\end{enumerate}\stepcounter{NumeroDeLaQuestion}} - -% Pour obtenir les corrigés, ajouter un % devant les deux lignes suivantes et retirer les devant les deux lignes qui suivent. - -\let\Vrai\item -\let\Faux\item - -%\def\Vrai#1{\item{\color{green}#1}} -%\def\Faux#1{\item{\color{red}#1}} - -\begin{document} - -% ███████ ██ ██ ██ ███████ ████████ ███████ -% ██ ██ ██ ██ ██ ██ ██ -% ███████ ██ ██ ██ █████ ██ ███████ -% ██ ██ ██ ██ ██ ██ ██ ██ -% ███████ ██████ █████ ███████ ██ ███████ -% -% Copier-coller le code genéré par le générateur de sujets aléatoires ci-dessous. - -\end{document} diff --git a/fav.svg b/fav.svg new file mode 100644 index 0000000..5287417 --- /dev/null +++ b/fav.svg @@ -0,0 +1 @@ + \ No newline at end of file diff --git a/index.html b/index.html index abaacf2..d0ac5bb 100644 --- a/index.html +++ b/index.html @@ -1 +1 @@ -Le coin du prof
\ No newline at end of file +Le coin du prof
\ No newline at end of file diff --git a/prof.js b/prof.js index b359982..1cdc728 100644 --- a/prof.js +++ b/prof.js @@ -7993,6 +7993,9 @@ var $author$project$GenerateurDeProblemes$quizScanVoirBlocs = function (blcs) { '\n', A2($elm$core$List$map, $author$project$GenerateurDeProblemes$quizScanVoirBloc, blcs)); }; +var $author$project$GenerateurDeProblemes$quizScanVoirSujet = function (blcs) { + return '\\documentclass[oneside,twocolumn,landscape]{book}\r\n\\usepackage[T1]{fontenc}\r\n\\usepackage[utf8]{inputenc}\r\n\\usepackage{geometry}\r\n\\geometry{verbose,tmargin=1cm,bmargin=1cm,lmargin=2cm,rmargin=2cm}\r\n\\setcounter{secnumdepth}{3}\r\n\\setcounter{tocdepth}{3}\r\n\\usepackage{mathrsfs}\r\n\\usepackage{amsmath}\r\n\\usepackage{amssymb}\r\n\\usepackage{amsfonts}\r\n\\usepackage{bbold}\r\n\\usepackage{xcolor}\r\n\\pagestyle{empty}\r\n\\newcounter{NumeroDuSujet}\r\n\\setcounter{NumeroDuSujet}{10}\r\n\\newenvironment{Sujet}[1][]\r\n {\\refstepcounter{NumeroDuSujet}\\section*{Numéro du sujet :~\\theNumeroDuSujet}\\par #1}{\\newpage}\r\n\\newcounter{NumeroDeLaQuestion}[NumeroDuSujet]\r\n\\newenvironment{VraiFaux}[1][]\r\n {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}#1}\r\n {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}}\r\n\\newenvironment{QCM}[1][]\r\n {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}\\item #1}\r\n {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}}\r\n\r\n\\let\\Vrai\\item\r\n\\let\\Faux\\item\r\n\r\n% Pour obtenir les corrigés, retirer les % devant les deux lignes suivantes :\r\n\r\n%\\def\\Vrai#1{\\item{\\color{green}#1}}\r\n%\\def\\Faux#1{\\item{\\color{red}#1}}\r\n\r\n\\begin{document}\r\n\r\n' + ($author$project$GenerateurDeProblemes$quizScanVoirBlocs(blcs) + '\n\n\\end{document}'); +}; var $author$project$GenerateurDeProblemes$Sujet = function (a) { return {$: 0, a: a}; }; @@ -9122,7 +9125,7 @@ var $author$project$GenerateurDeProblemes$update = F2( var sjt = _v1.a; return A2( $elm$random$Random$map, - $author$project$GenerateurDeProblemes$quizScanVoirBlocs, + $author$project$GenerateurDeProblemes$quizScanVoirSujet, $author$project$GenerateurDeProblemes$sujetsAleatoires(sjt)); } else { var erreurs = _v1.a; diff --git a/src/GenerateurDeProblemes.elm b/src/GenerateurDeProblemes.elm index 8874838..6713282 100644 --- a/src/GenerateurDeProblemes.elm +++ b/src/GenerateurDeProblemes.elm @@ -83,7 +83,7 @@ update msg model = f strSuj = case P.run (withIndent -1 sujet) strSuj of Ok sjt -> - Random.map quizScanVoirBlocs <| sujetsAleatoires sjt + Random.map quizScanVoirSujet <| sujetsAleatoires sjt Err erreurs -> Random.constant <| deadEndsToStringBis erreurs @@ -851,6 +851,47 @@ remplacerLaVariableDansLesBlocs ar blcs = -} +quizScanVoirSujet : Blocs -> String +quizScanVoirSujet blcs = + """\\documentclass[oneside,twocolumn,landscape]{book} +\\usepackage[T1]{fontenc} +\\usepackage[utf8]{inputenc} +\\usepackage{geometry} +\\geometry{verbose,tmargin=1cm,bmargin=1cm,lmargin=2cm,rmargin=2cm} +\\setcounter{secnumdepth}{3} +\\setcounter{tocdepth}{3} +\\usepackage{mathrsfs} +\\usepackage{amsmath} +\\usepackage{amssymb} +\\usepackage{amsfonts} +\\usepackage{bbold} +\\usepackage{xcolor} +\\pagestyle{empty} +\\newcounter{NumeroDuSujet} +\\setcounter{NumeroDuSujet}{10} +\\newenvironment{Sujet}[1][] + {\\refstepcounter{NumeroDuSujet}\\section*{Numéro du sujet :~\\theNumeroDuSujet}\\par #1}{\\newpage} +\\newcounter{NumeroDeLaQuestion}[NumeroDuSujet] +\\newenvironment{VraiFaux}[1][] + {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}#1} + {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}} +\\newenvironment{QCM}[1][] + {\\begin{enumerate}\\setcounter{enumi}{\\theNumeroDeLaQuestion}\\item #1} + {\\end{enumerate}\\stepcounter{NumeroDeLaQuestion}} + +\\let\\Vrai\\item +\\let\\Faux\\item + +% Pour obtenir les corrigés, retirer les % devant les deux lignes suivantes : + +%\\def\\Vrai#1{\\item{\\color{green}#1}} +%\\def\\Faux#1{\\item{\\color{red}#1}} + +\\begin{document} + +""" ++ quizScanVoirBlocs blcs ++ "\n\n\\end{document}" + + quizScanVoirBlocs : Blocs -> String quizScanVoirBlocs blcs = S.join "\n" <| L.map quizScanVoirBloc blcs