theorem Th13: :: SCMPDS_9:13
for a, b being Int_position
for l being Element of NAT
for k1, k2 being Integer holds NIC ((Divide (a,k1,b,k2)),l) = {(l + 1)}