∀y,x,arrow,ob:Top.  (cat-id(<ob, arrow, x, y>) ~ x)
{ (UnivCD THENA Auto) }
1. y : Top
2. x : Top
3. arrow : Top
4. ob : Top
⊢ cat-id(<ob, arrow, x, y>) ~ x