take Trivial-addLoopStr ; :: thesis: ( Trivial-addLoopStr is strict & Trivial-addLoopStr is add-associative )
thus ( Trivial-addLoopStr is strict & Trivial-addLoopStr is add-associative ) ; :: thesis: verum