[Solved] Implementing Extended Euclidean algorithm
I think you might be looking for something like this: combine :: Int ->Int -> (Int,Int,Int) combine n m = (x1, y1, gcd n m) where (x1, y1) = gcdext n m gcdext :: Int -> Int -> (Int, Int) gcdext n m = gcdexthelper n m 1 0 0 1 where gcdexthelper n m … Read more