isabelle2021-1: DSpecProofs
Signed-off-by: Gerwin Klein <gerwin.klein@proofcraft.systems>
This commit is contained in:
parent
be04eb0b50
commit
96ec3d4372
|
@ -463,10 +463,10 @@ lemma invoke_untyped_one_has_children:
|
|||
apply wp
|
||||
apply simp
|
||||
apply (clarsimp simp:neq_Nil_conv)
|
||||
apply auto[1]
|
||||
apply (cases slot, fastforce)
|
||||
apply wp+
|
||||
apply (rule hoare_strengthen_post[OF generate_object_ids_rv])
|
||||
apply (clarsimp simp:zip_is_empty)
|
||||
apply clarsimp
|
||||
apply (wp unlessE_wp hoare_drop_imps | simp)+
|
||||
done
|
||||
|
||||
|
|
Loading…
Reference in New Issue