def dup_gf_sqf_part(f, K):
 f = dup_convert(f, K, K.dom)
 g = gf_sqf_part(f, K.mod, K.dom)
 return dup_convert(g, K.dom, K)

def dup_gf_sqf_part ( f , K ) : f = dup_convert ( f , K , K . dom ) g = gf_sqf_part ( f , K . mod , K . dom ) return dup_convert ( g , K . dom , K )
compute square-free part of f in gf(p)[x] .