fact: Definition inB1 (z : C) := (Re z - 1 <= 0) && ((Im z)^+2 <= 3%:R * (Re z - 1) ^+2).
imports: mathcomp(all_ssreflect) mathcomp(ssralg poly polydiv polyorder ssrnum zmodp) mathcomp(polyrcf qe_rcf_th complex) poly_normal pol mathcomp(complex)