diff hoareBinaryTree.agda @ 631:956ee8ae42b9

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Wed, 10 Nov 2021 10:18:34 +0900
parents 24bec7639079
children b58991f8e2e4
line wrap: on
line diff
--- a/hoareBinaryTree.agda	Tue Nov 09 09:44:23 2021 +0900
+++ b/hoareBinaryTree.agda	Wed Nov 10 10:18:34 2021 +0900
@@ -196,7 +196,7 @@
      tree0 : bt A
      ti : treeInvariant tree0
      si : stackInvariant key tree tree0 stack
-     ci : C tree stack
+     ci : C tree stack     -- data continuation
    
 findPP : {n m : Level} {A : Set n} {t : Set m}
            → (key : ℕ) → (tree : bt A ) → (stack : List (bt A))