riscv refine: weaken precondition of threadSet_invs_trivialT

This commit is contained in:
Gerwin Klein 2019-06-27 18:41:28 +10:00
parent 4fe875e854
commit 01c6c9f7b5
1 changed files with 0 additions and 1 deletions

View File

@ -1347,7 +1347,6 @@ lemma threadSet_invs_trivialT:
assumes b: "\<forall>tcb. tcbMCP tcb \<le> maxPriority \<longrightarrow> tcbMCP (F tcb) \<le> maxPriority"
shows
"\<lbrace>\<lambda>s. invs' s \<and>
tcb_at' t s \<and>
(\<forall>d p. (\<exists>tcb. inQ d p tcb \<and> \<not> inQ d p (F tcb)) \<longrightarrow> t \<notin> set (ksReadyQueues s (d, p))) \<and>
(\<forall>ko d p. ko_at' ko t s \<and> inQ d p (F ko) \<and> \<not> inQ d p ko \<longrightarrow> t \<in> set (ksReadyQueues s (d, p))) \<and>
((\<exists>tcb. \<not> tcbQueued tcb \<and> tcbQueued (F tcb)) \<longrightarrow> ex_nonz_cap_to' t s \<and> t \<noteq> ksCurThread s) \<and>