def allowed_observe

bendtorch-core@0.1.0.0 · src/tensor/reduction_PROOF.bend:275

import Base
import bendtorch-core@0.1.0.0/src/tensor/lifecycle.bend as Lifecycle
import bendtorch-core@0.1.0.0/src/storage/arith.bend as Arith
import bendtorch-core@0.1.0.0/src/storage/main.bend as Storage
import bendtorch-core@0.1.0.0/src/storage/model.bend as Model
import bendtorch-core@0.1.0.0/src/storage/refinement.bend as Refinement

275def allowed_observe(+depth: Nat, +length: Nat, -array: Array<F32>, +index: U32, allowed: Bool,
276  accepted: {allowed == True{} : Bool}, matched: {Storage.index_matches(depth, length, index) == True{} : Bool}) ->
277  {Lifecycle.observe_allowed(depth, length, array, index, allowed) ==
278    Model.observe(F32, depth, array, Refinement.route(depth, index)) : Maybe<&2, F32>}:
279  match allowed:
280    case False{}:
281      Empty.absurd({None{} == Model.observe(F32, depth, array, Refinement.route(depth, index)) : Maybe<&2, F32>}, Arith.clash(accepted))
282    case True{}:
283      %Equal.sym(Bool, Storage.index_matches(depth, length, index), True{}, matched) :
284        {Lifecycle.observe_index(depth, length, array, index, _) == Model.observe(F32, depth, array, Refinement.route(depth, index)) : Maybe<&2, F32>}
285      {==}