real function f(x)
common p


!f =exp(x) -p*x*x

!f =(x-1)**3*(x-2)

! Muller order:
!m3 = m2 + m + 1
f =x**3 -x**2 -x -1

end