elmTsRuntime2.ts

export function app<Msg, Model>(model: Model, updateFn: (msg: Msg, model: Model) => Model) {
  return (msg: Msg) => {
    defer(() => {
      model = updateFn(msg, model)
    })
  }
}

export function defer(fn: () => void): void {
  Promise.resolve().then(fn)
}

export function never(_: never): any {
  throw new Error("Never say never!")
}