--- a/paper/src/AgdaNPushNPop.agda.replaced	Wed Jan 29 22:36:17 2020 +0900
+++ b/paper/src/AgdaNPushNPop.agda.replaced	Mon Feb 03 21:47:43 2020 +0900
@@ -6,7 +6,7 @@
 n-pop {{mm}} (zero)      = M.cs {{mm}} {{mm}} id
 n-pop {m} {{mm}} (suc n) = M.cs {{mm}} {{mm}} (\m @$\rightarrow$@ M.exec {{mm}} {{mm}} (n-pop {m} {{mm}} n) (popOnce m))
 
-pop-n-push-type : @$\mathbb{N}$@ @$\rightarrow$@ @$\mathbb{N}$@ @$\rightarrow$@ @$\mathbb{N}$@ @$\rightarrow$@ SingleLinkedStack @$\mathbb{N}$@ @$\rightarrow$@ Set@$\text{1}$@
+pop-n-push-type : @$\mathbb{N}$@ @$\rightarrow$@ @$\mathbb{N}$@ @$\rightarrow$@ @$\mathbb{N}$@ @$\rightarrow$@ SingleLinkedStack @$\mathbb{N}$@ @$\rightarrow$@ Set@$\_{1}$@
 pop-n-push-type n cn ce s = M.exec (M.csComp {meta} (M.cs popOnce) (n-push {meta} (suc n))) meta
                          @$\equiv$@ M.exec (n-push {meta} n) meta
   where