version 1.122, 2004/12/09 13:20:33 |
version 1.124, 2005/02/09 07:58:43 |
|
|
/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.121 2004/12/09 08:56:43 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.123 2005/01/23 14:03:48 noro Exp $ */ |
|
|
#include "nd.h" |
#include "nd.h" |
|
|
Line 2366 void nd_gr(LIST f,LIST v,int m,int f4,struct order_spe |
|
Line 2366 void nd_gr(LIST f,LIST v,int m,int f4,struct order_spe |
|
break; |
break; |
} |
} |
nd_nalg = 0; |
nd_nalg = 0; |
|
av = 0; |
if ( !m ) { |
if ( !m ) { |
get_algtree((Obj)f,&av); |
get_algtree((Obj)f,&av); |
for ( nalg = 0, tv = av; tv; tv = NEXT(tv), nalg++ ); |
for ( nalg = 0, tv = av; tv; tv = NEXT(tv), nalg++ ); |
Line 3414 ND nd_quo(int mod,PGeoBucket bucket,NDV d) |
|
Line 3415 ND nd_quo(int mod,PGeoBucket bucket,NDV d) |
|
ND p,t,r; |
ND p,t,r; |
N tnm; |
N tnm; |
|
|
if ( !p ) return 0; |
if ( bucket->m < 0 ) return 0; |
else { |
else { |
nv = NV(d); |
nv = NV(d); |
mq0 = 0; |
mq0 = 0; |