X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2Fpretty.ml;h=6d1dd468e52e01e7be068f32e5075b1c7682cd7e;hp=192721661a2093b60513aa5c7030867d99bbf89e;hb=9a127b83fbb1171ebd36e6f42780093412a5e91a;hpb=b00bff88c7902e828804c06b7f9dc55222fdc84e diff --git a/src/pretty.ml b/src/pretty.ml index 1927216..6d1dd46 100644 --- a/src/pretty.ml +++ b/src/pretty.ml @@ -13,10 +13,6 @@ (* *) (***********************************************************************) -(* - Time-stamp: -*) - open Format exception InvalidUtf8Codepoint of int @@ -90,6 +86,7 @@ let up_arrow = "↑" let right_arrow = "→" let left_arrow = "←" let epsilon = "ϵ" +let bullet = "•" let big_sigma = "∑" let cap = "∩" let cup = "∪"