agda中的双重否定插入

use*_*970 1 logic proof agda

我想澄清一下agda中的双重否定.

即使

z?z : 0 ? 0
z?z = refl 
Run Code Online (Sandbox Code Playgroud)

我无法弄清楚如何证明:

¬¬z?z : (0 ? 0 ? ?) ? ?
¬¬z?z ?
Run Code Online (Sandbox Code Playgroud)

这是长期的¬ (0 ? 0).也许我错过了一路上的agda成语.理想我想要一个最小参考标准库的解释.

asr*_*asr 6

您可以证明¬¬z?z通过

¬¬z?z : (0 ? 0 ? ?) ? ?
¬¬z?z h = h refl
Run Code Online (Sandbox Code Playgroud)