- then3 (\nm eq ff -> OptionFalse nm) pName (lit "=") (lit "False"),
- then3 (\nm eq tt -> OptionTrue nm) pName (lit "=") (lit "True"),
- then3 (\nm eq zz -> OptionString nm zz)
+ then3 (\nm _ _ -> OptionFalse nm) pName (lit "=") (lit "False"),
+ then3 (\nm _ _ -> OptionTrue nm) pName (lit "=") (lit "True"),
+ then3 (\nm _ zz -> OptionString nm zz)