(t : Bool) (Z : BAut Bool) : Z <~> (Bool <~> Z) := Build_Equiv _ _ (equiv_inhab_baut_bool_bool t Z) _.
Require Import HoTT.Basics HoTT.Types. Require Import Constant. Require Import HoTT.Truncations.Core HoTT.Truncations.Connectedness. Require Import Universes.BAut. Require Import Pointed.Core.