# NOT RUN {
## Add an arbitrary list of derivative functions
## In this case the fun(x,y) is assumed to be 0.5*x^2+0.5*y^2
rxD("fun", list(function(x,y){return(x)},
function(x,y){return(y)}
))
# }
Run the code above in your browser using DataLab