| version 1.3, 2009/11/12 01:39:54 |
version 1.4, 2009/12/07 10:13:43 |
| Line 87 def generate_coef_ideal(F) |
|
| Line 87 def generate_coef_ideal(F) |
|
| } |
} |
| |
|
| def pdecomp(B,V) { |
def pdecomp(B,V) { |
| |
if ( type(IsF4=getopt(f4)) == -1 ) f4(0); |
| |
else f4(IsF4); |
| |
if ( type(IsGBCheck=getopt(gbcheck)) == -1 ) gbcheck(0); |
| |
else gbcheck(IsGBCheck); |
| if ( F4 ) G0 = nd_f4_trace(B,V,1,GBCheck,0); |
if ( F4 ) G0 = nd_f4_trace(B,V,1,GBCheck,0); |
| else G0 = nd_gr_trace(B,V,1,GBCheck,0); |
else G0 = nd_gr_trace(B,V,1,GBCheck,0); |
| G=[G0]; |
G=[G0]; |
| Line 103 def pdecomp(B,V) { |
|
| Line 107 def pdecomp(B,V) { |
|
| } |
} |
| |
|
| def pdecomp_ff(B,V,Mod) { |
def pdecomp_ff(B,V,Mod) { |
| |
if ( type(IsF4=getopt(f4)) == -1 ) f4(0); |
| |
else f4(IsF4); |
| if ( F4 ) G0 = nd_f4(B,V,Mod,0); |
if ( F4 ) G0 = nd_f4(B,V,Mod,0); |
| else G0 = nd_gr(B,V,Mod,0); |
else G0 = nd_gr(B,V,Mod,0); |
| G=[G0]; |
G=[G0]; |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to mwl.rr CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / asir-contrib / testing / noro