let n txt = (if dir then (txt^(String.make (size-l) ' '))