| summaryrefslogtreecommitdiff |
diff options
| author | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2022-01-01 16:32:45 +0100 |
|---|---|---|
| committer | Nathanael Sensfelder <SpamShield0@MultiAgentSystems.org> | 2022-01-01 16:32:45 +0100 |
| commit | f86032ff459f57c8cda368b48888a39c848d263b (patch) | |
| tree | 682ee08cf60baebfc62b3c7cdaf4e715e1bbc635 /src/Update/Story.elm | |
| parent | 17903cc8333e0f50d3b4e3567f52a8de92101ad3 (diff) | |
Adds JSON decoding.
Diffstat (limited to 'src/Update/Story.elm')
| -rw-r--r-- | src/Update/Story.elm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/Update/Story.elm b/src/Update/Story.elm index 4d1bfaa..68ed403 100644 --- a/src/Update/Story.elm +++ b/src/Update/Story.elm @@ -1,5 +1,6 @@ module Update.Story exposing ( + start, select_choice, input_string, input_integer, @@ -135,6 +136,8 @@ step model = -------------------------------------------------------------------------------- -- EXPORTED -------------------------------------------------------------------- -------------------------------------------------------------------------------- +start : Struct.Model.Type -> Struct.Model.Type +start model = (step model) select_choice : Int -> Struct.Model.Type -> Struct.Model.Type select_choice ix model = model |