Parameter Invariant.2-AA

val make : 'a Q.arbitrary -> 'a I.t Q.arbitrary
val make_bound : 'a Q.arbitrary -> 'a I.t Q.arbitrary