taskContainerLimits.dhall 481 B

1234567891011121314151617181920
  1. let Types = ../types/package.dhall
  2. let Prelude = ../lib/prelude.dhall
  3. let JSON = Prelude.JSON
  4. let RenderOptional = ./optionals/package.dhall
  5. let render
  6. : Types.TaskContainerLimits → JSON.Type
  7. = λ(l : Types.TaskContainerLimits)
  8. → JSON.object
  9. ( toMap
  10. { cpu = RenderOptional.natural l.cpu
  11. , memory = RenderOptional.natural l.memory
  12. }
  13. )
  14. in RenderOptional.generic Types.TaskContainerLimits render