[BACK]Return to debug.sm1 CVS log [TXT][DIR] Up to [local] / OpenXM / src / kan96xx / Kan

File: [local] / OpenXM / src / kan96xx / Kan / debug.sm1 (download)

Revision 1.1, Thu Apr 12 06:48:25 2001 UTC (23 years, 2 months ago) by takayama
Branch: MAIN
CVS Tags: RELEASE_1_2_2, RELEASE_1_2_1

Kan/sm1 is changed to be complient to the change of the OpenXM-RFC 100
of before yesterday;
"Trees" can be used in place of "indeterminates" in
recursive polynomials.

% $OpenXM: OpenXM/src/kan96xx/Kan/debug.sm1,v 1.1 2001/04/12 06:48:25 takayama Exp $ 

%%% debugging for new OpenXM-RFC 100.  indeterminate or tree.
[(parse) (../plugin/cmo.sm1) pushfile] extension
/f (x+1 + x*h). def
f [(class) (recursivePolynomial)] dc /g set
(x) [(class) (indeterminate)] dc /x set
(x) [(class) (indeterminate)] dc /xx set 
[(sin) (hoge) [(x).]] [(class) (tree)] dc /t set
g message 
x message
t message
g [[x t]] replace /gg set 
gg message

[(cmoObjectToCmo) gg] extension /ggg set 
ggg message
[(cmoCmoToObject) ggg] extension message