Skip to content

Commit

Permalink
tweak
Browse files Browse the repository at this point in the history
Signed-off-by: John Kastner <jkastner@amazon.com>
  • Loading branch information
john-h-kastner-aws committed Mar 6, 2025
1 parent b06a6a3 commit 05784b1
Showing 1 changed file with 2 additions and 1 deletion.
3 changes: 2 additions & 1 deletion cedar-lean/Cedar/Thm/Validation/Levels/CheckLevel.lean
Original file line number Diff line number Diff line change
Expand Up @@ -124,7 +124,6 @@ inductive TypedExpr.AtLevel : TypedExpr → Nat → Prop where
AtLevel (.call xfn args ty) n
end

mutual

theorem entity_access_at_level_succ {tx : TypedExpr} {n n' : Nat}
(h₁ : TypedExpr.EntityAccessAtLevel tx n n' path) :
Expand Down Expand Up @@ -169,6 +168,8 @@ theorem entity_access_at_level_then_at_level {tx : TypedExpr} {n : Nat} {path :
| exact entity_access_at_level_then_at_level (by assumption)
termination_by tx

mutual

theorem entity_access_level_spec {tx : TypedExpr} {n nmax : Nat} {path : List Attr} :
(TypedExpr.EntityAccessAtLevel tx n nmax path) ↔ (checkEntityAccessLevel tx n nmax path)
:= by
Expand Down

0 comments on commit 05784b1

Please sign in to comment.