Definition hqlthandmultl ( n m k : hq ) ( is : hqgth k 0 ) : hqlth n m -> hqlth ( k * n ) ( k * m ) := hqgthandmultl _ _ _ is .
Require Import UniMath.Algebra.Monoids. Require Import UniMath.Algebra.Groups.