comparison Paper/src/axiom-taut.agda.replaced @ 5:339fb67b4375

INIT rbt.agda
author soto <soto@cr.ie.u-ryukyu.ac.jp>
date Sun, 07 Nov 2021 00:51:16 +0900
parents c59202657321
children
comparison
equal deleted inserted replaced
4:72667e8198e2 5:339fb67b4375
1 _@$\Rightarrow$@_ : Bool @$\rightarrow$@ Bool @$\rightarrow$@ 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 = @$\forall$@ (env : Env) @$\rightarrow$@ (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 = @$\forall$@ (env : Env) @$\rightarrow$@ (pre env) @$\Rightarrow$@ (post env) @$\equiv$@ true 10 Tautology pre post = !$\forall$! (env : Env) !$\rightarrow$! (pre env) !$\Rightarrow$! (post env) !$\equiv$! true