No Annotations
∀y,x:Top.  (church-fst() (church-pair() x y) ~ x)
{ (UnivCD THENA Auto) }
1. y : Top@i
2. x : Top@i
⊢ church-fst() (church-pair() x y) ~ x