X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2Fpretty.ml;h=c54d0edc526a9e0fdbed10dfe5bdbdbeffc2ab22;hb=73755ec720254766e4504ac72684be5e357b6939;hp=02c413f6950349bccb25cf79e86b29ec3b2e385e;hpb=cba2938d929fd5119b1491686ddc224d5af618c6;p=tatoo.git diff --git a/src/pretty.ml b/src/pretty.ml index 02c413f..c54d0ed 100644 --- a/src/pretty.ml +++ b/src/pretty.ml @@ -13,6 +13,10 @@ (* *) (***********************************************************************) +(* + Time-stamp: +*) + open Format exception InvalidUtf8Codepoint of int @@ -86,6 +90,7 @@ let up_arrow = "↑" let right_arrow = "→" let left_arrow = "←" let epsilon = "ϵ" +let big_sigma = "∑" let cap = "∩" let cup = "∪" let lnot = "¬"