úί? Varaint class((c) Jorge Santiago Alvarez Cuadros, 2015GPL-3sanjorgek@ciencias.unam.mx experimentalportableSafeYou can defineNinstance (Varaint a) => Arbitrary a where {arbitrary = oneof [valid, invalid]} 0QuickCheckVariant-0.1.0.3-K5qDcFjuGmHLJTxk7DSYG8Test.QuickCheck.VariantVariantvalidinvalid $fVariant(,,) $fVariant(,)$fVariantEither$fVariantMaybe $fVariant[]