open Functoria.DSL

type ptime = job

val ptime : ptime typ
val default_ptime : ptime impl
val no_ptime : ptime impl
val mock_ptime : ptime impl