等式证明中的模式匹配(解构)

Pattern-match (destructure) in equality proof

data T = A String | B String

p : ((A s) = (A s')) -> (s = s')

如果我有(A s) = (A s'),我如何获得s = s'

P.S。我是伊德里斯的新手。请随意编辑我的代码样式问题或添加相关关键字。

Refl 上的模式匹配:

data T = A String | B String

p : ((A s) = (A s')) -> (s = s')
p Refl = Refl