Add gcd_f function.
Fix for CPIMPORT in source tree.