[Haskell-beginners] Attoparsec parser and maybe type

[PICCA Frederic-Emmanuel]

powderWilsonP :: Parser (Maybe PowderWilson)
powderWilsonP = powderWilsonP1 <|> powderWilsonP2
    where
      powderWilsonP1 :: Parser (Maybe PowderWilson)
      powderWilsonP1 = Just <$> ( PowderWilson
                                  <$> doubleP
                                  <*> doubleP
                                  <*> doubleP
                                  <*> doubleP
                                  <*> doubleP
                                )

      powderWilsonP2 :: Parser (Maybe PowderWilson)
      powderWilsonP2 = do
        skipSpace
        _ <- string "---------no results -----------"
        pure Nothing

I will test it :))

thanks