mirror of
https://github.com/nmvdw/HITs-Examples
synced 2025-11-03 15:13:51 +01:00
Add the Pauli id law example
This commit is contained in:
@@ -241,4 +241,13 @@ Section pauli.
|
|||||||
compute.
|
compute.
|
||||||
apply tt.
|
apply tt.
|
||||||
Defined.
|
Defined.
|
||||||
|
|
||||||
|
Definition pauli_id x y : hProp := BuildhProp(Pauli_mult x y = y).
|
||||||
|
|
||||||
|
Theorem Pauli_mult_id : exist (fun x => all (fun y => pauli_id x y) Pauli_list) Pauli_list.
|
||||||
|
Proof.
|
||||||
|
refine (from_squash (exist _ _)).
|
||||||
|
compute.
|
||||||
|
apply tt.
|
||||||
|
Defined.
|
||||||
End pauli.
|
End pauli.
|
||||||
|
|||||||
Reference in New Issue
Block a user