Module Bright_stars

type star = {
  1. id : string;
  2. name : string;
  3. pos : Celestial.equatorial;
  4. mag : float;
  5. spectral : char;
}
val stars : star list
val find : string -> star option
type figure = {
  1. constellation : string;
  2. lines : (string * string) list;
}
val figures : figure list
val color : char -> int * int * int