tengo que implementar en Ooobasic el algoritmo binario para calcular el MCD Maximo común divisor  o el algoritmo de Stein???

Sin embargo no se como demostar sus tres reglas básicas

1. \( a \) y \( b \) pares \( \Rightarrow{mcd(a,b)= 2mcd (a/2,b/2)} \)
2. \( a \) par y \( b \) impar \( \Rightarrow{} mcd (a,b) = (a/2,b) \)
3. \( a \) y \( b \) impares \( \Rightarrow{} \)   INCOMPLETO

la identidad de Benzout sirve poruqe no se como

Como se implementa, no quiero que me lo hagan solo una idea de que hacer