Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
2 changes: 1 addition & 1 deletion deps/k_release
Original file line number Diff line number Diff line change
@@ -1 +1 @@
v5.0.0-fec1350
v5.0.0-2cbe065
4 changes: 2 additions & 2 deletions test/itp-nth-ancestor/nth1-spec.k
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ require "chain.k"
module NTH1-SPEC
imports V

rule
claim
<g> nth(1, B1, B2) => B1 <~* B2 </g>
<p> .Map => ?_ </p>
<k> apply("nth.e")
Expand All @@ -41,7 +41,7 @@ module NTH1-SPEC
~> apply("<~*.i")
=> . </k>

rule
claim
<k> apply("lemma") => . ... </k>
<g> B1 == B2 and B2 <~ B3 => B1 <~ B3 </g>
[trusted]
Expand Down
8 changes: 4 additions & 4 deletions test/itp-nth-ancestor/nth2-spec.k
Original file line number Diff line number Diff line change
Expand Up @@ -29,7 +29,7 @@ require "chain.k"
module NTH2-SPEC
imports V

rule
claim
<g> nth(k(N) +Int 1, B1, B2) => B1 <~* B2 </g>
<p> .Map => ?_ </p>
<k> apply("nth.e")
Expand All @@ -42,7 +42,7 @@ module NTH2-SPEC
requires k(N) >Int 0 andBool const(N)

// induction hypothesis
rule
claim
<k> apply("ih") => . ... </k>
<g> nth(k(N), B1, B2) => B1 <~* B2 </g>
requires k(N) >Int 0 andBool const(N)
Expand All @@ -57,7 +57,7 @@ module NTH2-SPEC
by apply/connect1.
Qed.
*/
rule
claim
<k> apply("lemma") => . ... </k>
<g> B1 <~* B2 and B2 <~ B3 => B1 <~* B3 </g>
[trusted]
Expand All @@ -70,5 +70,5 @@ module V

syntax Int ::= k(Int) [function, functional, injective, smtlib(k)]

rule (k(N) +Int 1) -Int 1 => k(N)
rule (k(N) +Int 1) -Int 1 => k(N) [simplification]
endmodule