leankg 0.20.2

Lightweight Knowledge Graph for AI-Assisted Development
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

module Counter exposing (Model, Msg, update, view)

import Html exposing (text)

type alias Model = { count : Int }

type Msg = Increment | Decrement

double : Int -> Int
double x = x * 2

update : Msg -> Model -> Model
update msg model =
    case msg of
        Increment -> { model | count = model.count + 1 }
        Decrement -> { model | count = model.count - 1 }

view : Model -> Html.Html Msg
view model = text (String.fromInt (double model.count))