set i = Divide (a,k1,b,k2);

for s being State of SCMPDS holds (Exec ((Divide (a,k1,b,k2)),s)) . (IC ) = (IC s) + 1 by SCMPDS_2:52;

then Load (Divide (a,k1,b,k2)) is parahalting by Lm3;

hence Divide (a,k1,b,k2) is parahalting ; :: thesis: verum

for s being State of SCMPDS holds (Exec ((Divide (a,k1,b,k2)),s)) . (IC ) = (IC s) + 1 by SCMPDS_2:52;

then Load (Divide (a,k1,b,k2)) is parahalting by Lm3;

hence Divide (a,k1,b,k2) is parahalting ; :: thesis: verum