mirror of
https://gitlab.com/upRootNutrition/website.git
synced 2025-06-16 20:35:13 -05:00
feat: lots of work
This commit is contained in:
Nick
parent
d0617b7a90
commit
49dabb8496
17 changed files with 903 additions and 69 deletions
|
|
@ -1,9 +1,30 @@
|
|||
module Pages.Services.Analysis exposing (Model, Msg, page)
|
||||
|
||||
import Config.Helpers.ArticleFormat exposing (..)
|
||||
import Config.Helpers.CardFormat exposing (..)
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Response exposing (pageList, topLevelContainer)
|
||||
import Config.Helpers.ToolTip exposing (..)
|
||||
import Config.Pages.Headers.Types exposing (..)
|
||||
import Config.Pages.Services.Services.DebateAnalysis exposing (..)
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Config.Style.Transitions
|
||||
exposing
|
||||
( hoverFontDarkOrange
|
||||
, transitionStyleFast
|
||||
, transitionStyleSlow
|
||||
)
|
||||
import Effect exposing (Effect)
|
||||
import Route exposing (Route)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
import Element.Border as D
|
||||
import Element.Font as F
|
||||
import Html
|
||||
import Html.Attributes as H exposing (style)
|
||||
import Layouts
|
||||
import Page exposing (Page)
|
||||
import Route exposing (Route)
|
||||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
|
@ -14,8 +35,14 @@ page shared route =
|
|||
{ init = init
|
||||
, update = update
|
||||
, subscriptions = subscriptions
|
||||
, view = view
|
||||
, view = view shared
|
||||
}
|
||||
|> Page.withLayout toLayout
|
||||
|
||||
|
||||
toLayout : Model -> Layouts.Layout Msg
|
||||
toLayout model =
|
||||
Layouts.Navbar {}
|
||||
|
||||
|
||||
|
||||
|
|
@ -63,6 +90,53 @@ subscriptions model =
|
|||
-- VIEW
|
||||
|
||||
|
||||
view : Model -> View Msg
|
||||
view model =
|
||||
View.fromString "Pages.Services.Analysis"
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = "services (analysis)"
|
||||
, attributes = []
|
||||
, element = analysisContainer shared.device
|
||||
}
|
||||
|
||||
|
||||
analysisContainer : Device -> Element msg
|
||||
analysisContainer device =
|
||||
topLevelContainer (analysisList device)
|
||||
|
||||
|
||||
analysisList : Device -> Element msg
|
||||
analysisList device =
|
||||
column pageList <|
|
||||
List.concat
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
[ [ serviceMaker ] ]
|
||||
)
|
||||
|
||||
|
||||
serviceMaker : Element msg
|
||||
serviceMaker =
|
||||
row
|
||||
topLevelBox
|
||||
[ cardMaker
|
||||
[ cardTitleMaker (String.toUpper servicesDebateAnalysis.serviceName)
|
||||
, cardFormatter
|
||||
[ cardContentSpacing
|
||||
[ column
|
||||
fieldSpacer
|
||||
[ cardSubTitleMaker
|
||||
[ column
|
||||
bodyFormat
|
||||
[ chunkMaker servicesDebateAnalysis.serviceArticle.articleParagraph
|
||||
, titleMaker servicesDebateAnalysis.serviceArticle.articleTitles.title1
|
||||
|
||||
-- , highlightedBlockMaker
|
||||
, numberMaker servicesDebateAnalysis.serviceArticle.articleListEntries.list1
|
||||
, titleMaker servicesDebateAnalysis.serviceArticle.articleTitles.title2
|
||||
, bulletPointMaker servicesDebateAnalysis.serviceArticle.articleListEntries.list2
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
|
|
|
|||
|
|
@ -1,19 +1,34 @@
|
|||
module Pages.Services.Coaching exposing (Model, Msg, page)
|
||||
|
||||
-- import Config.Pages.Services.Coaching.Helpers exposing (instructionMaker)
|
||||
|
||||
import Config.Data.Identity exposing (pageNames)
|
||||
import Config.Helpers.ArticleFormat exposing (..)
|
||||
import Config.Helpers.CardFormat exposing (..)
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Response
|
||||
exposing
|
||||
( pageList
|
||||
, topLevelContainer
|
||||
)
|
||||
import Config.Helpers.ToolTip exposing (..)
|
||||
import Config.Pages.Headers.Types exposing (..)
|
||||
import Config.Pages.Services.Services.DebateCoaching exposing (servicesDebateCoaching)
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Config.Style.Transitions
|
||||
exposing
|
||||
( hoverFontDarkOrange
|
||||
, transitionStyleFast
|
||||
, transitionStyleSlow
|
||||
)
|
||||
import Effect exposing (Effect)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
import Element.Border as D
|
||||
import Element.Font as F
|
||||
import Html
|
||||
import Html.Attributes as H exposing (style)
|
||||
import Layouts
|
||||
import Page exposing (Page)
|
||||
import Route exposing (Route)
|
||||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
|
@ -81,22 +96,50 @@ subscriptions model =
|
|||
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = pageNames.pageContact ++ " ( )"
|
||||
{ title = "services (coaching)"
|
||||
, attributes = []
|
||||
, element = coachContainer shared.device
|
||||
, element = coachingContainer shared.device
|
||||
}
|
||||
|
||||
|
||||
coachContainer : Device -> Element msg
|
||||
coachContainer device =
|
||||
topLevelContainer (coachList device)
|
||||
coachingContainer : Device -> Element msg
|
||||
coachingContainer device =
|
||||
topLevelContainer (coachingList device)
|
||||
|
||||
|
||||
coachList : Device -> Element msg
|
||||
coachList device =
|
||||
coachingList : Device -> Element msg
|
||||
coachingList device =
|
||||
column pageList <|
|
||||
List.concat
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
[ [] ]
|
||||
[ [ serviceMaker ] ]
|
||||
)
|
||||
|
||||
|
||||
serviceMaker : Element msg
|
||||
serviceMaker =
|
||||
row
|
||||
topLevelBox
|
||||
[ cardMaker
|
||||
[ cardTitleMaker (String.toUpper servicesDebateCoaching.serviceName)
|
||||
, cardFormatter
|
||||
[ cardContentSpacing
|
||||
[ column
|
||||
fieldSpacer
|
||||
[ cardSubTitleMaker
|
||||
[ column
|
||||
bodyFormat
|
||||
[ chunkMaker servicesDebateCoaching.serviceArticle.articleParagraph
|
||||
, titleMaker servicesDebateCoaching.serviceArticle.articleTitles.title1
|
||||
, highlightedBlockMaker servicesDebateCoaching.serviceArticle.articleTitles.title3 servicesDebateCoaching.serviceArticle.articleListEntries.list3
|
||||
, numberMaker servicesDebateCoaching.serviceArticle.articleListEntries.list1
|
||||
, titleMaker servicesDebateCoaching.serviceArticle.articleTitles.title2
|
||||
, bulletPointMaker servicesDebateCoaching.serviceArticle.articleListEntries.list2
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
|
|
|
|||
|
|
@ -1,9 +1,34 @@
|
|||
module Pages.Services.Elm exposing (Model, Msg, page)
|
||||
|
||||
import Config.Helpers.ArticleFormat exposing (..)
|
||||
import Config.Helpers.CardFormat exposing (..)
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Response
|
||||
exposing
|
||||
( pageList
|
||||
, topLevelContainer
|
||||
)
|
||||
import Config.Helpers.ToolTip exposing (..)
|
||||
import Config.Pages.Headers.Types exposing (..)
|
||||
import Config.Pages.Services.Services.ElmBuilds exposing (servicesElmBuilds)
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Config.Style.Transitions
|
||||
exposing
|
||||
( hoverFontDarkOrange
|
||||
, transitionStyleFast
|
||||
, transitionStyleSlow
|
||||
)
|
||||
import Effect exposing (Effect)
|
||||
import Route exposing (Route)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
import Element.Border as D
|
||||
import Element.Font as F
|
||||
import Html
|
||||
import Html.Attributes as H exposing (style)
|
||||
import Layouts
|
||||
import Page exposing (Page)
|
||||
import Route exposing (Route)
|
||||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
|
@ -14,8 +39,14 @@ page shared route =
|
|||
{ init = init
|
||||
, update = update
|
||||
, subscriptions = subscriptions
|
||||
, view = view
|
||||
, view = view shared
|
||||
}
|
||||
|> Page.withLayout toLayout
|
||||
|
||||
|
||||
toLayout : Model -> Layouts.Layout Msg
|
||||
toLayout model =
|
||||
Layouts.Navbar {}
|
||||
|
||||
|
||||
|
||||
|
|
@ -63,6 +94,51 @@ subscriptions model =
|
|||
-- VIEW
|
||||
|
||||
|
||||
view : Model -> View Msg
|
||||
view model =
|
||||
View.fromString "Pages.Services.Elm"
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = "services (elmBuilds)"
|
||||
, attributes = []
|
||||
, element = elmBuildsContainer shared.device
|
||||
}
|
||||
|
||||
|
||||
elmBuildsContainer : Device -> Element msg
|
||||
elmBuildsContainer device =
|
||||
topLevelContainer (elmBuildsList device)
|
||||
|
||||
|
||||
elmBuildsList : Device -> Element msg
|
||||
elmBuildsList device =
|
||||
column pageList <|
|
||||
List.concat
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
[ [ serviceMaker ] ]
|
||||
)
|
||||
|
||||
|
||||
serviceMaker : Element msg
|
||||
serviceMaker =
|
||||
row
|
||||
topLevelBox
|
||||
[ cardMaker
|
||||
[ cardTitleMaker (String.toUpper servicesElmBuilds.serviceName)
|
||||
, cardFormatter
|
||||
[ cardContentSpacing
|
||||
[ column
|
||||
fieldSpacer
|
||||
[ cardSubTitleMaker
|
||||
[ column
|
||||
bodyFormat
|
||||
[-- chunkMaker
|
||||
-- , titleMaker
|
||||
-- , highlightedBlockMaker
|
||||
-- , bulletPointMaker
|
||||
-- , numberMaker
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
|
|
|
|||
|
|
@ -1,9 +1,34 @@
|
|||
module Pages.Services.Nix exposing (Model, Msg, page)
|
||||
|
||||
import Config.Helpers.ArticleFormat exposing (..)
|
||||
import Config.Helpers.CardFormat exposing (..)
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Response
|
||||
exposing
|
||||
( pageList
|
||||
, topLevelContainer
|
||||
)
|
||||
import Config.Helpers.ToolTip exposing (..)
|
||||
import Config.Pages.Headers.Types exposing (..)
|
||||
import Config.Pages.Services.Services.NixBuilds exposing (servicesNixBuilds)
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Config.Style.Transitions
|
||||
exposing
|
||||
( hoverFontDarkOrange
|
||||
, transitionStyleFast
|
||||
, transitionStyleSlow
|
||||
)
|
||||
import Effect exposing (Effect)
|
||||
import Route exposing (Route)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
import Element.Border as D
|
||||
import Element.Font as F
|
||||
import Html
|
||||
import Html.Attributes as H exposing (style)
|
||||
import Layouts
|
||||
import Page exposing (Page)
|
||||
import Route exposing (Route)
|
||||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
|
@ -14,8 +39,15 @@ page shared route =
|
|||
{ init = init
|
||||
, update = update
|
||||
, subscriptions = subscriptions
|
||||
, view = view
|
||||
, view = view shared
|
||||
}
|
||||
|> Page.withLayout toLayout
|
||||
|
||||
|
||||
toLayout : Model -> Layouts.Layout Msg
|
||||
toLayout model =
|
||||
Layouts.Navbar {}
|
||||
|
||||
|
||||
|
||||
|
||||
|
|
@ -63,6 +95,51 @@ subscriptions model =
|
|||
-- VIEW
|
||||
|
||||
|
||||
view : Model -> View Msg
|
||||
view model =
|
||||
View.fromString "Pages.Services.Nix"
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = "services (nixConfigs)"
|
||||
, attributes = []
|
||||
, element = elmBuildsContainer shared.device
|
||||
}
|
||||
|
||||
|
||||
elmBuildsContainer : Device -> Element msg
|
||||
elmBuildsContainer device =
|
||||
topLevelContainer (elmBuildsList device)
|
||||
|
||||
|
||||
elmBuildsList : Device -> Element msg
|
||||
elmBuildsList device =
|
||||
column pageList <|
|
||||
List.concat
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
[ [ serviceMaker ] ]
|
||||
)
|
||||
|
||||
|
||||
serviceMaker : Element msg
|
||||
serviceMaker =
|
||||
row
|
||||
topLevelBox
|
||||
[ cardMaker
|
||||
[ cardTitleMaker (String.toUpper servicesNixBuilds.serviceName)
|
||||
, cardFormatter
|
||||
[ cardContentSpacing
|
||||
[ column
|
||||
fieldSpacer
|
||||
[ cardSubTitleMaker
|
||||
[ column
|
||||
bodyFormat
|
||||
[-- chunkMaker
|
||||
-- , titleMaker
|
||||
-- , highlightedBlockMaker
|
||||
-- , bulletPointMaker
|
||||
-- , numberMaker
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
|
|
|
|||
|
|
@ -1,9 +1,34 @@
|
|||
module Pages.Services.Nutrition exposing (Model, Msg, page)
|
||||
|
||||
import Config.Helpers.ArticleFormat exposing (..)
|
||||
import Config.Helpers.CardFormat exposing (..)
|
||||
import Config.Helpers.Format exposing (..)
|
||||
import Config.Helpers.Response
|
||||
exposing
|
||||
( pageList
|
||||
, topLevelContainer
|
||||
)
|
||||
import Config.Helpers.ToolTip exposing (..)
|
||||
import Config.Pages.Headers.Types exposing (..)
|
||||
import Config.Pages.Services.Services.NutritionScience exposing (servicesNutritionScience)
|
||||
import Config.Style.Colour exposing (colourTheme)
|
||||
import Config.Style.Transitions
|
||||
exposing
|
||||
( hoverFontDarkOrange
|
||||
, transitionStyleFast
|
||||
, transitionStyleSlow
|
||||
)
|
||||
import Effect exposing (Effect)
|
||||
import Route exposing (Route)
|
||||
import Element as E exposing (..)
|
||||
import Element.Background as B
|
||||
import Element.Border as D
|
||||
import Element.Font as F
|
||||
import Html
|
||||
import Html.Attributes as H exposing (style)
|
||||
import Layouts
|
||||
import Page exposing (Page)
|
||||
import Route exposing (Route)
|
||||
import Route.Path as Path
|
||||
import Shared
|
||||
import View exposing (View)
|
||||
|
||||
|
|
@ -14,8 +39,14 @@ page shared route =
|
|||
{ init = init
|
||||
, update = update
|
||||
, subscriptions = subscriptions
|
||||
, view = view
|
||||
, view = view shared
|
||||
}
|
||||
|> Page.withLayout toLayout
|
||||
|
||||
|
||||
toLayout : Model -> Layouts.Layout Msg
|
||||
toLayout model =
|
||||
Layouts.Navbar {}
|
||||
|
||||
|
||||
|
||||
|
|
@ -63,6 +94,51 @@ subscriptions model =
|
|||
-- VIEW
|
||||
|
||||
|
||||
view : Model -> View Msg
|
||||
view model =
|
||||
View.fromString "Pages.Services.Nutrition"
|
||||
view : Shared.Model -> Model -> View Msg
|
||||
view shared model =
|
||||
{ title = "services (nutritionChat)"
|
||||
, attributes = []
|
||||
, element = nutritionContainer shared.device
|
||||
}
|
||||
|
||||
|
||||
nutritionContainer : Device -> Element msg
|
||||
nutritionContainer device =
|
||||
topLevelContainer (nutritionList device)
|
||||
|
||||
|
||||
nutritionList : Device -> Element msg
|
||||
nutritionList device =
|
||||
column pageList <|
|
||||
List.concat
|
||||
(case ( device.class, device.orientation ) of
|
||||
_ ->
|
||||
[ [ serviceMaker ] ]
|
||||
)
|
||||
|
||||
|
||||
serviceMaker : Element msg
|
||||
serviceMaker =
|
||||
row
|
||||
topLevelBox
|
||||
[ cardMaker
|
||||
[ cardTitleMaker (String.toUpper servicesNutritionScience.serviceName)
|
||||
, cardFormatter
|
||||
[ cardContentSpacing
|
||||
[ column
|
||||
fieldSpacer
|
||||
[ cardSubTitleMaker
|
||||
[ column
|
||||
bodyFormat
|
||||
[-- chunkMaker
|
||||
-- , titleMaker
|
||||
-- , highlightedBlockMaker
|
||||
-- , bulletPointMaker
|
||||
-- , numberMaker
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
]
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue