Set Bullet Behavior "Strict Subproofs".
Set Implicit Arguments.
(*  This module proves the following results:  Lemma AnnSig_an_toplevel: AnnSig an_toplevel. Lemma Sig_toplevel: Sig toplevel.   It *should* be the only place in the development that unfolds the definition of an_toplevel. That way, if we change the definition of the signature in ett.ott, we only need to change this file.  In this case, it uses the fact that an_toplevel (defined in ett.ott) contains the following definitions:  Definition Fix : atom. pick fresh F. exact F. Qed.  Definition FixDef : tm := (a_Abs Irrel a_Star (a_Abs Rel (a_Pi Rel (a_Var_b 0) (a_Var_b 1)) (a_App (a_Var_b 0) Rel (a_App (a_App (a_Fam Fix) Irrel (a_Var_b 1)) Rel (a_Var_b 0))))).  Definition FixTy : tm := a_Pi Irrel a_Star (a_Pi Rel (a_Pi Rel (a_Var_b 0) (a_Var_b 1)) (a_Var_b 1)). *)

Lemma AxFix : binds Fix (Ax FixDef FixTy) an_toplevel.
unfold an_toplevel.