theorem :: SCMPDS_6:36
for a being Int_position
for k1 being Integer
for I, J being Program of holds
( 0 in dom (if=0 (a,k1,I,J)) & 1 in dom (if=0 (a,k1,I,J)) )