comparison src/axiom-taut.agda @ 1:73127e0ab57c

(none)
author soto@cr.ie.u-ryukyu.ac.jp
date Tue, 08 Sep 2020 18:38:08 +0900
parents
children
comparison
equal deleted inserted replaced
0:b919985837a3 1:73127e0ab57c
1 _⇒_ : Bool → Bool → Bool
2 false ⇒ _ = true
3 true ⇒ true = true
4 true ⇒ false = false
5
6 Axiom : Cond -> PrimComm -> Cond -> Set
7 Axiom pre comm post = ∀ (env : Env) → (pre env) ⇒ ( post (comm env)) ≡ true
8
9 Tautology : Cond -> Cond -> Set
10 Tautology pre post = ∀ (env : Env) → (pre env) ⇒ (post env) ≡ true