take S = Trivial-Z_ModuleStruct ; :: thesis: ( S is strict & S is Abelian & S is add-associative & S is right_zeroed & S is right_complementable & S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus S is strict ; :: thesis: ( S is Abelian & S is add-associative & S is right_zeroed & S is right_complementable & S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus S is Abelian ; :: thesis: ( S is add-associative & S is right_zeroed & S is right_complementable & S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus S is add-associative ; :: thesis: ( S is right_zeroed & S is right_complementable & S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus S is right_zeroed ; :: thesis: ( S is right_complementable & S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus S is right_complementable ; :: thesis: ( S is scalar-distributive & S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus for a, b being Integer
for v being VECTOR of S holds (a + b) * v = (a * v) + (b * v) by STRUCT_0:def 10; :: according to ZMODUL01:def 3 :: thesis: ( S is vector-distributive & S is scalar-associative & S is scalar-unital )
thus for a being Integer
for v, w being VECTOR of S holds a * (v + w) = (a * v) + (a * w) by STRUCT_0:def 10; :: according to ZMODUL01:def 2 :: thesis: ( S is scalar-associative & S is scalar-unital )
thus for a, b being Integer
for v being VECTOR of S holds (a * b) * v = a * (b * v) by STRUCT_0:def 10; :: according to ZMODUL01:def 4 :: thesis: S is scalar-unital
thus for v being VECTOR of S holds 1 * v = v by STRUCT_0:def 10; :: according to ZMODUL01:def 5 :: thesis: verum