| version 1.1, 2003/07/21 07:32:00 |
version 1.2, 2004/09/10 13:20:22 |
|
|
| % $OpenXM$ |
% $OpenXM: OpenXM/src/kan96xx/Doc/oxasir_old.sm1,v 1.1 2003/07/21 07:32:00 takayama Exp $ |
| %% kxx/oxasir.sm1 1998, 2/12 (this version is at Old/oxasir.sm1.19980212 |
%% kxx/oxasir.sm1 1998, 2/12 (this version is at Old/oxasir.sm1.19980212 |
| %% 3/1, 1995, 11/5, 11/21 |
%% 3/1, 1995, 11/5, 11/21 |
| %% This file is error clean. |
%% This file is error clean. |
| Line 314 oxasir.verbose { |
|
| Line 314 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 oxasir_old.sm1 CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / kan96xx / Doc