functor (Topo : Types.Topology) ->
  functor (Parameters : sig  end) -> Types.Topology