let n be Ordinal; :: thesis: for T being connected TermOrder of n
for L being non trivial right_complementable almost_left_invertible associative commutative well-unital distributive add-associative right_zeroed doubleLoopStr
for P being Subset of st ( for b being bag of n st b in HT (P -Ideal ),T holds
ex b' being bag of n st
( b' in HT P,T & b' divides b ) ) holds
HT (P -Ideal ),T c= multiples (HT P,T)

let T be connected TermOrder of n; :: thesis: for L being non trivial right_complementable almost_left_invertible associative commutative well-unital distributive add-associative right_zeroed doubleLoopStr
for P being Subset of st ( for b being bag of n st b in HT (P -Ideal ),T holds
ex b' being bag of n st
( b' in HT P,T & b' divides b ) ) holds
HT (P -Ideal ),T c= multiples (HT P,T)

let L be non trivial right_complementable almost_left_invertible associative commutative well-unital distributive add-associative right_zeroed doubleLoopStr ; :: thesis: for P being Subset of st ( for b being bag of n st b in HT (P -Ideal ),T holds
ex b' being bag of n st
( b' in HT P,T & b' divides b ) ) holds
HT (P -Ideal ),T c= multiples (HT P,T)

let P be Subset of ; :: thesis: ( ( for b being bag of n st b in HT (P -Ideal ),T holds
ex b' being bag of n st
( b' in HT P,T & b' divides b ) ) implies HT (P -Ideal ),T c= multiples (HT P,T) )

assume A1: for b being bag of n st b in HT (P -Ideal ),T holds
ex b' being bag of n st
( b' in HT P,T & b' divides b ) ; :: thesis: HT (P -Ideal ),T c= multiples (HT P,T)
now
let u be set ; :: thesis: ( u in HT (P -Ideal ),T implies u in multiples (HT P,T) )
assume A2: u in HT (P -Ideal ),T ; :: thesis: u in multiples (HT P,T)
then reconsider u' = u as Element of Bags n ;
ex b' being bag of n st
( b' in HT P,T & b' divides u' ) by A1, A2;
hence u in multiples (HT P,T) ; :: thesis: verum
end;
hence HT (P -Ideal ),T c= multiples (HT P,T) by TARSKI:def 3; :: thesis: verum