def uses_edges

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

import Base
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/relationship/type.bend as Rel

27# ---- the architecture as a compound graph: the system's tree, the environment's leaves, and every
28# element's relationships as edges from it ----
29def uses_edges(+src: String, us: List<&2, Rel.Relationship>) -> List<&2, E.Edge>:
30  match us:
31    case []:
32      []
33    case u <> rest:
34      match u:
35        case Rel.Relationship{d, desc, t, _}:
36          E.Edge{src, d, desc, t} <> uses_edges(src, rest)