Definition make_issubmodule {R : ring} {M : module R} {A : hsubtype M} (H1 : issubgr A) (H2 : issubsetwithsmul (module_mult M) A) : issubmodule A := make_dirprod H1 H2.
Require Import UniMath.MoreFoundations.Subtypes. Require Import UniMath.Algebra.RigsAndRings. Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups. Require Import UniMath.Algebra.Modules.Core.