|  |  D.13.1.51 isPure Procedure from librarygfan.lib(see  gfan_lib).
 
Example:Usage:
isPure(f); f fan
Return:
1 if all maximal cones of f are of the same dimension
0 otherwise
 |  | LIB "gfan.lib";
fan f=fullFan(2);
isPure(f);
==> 1
fan g=emptyFan(2);
intmat M1[2][2]=
1,0,
0,1;
cone c1=coneViaPoints(M1);
insertCone(g,c1);
isPure(g);
==> 1
intmat M2[1][2]=
0,-1;
cone c2=coneViaPoints(M2);
insertCone(g,c2);
isPure(g,c2);
==> 0
 | 
 
 |