Select Code to Download

Select or download this
```
$n <<= 1 while $n & 0xfff;
```

    for( c = 1; ( ~n & 1 ) && ( c < 4096 ); c <<= 1 ) n >>= 1;
    lcm = n * 4096;

Select or download this

    while( n & 0xfff ) n <<= 1;
    lcm = n;

Select or download this

C:\test\C>gcm
gcm : 2132901888
...
anonyM: gcm  for s=2147483648 & r=1 to 1073741824 took:33.850023994460
anonyM: gcm2 for s=2147483648 & r=1 to 1073741824 took:46.293298113614
anonyM: gcm3 for s=2147483648 & r=1 to 1073741824 took:64.208097030422

Select or download this

U64 gcm2( U64 max, U64 n ) {
    U32 b;
...
    lcm = n * 4096;
    return ( max / lcm ) * lcm;
}

Select or download this

PUBLIC    gcm2
; Function compile flags: /Ogtpy
...

    ret    0
gcm2    ENDP

Select or download this

PUBLIC    gcm
; Function compile flags: /Ogtpy
...

    ret    0
gcm    ENDP

Select or download this

C:\test\C>gcm
anonyM: gcm  for s=2147483648 & r=1 to 1073741824 took: 33.92063749171
+5 
anonyM: gcm2 for s=2147483648 & r=1 to 1073741824 took: 46.15194765908
+9 
oiskuu: gcm  for s=2147483648 & r=1 to 1073741824 took:330.49201177311
+0