1 files changed, 3 insertions, 0 deletions

diff --git a/H32.hs b/H32.hs
new file mode 100644
index 0000000..2a0fa88
--- /dev/null
+++ b/H32.hs
@@ -0,0 +1,3 @@
+myGCD :: Integral a => a -> a -> a
+myGCD x 0 = x
+myGCD x y = myGCD y (x `mod` y)