let
set_model m = current := m