diff command doesn'texecute in a program

[Victorcastrejon]

In below program, diff command doesn't execute in CAS view, any suggestion?
EXPORT DERIVADA()

BEGIN
LOCAL fx, x, n, resultado;

// Solicitar al usuario la función y el orden de la derivada
INPUT({{fx,[-1],{27,73,0}},
{n,[0],{46,10,1}}},
{"Derivada de una función f(x)"},{"Funcion f(x):","Orden de la derivada:"},{"",""});

// Definicion de la variable independiente x
x := 'x';

// Calculo de la derivada de orden n de la función f(x)
resultado := diff(fx,x,n);

// Mostrar el resultado
PRINT();
PRINT("Función original: "+fx);
PRINT("Derivada de orden "+n+": "+resultado);

// Devolver el resultado
RETURN resultado;

END;

[Patocuy]

Hello Victor

What worked for me was to store the expression with the derivative in a string variable (cmd), then use the CAS and EVAL functions. EVAL was necessary because, if not used, the program returned an unevaluated string.

Code:

EXPORT derivada()

BEGIN
local fx, n, cmd, resultado;

// Solicitar al usuario la función y el orden de la derivada
INPUT({{fx,[-1],{27,73,0}},
{n,[0],{46,10,1}}},
{"Derivada de una función f(x)"},{"Funcion f(x):","Orden de la derivada:"},{"",""});

// Calculo de la derivada de orden n de la función f(x)
 cmd:="simplify(diff("+fx+",x,"+n+")";
 resultado:=CAS(EVAL(cmd));

// Mostrar el resultado
PRINT();
PRINT("Función original: "+fx);
PRINT("Derivada de orden "+n+": "+resultado);

// Devolver el resultado
RETURN resultado;

END;

Hope this helps,

Regards.

[Eddie W. Shore]

Thank you, Patocuy for the helpful tip.