nicklawls

module View exposing (..)


import Html exposing (Html, text, div)


type alias View model msg = { view : model -> Html msg }


contramap : (model -> b) -> View b msg -> View model msg

nicklawls

port module Main exposing (..)

import Html exposing (..)
import Html.Attributes exposing (class, classList, hidden)
import Html.Events exposing (onClick)
import Http exposing (..)
import Markdown.Block as Block exposing (Block(..), CodeBlock, CodeBlock(..))
import Maybe.Extra as Maybe
import Regex exposing (HowMany(..))
import Result.Extra as Result

nicklawls

module Pages.Dashboard exposing (Model, Msg, init, update, view)

nicklawls

module Dashboard exposing (Model, Msg, init, update, view, Modal, viewModal, Modal(..))

import Dialog
import Html exposing (..)
import Html.Attributes exposing (class, type_, value)
import Html.Events exposing (onClick, onInput)


type alias Model =
    { fruits : List Fruit

nicklawls

module Main exposing (..)

import Dashboard exposing (Modal(..))
import Html exposing (..)
import Html.Attributes exposing (class)
import OrderFruit


main : Program Never Model Msg
main =

nicklawls

module Dashboard exposing (Model, Msg, init, update, view, Modal, viewModal, Modal(..))

import Dialog
import Html exposing (..)
import Html.Attributes exposing (class, type_, value)
import Html.Events exposing (onClick, onInput)


type alias Model =
    { fruits : List Fruit

nicklawls

module Main exposing (..)

import Dashboard exposing (Modal(..))
import Html exposing (..)
import Html.Attributes exposing (class)
import OrderFruit


main : Program Never Model Msg
main =

nicklawls

module Dashboard exposing (Model, Msg(..), init, update, Fruit)


type alias Model =
    { fruits : List Fruit
    , selectedFruit : Maybe String
    }


type alias Fruit =

nicklawls

module Dashboard exposing (Model, State, Msg, init, update, view, Fruit)

import Html exposing (Html)


type alias State =
    { fruits : List Fruit
    , selectedFruit : Maybe String
    }

nicklawls

module Main exposing (..)

import Dashboard exposing (Fruit)
import Dialog
import Html exposing (..)
import Html.Attributes exposing (class)
import Html.Events exposing (onClick)
import OrderFruit