set echogrammar standard;
/*Running demo, a test batch file.

Entering a simple formula: */a-b;
/*generating a simple radical

*/
rad:%^(1/2);
/*Now that the simple radical has been defined, it will split any
radicals of which it is a factor

*/
rad2:(a^2-b^2)^(1/2);
/*The total differential is:

*/
%';
/*The derivative with respect to b is:

*/
diff(rad2,b);
/*lets try generating a 3rd order field extension

*/
foo3:{a|a^3+a*x+y};
/*does the original formula extinguish the extension?

*/
%^3+%*x+y;
/*now, lets see what the derivative
in terms of the field extension is

*/
foo3';
/*The derivative with respect to x is:

*/
diff(foo3,x);
/*done

*/
set echogrammar null;
