Untitled

module Main exposing (main)


import Html

gcd : Int -> Int -> Int 
gcd a b =
    if b == 0 then  
        a
    else
        gcd (abs b) (remainderBy a b)

main =
    let
        _ = Debug.log "" (gcd 6 4)
    in
    
    Html.text ""