I am sorry it took so long.  Attached there is a patch which appears to 
work well:

(1) -> (3^2)$OUTFORM

         2
   (1)  3
                                                             Type: 
OutputForm
(2) -> (3^2)$OUTFORM::INFORM

   (2)  '(^ 3 2)
                                                              Type: 
InputForm
(3) -> interpret((3^2)$OUTFORM::INFORM)

         2
   (3)  3
                                                             Type: 
OutputForm
(4) -> subscript('abc, [(3^2)$OUTFORM, x])

   (4)  abc
            2
           3 , x
                                                                 Type: 
Symbol
(5) -> subscript('abc, [(3^2)$OUTFORM, x])::INFORM

   (5)
   (script  abc

     (construct  (construct '(^ 3 2) 'x)  (construct)  (construct)
      (construct)  (construct))
     )
                                                              Type: 
InputForm
(6) -> interpret(subscript('abc, [(3^2)$OUTFORM, x])::INFORM)

   (6)  abc
            2
           3 , x
                                                                 Type: 
Symbol



-- 
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
To post to this group, send email to [email protected].
Visit this group at https://groups.google.com/group/fricas-devel.
For more options, visit https://groups.google.com/d/optout.

Attachment: df
Description: Binary data

Reply via email to