We present an algorithm to decompose nonlinear differential

polynomials in one variable and with rational functions as

coefficients. The algorithm is implemented in Maple for the {em

constant field} case. The program can be used to decompose

differential polynomials with more than one thousand terms

effectively.