Unified the order of zeros and poles; improved reasoning around non-essential singularites
theory Proc1
imports "HOL-SPARK.SPARK"
begin
spark_open "loop_invariant/proc1"
spark_vc procedure_proc1_5
by (simp add: ring_distribs mod_simps)
spark_vc procedure_proc1_8
by (simp add: ring_distribs mod_simps)
spark_end
lemma pow_2_32_simp: "4294967296 = (2::int)^32"
by simp
end