pgcd = (a,b) ->
    [a,b] = [b,a%b] until b is 0
    a
alert pgcd 3600, 3024