fact: Definition gcdisgreatest ( n m : hz ) ( i : hzneq 0 n ): ∏ l : hz, iscommonhzdiv l n m → hzleh l (gcd n m i) := pr2 ( pr2 ( pr1 ( euclideanalgorithm n m i ) ) ).
imports: UniMath.PAdics.lemmas UniMath.NumberSystems.Integers UniMath.Foundations.Preamble