theorem Th7: :: SCMPDS_9:7

for a being Int_position
for l being Element of NAT
for k1, k2 being Integer holds NIC (((a,k1) := k2),l) = {(l + 1)}