Module KnotLemmas_CovariantHeredPropOth (K: KNOT__COVARIANT_HERED_PROP_OTH).
Arguments unsquash_inj [k1 k2] _.

Lemma unsquash_approx : forall k n Fp,
unsquash k = (n, Fp) ->
Fp = fmap KI.F (approx n) Fp.