:: deftheorem defines [*] COHSP_1:def 25 :
for C1, C2 being Coherence_Space holds C1 [*] C2 = union { (bool [:a,b:]) where a is Element of C1, b is Element of C2 : verum } ;