data Foo : Type
  Bar : Stnrig -> Foo