Api.Valid: def of bendtorch-core@0.1.0.0
Import: import bendtorch-core@0.1.0.0/src/storage/api.bend as Api
Lines 308-321 of bendtorch-core@0.1.0.0/src/storage/api.bend: https://jend.leeeet.dev/read.txt?path=bendtorch-core@0.1.0.0/src/storage/api.bend&start_line=308&end_line=321

import Base

def Valid(+n: Nat, +history: List<&2, Effect>) -> Type:
  match history:
    case Nil{}:
      Unit
    case +effect <> +past:
      match effect:
        case Wrote{+i, w}:
          {Nat.is_lt(U32.to_nat(i), n) == True{} : Bool} & Valid(n, past)
        case Kept{i}:
          Valid(n, past)
        case Left{}:
          Valid(n, past)
        case Right{}:
          Valid(n, past)

Uses (8):
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Bool
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=List
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Nat.is_lt
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Pair
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=U32.to_nat
  https://jend.leeeet.dev/definition.txt?path=Base/base.bend&name=Unit
  https://jend.leeeet.dev/definition.txt?path=bendtorch-core@0.1.0.0/src/storage/api.bend&name=Effect