Mercurial > hg > Papers > 2020 > ryokka-master

comparison paper/src/axiom-taut.agda.replaced @ 4:b5fffa8ae875

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix chapter hoare
author ryokka
date Wed, 29 Jan 2020 22:36:17 +0900
parents c7acb9211784
children
comparison
equal deleted inserted replaced
3:a6f371a5d33d 4:b5fffa8ae875
1 _@$\Rightarrow$@_ : Bool → Bool → Bool 1 _@$\Rightarrow$@_ : Bool @$\rightarrow$@ Bool @$\rightarrow$@ Bool
2 false @$\Rightarrow$@ _ = true 2 false @$\Rightarrow$@ _ = true
3 true @$\Rightarrow$@ true = true 3 true @$\Rightarrow$@ true = true
4 true @$\Rightarrow$@ false = false 4 true @$\Rightarrow$@ false = false
5 5
6 Axiom : Cond @$\rightarrow$@ PrimComm @$\rightarrow$@ Cond @$\rightarrow$@ Set 6 Axiom : Cond @$\rightarrow$@ PrimComm @$\rightarrow$@ Cond @$\rightarrow$@ Set
7 Axiom pre comm post = ∀ (env : Env) → (pre env) @$\Rightarrow$@ ( post (comm env)) @$\equiv$@ true 7 Axiom pre comm post = @$\forall$@ (env : Env) @$\rightarrow$@ (pre env) @$\Rightarrow$@ ( post (comm env)) @$\equiv$@ true
8 8
9 Tautology : Cond @$\rightarrow$@ Cond @$\rightarrow$@ Set 9 Tautology : Cond @$\rightarrow$@ Cond @$\rightarrow$@ Set
10 Tautology pre post = ∀ (env : Env) → (pre env) @$\Rightarrow$@ (post env) @$\equiv$@ true 10 Tautology pre post = @$\forall$@ (env : Env) @$\rightarrow$@ (pre env) @$\Rightarrow$@ (post env) @$\equiv$@ true