Section OpsTheory.
Variable T : finType.
Implicit Types (A B C D: {pred T}) (P Q : pred T) (x y : T) (s : seq T).
Variant pick_spec : option T -> Type :=
| Pick x of P x         : pick_spec (Some x)
| Nopick of P =1 xpred0 : pick_spec None.
End EnumPick.
Hint Resolve subxx_hint : core.

Lemma card_gt2P A :
reflect (exists x y z,
[/\ x \in A, y \in A & z \in A] /\ [/\ x != y, y != z & z != x])
(2 < #|A|).