-\begin{align*}
- succ(e_1, succ(e_0, [0\leq x\leq 4, 0\leq y])) =&
- succ(e_1, ((([0\leq x\leq 4, 0\leq y]\wedge\emptyset)\Uparrow)\wedge\emptyset\wedge [x<1])[x:=0])\\
- =& succ(e_1, (([0\leq x\leq 4, 0\leq y]\Uparrow)\wedge\emptyset\wedge [x<1])[x:=0])\\
- =& succ(e_1, [0\leq x<1, 0\leq y][x:=0])\\
- =& succ(e_1, [x=0, 0\leq y])\\
- =& ((([x=0, 0\leq y]\wedge [x<1])\Uparrow)\wedge [x<1]\wedge [x<1])[y:=0]\\
- =& (([0\leq x<1, 0\leq y]\Uparrow)\wedge [x<1]\wedge [x<1])[y:=0]\\
- =& [0\leq x<1, y=0]
-\end{align*}
+\scalebox{.99}{\parbox{.5\linewidth}{%
+ \begin{align*}
+ succ(e_1, succ(e_0, [0\leq x\leq 4, 0\leq y])) =&
+ succ(e_1, ((([0\leq x\leq 4, 0\leq y]\wedge\emptyset)\Uparrow)
+ \wedge\emptyset\wedge [x<1])[x:=0])\\
+ =& succ(e_1, (([0\leq x\leq 4, 0\leq y]\Uparrow)
+ \wedge\emptyset\wedge [x<1])[x:=0])\\
+ =& succ(e_1, [0\leq x<1, 0\leq y][x:=0])\\
+ =& succ(e_1, [x=0, 0\leq y])\\
+ =& ((([x=0, 0\leq y]\wedge [x<1])\Uparrow)
+ \wedge [x<1]\wedge [x<1])[y:=0]\\
+ =& (([0\leq x<1, 0\leq y]\Uparrow)\wedge [x<1]\wedge [x<1])[y:=0]\\
+ =& [0\leq x<1, y=0]\\
+ \end{align*}}}