module type EXTENDED_Polynome = sig .. end
sig
end
include Polynome.T
val poly_of : r -> t
r -> t
val alien_of : t -> r
t -> r