dhall/server/mkServer.dhall

   1     let Server = ./Server.dhall
   2
   3 in  let Service = ./service/Service.dhall
   4
   5 in  let Vault = ./../Vault.dhall
   6
   7 in    λ(vault : Vault)
   8     → λ(adminUrl : Text)
   9     → λ(services : List Service)
  10     →   { kong_app_admin_url =
  11             adminUrl
  12         , kong_app_admin_apikey =
  13             vault.appAdminApiKey
  14         , services =
  15             services
  16         }
  17       : Server