def step_left_retains
bendtorch-core@0.1.0.0 · src/tensor/elementwise_PROOF.bend:276
import bendtorch-core@0.1.0.0/src/tensor/elementwise_PROOF.bend as ElementwisePROOF
import Base
import bendtorch-core@0.1.0.0/src/shape/core.bend as Shape
import bendtorch-core@0.1.0.0/src/tensor/core.bend as Core
import bendtorch-core@0.1.0.0/src/tensor/elementwise.bend as Elementwise
import bendtorch-core@0.1.0.0/src/tensor/elementwise_totality.bend as Totality
276def step_left_retains(+operation: Elementwise.Operation, -shape: Shape.Shape, +index: U32,
277 -original_left: Core.Dynamic, -original_right: Core.Dynamic, right: Core.Dynamic,
278 output: Core.Tensor<shape>, +right_index: U32, pair: Core.Dynamic & Result<&2, &2, Core.Error, F32>,
279 -left_same: Totality.SameSource(original_left, dynamic_read_owner(pair)),
280 -right_same: Totality.SameSource(original_right, right)) ->
281 StepSources<shape, original_left, original_right, Elementwise.step_left(operation, shape, index, right, output, right_index, pair)>:
282 (left, result) = pair
283 match result:
284 case Fail{error}:
285 StepSources{left_same, right_same}
286 case Done{value}:
287 step_sources_reify(shape, original_left, original_right,
288 Elementwise.step_right(operation, shape, index, left, output, value, Core.read_dynamic(right, right_index)),
289 {\{SourceModel: same => step_right_retains(operation, shape, index, original_left, original_right, left, output, value,
290 Core.read_dynamic(right, right_index), left_same,
291 property => Equal.trans(Totality.Inspection,
292 Totality.inspect(property, dynamic_read_owner(Core.read_dynamic(right, right_index))),
293 Totality.inspect(property, right), Totality.inspect(property, original_right), same(property), right_same(property)))} :
294 SourceModel<right, dynamic_read_owner(Core.read_dynamic(right, right_index))> ->
295 StepSources<shape, original_left, original_right, Elementwise.step_right(operation, shape, index, left, output, value, Core.read_dynamic(right, right_index))>}(
296 dynamic_read_retains(right, right_index)))