sig   type size = { rows : int; cols : int; }   val rows : LTerm_geom.size -> int   val cols : LTerm_geom.size -> int   val string_of_size : LTerm_geom.size -> string   type coord = { row : int; col : int; }   val row : LTerm_geom.coord -> int   val col : LTerm_geom.coord -> int   val string_of_coord : LTerm_geom.coord -> string   type rect = { row1 : int; col1 : int; row2 : int; col2 : int; }   val row1 : LTerm_geom.rect -> int   val col1 : LTerm_geom.rect -> int   val row2 : LTerm_geom.rect -> int   val col2 : LTerm_geom.rect -> int   val size_of_rect : LTerm_geom.rect -> LTerm_geom.size   val string_of_rect : LTerm_geom.rect -> string   type horz_alignment = H_align_left | H_align_center | H_align_right   type vert_alignment = V_align_top | V_align_center | V_align_bottom end