fact: Definition cs := c1 <- M.declare dok_CanonicalStructure "bla" false (fun (x : nat) => (fun x => mkS x) x); c2 <- M.declare dok_Definition "bli" true c1; M.declare_implicits c2 [m: ia_MaximallyImplicit];; M.ret tt.
imports: Mtac2(Mtac2 Sorts MTele Specif)