Changeset 5ca980 in git for Singular/gms.cc
 Timestamp:
 Feb 16, 2002, 12:00:46 PM (21 years ago)
 Branches:
 (u'jengelhdatetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')
 Children:
 dcff1e1a496e3f2435055ab70975afe35768e727
 Parents:
 adf5bd69bf9afcfb41fbd46edfe3f594d586b715
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

Singular/gms.cc
radf5bd6 r5ca980 2 2 * Computer Algebra System SINGULAR * 3 3 *****************************************/ 4 /* $Id: gms.cc,v 1. 3 20020212 18:04:23mschulze Exp $ */4 /* $Id: gms.cc,v 1.4 20020216 11:00:46 mschulze Exp $ */ 5 5 /* 6 6 * ABSTRACT: GaussManin system normal form … … 21 21 #include "gms.h" 22 22 23 lists gms nf(ideal p,ideal g,matrix B,int D,int K)23 lists gmsNF(ideal p,ideal g,matrix B,int D,int K) 24 24 { 25 25 ideal r=idInit(IDELEMS(p),1); … … 72 72 } 73 73 74 BOOLEAN gms nf(leftv res,leftv h)74 BOOLEAN gmsNF(leftv res,leftv h) 75 75 { 76 76 if(currRingHdl) … … 96 96 int K=(int)h>Data(); 97 97 res>rtyp=LIST_CMD; 98 res>data=(void*)gms nf(idCopy(p),g,B,D,K);98 res>data=(void*)gmsNF(idCopy(p),g,B,D,K); 99 99 return FALSE; 100 100 }
Note: See TracChangeset
for help on using the changeset viewer.