let
cosmic_exn t =
Option
.value_exn ~msg:(sprintf
"%s: no COSMIC"
(name t)) t.cosmic