fact: Definition testInsert := showDiscards (quickCheck (insert_preserves_redblack_checker genRBTree)).
imports: QuickChick(QuickChick Generators) Lia mathcomp(ssreflect ssrnat ssrbool eqtype) QuickChick.RedBlack(redblack) List String Relations Wellfounded Lexicographic_Product Program.Wf FunctionalExtensionality