Changeset 9a038bd in git
- Timestamp:
- Mar 17, 2011, 5:32:58 PM (12 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
- Children:
- 4199b35cfc53b9be00ef55a9d8750f9f784d4254
- Parents:
- 2ab4af50ab6c7100bb04b9bf33d43dc7ea86a33d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/extra.cc
r2ab4af5 r9a038bd 62 62 #endif 63 63 64 #ifdef HAVE_ GFAN64 #ifdef HAVE_FANS 65 65 #include <kernel/gfan.h> 66 #include <gfanlib/gfanlib.h> 66 67 #endif 67 68 … … 3656 3657 #endif 3657 3658 3658 #ifdef HAVE_ GFAN3659 #ifdef HAVE_FANS 3659 3660 /*======== GFAN ==============*/ 3660 3661 /* … … 3674 3675 heuristic=(int)(long)h->next->Data(); 3675 3676 ideal I=((ideal)h->Data()); 3676 res->rtyp=LIST_CMD; 3677 res->data=(lists) gfan(I,heuristic,FALSE); 3677 #ifndef USE_ZFAN 3678 #define USE_ZFAN 3679 #endif 3680 #ifndef USE_ZFAN 3681 res->rtyp=LIST_CMD; //res->rtyp=coneID; res->data(char*)zcone; 3682 res->data=(lists) grfan(I,heuristic,FALSE); 3683 #else 3684 extern int fanID; 3685 res->rtyp=fanID; 3686 res->data=(void*)(grfan(I,heuristic,FALSE)); 3687 #endif 3678 3688 return FALSE; 3679 3689 } … … 3686 3696 //Possibility to have only one Gröbner cone computed by specifying a weight vector FROM THE RELATIVE INTERIOR! 3687 3697 //Needs wp as ordering! 3688 if(strcmp(sys_cmd,"grcone")==0)3689 {3690 if(h!=NULL && h->Typ()==IDEAL_CMD && h->next!=NULL && h->next->Typ()==INT_CMD)3691 {3692 ideal I=((ideal)h->Data());3693 res->rtyp=LIST_CMD;3694 res->data=(lists)grcone_by_intvec(I);3695 }3696 }3698 // if(strcmp(sys_cmd,"grcone")==0) 3699 // { 3700 // if(h!=NULL && h->Typ()==IDEAL_CMD && h->next!=NULL && h->next->Typ()==INT_CMD) 3701 // { 3702 // ideal I=((ideal)h->Data()); 3703 // res->rtyp=LIST_CMD; 3704 // res->data=(lists)grcone_by_intvec(I); 3705 // } 3706 // } 3697 3707 else 3698 3708 #endif
Note: See TracChangeset
for help on using the changeset viewer.