Changeset d2b2a7 in git for Singular/LIB/random.lib

Timestamp:

May 5, 1998, 1:55:40 PM (26 years ago)

Author:

Kai Krüger <krueger@…>

Branches:

(u'spielwiese', '873fc1222e995d7cb33f79d8f1792ce418c8c72c')

Children:

97f92aa6d280f6022eaae47195ccc02503ccb984

Parents:

4996f5286c7671191ad22e654499fd8b752fe4f0

Message:

Modified Files:
	libparse.l utils.cc LIB/classify.lib LIB/deform.lib
	LIB/elim.lib LIB/factor.lib LIB/fastsolv.lib LIB/finvar.lib
	LIB/general.lib LIB/hnoether.lib LIB/homolog.lib LIB/inout.lib
	LIB/invar.lib LIB/makedbm.lib LIB/matrix.lib LIB/normal.lib
	LIB/poly.lib LIB/presolve.lib LIB/primdec.lib LIB/primitiv.lib
	LIB/random.lib LIB/ring.lib LIB/sing.lib LIB/standard.lib
	LIB/tex.lib LIB/tst.lib
Changed help section o procedures to have an quoted help-string between
proc-definition and proc-body.


git-svn-id: file:///usr/local/Singular/svn/trunk@1601 2c84dea3-7e68-4137-9b89-c4e89433aadc

File:

• Singular/LIB/random.lib (modified) (11 diffs)

Singular/LIB/random.lib

@@ -1 @@
-// $Id: random.lib,v 1.4 1998-04-03 22:47:12 krueger Exp $
+// $Id: random.lib,v 1.5 1998-05-05 11:55:36 krueger Exp $
 //system("random",787422842);
 //(GMG/BM, last modified 22.06.96)
 ///////////////////////////////////////////////////////////////////////////////
 
-version="$Id: random.lib,v 1.4 1998-04-03 22:47:12 krueger Exp $";
+version="$Id: random.lib,v 1.5 1998-05-05 11:55:36 krueger Exp $";
 info="
 LIBRARY:  random.lib    PROCEDURES OF RANDOM MATRIX AND POLY OPERATIONS
@@ -23 +23 @@
 
 proc genericid (id, list #)
-USAGE:   genericid(id,[,p,b]);  id ideal/module, k,p,b integers
+"USAGE:   genericid(id,[,p,b]);  id ideal/module, k,p,b integers
 RETURN:  system of generators of id which are generic, sparse, triagonal linear
          combinations of given generators with coefficients in [1,b] and
@@ -29 +29 @@
 NOTE:    For performance reasons try small bound b in characteristic 0
 EXAMPLE: example genericid; shows an example
+"
 {
 //----------------------------- set defaults ----------------------------------
@@ -50 +51 @@
 
 proc randomid (id, list #)
-USAGE:   randomid(id,[k,b]);  id ideal/module, b,k integers
+"USAGE:   randomid(id,[k,b]);  id ideal/module, b,k integers
 RETURN:  ideal/module having k generators which are random linear combinations
          of generators of id with coefficients in the interval [-b,b]
@@ -56 +57 @@
 NOTE:    For performance reasons try small bound b in characteristic 0
 EXAMPLE: example randomid; shows an example
+"
 {
 //----------------------------- set defaults ----------------------------------
@@ -76 +78 @@
 
 proc randommat (int n, int m, list #)
-USAGE:   randommat(n,m[,id,b]);  n,m,b integers, id ideal
+"USAGE:   randommat(n,m[,id,b]);  n,m,b integers, id ideal
 RETURN:  nxm matrix, entries are random linear combinations of elements
          of id and coefficients in [-b,b]
@@ -82 +84 @@
 NOTE:    For performance reasons try small bound b in char 0
 EXAMPLE:  example randommat; shows an example
+"
 {
 //----------------------------- set defaults ----------------------------------
@@ -109 +112 @@
 
 proc sparseid (int k, int u, list #)
-USAGE:   sparseid(k,u[,o,p,b]);  k,u,o,p,b integers
+"USAGE:   sparseid(k,u[,o,p,b]);  k,u,o,p,b integers
 RETURN:  ideal having k generators in each degree d, u<=d<=o, p percent of
          terms in degree d are 0, the remaining have random coefficients
          in the interval [1,b], (default: o=u=d, p=75, b=30000)
 EXAMPLE: example sparseid; shows an example
+"
 {
 //----------------------------- set defaults ----------------------------------
@@ -138 +142 @@
 
 proc sparsemat (int n, int m, list #)
-USAGE:   sparsemat(n,m[,p,b]);  n,m,p,b integers
+"USAGE:   sparsemat(n,m[,p,b]);  n,m,p,b integers
 RETURN:  nxm integer matrix, p percent of the entries are 0, the remaining
          are random coefficients >=1 and <= b; [defaults: (p,b) = (75,1)]
 EXAMPLE: example sparsemat; shows an example
+"
 {
    int r,h,ii;
@@ -184 +189 @@
 
 proc sparsepoly (int u, list #)
-USAGE:   sparsepoly(u[,o,p,b]);  u,o,p,b integers
+"USAGE:   sparsepoly(u[,o,p,b]);  u,o,p,b integers
 RETURN:  poly having only terms in degree d, u<=d<=o, p percent of the terms
          in degree d are 0, the remaining have random coefficients in [1,b),
          (defaults: o=u=d, p=75, b=30000)
 EXAMPLE:  example sparsepoly; shows an example
+"
 {
 //----------------------------- set defaults ----------------------------------
@@ -209 +215 @@
 
 proc sparsetriag (int n, int m, list #)
-USAGE:   sparsetriag(n,m[,p,b]);  n,m,p,b integers
+"USAGE:   sparsetriag(n,m[,p,b]);  n,m,p,b integers
 RETURN:  nxm lower triagonal integer matrix, diagonal entries equal to 1, about
          p percent of lower diagonal entries are 0, the remaining are random
          integers >=1 and <= b; [defaults: (p,b) = (75,1)]
 EXAMPLE: example sparsetriag; shows an example
+"
 {
    int ii,min,l,r; intmat M[n][m];