Input.hs

{-# LANGUAGE DeriveAnyClass #-}
-- @generated by keiro-dsl 0.17.0.0 (language keiro-dsl 6) from process input AuditOnly; do not edit.
module Generated.ProcessReactions.AuditOnly.Input (AuditOnlyInput (..)) where

import Data.Aeson (FromJSON, ToJSON)
import GHC.Generics (Generic)
import Generated.ProcessReactions.Nominals qualified as N

data AuditOnlyInput
  = IncidentNoted
      { incidentId :: !N.IncidentId
      }
  deriving stock (Generic, Eq, Show)
  deriving anyclass (FromJSON, ToJSON)