bomen één en twee

2 files changed, 192 insertions, 0 deletions

diff --git a/tree-gen-een.tex b/tree-gen-een.tex
new file mode 100644
index 0000000..d764a0e
--- /dev/null
+++ b/tree-gen-een.tex
@@ -0,0 +1,71 @@
+\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\axjustifies\trans{\lambda}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\Nil}{\left(\Nil,\emptyset\right)}\using{\rlambdans}\]
+\justifies{}\trans{\StmOutput}{\Nil}{\left(\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\routputns}\]
+\justifies{}\trans{\StmPush~\texttt{"x"}:\StmOutput}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}o"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rexecns}\]
+\justifies{}\trans{\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}o"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"o"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{""}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rtailns}\]
+\justifies{}\trans{\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rheadns}\]
+\justifies{}\trans{\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{"x"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"x"}:\Nil,\{\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{""}:\texttt{"x"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"x"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{""}:\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{""}:\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"x"}:\StmPush~\texttt{""}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rexecns}\]
+\justifies{}\trans{\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}\textquotedblright{}o"}:\Nil,\{\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}o"}:\Nil,\{\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"x"}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"input"}\mapsto\texttt{"x"}\}\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmInput:\StmPush~\texttt{"input"}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"x"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rinputns}
\ No newline at end of file
diff --git a/tree-gen-twee.tex b/tree-gen-twee.tex
new file mode 100644
index 0000000..aa0e874
--- /dev/null
+++ b/tree-gen-twee.tex
@@ -0,0 +1,121 @@
+\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\[\axjustifies\trans{\lambda}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\Nil}{\left(\Nil,\emptyset\right)}\using{\rlambdans}\]
+\justifies{}\trans{\StmOutput}{\Nil}{\left(\texttt{"yx"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\routputns}\]
+\justifies{}\trans{\StmPush~\texttt{"yx"}:\StmOutput}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}yx\textquotedblright{}o"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rexecns}\]
+\justifies{}\trans{\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}yx\textquotedblright{}o"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"yx"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}o"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"o"}:\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}yx\textquotedblright{}"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"yx"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{""},\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{""}:\Nil,\{\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\Nil,\{\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rtailns}\]
+\justifies{}\trans{\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"v"}\mapsto\texttt{"yx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"yx"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"yx"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rheadns}\]
+\justifies{}\trans{\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"y"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"x"}:\texttt{"y"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"y"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"x"}:\texttt{"y"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"x"}:\texttt{"y"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"y"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"x"}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"y"}:\StmPush~\texttt{"x"}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}o"},\texttt{"y"}\mapsto\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rexecns}\]
+\justifies{}\trans{\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}x\textquotedblright{}o"},\texttt{"y"}\mapsto\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"y"}\mapsto\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"y"}\mapsto\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}y\textquotedblright{}\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}y\textquotedblright{}"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}o"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"o"}:\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}x\textquotedblright{}"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{"y"},\texttt{"v"}\mapsto\texttt{"x"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"y"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"y"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rtailns}\]
+\justifies{}\trans{\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"v"}\mapsto\texttt{"x"},\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"x"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rheadns}\]
+\justifies{}\trans{\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"w"}\mapsto\texttt{"xy"},\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"w"}:\texttt{"xy"}:\Nil,\{\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\{\texttt{"v"}\mapsto\texttt{""},\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"v"}:\texttt{""}:\texttt{"xy"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"xy"}:\Nil,\{\texttt{"u"}\mapsto\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"u"}:\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{""}:\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{""}:\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"xy"}:\StmPush~\texttt{""}:\StmPush~\texttt{"\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmPush~\texttt{"u"}:\StmPut:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmHead:\StmPush~\texttt{"v"}:\StmGet:\StmCat:\StmPush~\texttt{"v"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmTail:\StmPush~\texttt{"w"}:\StmPut:\StmPush~\texttt{"w"}:\StmGet:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"o"}:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmQuotify:\StmPush~\texttt{"v"}:\StmGet:\StmQuotify:\StmPush~\texttt{"u"}:\StmGet:\StmQuotify:\StmCat:\StmCat:\StmPush~\texttt{"u"}:\StmGet:\StmCat:\StmPush~\texttt{"w"}:\StmGet:\StmPut:\StmPush~\texttt{""}:\StmPut:\StmGet:\StmExec}{\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rexecns}\]
+\justifies{}\trans{\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{""}\mapsto\texttt{"\textquotedblright{}\textquotedblright{}o"},\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{""}:\texttt{"\textquotedblright{}\textquotedblright{}o"}:\Nil,\{\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}o"}:\Nil,\{\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"xy"}\mapsto\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"},\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}xy\textquotedblright{}\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\texttt{"\textquotedblright{}xy\textquotedblright{}"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rcatns}\]
+\justifies{}\trans{\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"\textquotedblright{}xy\textquotedblright{}"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rquotifyns}\]
+\justifies{}\trans{\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rgetns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\Nil,\{\texttt{"input"}\mapsto\texttt{"xy"}\}\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"input"}:\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rputns}\]
+\justifies{}\trans{\StmPush~\texttt{"input"}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\Nil}{\left(\texttt{"xy"}:\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rpushns}\]
+\justifies{}\trans{\StmInput:\StmPush~\texttt{"input"}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmQuotify:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}\textquotedblright{}\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gh\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gt\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}p\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}g\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}o\textbackslash{}\textquotedblright{}+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}v\textbackslash{}\textquotedblright{}gq\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}gq++\textbackslash{}\textquotedblright{}u\textbackslash{}\textquotedblright{}g+\textbackslash{}\textquotedblright{}w\textbackslash{}\textquotedblright{}gp\textbackslash{}\textquotedblright{}\textbackslash{}\textquotedblright{}pgx\textquotedblright{}\textquotedblright{}u\textquotedblright{}p\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gh\textquotedblright{}v\textquotedblright{}g+\textquotedblright{}v\textquotedblright{}p\textquotedblright{}w\textquotedblright{}gt\textquotedblright{}w\textquotedblright{}p\textquotedblright{}w\textquotedblright{}g\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}o\textquotedblright{}+\textquotedblright{}w\textquotedblright{}gq\textquotedblright{}v\textquotedblright{}gq\textquotedblright{}u\textquotedblright{}gq++\textquotedblright{}u\textquotedblright{}g+\textquotedblright{}w\textquotedblright{}gp\textquotedblright{}\textquotedblright{}pgx"}:\StmCat:\StmPush~\texttt{"input"}:\StmGet:\StmPut:\StmPush~\texttt{"\textquotedblright{}\textquotedblright{}o"}:\StmPush~\texttt{""}:\StmPut:\StmPush~\texttt{"input"}:\StmGet:\StmGet:\StmExec}{\texttt{"xy"}:\Nil}{\left(\Nil,\emptyset\right)}{\Nil}{\texttt{"yx"}:\Nil}{\left(\Nil,\emptyset\right)}\using{\rinputns}
\ No newline at end of file