StepConstructors.dhall 477 B

123456789101112
  1. let StepHooks = ./StepHooks.dhall
  2. in λ(Step : Type)
  3. → { get : ./GetStep.dhall → StepHooks Step → Step
  4. , put : ./PutStep.dhall → StepHooks Step → Step
  5. , task : ./TaskStep.dhall → StepHooks Step → Step
  6. , aggregate : List Step → StepHooks Step → Step
  7. , in_parallel : ./InParallelStep.dhall Step → StepHooks Step → Step
  8. , do : List Step → StepHooks Step → Step
  9. , try : Step → StepHooks Step → Step
  10. }