Changeset 49f94f in git
- Timestamp:
- Oct 1, 2008, 5:29:23 PM (15 years ago)
- Branches:
- (u'spielwiese', 'f6c3dc58b0df4bd712574325fe76d0626174ad97')
- Children:
- 238c959ae4616e6b794e6679468a388c696c97fd
- Parents:
- e9fdf62fe3498dea063e83aeb0033b227a0b08c7
- Location:
- Singular/LIB
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/ainvar.lib
re9fdf6 r49f94f 1 // $Id: ainvar.lib,v 1. 8 2006-07-18 12:17:36Singular Exp $1 // $Id: ainvar.lib,v 1.9 2008-10-01 15:29:23 Singular Exp $ 2 2 ///////////////////////////////////////////////////////////////////////////// 3 version="$Id: ainvar.lib,v 1. 8 2006-07-18 12:17:36Singular Exp $";3 version="$Id: ainvar.lib,v 1.9 2008-10-01 15:29:23 Singular Exp $"; 4 4 category="Invariant theory"; 5 5 info=" … … 26 26 proc sortier(id) 27 27 "USAGE: sortier(id); id ideal/module 28 RETURN: the same ideal/module but with generators ordered by the re29 leading term , starting with the smallest28 RETURN: the same ideal/module but with generators ordered by their 29 leading terms, starting with the smallest 30 30 EXAMPLE: example sortier; shows an example 31 31 " 32 32 { 33 33 if(size(id)==0) 34 {return(id); 35 } 34 {return(id); } 36 35 intvec i=sortvec(id); 37 36 int j; 38 37 if( typeof(id)=="ideal") 39 { ideal m; 40 } 38 { ideal m; } 41 39 if( typeof(id)=="module") 42 { module m; 43 } 44 if( typeof(id)!="ideal" and typeof(id)!="module") 45 { "// input must be of type ideal or module" 46 return(); 47 } 48 for (j=1;j<=size(i);j++) 40 { module m; } 41 if( typeof(id)!="ideal" and typeof(id)!="module") 42 { ERROR("input must be of type ideal or module"); } 43 for (j=1;j<=size(i);j++) 49 44 { 50 45 m[j] = id[i[j]]; -
Singular/LIB/matrix.lib
re9fdf6 r49f94f 1 1 /////////////////////////////////////////////////////////////////////////////// 2 version="$Id: matrix.lib,v 1.4 2 2008-06-27 18:08:53 motsakExp $";2 version="$Id: matrix.lib,v 1.43 2008-10-01 15:29:23 Singular Exp $"; 3 3 category="Linear Algebra"; 4 4 info=" … … 302 302 if( typeof(A)!="matrix" and typeof(A)!="intmat" ) 303 303 { 304 "// no matrix or intmat!"; 305 return (A); 304 ERROR("no matrix or intmat!"); 306 305 } 307 306 if( ncols(A) != nrows(A) ) 308 307 { 309 "// not a suare matrix!"; 310 return(); 308 ERROR("not a square matrix!"); 311 309 } 312 310 //---------------------------- trivial cases ---------------------------------- -
Singular/LIB/qhmoduli.lib
re9fdf6 r49f94f 1 1 /////////////////////////////////////////////////////////////////////////////// 2 version=" Id: qhmoduli.lib,v 1.0 2000/12/12 12:32:15Singular Exp $";2 version="$Id: qhmoduli.lib,v 1.12 2008-10-01 15:29:23 Singular Exp $"; 3 3 category="Singularities"; 4 4 info="
Note: See TracChangeset
for help on using the changeset viewer.