theorem :: ZMODUL01:141
for V being Z_Module
for W being with_Linear_Compl Submodule of V
for L being Linear_Compl of W
for v being Vector of V holds (v |-- (W,L)) `1 = (v |-- (L,W)) `2 by Th124, Th136;