Initial commit
This commit is contained in:
25
src/Main.elm
Normal file
25
src/Main.elm
Normal file
@@ -0,0 +1,25 @@
|
||||
module Main exposing (..)
|
||||
|
||||
import Html exposing (..)
|
||||
import Html.Attributes exposing (..)
|
||||
import Html.Events exposing (..)
|
||||
|
||||
main = Html.beginnerProgram { model = model, update = update, view = view }
|
||||
|
||||
type alias Model =
|
||||
{ expression : String
|
||||
, result : List Float
|
||||
}
|
||||
|
||||
model : Model
|
||||
model = Model "" []
|
||||
|
||||
type Msg = ExpressionTyped String
|
||||
|
||||
update : Msg -> Model -> Model
|
||||
update msg model =
|
||||
model
|
||||
|
||||
view : Model -> Html Msg
|
||||
view model =
|
||||
div [] []
|
4
src/index.js
Normal file
4
src/index.js
Normal file
@@ -0,0 +1,4 @@
|
||||
var Elm = require('./Main.elm');
|
||||
var mountNode = document.getElementById('app');
|
||||
|
||||
var app = Elm.Main.embed(mountNode);
|
Reference in New Issue
Block a user