let Prelude = ../Prelude.dhall

let kv = Prelude.JSON.keyText

let selector
    : Text → List { mapKey : Text, mapValue : Text }
    = λ(appName : Text) → [ kv "app" appName ]

in  selector