transitive-set(loopset())
{ ((RWO "transitive-set-iff" 0 THENA Auto) THEN RWO "setmem-loopset" 0 THEN Auto) }
1. x : coSet{i:l}
2. seteq(x;loopset())
⊢ (x ⊆ loopset())