Definition squash_unsquash := K.squash_unsquash.
Definition unsquash_squash := K.unsquash_squash.
Definition knot_age1 := K.knot_age1.
Definition knot_level := K.knot_level.
End Knot_CovariantHeredProp.
Module KnotLemmas_CovariantHeredProp (K: KNOT__COVARIANT_HERED_PROP).

Lemma unsquash_inj : forall k1 k2,
unsquash k1 = unsquash k2 ->
k1 = k2.