100 % sur LightHouse !

pull/1/head
Jean-Christophe Jameux 4 years ago
parent 71fb3d7c88
commit d816d760b1
  1. 2
      .gitignore
  2. 1
      index.html
  3. 17709
      prof.js
  4. 9
      src/GenerateurDeProblemes.elm
  5. 27
      src/Prof.elm
  6. 6
      src/Style.elm

2
.gitignore vendored

@ -1 +1,3 @@
elm-stuff/ elm-stuff/
index.html
prof.js

@ -1 +0,0 @@
<!DOCTYPE html><html><head><meta charset="UTF-8"><link rel="icon"type="image/svg"href="fav.svg"/><title>Le coin du prof</title></head><body><div id="e"></div><script src="./prof.js"></script><script>Elm.Prof.init({node:document.getElementById("e"),flags:{l:window.innerWidth,h:window.innerHeight}})</script></body></html>

17709
prof.js

File diff suppressed because it is too large Load Diff

@ -22,7 +22,7 @@ import Style exposing (..)
titre = titre =
"Générateur de proplèmes" "Générateur de problèmes"
@ -63,6 +63,7 @@ type Msg
| GenererSujetAleatoire | GenererSujetAleatoire
| GenererVariantesSujet | GenererVariantesSujet
| SujetGenere String | SujetGenere String
| TelechargerSujet
update : Msg -> Model -> ( Model, Cmd Msg ) update : Msg -> Model -> ( Model, Cmd Msg )
@ -106,6 +107,11 @@ update msg model =
, Cmd.none , Cmd.none
) )
TelechargerSujet ->
( model
, File.Download.string "Sujets.tex" "text/tex" model.sujetGenere
)
-- SUBSCRIPTIONS -- SUBSCRIPTIONS
@ -176,6 +182,7 @@ view model =
] ]
[ bouton GenererSujetAleatoire "QuizScan" [ bouton GenererSujetAleatoire "QuizScan"
, bouton GenererVariantesSujet "EvalBox" , bouton GenererVariantesSujet "EvalBox"
, bouton TelechargerSujet "Télécharger"
] ]
, el , el
--^^ Cet élément ci --^^ Cet élément ci

@ -39,7 +39,13 @@ main =
-- MODEL {-
-}
type alias Model = type alias Model =
@ -102,7 +108,13 @@ init flags url key =
-- UPDATE {-
-}
type Msg type Msg
@ -186,7 +198,14 @@ subscriptions _ =
-- VIEW {-
-}
view : Model -> Browser.Document Msg view : Model -> Browser.Document Msg
@ -209,7 +228,7 @@ view model =
[ GenerateurDeProblemes.view model.modeleGenerateurDeProblemes [ GenerateurDeProblemes.view model.modeleGenerateurDeProblemes
|> Element.map GenerateurDeProblemesMsg |> Element.map GenerateurDeProblemesMsg
|> designGeneral |> designGeneral
(model.largeur - 2 * (petitEspacement + grandEspacement)) (10 * (model.largeur - 2 * (petitEspacement + grandEspacement)) // 44)
GenerateurDeProblemes.titre GenerateurDeProblemes.titre
] ]
} }

@ -72,7 +72,11 @@ bouton fonction label =
entete hauteur largeur titre = entete hauteur largeur titre =
html <| html <|
svg [ viewBox <| "0 0 " ++ String.fromInt largeur ++ " 30", SvgA.height <| String.fromInt hauteur ] <| svg
[ viewBox <| "0 0 " ++ String.fromInt largeur ++ " 30"
, SvgA.height <| String.fromInt hauteur
]
<|
echologo echologo
++ [ text_ ++ [ text_
[ x "40" [ x "40"

Loading…
Cancel
Save