Website

Check-in [6215453307]
Login
Overview
Comment:Setup remaining lessons.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 6215453307da0ebc4c393cb0beda69aaad520f24bfd949611d930fee7add94fd
User & Date: robin.hansen on 2020-11-05 18:29:00
Other Links: manifest | tags
Context
2020-11-05
23:09
Completed remaining examples. check-in: ac29c88b97 user: robin.hansen tags: trunk
18:29
Setup remaining lessons. check-in: 6215453307 user: robin.hansen tags: trunk
18:21
Added the first five lessons. check-in: f8c89b049f user: robin.hansen tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Added playground/src/Lesson06.elm version [b712c7d379].





































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Lesson06 exposing (contract)

import LessonContract exposing (LessonContract)
import String.Extra as String


contract : LessonContract
contract =
    { key = "L06"
    , label = "Quotations"
    , content = String.trim <| String.unindent content
    }


content : String
content =
    """
    """

Added playground/src/Lesson07.elm version [72d7583a83].





































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Lesson07 exposing (contract)

import LessonContract exposing (LessonContract)
import String.Extra as String


contract : LessonContract
contract =
    { key = "L07"
    , label = "Unions and multiwords"
    , content = String.trim <| String.unindent content
    }


content : String
content =
    """
    """

Added playground/src/Lesson08.elm version [096e68cb3c].





































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Lesson08 exposing (contract)

import LessonContract exposing (LessonContract)
import String.Extra as String


contract : LessonContract
contract =
    { key = "L08"
    , label = "Pattern matching"
    , content = String.trim <| String.unindent content
    }


content : String
content =
    """
    """

Added playground/src/Lesson09.elm version [4f078a733f].





































>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
module Lesson09 exposing (contract)

import LessonContract exposing (LessonContract)
import String.Extra as String


contract : LessonContract
contract =
    { key = "L09"
    , label = "List"
    , content = String.trim <| String.unindent content
    }


content : String
content =
    """
    """

Modified playground/src/Playground.elm from [710459085c] to [7d554b7c93].

6
7
8
9
10
11
12




13
14
15
16
17
18
19
..
20
21
22
23
24
25
26




27
28
29
30
31
32
33
import Html.Attributes as Attributes
import Html.Events as Events
import Lesson01
import Lesson02
import Lesson03
import Lesson04
import Lesson05




import LessonContract exposing (LessonContract)



-- LESSONS


................................................................................
lessons : Dict String LessonContract
lessons =
    [ Lesson01.contract
    , Lesson02.contract
    , Lesson03.contract
    , Lesson04.contract
    , Lesson05.contract




    ]
        |> List.map LessonContract.asDictEntry
        |> Dict.fromList



-- MODEL







>
>
>
>







 







>
>
>
>







6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
..
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
import Html.Attributes as Attributes
import Html.Events as Events
import Lesson01
import Lesson02
import Lesson03
import Lesson04
import Lesson05
import Lesson06
import Lesson07
import Lesson08
import Lesson09
import LessonContract exposing (LessonContract)



-- LESSONS


................................................................................
lessons : Dict String LessonContract
lessons =
    [ Lesson01.contract
    , Lesson02.contract
    , Lesson03.contract
    , Lesson04.contract
    , Lesson05.contract
    , Lesson06.contract
    , Lesson07.contract
    , Lesson08.contract
    , Lesson09.contract
    ]
        |> List.map LessonContract.asDictEntry
        |> Dict.fromList



-- MODEL