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