| version 1.185, 2010/04/23 04:44:51 |
version 1.186, 2010/04/23 07:35:44 |
|
|
| /* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.184 2010/04/16 07:13:42 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.185 2010/04/23 04:44:51 noro Exp $ */ |
| |
|
| #include "nd.h" |
#include "nd.h" |
| |
|
| Line 2899 void nd_gr(LIST f,LIST v,int m,int homo,int f4,struct |
|
| Line 2899 void nd_gr(LIST f,LIST v,int m,int homo,int f4,struct |
|
| if ( nd_gentrace ) { |
if ( nd_gentrace ) { |
| MKLIST(l1,nd_tracelist); MKNODE(nd_alltracelist,l1,0); |
MKLIST(l1,nd_tracelist); MKNODE(nd_alltracelist,l1,0); |
| } |
} |
| x = f4?nd_f4(m,&perm):nd_gb(m,ishomo,0,0,&perm); |
x = f4?nd_f4(m,&perm):nd_gb(m,ishomo || homo,0,0,&perm); |
| if ( !ishomo && homo ) { |
if ( !ishomo && homo ) { |
| /* dehomogenization */ |
/* dehomogenization */ |
| for ( t = x; t; t = NEXT(t) ) ndv_dehomogenize((NDV)BDY(t),ord); |
for ( t = x; t; t = NEXT(t) ) ndv_dehomogenize((NDV)BDY(t),ord); |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to nd.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib2 / asir2000 / engine