Skip to content

Instantly share code, notes, and snippets.

@IntegerMan

IntegerMan/Program.Reducer.fs

Created December 30, 2019 05:15
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save IntegerMan/caab414b847731f0ae926afb1a2dc1a7 to your computer and use it in GitHub Desktop.
Save IntegerMan/caab414b847731f0ae926afb1a2dc1a7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
Program.Reducer.fs
/// This is the Reducer Elmish.WPF calls to generate a new model based on a message and an old model
let update (msg: MessageType) (model: Model) : Model =
match msg with
| ButtonClicked -> { model with ClickCount = model.ClickCount + 1}
| Reset -> init()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment