Seed.Print
let arrow: string => index:int => unit;
print an arrow below a string at a certain index
let arrows: string => l:int => r:int => unit;
print 2 arrows above and below a string at left and right indexes