diff --git a/src/expression2/DApplyExpr.cpp b/src/expression2/DApplyExpr.cpp
index ffc6372a..751c1d85 100644
--- a/src/expression2/DApplyExpr.cpp
+++ b/src/expression2/DApplyExpr.cpp
@@ -128,6 +128,8 @@ namespace xo {
                         return false;
                 }
 
+                pps->write(">");
+
                 return true;
             } else {
                 pps->write("<ApplyExpr");
@@ -146,6 +148,8 @@ namespace xo {
                     pps->pretty(refrtag(concat("arg", 1+i_arg), arg_i));
                 }
 
+                pps->write(">");
+
                 return false;
             }
         }