[Octave-cvsupdate] SF.net SVN: octave:[9954] trunk/octave-forge/extra/nurbs/inst/nrbbasisfun.m

[<cd...@us...>]

Revision: 9954
          http://octave.svn.sourceforge.net/octave/?rev=9954&view=rev
Author:   cdf
Date:     2012-03-18 22:53:36 +0000 (Sun, 18 Mar 2012)
Log Message:
-----------
reduce randomness of test

Modified Paths:
--------------
    trunk/octave-forge/extra/nurbs/inst/nrbbasisfun.m

Modified: trunk/octave-forge/extra/nurbs/inst/nrbbasisfun.m
===================================================================
--- trunk/octave-forge/extra/nurbs/inst/nrbbasisfun.m	2012-03-18 22:27:44 UTC (rev 9953)
+++ trunk/octave-forge/extra/nurbs/inst/nrbbasisfun.m	2012-03-18 22:53:36 UTC (rev 9954)
@@ -125,6 +125,8 @@
 %! aux1 = linspace(0,1,m); aux2 = linspace(0,1,n);
 %! nrb = nrbkntins  (nrb, {aux1(2:end-1), aux2(2:end-1)});
 %! u = rand (1, 30); v = rand (1, 10);
+%! u = u - min (u); u = u / max (u);
+%! v = v - min (v); v = v / max (v);
 %! [B, N] = nrbbasisfun ({u, v}, nrb);
 %! assert (sum(B, 2), ones(300, 1), 1e-6)
 %! assert (all (all (B<=1)), true)

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.