| version 1.1, 1999/12/15 03:40:36 |
version 1.2, 1999/12/17 02:21:41 |
|
|
| (* $OpenXM$ *) |
(* $OpenXM: OpenXM/src/ox_math/lib/primadec.m,v 1.1 1999/12/15 03:40:36 ohara Exp $ *) |
| |
|
| (* |
(* |
| usage: |
usage: |
| Line 12 In[2]:= primadec[{x^2-3*x+2},{x}] |
|
| Line 12 In[2]:= primadec[{x^2-3*x+2},{x}] |
|
| Out[2]= {{{-1 + x}, {-1 + x}}, {{-2 + x}, {-2 + x}}} |
Out[2]= {{{-1 + x}, {-1 + x}}, {{-2 + x}, {-2 + x}}} |
| *) |
*) |
| |
|
| asirRtostr[x_] := Block[ |
asirRtostr[x_] := Module[ |
| {list = {}, i}, |
{list = {}, i, s}, |
| If[ x[[0]] === List, |
If[ x[[0]] === List, |
| list = Append[list, " [ " ]; |
list = Append[list, " [ " ]; |
| If[ Length[x] > 0 , |
If[ Length[x] > 0 , |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to primadec.m CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / ox_math / lib