version 1.19, 2003/08/23 02:28:38 |
version 1.21, 2003/08/24 05:25:58 |
|
|
% $OpenXM: OpenXM/src/kan96xx/Kan/dr.sm1,v 1.18 2003/08/20 01:39:16 takayama Exp $ |
% $OpenXM: OpenXM/src/kan96xx/Kan/dr.sm1,v 1.20 2003/08/24 05:19:42 takayama Exp $ |
%% dr.sm1 (Define Ring) 1994/9/25, 26 |
%% dr.sm1 (Define Ring) 1994/9/25, 26 |
%% This file is error clean. |
%% This file is error clean. |
|
|
Line 3772 $ [ff ff] fromVectors :: $ |
|
Line 3772 $ [ff ff] fromVectors :: $ |
|
/endEcart { |
/endEcart { |
(red@) (standard) switch_function |
(red@) (standard) switch_function |
[(Ecart) 0] system_variable |
[(Ecart) 0] system_variable |
|
[(degreeShift) (reset)] homogenize pop |
} def |
} def |
|
|
/ord_ws_all { |
/ord_ws_all { |