Instance sizedSizeMonotonic
A (gen : nat -> G A) `{forall n, SizeMonotonic (gen n)} `{SizedMonotonic A gen} :
SizeMonotonic (sized gen).
Instance sizedSizeMonotonicOpt
A (gen : nat -> G (option A)) `{forall n, SizeMonotonic (gen n)} `{SizedMonotonicOpt A gen} :
SizeMonotonicOpt (sized gen).

Lemma semResize A n (g : G A) : semGen (resize n g) <--> semGenSize g n .