structure TextConstants =
struct
  val xSpace = 13
  val xSpace3 = xSpace * 3
  val ySpace = 25
  val scale: Real32.real = 2.0

  val textLineCount = 80
  val textLineWidth = xSpace * textLineCount
end