{-# LANGUAGE DataKinds #-}

module Cardano.CLI.EraIndependent.Debug.CertificateView.Command where

import Cardano.CLI.Type.Common

import Vary (Vary)

data CertificateViewCmdArgs = CertificateViewCmdArgs
  { CertificateViewCmdArgs -> Vary '[FormatJson, FormatYaml]
outputFormat :: !(Vary [FormatJson, FormatYaml])
  , CertificateViewCmdArgs -> Maybe (File () 'Out)
mOutFile :: !(Maybe (File () Out))
  , CertificateViewCmdArgs -> CertificateFile
inputCertificateFile :: !CertificateFile
  }
  deriving Int -> CertificateViewCmdArgs -> ShowS
[CertificateViewCmdArgs] -> ShowS
CertificateViewCmdArgs -> String
(Int -> CertificateViewCmdArgs -> ShowS)
-> (CertificateViewCmdArgs -> String)
-> ([CertificateViewCmdArgs] -> ShowS)
-> Show CertificateViewCmdArgs
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CertificateViewCmdArgs -> ShowS
showsPrec :: Int -> CertificateViewCmdArgs -> ShowS
$cshow :: CertificateViewCmdArgs -> String
show :: CertificateViewCmdArgs -> String
$cshowList :: [CertificateViewCmdArgs] -> ShowS
showList :: [CertificateViewCmdArgs] -> ShowS
Show