∀[T:Type]. (perm_igrp(T) ∈ IGroup)
{ ((Unfold `perm_igrp` 0 THEN D 0) THENA Auto) }
1. T : Type
⊢ mk_igrp(Perm(T);λp,q. p O q;id_perm();λp.inv_perm(p)) ∈ IGroup