let emph t = s "*" % t % s "*"