Module Curses.Acs

module Acs: sig .. end
Predefined characters.

type acs = {
   ulcorner :Curses.chtype; (*Upper left-hand corner (+).*)
   llcorner :Curses.chtype; (*Lower left-hand corner (+).*)
   urcorner :Curses.chtype; (*Upper right-hand corner (+).*)
   lrcorner :Curses.chtype; (*Lower right-hand corner (+).*)
   ltee :Curses.chtype; (*Left tee (+).*)
   rtee :Curses.chtype; (*Tight tee (+).*)
   btee :Curses.chtype;
   ttee :Curses.chtype;
   hline :Curses.chtype; (*Horizontal line (-).*)
   vline :Curses.chtype; (*Vertical line (|).*)
   plus :Curses.chtype; (*Plus (+).*)
   s1 :Curses.chtype; (*Scan line 1 (-).*)
   s9 :Curses.chtype; (*Scan line 9 (_).*)
   diamond :Curses.chtype; (*Diamond (+).*)
   ckboard :Curses.chtype;
   degree :Curses.chtype; (*Degree symbol (').*)
   plminus :Curses.chtype; (*Plus/minus (#).*)
   bullet :Curses.chtype;
   larrow :Curses.chtype; (*Arrow pointing left (<).*)
   rarrow :Curses.chtype; (*Arrow pointing right (>).*)
   darrow :Curses.chtype;
   uarrow :Curses.chtype; (*Arrow pointing up (^).*)
   board :Curses.chtype;
   lantern :Curses.chtype;
   block :Curses.chtype; (*Solid square block (#).*)
   s3 :Curses.chtype; (*Scan line 3 (-).*)
   s7 :Curses.chtype; (*Scan line 7 (-).*)
   lequal :Curses.chtype; (*Less-than-or-equal-to (<).*)
   gequal :Curses.chtype; (*Greater-or-equal-to (>).*)
   pi :Curses.chtype; (*Greek pi ( * ).*)
   nequal :Curses.chtype; (*Not-equal (!).*)
   sterling :Curses.chtype; (*Pound-Sterling symbol (f).*)
}
val bssb : acs -> Curses.chtype
val ssbb : acs -> Curses.chtype
val bbss : acs -> Curses.chtype
val sbbs : acs -> Curses.chtype
val sbss : acs -> Curses.chtype
val sssb : acs -> Curses.chtype
val ssbs : acs -> Curses.chtype
val bsss : acs -> Curses.chtype
val bsbs : acs -> Curses.chtype
val sbsb : acs -> Curses.chtype
val ssss : acs -> Curses.chtype