I posted a new version of Mathematica compatibility functions.
http://sourceforge.net/projects/ribot/files/
The project is called 'mixima' on sourceforge.
It was developed on linux, but the testsuite succeeds on
Windows too. Windows installation consists of copying a
single folder, as described in the README.
There are a bunch of new things, including another example
application from physics.
As a reminder, the package does thing like this:
Evaluate a string of Mma code.
(%i1) smmatomax(" Evaluate[ Apply[Table[c, ##]&, Map[List, {2,2}]] ] ");
(%o1) [[c, c], [c, c]]
Transpose levels of a list of four nested levels.
(%i2) Apply(Plus, (Flatten(Transpose(Transpose(
Array(a,[2,2,2,3]),[4,3,2,1]),[4,3,2,1])
- Array(a,[2,2,2,3]))));
(%o2) 0
John Lapeyre