let G1, G2, G3 be non empty multMagma ; :: thesis: <*G1,G2,G3*> is HGrStr-Family of {1,2,3}
A1:
dom <*G1,G2,G3*> = {1,2,3}
by FINSEQ_3:1, FINSEQ_3:30;
then reconsider A = <*G1,G2,G3*> as ManySortedSet of {1,2,3} by PBOOLE:def 3;
A is HGrStr-yielding
hence
<*G1,G2,G3*> is HGrStr-Family of {1,2,3}
; :: thesis: verum