def with_env

near-v-framework@0.4.0.0 · domain/architecture/ops.bend:147

import Base
import near-v-framework@0.4.0.0/general/rose/type.bend as R
import near-v-framework@0.4.0.0/general/compound/type.bend as C
import near-v-framework@0.4.0.0/general/compound/edge/type.bend as E
import near-v-framework@0.4.0.0/domain/architecture/system/container/type.bend as Ct
import near-v-framework@0.4.0.0/domain/architecture/environment/type.bend as En
import near-v-framework@0.4.0.0/domain/architecture/type.bend as A

147def with_env(sys: R.Rose<A.Element>, +cs: List<&2, Ct.Container>, env: En.Environment) -> C.Compound<A.Element>:
148  match env:
149    case En.Environment{+ps, +xs, _, _, _}:
150      C.Compound{sys <> List.append(&2, R.Rose<A.Element>, parties_roses(ps), external_roses(xs)),
151        List.append(&2, E.Edge, container_edges(cs), List.append(&2, E.Edge, parties_edges(ps), external_edges(xs)))}