End KNOT_BASIC.
Module Type KNOT_BASIC_LEMMAS.
Declare Module K: KNOT_BASIC.

(* Specifications: *)
Axiom unsquash_inj : forall k1 k2,
unsquash k1 = unsquash k2 ->
k1 = k2.
Axiom unsquash_approx : forall k n Fp,
unsquash k = (n, Fp) ->
Fp = fmap F (approx n) (approx n) Fp.