| version 1.41, 2004/08/28 05:23:55 |
version 1.42, 2004/09/10 13:20:22 |
|
|
| %%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.40 2004/08/22 02:00:24 takayama Exp $ |
%%%%%%%%%%% $OpenXM: OpenXM/src/kan96xx/Doc/ox.sm1,v 1.41 2004/08/28 05:23:55 takayama Exp $ |
| |
|
| /ox.sm1.myname (ox-new.sm1) def |
/ox.sm1.myname (ox-new.sm1) def |
| |
|
| Line 1053 oxasir.verbose { |
|
| Line 1053 oxasir.verbose { |
|
| |
|
| f 0 get isPolynomial { |
f 0 get isPolynomial { |
| /r f 0 get (ring) dc def |
/r f 0 get (ring) dc def |
| /vvv vvv { r ,, } map def |
/vvv vvv { r __ } map def |
| } |
} |
| { |
{ |
| [vvv from_records ring_of_polynomials 0] define_ring |
[vvv from_records ring_of_polynomials 0] define_ring |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to ox.sm1 CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Doc