Remark decompose_int_thumb_nil:
  forall N n p, decompose_int_thumb N n p = nil -> n = Int.zero.

Lemma cond_for_float32_cmp_correct: forall c n1 n2 rs, eval_testcond (cond_for_float_cmp c) (nextinstr (compare_float32 rs (Vsingle n1) (Vsingle n2))) = Some(Float32.cmp c n1 n2).