diff --git a/test/kontrol/lido-lemmas.k b/test/kontrol/lido-lemmas.k index 65da0a19..6d64e6a8 100644 --- a/test/kontrol/lido-lemmas.k +++ b/test/kontrol/lido-lemmas.k @@ -78,6 +78,7 @@ module LIDO-LEMMAS // Further arithmetic rule ( X *Int Y ) /Int Y => X requires Y =/=Int 0 [simplification, preserves-definedness] rule ( X ==Int ( X *Int Y ) /Word Y ) orBool Y ==Int 0 => true [simplification, preserves-definedness] + rule ( 0 ==Int 0 /Word Y ) orBool Y ==Int 0 => true [simplification, preserves-definedness] rule A <=Int B /Int C => A *Int C <=Int B requires 0 (A +Int 1) *Int C <=Int B requires 0