def external_roses

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

import Base
import near-v-framework@0.4.0.0/general/rose/type.bend as R
import near-v-framework@0.4.0.0/domain/architecture/environment/external/type.bend as X
import near-v-framework@0.4.0.0/domain/architecture/type.bend as A

129def external_roses(xs: List<&2, X.External>) -> List<&2, R.Rose<A.Element>>:
130  match xs:
131    case []:
132      []
133    case x <> rest:
134      match x:
135        case X.External{k, n, d, _, _, _, _, _}:
136          R.Rose{k, A.Element{n, d, "", A.ExternalLevel{}}, []} <> external_roses(rest)