1.2.45 `sm1.ecartd_reduction_noh'
---------------------------------

sm1.ecartd_reduction_noh(F,A)
     :   It returns a reduced form of F in terms of A by using  a
     tangent cone algorithm. h[0,1](D)-homogenization is NOT used.
     A[0] must not contain the variable h.
Example:

           F=[2*(1-x-y)*dx+1,2*(1-x-y)*dy+1]$
             FF=[F,"x,y",[[dx,1,dy,1],[x,-1,y,-1]]]$
             sm1.ecartd_reduction_noh(dx+dy,FF);

