/* ********************************** */
/* Here is cleanest method */
/* ********************************** */
load(plotdf);
PI  : float(%pi);
dydx : cos(PI*x/4);
ans  : (4/PI) * sin(PI*x/4);
plotdf(dydx, [xfun, string(ans)]);
/* ********************************** */


/* ********************************** */
/* Here is simplest method */
/* ********************************** */
load(plotdf);
PI  : float(%pi);
plotdf(cos(PI*x/4), [xfun, string( (4/PI) * sin(PI*x/4) )]);
/* ********************************** */


/* ********************************************* */
/* Here is an example with manual x and y ranges */
/* ********************************************* */
load(plotdf);
PI  : float(%pi);
dydx : cos(PI*x/4);
ans  : (4/PI) * sin(PI*x/4);
plotdf(dydx, [xfun, string(ans)], [x, 0, PI], [y, 0, 2]);
/* ********************************************* */