theorem Th25: :: SCMPDS_6:34

for P being Instruction-Sequence of SCMPDS
for s being State of SCMPDS
for I being halt-free Program of st I is_closed_on s,P & I is_halting_on s,P holds
IC (IExec (I,P,(Initialize s))) = card I