def dup_ff_lcm(f, g, K):
 h = dup_quo(dup_mul(f, g, K), dup_gcd(f, g, K), K)
 return dup_monic(h, K)

def dup_ff_lcm ( f , g , K ) : h = dup_quo ( dup_mul ( f , g , K ) , dup_gcd ( f , g , K ) , K ) return dup_monic ( h , K )
computes polynomial lcm over a field in k[x] .