fact: Definition bcap m n (I : 'cV_m) (J : 'cV_n) : 'cV[R]_1 := (lcmr (principal_gen I) (principal_gen J))%:M.
imports: HB(structures) mathcomp(ssreflect ssrfun ssrbool eqtype ssrnat div seq path) mathcomp(ssralg fintype perm choice matrix bigop zmodp mxalgebra poly) ssrcomplements dvdring stronglydiscrete