| version 1.19, 2000/07/31 01:21:41 |
version 1.20, 2000/07/31 02:25:34 |
|
|
| /* $OpenXM: OpenXM/src/k097/lib/minimal/minimal.k,v 1.18 2000/07/30 02:26:25 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/k097/lib/minimal/minimal.k,v 1.19 2000/07/31 01:21:41 takayama Exp $ */ |
| #define DEBUG 1 |
#define DEBUG 1 |
| Sordinary = false; |
Sordinary = false; |
| /* If you run this program on openxm version 1.1.2 (FreeBSD), |
/* If you run this program on openxm version 1.1.2 (FreeBSD), |
| Line 358 def StotalDegree(f) { |
|
| Line 358 def StotalDegree(f) { |
|
| return(d0); |
return(d0); |
| } |
} |
| |
|
| |
HelpAdd(["Sord_w", |
| |
["Sord_w(f,w) returns the w-order of f", |
| |
"Example: Sord_w(x^2*Dx*Dy,[x,-1,Dx,1]):"]]); |
| /* Sord_w(x^2*Dx*Dy,[x,-1,Dx,1]); */ |
/* Sord_w(x^2*Dx*Dy,[x,-1,Dx,1]); */ |
| def Sord_w(f,w) { |
def Sord_w(f,w) { |
| local neww,i,n; |
local neww,i,n; |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to minimal.k CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / k097 / lib / minimal