proposition: Lemma sesquiP : reflect (M = (-1) ^+ eps *: M ^t theta) (M \is (eps,theta).-sesqui).
proof: Proof. by rewrite sesquiE; apply/eqP. Qed.
imports: HB(structures) mathcomp(all_ssreflect ssralg fingroup zmodp poly ssrnum) mathcomp(matrix mxalgebra vector falgebra ssrnum algC algnum) mathcomp(fieldext) mathcomp(vector)