def serves_among

near-v-framework@0.4.0.0 · domain/architecture/system/deployment/nix_darwin/ops.bend:143

import Base
import near-v-framework@0.4.0.0/domain/architecture/system/deployment/nix_darwin/type.bend as ND

143def serves_among(xs: List<&2, ND.Serve>, +instances: List<&2, String>) -> Bool:
144  match xs:
145    case []:
146      True{}
147    case s <> rest:
148      List.contains(~String, ~String.eq, instances, serve_container(s)) && serves_among(rest, instances)