spec: nat-prime
inst:
name: gcd-le-both
seq: ⊦ m ≠ 0 ∧ n ≠ 0 → gcd(m, n) ≤ m ∧ gcd(m, n) ≤ n
subst: [m, n] → [m, n]
flags: current, []
Additional information
Used simplifier rules:
lels-01: ⊦ ¬ m ≤ n ↔ n < m; from specification nat%ls-le-simp: ⊦ m < n → (n ≤ m ↔ false); from specification nat
Used terms: m, n