Program Instance unsizedMonotonicChecker (c : Checker) `{UnsizedChecker c} : 
  SizeMonotonicChecker c.

Lemma mapTotalResult_idSize {C} `{Checkable C} (f : Result -> Result) (c : C) s : (forall res, resultSuccessful res = resultSuccessful (f res)) -> (semCheckerSize (mapTotalResult f c) s <-> semCheckableSize c s).