def product_resources

bendvy-ecs-core@0.1.0.4 · snapshot_product.bend:20

import bendvy-ecs-core@0.1.0.4/snapshot_product.bend as SnapshotProduct
import Base
import bendvy-ecs-core@0.1.0.4/decode_data.bend as D
import bendvy-ecs-core@0.1.0.4/owner_product.bend as Product

20def product_resources(~LR:Type,~RR:Type,~left:LR -> LR & List<&2,D.Field>,~right:RR -> RR & List<&2,D.Field>,owner:Product.Owner<LR,RR>) -> Product.Owner<LR,RR> & List<&2,D.Field>:
21  match owner:
22    case Product.Owner{a,b}:right_resources(~LR,~RR,~right,b,left(a))

Uses (5)

Used by (1)