[Axiom-math] Axiom: Printing multiple variables in axiom.

[Constantine Frangos]

In the function below, I tried to use the following commands

)display value Acon
print(['Acon = Acon])

to print one or more variable.

However, I get very strange behaviour and error messages, so had to comment 
them out. There might be a bug somwhere in my program.

If an axiom expert could implement a simplified version of the Maxima
display() function (probably a lisp function) in lisp/axiom, then this would
be very useful.

In Maxima:

 x1:1;
 x2:2;
 x3:3;
 display(x1,x2,x3); ->
 x1 = 1
 x2 = 2
 x3 = 3

Any assistance would be appreciated.

TIA

C. Frangos.


testkinemat1 ==
--)read expandsincos.input
 Acon := matrix([[1 , 0 , Lo1*sin(phi) , -sin(phi)*a , 0 , 0 , 0 , 0 , 0],_
[0 , 1 , -Lo1*cos(phi) , a*cos(phi) , 0 , 0 , 0 , 0 , 0],_
[1 , 0 , -Lo1*sin(phi) , 0 , -a*sin(phi), 0 , 0 , 0 , 0],_
[0 , 1 , Lo1*cos(phi) , 0 , a*cos(phi) , 0 , 0 , 0 , 0],_
[1,0,-Lc*cos(phi)+Lo1*sin(phi),0,0,0,-a*sin(phi)*cos(delta3)_
-a*cos(phi)*sin(delta3),0,0],_
[0,1,-Lc*sin(phi)-Lo1*cos(phi),0,0,0,a*cos(phi)*cos(delta3)_
-a*sin(phi)*sin(delta3),0,0],_
[1,0,-Lc*cos(phi)-Lo1*sin(phi),0,0,(-2*sin(phi)*Lo1*sin(delta3)-sin(phi)*_
Lc*cos(delta3)-cos(phi)*Lc*sin(delta3))*a/sqrt(4*Lo1^2*sin(delta3)^2+_
4*Lo1*sin(delta3)*Lc*cos(delta3)+Lc^2*cos(delta3)^2+Lc^2*sin(delta3)^2),0,0,0
],_

[0,1,-Lc*sin(phi)+Lo1*cos(phi),0,0,a*(2*cos(phi)*Lo1*sin(delta3)+_
cos(phi)*Lc*cos(delta3)-sin(phi)*Lc*sin(delta3))/sqrt(4*Lo1^2*sin(delta3)^2+_
4*Lo1*sin(delta3)*Lc*cos(delta3)+Lc^2*cos(delta3)^2+Lc^2*sin(delta3)^2),0,0,0
],_ [0 , 0 , 0 , 0 , 0 , 1 , 1 , 0 , -k]])
 pause()
 Acon := map(simplify,Acon)
--)display value Acon
-- print('Acon = Acon)
 print(Acon)
 pause()
 rankAcon := rank(Acon)
-- print('rankAcon = rankAcon)
 print(rankAcon)
 pause()
 Acone := rowEchelon(Acon)
--)display value Acone
-- print('Acone = Acone)
 print(Acone)
 pause()
 Aconnull := nullSpace(Acon)
--)display value Aconnull
-- print('Aconnull = Aconnull)
 print(Aconnull)
 pause()
 Aconnullity := nullity(Acon)
--)display value Aconnullity
-- print('Aconnullity = Aconnullity)
 print(Aconnullity)