def get_checked_stay

bendtorch-core@0.1.0.0 · src/storage/api.bend:115

import Base
import bendtorch-core@0.1.0.0/src/storage/model.bend as Model
import bendtorch-core@0.1.0.0/src/storage/main.bend as Storage
import bendtorch-core@0.1.0.0/src/storage/arith.bend as Arith

115def get_checked_stay(+d: Nat, +n: Nat, -array: Array<F32>, +i: U32, allowed: Bool,
116  -decision: {allowed == Nat.is_lt(U32.to_nat(i), n) : Bool},
117  -balanced: Model.Balanced(F32, d, array), -valid: {Storage.bounds(d, n) == True{} : Bool},
118  no: {False{} == allowed : Bool}) ->
119  {Storage.get_checked(d, n, array, i, allowed, decision, balanced, valid) ==
120    (Storage.Owned{d, n, array, balanced, valid}, Fail{Storage.OutOfBounds{}}) : Storage.Storage & Result<&2, &2, Storage.Error, F32>}:
121  match allowed:
122    case False{}:
123      {==}
124    case True{}:
125      Empty.absurd({Storage.get_checked(d, n, array, i, True{}, decision, balanced, valid) ==
126        (Storage.Owned{d, n, array, balanced, valid}, Fail{Storage.OutOfBounds{}}) : Storage.Storage & Result<&2, &2, Storage.Error, F32>}, Arith.clash(no))