A refresh policy for chain-derived data — the missing piece between Block.watchBlockNumber and your RemoteCalls.

Chain data goes stale exactly once per block, so refetch cadence should be expressed in blocks, not milliseconds:

type alias Model =
    { ticker : BlockRefresh.Ticker
    , balance : RemoteCall String
    }


-- init
{ ticker = BlockRefresh.init (EveryNBlocks 5), ... }


-- on each { tag = "blockNumber" } port message:
let
    ( ticker, refetch ) =
        BlockRefresh.onBlock number model.ticker
in
if refetch then
    ( { model | ticker = BlockRefresh.markRefreshed number ticker
      , balance = RemoteCall.request "bal-..." model.balance }
    , web3Cmd (Balance.encode ...)
    )
else
    ( { model | ticker = ticker }, Cmd.none )

That worked example IS the balance watcher: balances re-read on-cadence, driven by chain time. Any RemoteCall slots in the same way.