Coq：重写保留输入假设

我想重写一个假设，同时保留旧版本，并将重写结果保存在新名称下。我该怎么做呢？

这是我能想到的最短的：

Lemma test T (P : T -> Prop) (x y : T) (heq : x = y) (hp : P x) : False.
Proof.
pose proof hp; rewrite heq in hp.

然而，通常在使用ssreflect时，我可以以一种不必经常使用这些技巧的方式来管理我的假设