proposition: Lemma prl_can_fun_Iv S S' i: prl_same_data S S' -> prl_can_fun S i = prl_can_fun S' i.
proof: Proof. move=> H; rewrite /prl_can_fun (projective_limit_Iv H). by rewrite (proj31 H). Qed.
imports: mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat)