JQ552LD3HCL36W2VYFGFKUNCAUIIRAY376RSVPQ7CZPJXVRTGQ7QC
TXJBIXXBVMRQRHAYXJWD5NZ7SJSHECNQAGNUBYVPRQ2ELUKWGYBAC
R56UG3O4Q6I3VWL3AAFCBPELK4HQPSGKBEZZZR2IN6OEBCT6SZCAC
B2JWXIEPCMVVITDJDR2SACY4VHITXGH7ZM6A5RWN6E7OKTO43TUAC
, ListOptions (..)
data ListOptions = OneLine | MultiLine deriving (Show)
data ListOptions = OneLine | MultiLine
deriving (Show)
| List
| List ListOptions
<> command "ls" (info (pure List) (progDesc "List all AlBhed Primers in the index"))
<> command "ls" (info listCommand (progDesc "List all AlBhed Primers in the index"))
listCommand :: Parser PrimerCommandlistCommand = List <$> listOpts where listOpts = flag MultiLine OneLine (long "oneline" <> short '1' <> help "Print all primers on one line if possible")
listCommand :: Parser PrimerCommand
listCommand = List <$> listOpts
where
listOpts = flag MultiLine OneLine (long "oneline" <> short '1' <> help "Print all primers on one line if possible")