From 800c96dc7b743b8f77a359c512de23bc689de054 Mon Sep 17 00:00:00 2001 From: Danila Fedorin Date: Sun, 26 Nov 2023 11:43:38 -0800 Subject: [PATCH] Add an initial Main.elm file --- src/Main.elm | 37 +++++++++++++++++++++++++++++++++++++ 1 file changed, 37 insertions(+) create mode 100644 src/Main.elm diff --git a/src/Main.elm b/src/Main.elm new file mode 100644 index 0000000..45b7047 --- /dev/null +++ b/src/Main.elm @@ -0,0 +1,37 @@ +module Main exposing (main) + +import Browser +import Html exposing (Html) +import Bergamot.Syntax exposing (..) +import Bergamot.Search exposing (..) +import Bergamot.Rules exposing (..) +import Bergamot.Parser exposing (..) +import Maybe +import Tuple +import Debug + +type alias Model = {} +type alias Flags = () +type alias Msg = () + +init : Flags -> (Model, Cmd Msg) +init () = ({}, Cmd.none) + +view : Model -> Html Msg +view _ = Html.div [] [] + +update : Msg -> Model -> (Model, Cmd Msg) +update msg m = + case msg of + () -> (m, Cmd.none) + +subscriptions : Model -> Sub Msg +subscriptions _ = Sub.none + +main = + Browser.element + { init = init + , view = view + , update = update + , subscriptions = subscriptions + }