Commit 8c2bb261 authored by Celia Rubio Madrigal's avatar Celia Rubio Madrigal

index

parent adc7c52e
......@@ -6,7 +6,7 @@ import View exposing (view)
main =
Browser.element
Browser.document
{ init = init
, update = update
, subscriptions = subscriptions
......
......@@ -6297,19 +6297,29 @@ var author$project$View$selectors = A3(
elm$html$Html$text(' Matemática')
]))
]));
var elm$browser$Browser$Document = F2(
function (title, body) {
return {body: body, title: title};
});
var author$project$View$view = function (model) {
return A2(
elm$html$Html$div,
author$project$Styles$generalStyle,
elm$browser$Browser$Document,
'Matrices',
_List_fromArray(
[
author$project$View$header,
author$project$Functions$tablear(model),
author$project$View$selectors,
author$project$View$originalrow(model.serie),
author$project$View$entrada,
author$project$View$bloquealeatorio,
author$project$Info$informacion
A2(
elm$html$Html$div,
author$project$Styles$generalStyle,
_List_fromArray(
[
author$project$View$header,
author$project$Functions$tablear(model),
author$project$View$selectors,
author$project$View$originalrow(model.serie),
author$project$View$entrada,
author$project$View$bloquealeatorio,
author$project$Info$informacion
]))
]));
};
var elm$browser$Browser$External = function (a) {
......@@ -6534,8 +6544,8 @@ var elm$url$Url$fromString = function (str) {
elm$url$Url$Https,
A2(elm$core$String$dropLeft, 8, str)) : elm$core$Maybe$Nothing);
};
var elm$browser$Browser$element = _Browser_element;
var author$project$Main$main = elm$browser$Browser$element(
var elm$browser$Browser$document = _Browser_document;
var author$project$Main$main = elm$browser$Browser$document(
{init: author$project$State$init, subscriptions: author$project$State$subscriptions, update: author$project$State$update, view: author$project$View$view});
_Platform_export({'Main':{'init':author$project$Main$main(
elm$json$Json$Decode$succeed(_Utils_Tuple0))(0)}});}(this));
......
module View exposing (view)
import Browser
import Functions exposing (tablear)
import Html exposing (..)
import Html.Attributes exposing (checked, placeholder, href, name, style, type_)
......@@ -153,9 +154,10 @@ bloquealeatorio =
]
view : Model -> Html Msg
view : Model -> Browser.Document Msg
view model =
div generalStyle
(Browser.Document "Matrices"
[ div generalStyle
[ header
, tablear model
, selectors
......@@ -164,3 +166,5 @@ view model =
, bloquealeatorio
, informacion
]
]
)
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment