haskell - 反应式香蕉游戏的一般结构是什么样的？

Question

一个简单的游戏，每次迭代都运行其逻辑并以命令式语言每秒在屏幕上绘制 60 次，它可能看起来像这样：

function main() {
    player = new Player()
    lastUpdateTime, lastDrawTime = getTime()
    while (!quit) {
        deltaTime = getTime() - lastUpdateTime
        player.update(deltaTime)
        if (getTime() - lastDrawTime > 1/60) {
            player.draw()
            lastDrawTime = getTime()
        }
        lastUpdateTime = getTime()
    }
    delete player
}

我只是不确定这如何转化为反应香蕉。